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

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

Programe/update_nomenclator.prg

@@ -0,0 +1,51 @@
+**********************************************************
+Procedure update_nomenclator
+
+Do update_lunilean
+
+*** tabele meniu deschise din proiect
+Local lcCaleDateMenu
+
+lcCaleDateMenu=gcAppPath+[\COMUN\DATEMENU\]
+
+*!*	modificare v 2.0.71
+*!*	If !Used('XREQUEST')
+*!*		Use &lcCaleDateMenu.XREQUEST In 0 Alias XREQUEST
+*!*	Endif
+*!*	If !Used('xitems')
+*!*		Use &lcCaleDateMenu.xitems In 0 Alias xitems
+*!*	Endif
+*!*	If !Used('XSETS')
+*!*		Use &lcCaleDateMenu.XSETS In 0 Alias XSETS Order Tag ID_SET
+*!*	Endif
+*!*	If !Used('xACT')
+*!*		Use &lcCaleDateMenu.xACT In 0 Alias xACT
+*!*	Endif
+*!*	If !Used('xnote')
+*!*		Use &lcCaleDateMenu.xnote In 0 Alias xnote
+*!*	Endif
+lnSucces = xdate()
+*!*	modificare v 2.0.71	^
+
+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
+*!*	modificare	v 2.1.1	^
+*!*	If !Used('nom_meniu')
+*!*		Use &lcCaleDateMenu.nom_meniu In 0 Alias nom_meniu
+*!*	Endif
+
+Endproc && update_nomenclator