Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Bloco de código
languagejava
themeMidnight
titleTM460LEG
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',,'')

DTW->(DbSetOrder(4))
If DTW->(MsSeek(xFilial("DTW") + DTR->DTR_FILVGE cFilOri + DTR->DTR_NUMVGE cViagem  + cAtivSai))
	Reclock('DTW',.F.)
	DTW->DTW_DATINI   := Date()
	DTW->DTW_HORINI   := Time()
	DTW->DTW_DATREA   := Date()
	DTW->DTW_HORREA   := Time
	DTW->DTW_STATUS   := StrZero(2, Len(DTW->DTW_STATUS)
	MsUnLock()
EndIf

Return .T.


...