Histórico da Página

#Include 'Protheus.ch'

User Function MNT655D3CC()

    Local lRet := .T.
    
    //Parâmetros
	cTipo 			 := PARAMIXB[1] // requisição ou devolução
	cVeic		 	 := PARAMIXB[2] // Código do Veículo/Bem
	cCCust		 := PARAMIXB[3] // Código de Centro de Custo
	cFilTQF		 := PARAMIXB[4] // Código da filial do Posto
    nRecno  		 := PARAMIXB[5] // Último registro

    dbSelectArea("SD3")
    dbGoTo(nRecno)
    RecLock("SD3",.F.)
    SD3->D3_EMISSAO := dDataBase
    MsUnlock("SD3")

Return lRet