$ld_subtotal_causado=0;
$ld_subtotal_pagado=0;
}*/
if($z==$li_tot)
{
// Imprimimos pie de la cabecera
if($ls_tipoformato==1)
{
$ld_total_comprometer=number_format($ld_total_comprometer,2,",",".");
$ld_total_causado=number_format($ld_total_causado,2,",",".");
$ld_total_pagado=number_format($ld_total_pagado,2,",",".");
uf_print_pie_cabecera($ld_total_comprometer,$ld_total_causado,$ld_total_pagado,$io_pdf,"Total Bs.F.");
}
else
{
$ld_total_comprometer_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_comprometer, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_causado_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_causado, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_pagado_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_pagado, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_comprometer_bsf=number_format($ld_total_comprometer_bsf,2,",",".");
$ld_total_causado_bsf=number_format($ld_total_causado_bsf,2,",",".");
$ld_total_pagado_bsf=number_format($ld_total_pagado_bsf,2,",",".");
$ld_total_comprometer=number_format($ld_total_comprometer,2,",",".");
$ld_total_causado=number_format($ld_total_causado,2,",",".");
$ld_total_pagado=number_format($ld_total_pagado,2,",",".");
//Bolivares
uf_print_pie_cabecera($ld_total_comprometer,$ld_total_causado,$ld_total_pagado,$io_pdf,"Total Bs.");
//Bolivar Fuerte
uf_print_pie_cabecera($ld_total_comprometer_bsf,$ld_total_causado_bsf,$ld_total_pagado_bsf,$io_pdf,"Total Bs.F.");
}
$ld_total_porc_comprometer="";
$ld_total_porc_causado="";
$ld_total_porc_pagado="";
$la_data_tot[$z]=array('total'=>'<b>TOTALES BsF.</b>','pres_anual'=>$ld_total_pres_anual,'programado'=>$ld_total_programado,
'compromiso'=>$ld_total_compromiso,'causado'=>$ld_total_causado,'pagado'=>$ld_total_pagado,
'porc_comprometer'=>$ld_total_porc_comprometer,'porc_causado'=>$ld_total_porc_causado,
'porc_pagado'=>$ld_total_porc_pagado,'disp_trim_ant'=>$ld_total_prog_t_ant,
'disp_fecha'=>$ld_total_disp_fecha);
}
else
{
$ld_total_pres_anual_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_pres_anual, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_programado_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_programado, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_compromiso_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_compromiso, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_causado_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_causado, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_pagado_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_pagado, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_prog_t_ant_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_prog_t_ant, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_disp_fecha_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_disp_fecha, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_porc_comprometer_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_porc_comprometer, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_porc_causado_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_porc_causado, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_porc_pagado_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_porc_pagado, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_pres_anual=number_format($ld_total_pres_anual,2,",",".");
$ld_total_programado=number_format($ld_total_programado,2,",",".");
$la_data_totales[$z]=array('total'=>'<b>TOTALES</b>',
'pres_anual'=>number_format($ld_total_c1,2,",","."),
'prog_acum'=>number_format($ld_total_c2,2,",","."),
'monto_eject'=>number_format($ld_total_c3,2,",","."),
'acum_eject'=>number_format($ld_total_c4,2,",","."),
'varia_abs'=>number_format($ld_total_c5,2,",","."),
'varia_porc'=>number_format($ld_total_c6,2,",","."),
'varia_abs_acum'=>number_format($ld_total_c7,2,",","."),
'varia_porc_acum'=>number_format($ld_total_c8,2,",","."),
'responsable'=>"",
'reprog_prox_mes'=>number_format($ld_total_c9,2,",","."));
}
else
{
$ld_total_c1_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_c1 , $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_c2_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_c2 , $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_c3_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_c3 , $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_c4_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_c4 , $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_c5_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_c5 , $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_c6_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_c6 , $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_c7_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_c7 , $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_c8_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_c8 , $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_c9_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_c9 , $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$la_data_totales[$z]=array('total'=>'<b>TOTAL Bs.</b>',
'pres_anual'=>number_format($ld_total_c1,2,",","."),
'prog_acum'=>number_format($ld_total_c2,2,",","."),
'monto_eject'=>number_format($ld_total_c3,2,",","."),
'acum_eject'=>number_format($ld_total_c4,2,",","."),
'varia_abs'=>number_format($ld_total_c5,2,",","."),
$ld_total_ejecutado_acumulado=str_replace(',','.',$ld_total_ejecutado_acumulado);
$ld_total_variacion_absoluta=str_replace('.','',$ld_total_variacion_absoluta);
$ld_total_variacion_absoluta=str_replace(',','.',$ld_total_variacion_absoluta);
$ld_total_porcentaje_variacion=str_replace('.','',$ld_total_porcentaje_variacion);
$ld_total_porcentaje_variacion=str_replace(',','.',$ld_total_porcentaje_variacion);
$ld_total_variacion_abs_acum=str_replace('.','',$ld_total_variacion_abs_acum);
$ld_total_variacion_abs_acum=str_replace(',','.',$ld_total_variacion_abs_acum);
$ld_total_porcentaje_variacion_acum=str_replace('.','',$ld_total_porcentaje_variacion_acum);
$ld_total_porcentaje_variacion_acum=str_replace(',','.',$ld_total_porcentaje_variacion_acum);
$ld_total_reprog_prox_mes=str_replace('.','',$ld_total_reprog_prox_mes);
$ld_total_reprog_prox_mes=str_replace(',','.',$ld_total_reprog_prox_mes);
}
else
{
$ld_total_pres_anual_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_pres_anual , $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_programada_acumulado_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_programada_acumulado , $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_monto_ejecutado_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_monto_ejecutado , $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_ejecutado_acumulado_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_ejecutado_acumulado , $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_variacion_absoluta_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_variacion_absoluta , $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_porcentaje_variacion_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_porcentaje_variacion , $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_variacion_abs_acum_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_variacion_abs_acum , $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_porcentaje_variacion_acum_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_porcentaje_variacion_acum , $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_reprog_prox_mes_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_reprog_prox_mes , $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_pres_anual=number_format($ld_total_pres_anual,2,",",".");
$ld_total_programada_acumulado=number_format($ld_total_programada_acumulado,2,",",".");
$ld_total_monto_ejecutado=number_format($ld_total_monto_ejecutado,2,",",".");
$ld_total_ejecutado_acumulado=number_format($ld_total_ejecutado_acumulado,2,",",".");
$ld_total_variacion_absoluta=number_format($ld_total_variacion_absoluta,2,",",".");
if($z==$li_tot)
{
// Imprimimos pie de la cabecera
if($ls_tipoformato==1)
{
$ld_total_asignado_general=number_format($ld_total_asignado_general,2,",",".");
$ld_total_precompromiso_general=number_format($ld_total_precompromiso_general,2,",",".");
$ld_total_compromiso_general=number_format($ld_total_compromiso_general,2,",",".");
$ld_total_causado_general=number_format($ld_total_causado_general,2,",",".");
$ld_total_pagado_general=number_format($ld_total_pagado_general,2,",",".");
uf_print_pie_cabecera($ld_total_asignado_general,$ld_total_precompromiso_general,$ld_total_compromiso_general,
$ld_total_causado_general,$ld_total_pagado_general,$io_pdf,'Total Bs.F.');
}
else
{
$ld_total_asignado_general_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_asignado_general, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_precompromiso_general_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_precompromiso_general, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_compromiso_general_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_compromiso_general, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_causado_general_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_causado_general, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_pagado_general_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_pagado_general, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_asignado_general_bsf=number_format($ld_total_asignado_general_bsf,2,",",".");
$ld_total_precompromiso_general_bsf=number_format($ld_total_precompromiso_general_bsf,2,",",".");
$ld_total_compromiso_general_bsf=number_format($ld_total_compromiso_general_bsf,2,",",".");
$ld_total_causado_general_bsf=number_format($ld_total_causado_general_bsf,2,",",".");
$ld_total_pagado_general_bsf=number_format($ld_total_pagado_general_bsf,2,",",".");
$ld_total_asignado_general=number_format($ld_total_asignado_general,2,",",".");
$ld_total_precompromiso_general=number_format($ld_total_precompromiso_general,2,",",".");
$ld_total_compromiso_general=number_format($ld_total_compromiso_general,2,",",".");
$ld_total_causado_general=number_format($ld_total_causado_general,2,",",".");
$ls_codban = $_GET["codban"];
$ls_nomban = $_GET["nomban"];
$ls_ctaban = $_GET["ctaban"];
$ls_mesano = $_GET["mesano"];
$ls_tipbol = 'Bs.';
$ls_tiporeporte = 0;
$ls_tiporeporte = $_GET["tiporeporte"];
global $ls_tiporeporte;
if ($ls_tiporeporte==1)
{
require_once("scb_report_conciliacionbsf.php");
$io_report = new scb_report_conciliacionbsf($con);
$ls_tipbol = 'Bs.F.';
$ldec_salseglib = $_GET["salseglib"];
$ldec_salsegbco = $_GET["salsegbco"];
$ldec_salseglib=$io_monedabsf->uf_convertir_monedabsf($ldec_salseglib,$_SESSION["la_empresa"]["candeccon"],$_SESSION["la_empresa"]["tipconmon"],1000,$_SESSION["la_empresa"]["redconmon"]);
$ldec_salsegbco=$io_monedabsf->uf_convertir_monedabsf($ldec_salsegbco,$_SESSION["la_empresa"]["candeccon"],$_SESSION["la_empresa"]["tipconmon"],1000,$_SESSION["la_empresa"]["redconmon"]);
}
else
{
$ldec_salseglib = $_GET["salseglib"];
$ldec_salsegbco = $_GET["salsegbco"];
}
$data=$io_report->uf_obtener_mov_conciliacion($ls_mesano,$ls_codban,$ls_ctaban,$ldec_salseglib,&$ldec_salsegbco);
$ls_tipo_cuenta=$io_report->uf_tipo_cuenta($ls_codban,$ls_ctaban);
$ds_concil->data=$data;
error_reporting(E_ALL);
set_time_limit(1800);
$li_totrow=$ds_concil->getRowCount("numdoc");
if(($data===false))
{
$ld_total_pagado=number_format($ld_total_pagado,2,",",".");
$ld_total_compromiso_acumulado=number_format($ld_total_compromiso_acumulado,2,",",".");
$ld_total_causado_acumulado=number_format($ld_total_causado_acumulado,2,",",".");
$ld_total_pagado_acumulado=number_format($ld_total_pagado_acumulado,2,",",".");
$ld_total_reprog_prox_mes=number_format($ld_total_reprog_prox_mes,2,",",".");
$la_data_tot[$z]=array('total'=>'<b>TOTALES BsF.</b>','programado'=>$ld_total_programada,
'programado_acum'=>$ld_total_programada_acumulado,'compromiso'=>$ld_total_compromiso,
'causado'=>$ld_total_causado,'pagado'=>$ld_total_pagado,'porc_comprometer'=>$ld_total_compromiso_acumulado,
'porc_causado'=>$ld_total_causado_acumulado,'porc_pagado'=>$ld_total_pagado_acumulado,
'disp_trim_ant'=>'','disp_fecha'=>$ld_total_reprog_prox_mes);
}
else
{
$ld_total_programada_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_programada, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_programada_acumulado_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_programada_acumulado, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_compromiso_bsf= $io_rcbsf->uf_convertir_monedabsf($ld_total_compromiso, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_causado_bsf= $io_rcbsf->uf_convertir_monedabsf($ld_total_causado, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_pagado_bsf= $io_rcbsf->uf_convertir_monedabsf($ld_total_pagado, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_compromiso_acumulado_bsf= $io_rcbsf->uf_convertir_monedabsf($ld_total_compromiso_acumulado, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_causado_acumulado_bsf= $io_rcbsf->uf_convertir_monedabsf($ld_total_causado_acumulado, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_pagado_acumulado_bsf= $io_rcbsf->uf_convertir_monedabsf($ld_total_pagado_acumulado, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_reprog_prox_mes_bsf= $io_rcbsf->uf_convertir_monedabsf($ld_total_reprog_prox_mes, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_programada_bsf=number_format($ld_total_programada_bsf,2,",",".");
$ld_total_programada_acumulado_bsf=number_format($ld_total_programada_acumulado_bsf,2,",",".");
$ld_total_compromiso_bsf=number_format($ld_total_compromiso_bsf,2,",",".");
$ld_total_causado_bsf=number_format($ld_total_causado_bsf,2,",",".");
$ld_total_pagado_bsf=number_format($ld_total_pagado_bsf,2,",",".");
$ld_total_causado_acumulado_bsf=number_format($ld_total_causado_acumulado_bsf,2,",",".");
$ls_pago=$row_dt["nomban"]." - ".$row_dt["ctaban"];
break;
}
$li_porpagben=$row_dt["porpagben"];
$li_monpagben=$row_dt["monpagben"];
$li_monto=0;
if($li_porpagben>0)
{
$li_monto=($li_neto*$li_porpagben)/100;
}
if($li_monpagben>0)
{
$li_monto=$li_monpagben;
if($ls_tiporeporte==1)
{
$li_monto=$io_monedabsf->uf_convertir_monedabsf($li_monpagben,$_SESSION["la_empresa"]["candeccon"],$_SESSION["la_empresa"]["tipconmon"],1000,$_SESSION["la_empresa"]["redconmon"]);
}
}
$li_montototalbene=$li_montototalbene+$li_monto;
$li_monto=$io_fun_nomina->uf_formatonumerico($li_monto);
$la_data[$li_s]=array('nro'=>$li_s,'cedula'=>$ls_cedben,'nombre'=>$ls_apenomben,'tipo'=>$ls_tipben,'formapago'=>$ls_forpagben,
'cheque'=>$ls_pago,'monto'=>$li_monto);
}
$io_report->io_sql->free_result($rs_data_dt);
uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle
$li_montototalbene=$io_fun_nomina->uf_formatonumerico($li_montototalbene);
uf_print_piecabecera($li_s,$li_montototalbene,$io_pdf); // Imprimimos el pie de la cabecera
if ($io_pdf->ezPageCount==$li_numpag)
{// Hacemos el commit de los registros que se desean imprimir
$io_pdf->transaction('commit');
}
$la_data[$z]=array('beneficiario'=>$ls_nomben,'concepto'=>$ls_desmov,'fecha'=>$ls_fecmov,
'procede'=>$ls_procede,'documento'=>$ls_numcom,'monto'=>$ld_monmov);
}
}
if ($z==$li_numrows)
{// Imprimimos pie de la cabecera
if($ls_tipoformato==1)
{
$ld_total_monto_general=number_format($ld_total_monto_general,2,",",".");
uf_print_pie_cabecera($ld_total_monto_general,$io_pdf,'Total Bs.');
}
else
{
$ld_total_monto_general_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_total_monto_general, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_total_monto_general_bsf=number_format($ld_total_monto_general_bsf,2,",",".");
$ld_total_monto_general=number_format($ld_total_monto_general,2,",",".");
//Bolivares
uf_print_pie_cabecera($ld_total_monto_general,$io_pdf,'Total Bs.');
//Bolivares
//uf_print_pie_cabecera($ld_total_monto_general_bsf,$io_pdf,'Total Bs.F.');
}
}
}
}
else
{
print("<script language=JavaScript>");
print(" alert('No hay nada que Reportar');");
print(" close();");
$ld_asignado=number_format($ld_asignado,2,",",".");
$ld_disponible=number_format($ld_disponible,2,",",".");
$ld_monto_ejecutado=number_format($ld_monto_ejecutado,2,",",".");
$ld_monto_acumulado=number_format($ld_monto_acumulado,2,",",".");
$la_data[$z]=array('cuenta'=>$ls_spg_cuenta,'denominacion'=>$ls_denominacion,
'asignado'=>$ld_asignado,'acumulado'=>$ld_monto_acumulado,
'ejecutado'=>$ld_monto_ejecutado,'disponibilidad'=>$ld_disponible);
$io_cabecera=$io_pdf->openObject();
uf_print_cabecera($io_cabecera,$ls_programatica_ant,$ls_denestpro_ant,$io_pdf);
$io_encabezado=$io_pdf->openObject();
uf_print_cabecera_detalle($io_encabezado,$io_pdf);
uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle
$ld_totalasignado_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_totalasignado, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_totaldisponible_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_totaldisponible, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_totalejecutado_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_totalejecutado, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_totalacumulado_bsf = $io_rcbsf->uf_convertir_monedabsf($ld_totalacumulado, $li_candeccon,$li_tipconmon,1000,$li_redconmon);
$ld_totalasignado=number_format($ld_totalasignado,2,",",".");
$ld_totaldisponible=number_format($ld_totaldisponible,2,",",".");
$ld_totalejecutado=number_format($ld_totalejecutado,2,",",".");
$ld_totalacumulado=number_format($ld_totalacumulado,2,",",".");
uf_print_pie_cabecera($ld_totalasignado,$ld_totaldisponible,$ld_totalejecutado,$ld_totalacumulado,'Bs.',$io_pdf);
$ld_totalasignado_bsf=number_format($ld_totalasignado_bsf,2,",",".");
$ld_totaldisponible_bsf=number_format($ld_totaldisponible_bsf,2,",",".");
$ld_totalejecutado_bsf=number_format($ld_totalejecutado_bsf,2,",",".");
$ld_totalacumulado_bsf=number_format($ld_totalacumulado_bsf,2,",",".");
//uf_print_pie_cabecera($ld_totalasignado_bsf,$ld_totaldisponible_bsf,$ld_totalejecutado_bsf,$ld_totalacumulado_bsf,'BsF.',$io_pdf);
