Histórico da Página

#INCLUDE 'PROTHEUS.CH'
Useruser Functionfunction GFEXFB16GFEXFA01()

	Local cNrRom  dDataPr  := PARAMIXB[1]
	Local cChavegwucHrPrev := PARAMIXB[2]
	Local cCdTrp   aRet := PARAMIXB[3]{}
	
	Local cNrTab   dDtPr := PARAMIXB[4]DDatabase
	Local cNrNeg  cHrPr  := PARAMIXB[5]"08:00"
	
	Localif cCdfxTvdDtPr   := PARAMIXB[6]
	Local cNrRota   := PARAMIXB[7]
	Local dDtPrev   := PARAMIXB[8]
	Local cHrPrev   := PARAMIXB[9]
	Local aRet := { CTOD("25/12/2018"), "09:00:15" } 
 
Return== DDatabase
	
		RecLock("GWU",.F.)
			GWU->GWU_DTPENT := dDtPr
			GWU->GWU_HRPENT := cHrPr
		MsUnLock("GWU")	
	Else			
		aRet[1] := .F.
		aRet[2] := "Data prevista não calculada."	
	Endif	
	
return aRet