******************************************* * 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----------------------------------