Histórico da Página
Ponto de Entrada
Descrição: | Informe o Menu em que estará localizada a rotina | ||||||||||||||||
Localização: | Informe o Submenu em que estará localizada a rotina | ||||||||||||||||
Eventos: | Informe o Título da rotina | ||||||||||||||||
Programa Fonte: | Informe o Fonte da rotina | ||||||||||||||||
Função: | Informe o Nome do(s) produto(s) a ser utilizado ou “Todos” | ||||||||||||||||
Retorno: |
|
Exemplo:
#Include 'Protheus.ch'
User Function CN120ALT()
Local aCab:= PARAMIXB[1]
Local cTipo:= PARAMIXB[2]
If cTipo == '1'
aCab[4][2]:= 'NF' //Validações do usuário
EndIf
Return aCabEste ponto de entrada esta localizado na rotina Requisição de Serviço e tem por finalidade permitir que o usuário adicione novas funcionalidades através da criação de opções no menu principal da rotina. | |
Localização: | Atualizações/Mov Oficina |
Eventos: | If ExistBlock("OM030ROT") If ValType( aNovBot := ExecBlock("OM030ROT",.f.,.f.) ) == "A" aEval( aNovBot , { | x | aAdd( aRotina , x ) } ) EndIf Endif |
Programa Fonte: | OFIOM030.PRW |
Função: | MenuDef() |
Retorno: | Matriz com a seguinte estrutura:
[1]=Título da rotina que será exibido no menu [2]=Função que será executada [3]=Parâmetro reservado, deve ser sempre 0 ( zero ) [4]=Número da operação que a função vai executar |
Exemplo:
#include "protheus.ch"
User Function OM030ROT()
Local aRotAdic := {}
AADD( aRotAdic , { "Rotina Adicional" , "U_SRVCADIC" , 0 , 2 } )
Return aRotAdic