#include 'protheus.ch'
#include 'parmtype.ch'
User Function M486OPMNU()
Local aOpcAdi := {}
aAdd(aOpcAdi, {"PRUEBAS" ,"U_FPruebas()",0,1,0,NIL}) //Opción adicional
//Parámetros de arreglo aOpcAdi:
//1. Nombre que será mostrado en encabezado.
//2. Nombre de la Rutina asociada.
//3. Reservado
//4. Tipo de Transacción a realizar:
//1 - Buscar y Posicionar en una Base de Datos
//2 - Simplemente mostrar campos
//3 - Incluir registros en Bases de Datos
//4 - Cambiar el registro actual
//5 - Eliminar el registro actual de la base de datos
//5. Nivel de acceso
//6. Habilita Menú Funcional
Return aOpcAdi
User Function FPruebas()
Alert("Totvs opción nueva ")
return nil
| 