public function RecuperaValorAtualLancamento($IdCr1, $codLancamento = false) {

	$join = "INNER JOIN F_LANCA_CR2  ON (F_LANCA_CR2.F_LANCA_CR2_ID = (SELECT MAX(CR2.F_LANCA_CR2_ID) FROM F_LANCA_CR2 CR2 WHERE CR2.F_LANCA_CR_ID = CR.F_LANCA_CR_ID))
		 WHERE CR.F_LANCA_CR_ID = $IdCr1";

	if ($codLancamento) {
	    $join = "INNER JOIN F_LANCA_CR2  ON (F_LANCA_CR2.F_LANCA_CR_ID = CR.F_LANCA_CR_ID)
		    WHERE F_LANCA_CR2_ID = $codLancamento";
	}

	//Recupera o valor atual do lançamento partir do código do pai
	$Sql = "SELECT 
		VALOR,
		VLR_DESCONTO,
		VLR_MULTA,
		VLR_MORA,
		VLR_ACRESCIMO_RECEBIMENTO,
		VLR_DESCONTO_RECEBIMENTO,
		VLR_IMPOSTO_FATURA,
		VLR_RESIDUAL
		FROM  F_LANCA_CR CR
		$join";

	$Result = parent::execute_query($Sql);

	$linha = parent::criaObjetoConsulta($Result);

	$DadosLancamento = new ModellancaCrBd();

	$DadosLancamento->setValor($linha->VALOR);
	$DadosLancamento->setValorDesconto($linha->VLR_DESCONTO);
	$DadosLancamento->setVlrMulta($linha->VLR_MULTA);
	$DadosLancamento->setVlrMora($linha->VLR_MORA);
	$DadosLancamento->setValorDesconto($linha->VLR_DESCONTO_RECEBIMENTO);
	$DadosLancamento->setValorResidual($linha->VLR_RESIDUAL);
	$DadosLancamento->setVlrAcrescimoRecebimento($linha->VLR_ACRESCIMO_RECEBIMENTO);

	return $DadosLancamento;
    }