Product: |
TOTVS Backoffice
|
Product Line: | Protheus Line |
Segment: | Services |
Module: | TOTVS Backoffice (Protheus Line) - Managerial Accounting (SIGACTB)
|
Function: | CTBA101 |
Country: | Brazil |
Ticket: | Internal |
Requisite/Story/Issue | DSERCTR1-46829 |
The entry point CTBA101HI is used to enable the editing of accounting entry history during the reversal process in routine CTBA101. With this entry point, it is possible to customize and adjust the history of each accounting entry as needed at the time of reversal, providing flexibility to modify historical information according to specific accounting requirements.
If ExistBlock( "CTBA101HI" )
lHist := ExecBlock("CTBA101HI", .F., .F.)
EndIf
#Include 'Protheus.ch'
User Function CTBA101HI()
Local lHist := .F.
If MsgYesNo("Do you want to edit the history?" "Notice")
lHist := .T.
Else
lHist := .F.
EndIf
Return lHist
Important!