01. GENERAL DATA

Product:

Product Line:

Protheus Line

Segment:

Module:

TOTVS Backoffice (Protheus Line) - Management Accounting (SIGACTB)

Function:

CTBA102,CTBA105

Country:

Brazil

Ticket:

Internal

Requisite/Story/Issue

DSERCTR1-46829

02. DESCRIPTION

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.

03. OTHER INFORMATION


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
  • It should be noted that the use of the Entry Point (EP) and its impacts on the system are the customer's responsibility.
  • The examples used in this documentation are for demonstration purposes only; each customer must determine the behavior they wish to implement according to the scope of the entry point.

04. RELATED ISSUES