Inrolare ROACONTRACTE conform COMUN\docs\inrolare-proiect-git-text.md: - .gitignore/.gitattributes dupa modelul ROACONT (COMUN/ exclus, are repo propriu) - 439 texte FoxBin2Prg generate in arbore (vc2/sc2/fr2/mn2/pj2/db2) - Clase\registry.vcx ramane binar: memo .vct corupt (Error 41), nu se poate converti - Clase\ferestre_contracte.vcx: text generat, roundtrip scutit (fara write-back) - CLAUDE.md, docs/README.md, roa_sync.bat Co-Authored-By: Claude Opus 5 <noreply@anthropic.com> Claude-Session: https://claude.ai/code/session_01RYbiinqXxdEqXi53x4Ro7K
65 lines
1.6 KiB
Plaintext
65 lines
1.6 KiB
Plaintext
**********************************************************
|
|
PROCEDURE update_nomenclator
|
|
|
|
*!* DO update_coresp_tip_part
|
|
*!* DO update_coresp_tip_cont
|
|
DO update_lunilean
|
|
|
|
*** tabele meniu deschise din proiect
|
|
LOCAL lcCaleDateMenu
|
|
|
|
lcCaleDateMenu=gcAppPath+[DATEMENU\]
|
|
*!* modificare v 2.0.35
|
|
*!* IF !USED('MILA1')
|
|
*!* USE &lcCaleDateMenu.MILA1 IN 0 ALIAS MILA1
|
|
*!* ENDIF
|
|
|
|
*!* IF !USED('XREQUEST')
|
|
*!* USE &lcCaleDateMenu.XREQUEST IN 0 ALIAS XREQUEST
|
|
*!* ENDIF
|
|
*!* IF !USED('xitems')
|
|
*!* USE &lcCaleDateMenu.xitems IN 0 ALIAS xitems
|
|
*!* ENDIF
|
|
*!* IF !USED('YACT')
|
|
*!* USE &lcCaleDateMenu.YACT IN 0 ALIAS YACT
|
|
*!* 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.35 ^
|
|
|
|
*!* IF !USED('menu1')
|
|
*!* USE &lcCaleDateMenu.menu1 IN 0 ALIAS menu1 EXCL
|
|
*!* ENDIF
|
|
|
|
IF !USED('INFISIERE')
|
|
USE &lcCaleDateMenu.INFISIERE IN 0 ALIAS INFISIERE
|
|
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
|
|
|
|
*!* IF !USED('refaceri')
|
|
*!* USE &lcCaleDateMenu.refaceri IN 0 ALIAS refaceri
|
|
*!* ENDIF
|
|
|
|
*!* IF !USED('tabela_fisa_cont')
|
|
*!* USE &lcCaleDateMenu.tabela_fisa_cont IN 0 ALIAS tabela_fisa_cont
|
|
*!* ENDIF
|
|
|
|
|
|
ENDPROC && update_nomenclator |