Linha Microsiga Protheus

Á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 TMSA310 (Fechamento de viagem), é executado após a gravação de cada operação (DTW).

PARÂMETROS

  • nOpcao   - Numérico -  Opção Selecionada : 3 - Fechar;
  • cFilOri     - Caractere  -  Filial de Origem da Viagem;
  • cViagem  - Caractere -  Numero da Viagem;
  • lFechAuto - Lógico    - Indica se trata-se de Fechamento Automático da Viagem.

EVENTOS DE CHAMADA DO PONTO DE ENTRADA

Ao executar a função de fechamento da viagem.

03. EXEMPLO DE UTILIZAÇÃO

TM460LEG 
Programa Fonte TMSA310.PRW

Retorno lRet(logico)
//O Retorno do Ponto de Entrada deverá ser lógico  

//Exemplos 
User Function TMA310DTW()

Local cFilOri 	:= ParamIxb[2]
Local cViagem 	:= ParamIxb[3]
Local cAtivSai	:= GetMv('MV_ATIVSAI',,'')  

If DTW->(DBSeek(xFilial("DTW") +  cFilOri +  cViagem  + cAtivSai))
    Reclock('DTW',.F.)
    DTW->DTW_DATINI   := dDataBase
    DTW->DTW_HORINI   := SubStr(Time(),1,2) + SubStr(Time(),4,2)
    DTW->DTW_DATREA   := dDataBase
    DTW->DTW_HORREA   := SubStr(Time(),1,2) + SubStr(Time(),4,2)
    DTW->DTW_STATUS   := StrZero(2, Len(DTW->DTW_STATUS))
    MsUnLock()
EndIf  

Return .T.

04. DEMAIS INFORMAÇÕES

  • A tabela DTW não está posicionada no instante da chamada do PE.

05. ASSUNTOS RELACIONADOS

  • Não há.