Árvore de páginas


01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Logística
Módulo:SIGATMS - Gestão de Transportes 


02. DESCRIÇÃO

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.

03. EXEMPLO DE UTILIZAÇÃO

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.


TM040DSC
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


04. DEMAIS INFORMAÇÕES

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

(aviso) 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.

05. ASSUNTOS RELACIONADOS

  • Não há.