Product: |
TOTVS Backoffice
|
Product Line: | Protheus Line |
Segment: | Services |
Module: | TOTVS Backoffice (Protheus Line) - Managerial Accounting (SIGACTB)
|
Function: | CTBA130 |
Country: | Brazil |
Ticket: | Internal |
Requisite/Story/Issue | DSERCTR1-46829 |
The entry point CTSETBUT allows for the inclusion of additional buttons in the Set Of Books registration screen. This entry point is used to customize the screen interface, providing extra functionalities according to the user's specific needs.
IF ExistBlock( "CTSETBUT" ) aCTBA130 := ExecBlock( "CTSETBUT",.F.,.F.,aRotina) IF ValType(aCTBA130) == "A" .AND. Len(aCTBA130) > 0 FOR nX := 1 to len(aCTBA130) aAdd(aRotina, aCTBA130[nX]) NEXT ENDIF ENDIF
User Function CTSETBUT
Local aRotina := PARAMIXB[1]
Local aRotinaAux := {}
aAdd( aRotinaAux , { "EJEMPLO","U_EXEMPLO()", 0 , 4}) //"EJEMPLO"
Return aRotinaAux
Important!