**********************************************************
Procedure update_nomenclator

Do update_lunilean

*** tabele meniu deschise din proiect
Local lcCaleDateMenu

lcCaleDateMenu=gcAppPath+[\COMUN\DATEMENU\]

lnSucces = xdate()

If !Used('menu1')
	Use &lcCaleDateMenu.menu1 In 0 Alias menu1 Excl
Endif

If !Used('INFISIERE')
	Use &lcCaleDateMenu.INFISIERE In 0 Alias INFISIERE
Endif

If !Used('selectii')
	Use &lcCaleDateMenu.gest_selectii In 0 Alias selectii
Endif

*!*	modificare	v 2.1.1
If !Used('mila1')
	Use &lcCaleDateMenu.mila1 In 0 Alias mila1
endif

Endproc && update_nomenclator