Ponto-de-Entrada: TMA240ADT Valida adiantamento após confirmação da tela
Versões: | Microsiga Protheus 8.11 , Microsiga Protheus 10 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Nível de Acesso: | Nível 1 (Acesso Clientes) |
Idiomas: | Espanhol , Inglês |
Descrição:
Este Ponto de Entrada está localizado no Programa TMSA240 (Complemento de Viagens) e é utilizado para efetuar validações, será executado após a confirmação da Tela de Adiantamentos.
Eventos
Programa Fonte
TMSA240.PRW
Sintaxe
TMA240ADT ( < ParamIXB> ) --> Nil
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
ParamIXB | Array of Record | X |
Retorno
Nil
- (nulo)
- Nil
Observações
O ponto de entrada recebe um ARRAY contendo as seguintes informações:
ParamIXB[1] - Opção Selecionada
ParamIXB[2] - Total de Adiantamentos
ParamIXB[3] - Total de Frete a Pagar
Ao executar o Ponto de Entrada, o acols / aheader estão com os dados informados na Tela de Adiantamento.
Exemplos
User Function TMA240Adt()Local lRet := .T.Local nOpcx := ParamIXB[1]Local nTotAdto := ParamIXB[2]Local nFrePag := ParamIXB[3]If nFrePag > 0 If ((nTotAdto / nFrePag) * 100) > 70 MsgAlert('O total de adiantamento não poderá ser superior a 70% do frete a pagar') lRet := .F. EndIfEndIf Return lRet
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas