Import initial din SVN ROAAUTO/Trunk @HEAD
This commit is contained in:
143
COMUN/programe/update_roadef_sal.prg
Normal file
143
COMUN/programe/update_roadef_sal.prg
Normal file
@@ -0,0 +1,143 @@
|
||||
|
||||
*******************************************
|
||||
* 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_decl = 1 and sters = 0 and inactiv = 0]
|
||||
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 + [.vnom_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_semnaturi( )
|
||||
* Date : 05/26/05, 16:25:42
|
||||
* author : liana.macinic
|
||||
* description:
|
||||
|
||||
****** PARAMETER BLOCK **************
|
||||
* Parameters : 0
|
||||
*
|
||||
*******************************************
|
||||
PROCEDURE update_semnaturi( )
|
||||
If Used('v_semnaturi')
|
||||
Use In v_semnaturi
|
||||
Endif
|
||||
|
||||
lcSql = [select a.*,a.denumire as semnatura from SAL_semnaturi a where a.inactiv = 0 and a.sters = 0]
|
||||
lcCursor = [v_semnaturi]
|
||||
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