Product: |
TOTVS Backoffice
|
Product Line: | Protheus Line |
Segment: | Services |
Module: | TOTVS Backoffice (Protheus Line) - Managerial Accounting (SIGAFIS)
|
Function: | CTBXATU |
Country: | Brazil |
Ticket: | Internal |
Requisite/Story/Issue | DSERCTR1-46748 |
The entry point CT105CT2 is used to execute a user procedure at the end of the recording of an accounting entry, being triggered before the CTBGRV entry point It allows the client to add custom logic immediately after the entry is recorded, enabling specific adjustments or actions that need to be performed before the definitive closing of the record.
With CT105CT2, it is possible to ensure that additional procedures are executed according to business needs, allowing for greater flexibility and control over the accounting entries, and ensuring that all relevant steps are properly carried out.
ExecBlock("CT105CT2", .F., .F., {__nQuantas, dDatalanc,cLote,cSubLote,cDoc,lCusto,lItem,lCLVL,nTotInf,_lAtSldBase,_lReproc })
User Function CT105CT2() Local nX Local cMoedan_Quantas := aParamIxb[1] Local dDatalanc := aParamIxb[2] Local cLote := aParamIxb[3] Local cSubLote := aParamIxb[4] Local cDoc := aParamIxb[5] Local lCusto := aParamIxb[6] Local lItem := aParamIxb[7] Local lCLVL := aParamIxb[8] Local nTotInf := aParamIxb[9] Local lAtSldBase := aParamIxb[10] Local lReproc := aParamIxb[11] For nX := 1 to n_Quantas If StrZero(nX, 2) == CT2->CT2_MOEDLC CT2->CT2_USUHOR := TIME() // Records time in the entry Endif Next Return
Importante!