**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  
