Co-Authored-By: Claude Opus 5 (1M context) <noreply@anthropic.com> Claude-Session: https://claude.ai/code/session_015husoVS24ewJZr21ZoVR3v
20 lines
476 B
Plaintext
20 lines
476 B
Plaintext
**********************************************************
|
|
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 |