Product: |
TOTVS Backoffice
|
Product Line: | Protheus Line |
Segment: | Serviços |
Module: | TOTVS Backoffice (Protheus Line) - Management Accounting (SIGACTB)
|
Function: | CTBA102,CTBA105 |
Country: | Brazil |
Ticket: | Internal |
Requisite/Story/Issue | DSERCTR1-46829 |
The entry point CT102DLG is used right after the interface for the Automatic Accounting Entries screen is set up, allowing for customizations before the window is activated (displayed). With this entry point, it is possible to modify screen elements, add specific functionalities, or adjust the interface according to user needs, ensuring flexibility in the dialogged presentation process.
Execblock("CT102DLG",.f.,.f.)
#Include "Protheus.ch" User Function CT102DLG() Local nPapInd If Alltrim(UPPER(FunName())) == "CTBA102" oPapDialog := getwnddefault() For nPapInd := 1 To Len(oPapDialog:aControls) If Upper(oPapDialog:aControls[nPapInd]:ClassName()) == "BRGETDDB" oPapDialog:ACONTROLS[nPapInd]:OMOTHER:OBROWSE:NFREEZE := 1 Exit EndIf Next EndIf Return
Important !