Product: |
TOTVS Backoffice
|
Product Line: | Protheus Line |
Segment: | Services |
Module: | TOTVS Backoffice (Protheus Line) - Managerial Accounting (SIGAFIS)
|
Function: | CTBA110 |
Country: | Brazil |
Ticket: | Internal |
Requisite/Story/Issue | DSERCTR1-46829 |
The entry point CTB110LBC allows for the recording of additional data in the CVL and CVM tables (Correlative Control). When including or changing one of the correlatives, the CVL and CVM tables are positioned at the moment the entry point is executed, allowing for their editing.
This entry point has better functionality if used in conjunction with the MV_CTBLBSQ parameter (which allows the addition of new correlative codes, bypassing the system's standard validation. This parameter is available in the TGLSV7 support ticket and in the compatibility tool with a date equal to or later than 02/02/2013).
ExecBlock("CTB110LBC",.F.,.F.)
User Function CTB110LBC()
Local aArea := GetArea()
Local aAreaCVL := CVL->(GetArea())
Local aAreaCVM := CVM->(GetArea())
RecLock("CVL",.F.)
Replace CVL->CVL_CTBCLA With "P2"
MsUnlock()
RestArea(aAreaCVM)
RestArea(aAreaCVL)
RestArea(aArea)
Return
Important!