Product: | TOTVS Backoffice |
Product Line: | Protheus Line |
Industry: | Services |
Module: | TOTVS Backoffice (Protheus Line) - Fixed Assets (SIGAFIS) |
Function: | ATFA251 |
Country: | Brazil |
Ticket: | Internal |
Requisite/Story/Issue | DSERCTR1-46030 |
Entry point AF251BUT allows the user to add new options (buttons) to the main menu of asset transfer routine. It is used for dynamically adding custom features to the main menu, before displaying it to the user. This is useful for incorporating new operations not available in the default system.
If ExistBlock("AF251BUT") aAF251BUT := ExecBlock("AF251BUT",.F.,.F.,aRotina) IF ValType(aAF251BUT) == "A" .AND. Len(aAF251BUT) > 0 For nX := 1 to len(aAF251BUT) aAdd(aRotina,aAF251BUT[nX]) Next ENDIF Endif
User Function AF251BUT() Local aBotoes := PARAMIXB[1] Local cNomeBotao := "NovoBotao" Local cFuncaoBotao := "u_MinhaFuncao()" // Add a new button to the main menu, calling the function 'MinhaFuncao' aAdd(aBotoes, { cNomeBotao, cFuncaoBotao, 0, 6, , .F. }) // Return the array containing the new buttons to be added to the menu Return aBotoes
Important !!