public function RecebeParcela() {
$Datas = new Data();
$String = new CString();
$id_cp1 = $_POST["cod_cp1"];
$IdCC = $_POST["conta"];
$vlr_acrescimo = $_POST['acrescimo_pagamento'] ? $String->limpa_moeda($_POST["acrescimo_pagamento"]) : '0.00';
$vlr_pago = $String->limpa_moeda($_POST["vlr_pago"]);
$vlr_desconto = $_POST['vlr_deconto_pagamento'] ? $String->limpa_moeda($_POST["vlr_deconto_pagamento"]) : '0.00';
$data_recebimento = $Datas->convertDataSql($_POST["data_pagamento"]);
$obs_pagamento = isset($_POST['obs_pagamento']) ? $_POST["obs_pagamento"] : '';
$vencimento = $_POST['vencimento'] ? $_POST["vencimento"] : '';
if ($vlr_pago <= 0) {
echo "Não é possível efetuar baixa de valores negativos!";
exit();
}
$QuitaParcela = new ModelLancaCpBd();
$Quitar = $QuitaParcela->EfetuaPagamento($IdCC, $id_cp1, $vlr_acrescimo, $vlr_pago, $vlr_desconto, $_SESSION["id_usuario"], $data_recebimento, $obs_pagamento, $vencimento);
if ($Quitar) {
echo 1;
} else {
echo $QuitaParcela->getMotivoErro();
}
exit();
}
public function BaixaCp() {
$CR = new ModellancaCrBd();
$Data = new Data();
$String = new CString();
$sql = "SELECT * FROM CONTA_PAGAR WHERE VALOR IS NOT NULL AND DT_VENCIMENTO IS NOT NULL ORDER BY CONTA_PAGAR_ID";
if ($result = parent::execute_query($sql)) {
$CP = new ModelLancaCpBd();
$Data = new Data();
$String = new CString();
$transacao = parent::criaTransacao();
while ($linha = parent::criaObjetoConsulta($result)){
$linha->CONTA_PAGAR_ID;
$linha->GRUPO_ID;
$linha->NOME_CONTA;
$linha->FORNECEDOR_ID;
$linha->TIPO_DOCUMENTO;
$linha->NUMERO_DOCUMENTO;
$linha->DT_VENCIMENTO;
$linha->VALOR;
$linha->REPLICAR_MESES;
$linha->LANCAMENTO_AUTOMATICO;
$linha->STATUS;
$linha->OBSERVACAO;
$linha->DATA_INCLUSAO;
$linha->DT_PAGAMENTO;
$linha->FORMA_PAGAMENTO;
$linha->DESCONTO;
$linha->ACRESCIMO;
$linha->NUMERO_DOCUMENTO_PAGAMENTO;
$linha->OBSERVACAO_PAGAMENTO;
$linha->VALOR_PAGO;
$linha->ORIGEM_CONTA_PAGAR_ID;
$linha->SYNC;
$linha->CONTA_BAIXA;
$linha->BANCO_ID;
$linha->FILIAL_ID;
$linha->SUBCATEGORIA_ID;
$linha->CENTRO_DESPESA_ID;
$linha->NUMERO_PARCELA;
$linha->UCIDUSER;
$linha->ESTOQUE_ENTRADA_ID;
$linha->UCIDUSER_BAIXA;
$linha->DATA_BAIXA;
if (!$linha->UCIDUSER_BAIXA) {
$linha->UCIDUSER_BAIXA = 1;
}
if ($linha->STATUS == 1) {
$id_cp1 = parent::RecuperaCampo("F_LANCA_CP_ID", "F_LANCA_CP", "ID_INTEGRACAO", $linha->CONTA_PAGAR_ID);
if (!$CP->EfetuaPagamento(2, $id_cp1, 0.00, $linha->VALOR_PAGO, 0.00, $linha->UCIDUSER_BAIXA, $linha->DT_PAGAMENTO, $linha->OBSERVACAO_PAGAMENTO, $linha->DT_VENCIMENTO)) {
break;
return false;
}
}
}
}
}
