Histórico da Página

User Function MT103GUIA()

Local cAliasNFE := PARAMIXB[1] 
Local cAliasFor := PARAMIXB[2] 
Local cCodFil   := PARAMIXB[3] 
Local cCodFor   := PARAMIXB[4] 
Local cCodLoj   := PARAMIXB[5] 
Local cEspDoc   := PARAMIXB[6] 
Local lResult   := .F.
Local aAliAtu   := GetArea() 

If AllTrim(cEspDoc) == "CTR"   
	dbSelectArea(cAliasFor)   
	dbSetOrder(1)   
		If dbSeek(cCodFil+cCodFor+cCodLoj) .and. A2_OPTCRPR == "S"        
			lResult := .T.   
		Endif
Endif

RestArea(aAliAtu)  

Return lResult