Á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), é 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.

03. EXEMPLO DE UTILIZAÇÃO

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




TM040TOK
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


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/360007453791

05. ASSUNTOS RELACIONADOS

  • Não há.