Linha Microsiga Protheus

Árvore de páginas

Ponto-de-Entrada: MT410TOK - Validar confirmação da operação

 

Abrangências:Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Microsiga Protheus 10 , Microsiga Protheus 11
Versões:Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Microsiga Protheus 10 , Microsiga Protheus 11
Compatível Países:Todos
Sistemas Operacionais:Todos
Compatível às Bases de Dados:Todos
Idiomas:Português (Brasil) , Português (Portugal) , Espanhol , Inglês

 

Descrição:
Este ponto de entrada é executado ao clicar no botão OK e pode ser usado para validar a confirmação das operações: incluir,  alterar, copiar 
e excluir.Se o ponto de entrada retorna o conteúdo .T., o sistema continua a operação, caso contrário, volta para a tela do pedido.

Eventos
Programa Fonte
MATA410.PRW
Sintaxe

MT410TOK - Validar confirmação da operação ( [ nOpc ], [ aRecnoSE1RA ] ) --> lRet

Parâmetros:

 

 Nome  Tipo  Descrição  Default  Obrigatório  Referência 
 nOpc  Array of Record  Número referente a opção de manutenção que está sendo utilizada. Ex: 2-Visualização, 3-Inclusão, 4-Alteração          
 aRecnoSE1RA  Array of Record  Array com os titulos selecionados pelo Adiantamento          

 

Retorno
lRet
    (logico)
  • lRet
Observações

 

Exemplos
User Function MT410TOK()
Local lRet             := .T.				// Conteudo de retorno
Local cMsg         := ""				// Mensagem de alerta
Local nOpc         := PARAMIXB[1]	// Opcao de manutencao
Local aRecTiAdt := PARAMIXB[2]	// Array com registros de adiantamentoc
Msg := "Entrou no PE(MT410TOK) após acionamento do botão de OK, passando os seguintes parâmetros:"+Chr(10)+Chr(10)+Chr(13)+"nOpc: "+AllTrim(Str(nOpc));
             +"    e   aRecTiAdt: "+AllTrim(Str(Len(aRecTiAdt)))+" elementos"Aviso("Teste PE - A410VldTOK",cMsg,{"OK"}) 
Return(lRet)