Files
vfp_roaauto/COMUN/programe/update_nomenclator_salarii.prg

124 lines
2.3 KiB
Plaintext

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