...
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.
| Bloco de código | ||||||
|---|---|---|---|---|---|---|
| ||||||
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 } ) |
| Bloco de código | ||||||
|---|---|---|---|---|---|---|
| ||||||
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 |
| Aviso | ||
|---|---|---|
| ||
|
Handling of EP in the system
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 } )
...
| ||
|