**********************************************************
PROCEDURE update_nomenclator

	*** tabele meniu deschise din proiect
	LOCAL lcCaleDateMenu

	lcCaleDateMenu=gcAppPath+[DATEMENU\]


	IF !USED('INFISIERE')
		USE &lcCaleDateMenu.INFISIERE IN 0 ALIAS INFISIERE
	ENDIF

	IF !USED('refaceri')
		USE &lcCaleDateMenu.refaceri IN 0 ALIAS refaceri
	ENDIF

	CREATE CURSOR dual (dummy c(10))
	INSERT INTO dual (dummy) VALUES ("")
ENDPROC && update_nomenclator