Tempo aproximado para leitura: 00:01:12 min
Dúvida
Como implementar o ponto de entrada TM040ALT Altera validações padrões do sistema?
Ambiente
TOTVS Logística - TOTVS TMS (Linha Protheus) - Gestão de Transportes (TMS) - Todas as versões
Solução
O ponto de entrada TM040ALT está localizado no TMSA040 Cotação de Frete, permitindo efetuar validações ao selecionar na opção Alterar desconsiderando as validações padrões do sistema.
Programa Fonte: TMSA040.PRW
Sintaxe: TM040ALT - Altera Validações Padrões do Sistema ( [ cFilOri ], [ cNumCot ], [ cStatus ], [ lCopia ] ) --> lRet
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência |
| cFilOri | Caracter | Filial de Origem | |||
| cNumCot | Array of Record | Número da Cotação | |||
| cStatus | Array of Record | Status da Cotação | |||
| lCopia | Array of Record | Indica se a opção selecionada se refere a copia da cotação |
Retorno:
lRet
(logico)
Se F, efetuará as validações padrões do sistema.
Se T, não efetuará as validações padrões do sistema.
Exemplos:
User Function TM040ALT()
Local cFilOri := ParamIXB[1]
Local cNumCot:= ParamIXB[2]
Local cStatus := ParamIXB[3]
Local lCopia := ParamIXB[4]
Aviso('P.E.: TM040ALT',' - '+cFilOri + "/" + cNumCot + "/" + cStatus ,{'OK'})
Return .T.
Variáveis:
| Nome | Tipo | Escopo | Pode Alterar | Descrição |
| Array of Record | Global | Não |
0 Comentários