| 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), é executado na função TUDOOK da Inclusão da Cotação de Frete.
Lembrando que neste Ponto de Entrada podemos utilizar algumas variáveis de memória, que estão posicionadas como M->DT4_FILORI , M->DT4_NUMCOT.
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||
| nOpcx | Array of Record |
Variáveis:
| Nome | Tipo | Escopo | Pode Alterar | Descrição | |||||
| Array of Record | Global | Não |
Programa Fonte
TMSA040.PRW
Sintaxe
TM040TOK - Inclusão da Cotação de Frete ( [ nOpcx ] ) --> lRet
#include "protheus.ch"
User Function TM040TOK()
Local nOpcx := PARAMIXB[1]
Local lRet := .T.
Local aAreaSA1 := SA1->(GetArea())
If nOpcx == 3 SA1->( Dbsetorder(1))
If SA1->( ! Dbseek(xFilial("SA1")+M->DT4_CLIDES+M->DT4_LOJDES))
MsgAlert("O destinatario informado nao foi localizado na tabela de clientes.")
lRet := .F.
Endif
Endif
RestArea(aAreaSA1)
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/360007453791