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
SintaxeMT410TOK - 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 | | | | | | | | | | |
ExemplosUser 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)
