Initial: flux text FoxBin2Prg (git urmareste .??2 in-arbore, binarele VFP git-ignored)

Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>

Programe/OVARIABILE_GLOBALE.PRG

@@ -0,0 +1,20 @@
+**OVARIABILE_GLOBALE.PRG
+
+*** Citesc setarea pentru ReportBehaviour
+IF TYPE('gnReportBehaviour') = 'U'
+	PUBLIC gnReportBehaviour 
+	gnReportBehaviour = 90
+ENDIF 
+
+LOCAL lcReportBehaviour
+lcReportBehaviour = NVL(getini(m.gcGeneralIniFile,'report','reportbehaviour'), '')
+IF EMPTY(m.lcReportBehaviour)
+	setini(m.gcGeneralIniFile,'report','reportbehaviour', '90')
+	gnReportBehaviour = 90
+ELSE
+	gnReportBehaviour = VAL(m.lcReportBehaviour)
+ENDIF 
+IF !INLIST(gnReportBehaviour, 80, 90)
+     setini(m.gcGeneralIniFile,'report','reportbehaviour', '90')
+	 gnReportBehaviour = 90
+ENDIF