Navigation:  Chapter 13 - Payroll > Payroll exports > Scripted Export Format

FUNCTION FormatScriptedPayLine(aData)

 LOCAL cStr                AS STRING

 LOCAL aIncomeTypeData        AS ARRAY

 

 

 aIncomeTypeData := goDB:GetIncomeScript(aData[6])     // PAYCODE, ATTACHECODE, TYPE, DESCRIPTION, PAYID, UNIT, AMOUNT, EXPORTSCRIPT

 

 cStr := AllTrim(Upper(aIncomeTypeData[8])) //ExportScript

 

 cStr := StrTran(cStr,'<EMPID>', aData[3])

 cStr := StrTran(cStr,'<LOCATION>', aData[2])

 cStr := StrTran(cStr,'<LINETYPE>', aData[5])

 cStr := StrTran(cStr,'<CODE>', aData[6])

 cStr := StrTran(cStr,'<INCOMEUNIT>', aIncomeTypeData[6])

 cStr := StrTran(cStr,'<QTY>', aData[7])

 cStr := StrTran(cStr,'<ATTACHECODE>', aIncomeTypeData[2])

 cStr := StrTran(cStr,'<DESCRIPTION>', aIncomeTypeData[4])

 cStr := StrTran(cStr,'<AMOUNT>', aIncomeTypeData[7])

 cStr := StrTran(cStr,'<PAYID>', aIncomeTypeData[5])

 cStr := StrTran(cStr,'<DATE>', aData[11])

 cStr := StrTran(cStr,'<COSTCENTRE>', aData[2])

 

RETURN cStr