Product: |
TOTVS Backoffice
|
Product Line: | Protheus Line |
Segment: | Services |
Module: | TOTVS Backoffice (Protheus Line) - Managerial Accounting (SIGAFIS)
|
Function: | CTBA270 |
Country: | Brazil |
Ticket: | Internal |
Requisite/Story/Issue | DSERCTR1-46748 |
The CT270LEG entry point allows the inclusion of new colors for the legends (or keys) used in the Off-Line Apportionment routine. With this feature, it's possible to customize the visual representations by assigning additional colors to the existing legends (or keys), according to the specific needs of the user or client.
This functionality provides greater flexibility for identifying and categorizing information in a clearer and more intuitive way within the routine."
IF ExistBlock("CT270LEG")
aCT270Cores := ExecBlock("CT270LEG",.F.,.F.,{2})
IF ValType(aCT270Cores) == "A" .AND. Len(aCT270Cores) > 0
FOR nX := 1 to len(aCT270Cores)
aAdd(aLegenda,aCT270Cores[nX])
NEXT
ENDIF
ENDIF
User Function CT270LEG()
Private aCT270Cores := ParamIXB[1]
MsgAlert("ENTRY POINT CT270LEG")
Return aCT270Cores
Important!