* Test conectare
x=CREATE('conectare')
DEFINE CLASS Conectare AS Conectare
PROCEDURE INIT
		DODEFAULT()
IF !FILE(lcIniFile)
	SET TEXTMERGE ON TO  MEMVAR lcTextIni
	ENDIF
\[connection]
\host=ROA_ROMFAST2
\username=test
\password=123
	SET TEXTMERGE TO
	STRTOFILE(lcTextIni, lcIniFile)
	
	ENDPROC 

ENDDEFINE