| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Logística |
| Módulo: | SIGATMS - Gestão de Transportes |
Este Ponto de Entrada localizado no TMSA040 (Cotação de Frete), permite ao usuário efetuar validações para posteriormente habilitar/desabilitar o acesso a rotina de descontos.
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| Nulo | Array of Record |
Retorno
lRet
(logico)
Se o retorno estiver (.F.) não é permitido Desconto/Acréscimo na Cotação, a rotina é bloqueada.
Programa Fonte
TMSA040.PRW
Sintaxe
TM040DSC - Validação na Rotina de Descontos ( [ Nulo ] ) --> lRet
No exemplo abaixo, para este cliente não é permitido o acesso a rotina de desconto/acréscimo.
Exemplo:
User Function TM040DSC()
Local lRet := .T.
Local cCli := M->DT4_CLIDEV
Local cLoja := M->DT4_LOJDEV
If cCli = '11111111' .And. cLoja = '0001'
lRet := .F.
MsgAlert('Este cliente não permito desconto')
Endif
Return lRet
Essa informação também está disponível na Central de Atendimento através do link:
https://centraldeatendimento.totvs.com/hc/pt-br/articles/360007451931
Lembrando que a rotina do Desconto/Acréscimo é acessada através do Menu na Cotação, Valor Fechado.
As variáveis de memória do DT4, como por exemplo M->DT4_CLIDEV e M->DT4_LOJDEV podem ser utilizadas para validações.