01. GENERAL DATA

Product:

TOTVS Backoffice

Product Line:

Protheus Line

Segment:

Services

Module:

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

Function:

CTBXREL

Country:

Brazil

Ticket:

Internal

Requisite/Story/Issue

DSERCTR1-46829

02. DESCRIPTION

The entry point CTCABR3 allows for the customization of the standard report header in the R3 version.
With this entry point, it is possible to define and adapt specific information that should appear in the header, customizing the display according to the report requirements or user preferences.

03. DEMAIS INFORMAÇÕES


Entry Point (EP) manipulation in the system
aCabec := ExecBlock("CTCABR3",.F.,.F.)
EP Example
User Function  CTCABR3()

	Local dDataIni	  
	Local dDataFim	   
	Local cChar		:= chr(160)  // Dummy character for header alignment   
	Local cDataExt	:= ""

	If NomeProg = "CTBR110"  // Example -> If it is the General Journal	

		dDataIni	:= mv_par01  	
		dDataFim	:= mv_par02  	
		cDataExt    := Transform(Day(dDataIni),'99') + " of " + MesExtenso(dDataIni) + " de " + Transform(Year(dDataIni),'9999');
						+ " a " + Transform(Day(dDataFim),'99') + " de " + MesExtenso(dDataFim) + " de " + Transform(Year(dDataFim),'9999')	
		aCabec := { cChar + "         " + "TEST COMPANY S/A"  + "         " + cChar;
					, cChar + "         " + "000.000.000-0"      + "         " + cChar;
					, cChar + "         " + "GENERAL JOURNAL"       + "         " + cChar;    	      
					, cChar + "         " + cDataExt             + "         " + cChar;    	      
					, cChar + "         " + RptFolha + TRANSFORM(m_pag,'999999')}    
									
	EndIf             

Return aCabec
  


Important!

  • 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 SUBJECTS

  • N/A