Producto: | TOTVS Backoffice |
---|---|
Línea de producto: | Línea Protheus |
Segmento: | Servicios |
Módulo: | TOTVS Backoffice (Línea Protheus) - Activo fijo (SIGAATF) |
Función: | ATFA240 |
País: | Brasil |
Ticket: | Interno |
Requisito/Story/Issue | DSERCTR1-46748 |
El punto de entrada AF240BUT se utiliza para incluir opciones en la pantalla de Clasificación de compras. Con este punto de entrada, es posible incluir funcionalidades específicas o accesos personalizados, de acuerdo con la necesidad del usuario.
If ExistBlock( "AF240BUT" ) aAF240BUT := ExecBlock( "AF240BUT", .F., .F., aRotina ) IF ValType( aAF240BUT ) == "A" .AND. Len( aAF240BUT ) > 0 For nX := 1 To Len( aAF240BUT ) aAdd( aRotina, aAF240BUT[ nX ] ) Next ENDIF EndIf
User Function AF240BUT() //Opción que se incluirá Local aBotao := {} //Opciones estándar de la rutina Private aRotina := ParamIXB[1] //Mensagem MsgAlert("Punto de entrada ejecutado para inclusión de nuevas opciones") //Nueva opción inacluida aBotao := { { "Opción de prueba", "AF010Visua" , 0 , 2 , ,.F.} } Return aBotao
Importante