project QadFinancials > class BEmployee > method ApiLoadEmployeeCalcActivityCode
function returns character
Description
This method is used to load Employee's activitycode by activitycode_id. If not exists, return null.
Parameters
iiActivityId | input | integer | Activity ID. |
Internal usage
QadFinancials
program code (program9/bemployee.p)
define variable oiReturnStatus as integer no-undo.
if iiActivityId = ? or
iiActivityId = 0
then return "":U.
<Q-1 run ActivityCodePrim (all) (Read) (NoCache)
(input iiActivityId, (ActivityCodeId)
input ?, (ActivityCode)
input ?, (ActivityCodeType)
output dataset tqActivityCodePrim) in BActivityCode>
find first tqActivityCodePrim where
tqActivityCodePrim.tiActivityCode_ID = iiActivityId
no-error.
return if available tqActivityCodePrim
then tqActivityCodePrim.tcActivityCode
else "":U.