Linha Microsiga Protheus

Árvore de páginas

01. DADOS GERAIS

Produto:

TOTVS Logística TMS

Linha de Produto:

Linha Protheus

Segmento:

Logística

Módulo:

TOTVS TMS - Linha Protheus - Gestão de Transportes (SIGATMS)

Função:TMSAF67 
País:Brasil
Ticket:Não se aplica.
Requisito/Story/Issue (informe o requisito relacionado) :DLOGTMS02-25870


02. DESCRIÇÃO

Ponto de Entrada utilizado para complementar gravação de tabelas (DUD, DTR, DF0 e DF1), no momento da gravação da viagem modelo 3, no TMS Protheus (SIGATMS).

Importante

O ponto de entrada se encontra dentro de uma transação, é prudente usar as tabelas posicionadas para obter o dado já persistente na tabela.


SINTAXE

TMF67GRV( ) ---> Nulo


PARÂMETROS

Nome

Tipo

Descrição

Default

Obrigatório

Referência

aParamIXBVetorVetor com os dados para montagem do filtro de pesquisa, sendo:
[ 1 ]  - cTabela - Tabela da chamada do ponto de entrada (DUD,DTR,DF0) - Tipo: String
[ 2 ]  - cFilOri- Filial da viagem  - Tipo: String
[ 3 ]  - cViagem - Número da viagem - Tipo: String




RETORNO

Retorno

Tipo

Descrição

Obrigatório



Não possui retorno


03. DEMAIS INFORMAÇÕES

A execução do ponto de entrada TMF67GRV, é realizada durante a gravação da viagem modelo 3.

Exemplo de utilização:

TMF67GRV
#INCLUDE "Protheus.ch"

User Function TMF67GRV()

Local cTab      := PARAMIXB[1]
Local cFilori   := PARAMIXB[2]
Local cViagem   := PARAMIXB[3]
Local aAreaDUD  := {}

If cTab == "DUD" .Or. cTab == "DTR" .Or. cTab == "DF0"
    aAreaDUD := DUD->(GetArea())
    DUD->(dbSetOrder(2))
    DUD->(dbSeek(xFilial("DUD")+cFilOri+cViagem))
    RestArea(aAreaDUD)
EndIf

Return Nil


04. ASSUNTOS RELACIONADOS

  • Não há.