14167396 DMICNS-14250 DT Punto de entrada en OP modelo II ARG

/*/{Protheus.doc}  Punto de entrada FIN87OPMEN
    Permite agregar mas opciones al menú principal de la fina847
    @type  User function
    @author TYotvs
    @since 17/06/2022
    @return aMenu, arreglo, se envía el arreglo con nuevas opciones al menú
/*/
User Function FIN87OPMEN()

Local nC := 0
Local aMenu := {}
Local nTam := 0

If ValType(PARAMIXB) == "A"
 
    nTam := Len(PARAMIXB)
 
    For nC := 1 to nTam // se asignan los valores que ya trae por default el menú
        aAdd(aMenu, aClone(PARAMIXB[nC]))
    Next nC   
    
    aAdd( aMenu, {"Menú Nuevo","U_FPruebas()",0,7 } ) // Se agrega nueva opción

EndIf

Return aMenu //el arreglo devuelto en este PE es considerado en el fuente FINA847

/*/{Protheus.doc}   FPruebas()
    Función de prueba para incluir en el punto de entrada
    @type  User function
    @author Totvs
    @since 17/06/2022
    @return nil
/*/
User Function FPruebas()

    Alert("Totvs financiero")

return nil