Product: | TOTVS Backoffice |
Product Line: | Protheus Line |
Industry: | Services |
Module: | TOTVS Backoffice (Protheus Line) - Managerial Accounting (SIGAFIS) |
Function: | CTBA270 |
Country: | Brazil |
Ticket: | Internal |
Requisite/Story/Issue | DSERCTR1-46829 |
Entry Point CTB270TOK is used during the apportionment validation and consistency process. It is called at the end of apportionment validation, after checking the integrity of source and entry entities, being also useful for additional validations.
lRet := ExecBlock("CTB270TOK", .F., .F., {nOpcX,cCtq_CtOri,cCtq_CCOri,cCtq_ItOri,cCtq_ClOri,; cCtq_CtPar,cCtq_CCPar,cCtq_ItPar,cCtq_ClPar,; cCtq_E05Ori,cCtq_E06Ori,cCtq_E07Ori,cCtq_E08Ori,cCtq_E09Ori,; cCtq_E05Par,cCtq_E06Par,cCtq_E07Par,cCtq_E08Par,cCtq_E09Par } )
User Function CTB270TOK Local nOpcX := PARAMIXB[1] // Number of option Local cCtq_CtOri := PARAMIXB[2] // Source account Local cCtq_CCOri := PARAMIXB[3] // Source cost center Local cCtq_ItOri := PARAMIXB[4] // Source item Local cCtq_ClOri := PARAMIXB[5] // Source value class Local cCtq_CtPar := PARAMIXB[6] // Entry Account Local cCtq_CCPar := PARAMIXB[7] // Entry cost center Local cCtq_ItPar := PARAMIXB[8] // Entry item Local cCtq_ClPar := PARAMIXB[9] // Entry value class Local cCtq_E05Ori := PARAMIXB[10]// Entity 05 Source Local cCtq_E06Ori := PARAMIXB[11]// Entity 06 Source Local cCtq_E07Ori := PARAMIXB[12]// Entity 07 Source Local cCtq_E08Ori := PARAMIXB[13]// Entity 08 Source Local cCtq_E09Ori := PARAMIXB[14]// Entity 09 Source Local cCtq_E05Par := PARAMIXB[15]// Entity 05 Entry Local cCtq_E06Par := PARAMIXB[16]// Entity 06 Entry Local cCtq_E07Par := PARAMIXB[17]// Entity 07 Entry Local cCtq_E08Par := PARAMIXB[18]// Entity 08 Entry Local cCtq_E09Par := PARAMIXB[19]// Entity 09 Entry Local lRet := .F. // customer validation Return lRet
Important !!