Initial: flux text FoxBin2Prg (git urmareste .??2 in-arbore, binarele VFP git-ignored)
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
This commit is contained in:
119
Programe/update_roadef_sal.prg
Normal file
119
Programe/update_roadef_sal.prg
Normal file
@@ -0,0 +1,119 @@
|
||||
|
||||
*******************************************
|
||||
* PROCEDURE update_responsabil( )
|
||||
* Date : 05/23/05, 12:25:08
|
||||
* author : liana.macinic
|
||||
* description:
|
||||
|
||||
****** PARAMETER BLOCK **************
|
||||
* Parameters : 0
|
||||
*
|
||||
*******************************************
|
||||
PROCEDURE update_responsabil( )
|
||||
If Used('v_resp')
|
||||
Use In v_resp
|
||||
Endif
|
||||
|
||||
lcSql = [select * from ] + gcS + [.sal_responsabil where ales = 1]
|
||||
lcCursor = [v_resp]
|
||||
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
|
||||
goExecutor.oReset()
|
||||
|
||||
ENDPROC
|
||||
*----------------------------------sfarsit procedura update_responsabil----------------------------------
|
||||
|
||||
*******************************************
|
||||
* PROCEDURE update_sectie( )
|
||||
* Data/ora : 12/16/04, 14:26:22
|
||||
* autor : liana.macinic
|
||||
* descriere:
|
||||
|
||||
****** PARAMETER BLOCK **************
|
||||
* Parametri : 0
|
||||
*
|
||||
*******************************************
|
||||
Procedure update_sectie( )
|
||||
If Used('v_sectie')
|
||||
Use In v_sectie
|
||||
Endif
|
||||
|
||||
lcSql = [select * from ] + gcS + [.nom_sectii order by sectie]&& where inactiv = 0]
|
||||
lcCursor = [v_sectie]
|
||||
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
|
||||
goExecutor.oReset()
|
||||
|
||||
Return lnSucces
|
||||
|
||||
Endproc
|
||||
*******************************************
|
||||
* PROCEDURE update_transe( )
|
||||
* Date : 05/26/05, 16:25:42
|
||||
* author : liana.macinic
|
||||
* description:
|
||||
|
||||
****** PARAMETER BLOCK **************
|
||||
* Parameters : 0
|
||||
*
|
||||
*******************************************
|
||||
PROCEDURE update_transe( )
|
||||
If Used('v_transe')
|
||||
Use In v_sectie
|
||||
Endif
|
||||
|
||||
lcSql = [select * from ] + gcS + [.SAL_NOM_TRANSE where inactiv = 0 and sters = 0]
|
||||
lcCursor = [v_transe]
|
||||
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
|
||||
goExecutor.oReset()
|
||||
|
||||
Return lnSucces
|
||||
|
||||
ENDPROC
|
||||
*----------------------------------sfarsit procedura update_transa----------------------------------
|
||||
*******************************************
|
||||
* PROCEDURE update_ore( )
|
||||
* Date : 05/26/05, 16:25:42
|
||||
* author : liana.macinic
|
||||
* description:
|
||||
|
||||
****** PARAMETER BLOCK **************
|
||||
* Parameters : 0
|
||||
*
|
||||
*******************************************
|
||||
PROCEDURE update_ore( )
|
||||
If Used('v_nomore')
|
||||
Use In v_nomore
|
||||
Endif
|
||||
|
||||
lcSql = [select * from ] + gcS + [.SAL_NOMORE where inactiv = 0 and sters = 0]
|
||||
lcCursor = [v_nomore]
|
||||
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
|
||||
goExecutor.oReset()
|
||||
|
||||
Return lnSucces
|
||||
|
||||
ENDPROC
|
||||
*----------------------------------sfarsit procedura update_ore----------------------------------
|
||||
*******************************************
|
||||
* PROCEDURE update_calcdin( )
|
||||
* Date : 06/17/05, 12:52:29
|
||||
* author : liana.macinic
|
||||
* description:
|
||||
|
||||
****** PARAMETER BLOCK **************
|
||||
* Parameters : 0
|
||||
*
|
||||
*******************************************
|
||||
PROCEDURE update_calcdin( )
|
||||
If Used('v_calcdin')
|
||||
Use In v_calcdin
|
||||
Endif
|
||||
|
||||
lcSql = [select id_calcdin,camp,denumire as nume_camp,tabel from ] + gcS + [.sal_nom_calcdin where 2=2]
|
||||
lcCursor = [v_calcdin]
|
||||
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
|
||||
goExecutor.oReset()
|
||||
|
||||
Return lnSucces
|
||||
|
||||
ENDPROC
|
||||
*----------------------------------sfarsit procedura update_calcdin----------------------------------
|
||||
Reference in New Issue
Block a user