Import initial din SVN ROAAUTO/Trunk @HEAD
This commit is contained in:
123
COMUN/programe/update_nomenclator_salarii.prg
Normal file
123
COMUN/programe/update_nomenclator_salarii.prg
Normal file
@@ -0,0 +1,123 @@
|
||||
**********************************************************
|
||||
PROCEDURE update_dedsupl
|
||||
|
||||
If Used('v_dedsupl')
|
||||
Use In v_dedsupl
|
||||
Endif
|
||||
|
||||
lcSql = [select * from ] + gcS + [.sal_vnom_dedsupl]
|
||||
lcCursor = [v_dedsupl]
|
||||
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
|
||||
goExecutor.oReset()
|
||||
|
||||
Return lnSucces
|
||||
|
||||
ENDPROC
|
||||
|
||||
**********************************************************
|
||||
|
||||
|
||||
PROCEDURE update_hand
|
||||
LPARAMETERS tnAlias
|
||||
|
||||
*!* If Used('v_hand')
|
||||
*!* Use In v_hand
|
||||
*!* Endif
|
||||
|
||||
lcSql = [select * from ] + gcS + [.sal_vnom_handicap]
|
||||
IF PCOUNT()=1
|
||||
lcCursor = [v_hand]+ALLTRIM(STR(tnAlias))
|
||||
ELSE
|
||||
lcCursor = [v_hand]
|
||||
ENDIF
|
||||
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
|
||||
goExecutor.oReset()
|
||||
|
||||
Return lnSucces
|
||||
|
||||
ENDPROC
|
||||
|
||||
**********************************************************
|
||||
PROCEDURE update_mes
|
||||
|
||||
If Used('v_meseria')
|
||||
Use In v_meseria
|
||||
Endif
|
||||
|
||||
lcSql = [select * from ] + gcS + [.sal_vnom_mes]
|
||||
lcCursor = [v_meseria]
|
||||
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
|
||||
goExecutor.oReset()
|
||||
|
||||
Return lnSucces
|
||||
|
||||
ENDPROC
|
||||
|
||||
********************************************************
|
||||
PROCEDURE update_form
|
||||
|
||||
If Used('v_formatia')
|
||||
Use In v_formatia
|
||||
Endif
|
||||
|
||||
lcSql = [select * from ] + gcS + [.sal_vnom_formatii]
|
||||
lcCursor = [v_formatia]
|
||||
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
|
||||
goExecutor.oReset()
|
||||
|
||||
Return lnSucces
|
||||
|
||||
ENDPROC
|
||||
|
||||
**************************************************************
|
||||
PROCEDURE update_limbi
|
||||
|
||||
If Used('v_limba')
|
||||
Use In v_limba
|
||||
Endif
|
||||
|
||||
lcSql = [select * from ] + gcS + [.sal_vnom_limb]
|
||||
lcCursor = [v_limba]
|
||||
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
|
||||
goExecutor.oReset()
|
||||
|
||||
Return lnSucces
|
||||
|
||||
ENDPROC
|
||||
|
||||
****************************************************
|
||||
PROCEDURE update_curs
|
||||
|
||||
If Used('v_curs')
|
||||
Use In v_curs
|
||||
Endif
|
||||
|
||||
lcSql = [select * from ] + gcS + [.sal_vnom_curs]
|
||||
lcCursor = [v_curs]
|
||||
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
|
||||
goExecutor.oReset()
|
||||
|
||||
Return lnSucces
|
||||
|
||||
ENDPROC
|
||||
|
||||
****************************************************
|
||||
|
||||
PROCEDURE update_stud
|
||||
|
||||
If Used('v_stud')
|
||||
Use In v_stud
|
||||
Endif
|
||||
|
||||
lcSql = [select * from ] + gcS + [.sal_vnom_stud]
|
||||
lcCursor = [v_stud]
|
||||
lnSucces = goExecutor.oExecute(lcSql,lcCursor)
|
||||
goExecutor.oReset()
|
||||
|
||||
Return lnSucces
|
||||
|
||||
ENDPROC
|
||||
****************************************************
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user