User Function CTB270TOK
Local nOpcX Local nOpcX := PARAMIXB[1] // Number of option
option
Local cCtq_CtOri CtOri := PARAMIXB[2] // Source account
account
Local cCtq_CCOri CCOri := PARAMIXB[3] // Source cost center
center
Local cCtq_ItOri ItOri := PARAMIXB[4] // Source item
Local cCtq_ClOri ClOri := PARAMIXB[5] // Source value class
Local cCtq_CtPar CtPar := PARAMIXB[6] // Entry Account
Account
Local cCtq_CCPar CCPar := PARAMIXB[7] // Entry cost center
center
Local cCtq_ItPar ItPar := PARAMIXB[8] // Entry item
Local cCtq_ClPar ClPar := PARAMIXB[9] // Entry value class
class
Local cCtq_E05Ori := PARAMIXB[10]// Entity 05 Source
Source
Local cCtq_E06Ori := PARAMIXB[11]// Entity 06 Source
Source
Local cCtq_E07Ori := PARAMIXB[12]// Entity 07 Source
Source
Local cCtq_E08Ori := PARAMIXB[13]// Entity 08 Source
Source
Local cCtq_E09Ori := PARAMIXB[14]// Entity 09 Source
Source
Local cCtq_E05Par := PARAMIXB[15]// Entity 05 Entry
Entry
Local cCtq_E06Par := PARAMIXB[16]// Entity 06 Entry
Entry
Local cCtq_E07Par := PARAMIXB[17]// Entity 07 Entry
Entry
Local cCtq_E08Par := PARAMIXB[18]// Entity 08 Entry
Entry
Local cCtq_E09Par := PARAMIXB[19]// Entity 09 Entry Entry
Local lRet := .F.
// customer validation
Return lRet |