| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Logística |
| Módulo: | SIGATMS - Gestão de Transportes |
Este Ponto de Entrada, localizado no TMSA310 (Fechamento de viagem), é executado após a gravação de cada operação (DTW).
Ao executar a função de fechamento da viagem.
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.
|