$ld_subtotal_aumento=$ld_sub_total_aumento; $ld_subtotal_disminucion=$ld_sub_total_disminucion; $ld_subtotal_devengado=$ld_sub_total_devengado; $ld_subtotal_cobrado=$ld_sub_total_cobrado; $ld_subtotal_cobrado_anticipado=$ld_sub_total_cobrado_anticipado; $ld_subtotal_monto_actualizado=$ld_sub_total_monto_actualizado; $ld_subtotal_por_cobrar=$ld_sub_total_por_cobrar; } } // end for($li_s) uf_print_cabecera_detalle($ls_cuentaimprimir,$ls_denominacion,$io_pdf); uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle uf_print_pie_cabecera(number_format($ld_saldo_por_devengar,2,',','.'), number_format($ld_sub_total_previsto,2,',','.'), number_format($ld_sub_total_aumento,2,',','.'), number_format($ld_sub_total_disminucion,2,',','.'), number_format($ld_sub_total_monto_actualizado,2,',','.'), number_format($ld_sub_total_devengado,2,',','.'), number_format($ld_sub_total_cobrado,2,',','.'), number_format($ld_sub_total_cobrado_anticipado,2,',','.'), number_format($ld_sub_total_por_cobrar,2,',','.'),$io_pdf); }// end for($li_z) /*for($li_s=1;$li_s<=$li_totrow_det;$li_s++) { $li_tmp=($li_s+1); $io_pdf->transaction('start'); // Iniciamos la transacción $thisPageNum=$io_pdf->ezPageCount; $ls_spi_cuenta=$io_report->dts_reporte->data["spi_cuenta"][$li_s]; if ($li_s<$li_totrow_det) {
$li_totdeb = $li_totdeb + $li_montodebe; $li_montodebe = number_format($li_montodebe, 2, ",", "."); } else { $li_montodebe = ""; $li_montohab = $li_monto; $li_tothab = $li_tothab + $li_montohab; $li_montohab = number_format($li_montohab, 2, ",", "."); } $la_data[$li_s] = array('sc_cuenta' => $ls_sccuenta, 'denominacion' => $ls_denominacion, 'mondeb' => $li_montodebe, 'monhab' => $li_montohab); } $li_totdeb = number_format($li_totdeb, 2, ",", "."); $li_tothab = number_format($li_tothab, 2, ",", "."); uf_print_detalle_scg($la_data, &$io_pdf); unset($la_data); } uf_print_pie_cabecera($li_totdeb, $li_tothab, $ls_obssol, &$io_pdf); ////////////////////////// GRID DETALLE CONTABLE ////////////////////////////////////// } } } if ($ls_tiporeporte == 0) { uf_print_total_bsf($li_monsolaux, &$io_pdf); } if ($lb_valido) { $io_pdf->ezStopPageNumbers(1, 1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else { print "<script language=JavaScript>"; print " alert('Ocurrio un error al generar el reporte. Intente de Nuevo');";
// Imprimimos el detalle uf_print_pie_cabecera($io_pdf); uf_print_pie_de_pagina(&$io_pdf); if ($io_pdf->ezPageCount == $li_numpag) { // Hacemos el commit de los registros que se desean imprimir $io_pdf->transaction('commit'); } else { // Hacemos un rollback de los registros, agregamos una nueva página y volvemos a imprimir $io_pdf->transaction('rewind'); $io_pdf->ezNewPage(); // Insertar una nueva página uf_print_cabecera($ls_estemp, '', $ls_denuniadm, $ls_cmpmov, $ld_feccmp, $io_pdf); // Imprimimos la cabecera del registro uf_print_detalle($la_data, $io_pdf); // Imprimimos el detalle uf_print_pie_cabecera($io_pdf); uf_print_pie_de_pagina(&$io_pdf); } } } unset($la_data); } if ($lb_valido && $i > 0) { $io_pdf->ezStopPageNumbers(1, 1); $io_pdf->ezStream(); } else { print "<script language=JavaScript>"; print " alert('No hay nada que Reportar');"; print " close();"; print "</script>"; }
uf_print_pie_cabecera($ld_totalaumento,$ld_totaldismi,$io_pdf); $ld_totalaum=$ld_totalaumento; $ld_totaldis=$ld_totaldismi; $ld_totalaumento=0; $ld_totaldismi=0; if ($io_pdf->ezPageCount==$thisPageNum) {// Hacemos el commit de los registros que se desean imprimir $io_pdf->transaction('commit'); } elseif($thisPageNum<>1) {// Hacemos un rollback de los registros, agregamos una nueva página y volvemos a imprimir $io_pdf->transaction('rewind'); $io_pdf->ezNewPage(); // Insertar una nueva página uf_print_cabecera($ls_comprobante_ant,$ls_descripcion,$ldt_fecha,$ls_proc,$ls_programatica,$io_pdf); uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle uf_print_pie_cabecera($ld_totalaum,$ld_totaldis,$io_pdf); $ld_totalaum=0; $ld_totaldis=0; } unset($la_data); }//if }//for $io_pdf->ezStopPageNumbers(1,1); if (isset($d) && $d) { $ls_pdfcode = $io_pdf->ezOutput(1); $ls_pdfcode = str_replace("\n","\n<br>",htmlspecialchars($ls_pdfcode)); echo '<html><body>'; echo trim($ls_pdfcode); echo '</body></html>'; }
$ld_disminucion=str_replace('.','',$ld_disminucion); $ld_disminucion=str_replace(',','.',$ld_disminucion); } if (!empty($ls_procomp_next)) { $ld_aumento=number_format($ld_aumento,2,",","."); $ld_disminucion=number_format($ld_disminucion,2,",","."); $la_data[$z]=array('cuenta'=>$ls_spg_cuenta,'denominacion'=>$ls_denominacion, 'disminucion'=>$ld_disminucion,'aumento'=>$ld_aumento); $io_encabezado=$io_pdf->openObject(); uf_print_cabecera($io_encabezado,$ls_comprobante,$ls_descripcion,$ldt_fecha,$ls_proc,$ls_programatica,$io_pdf); uf_print_cabezera_detalle($io_pdf); uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle $ld_totalaumento=number_format($ld_totalaumento,2,",","."); $ld_totaldismi=number_format($ld_totaldismi,2,",","."); uf_print_pie_cabecera($ld_totalaumento,$ld_totaldismi,$io_pdf); $ld_totalaum=$ld_totalaumento; $ld_totaldis=$ld_totaldismi; $ld_totalaumento=0; $ld_totaldismi=0; $io_pdf->stopObject($io_encabezado); if($z<$li_tot) { $io_pdf->ezNewPage(); // Insertar una nueva página } unset($la_data); }//if }//for $io_pdf->ezStopPageNumbers(1,1); if (isset($d) && $d) {
{ $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."); } } unset($la_data); }//if }//for $io_pdf->ezStopPageNumbers(1,1); if (isset($d) && $d) { $ls_pdfcode = $io_pdf->ezOutput(1); $ls_pdfcode = str_replace("\n","\n<br>",htmlspecialchars($ls_pdfcode)); echo '<html><body>'; echo trim($ls_pdfcode); echo '</body></html>'; }
$io_pdf->transaction('rewind'); $io_pdf->ezNewPage(); // Insertar una nueva página uf_print_cabecera($ls_procede,$ls_comprobante,$ls_nomprobene,$io_pdf); // Imprimimos la cabecera del registro uf_print_cabecera_programatica($ls_programatica,$ls_denestpro,$io_pdf); // Imprimimos la cabecera del registro uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle uf_print_total_programatica($ld_totalprogram,$io_pdf); // Imprimimos el total programatica uf_print_total_comprobante($ld_totalcomprob,$io_pdf); // Imprimimos el total comprobante } else { $io_pdf->transaction('commit'); } if($li_i==$li_tot) { $ld_total=number_format($ld_total,2,",","."); uf_print_pie_cabecera($ld_total,$io_pdf); // Imprimimos pie de la cabecera } unset($la_data); }//for $io_pdf->ezStopPageNumbers(1,1); if (isset($d) && $d) { $ls_pdfcode = $io_pdf->ezOutput(1); $ls_pdfcode = str_replace("\n","\n<br>",htmlspecialchars($ls_pdfcode)); echo '<html><body>'; echo trim($ls_pdfcode); echo '</body></html>'; } else { $io_pdf->ezStream();
} else { $ldec_totalhaber=number_format($ldec_totalhaber,2,",","."); } if($ldec_saldo_act<0) { $ldec_total_saldo_aux=abs($ldec_saldo_act); $ldec_total_saldo_aux=number_format($ldec_total_saldo_aux,2,",","."); $ldec_total_saldo="(".$ldec_total_saldo_aux.")"; } else { $ldec_total_saldo=number_format($ldec_saldo_act,2,",","."); } uf_print_pie_cabecera($ldec_totaldebe,$ldec_totalhaber,$ldec_total_saldo,$io_pdf); unset($la_data); $io_pdf->ezStopPageNumbers(1,1); if (isset($d) && $d) { $ls_pdfcode = $io_pdf->ezOutput(1); $ls_pdfcode = str_replace("\n","\n<br>",htmlspecialchars($ls_pdfcode)); echo '<html><body>'; echo trim($ls_pdfcode); echo '</body></html>'; } else { $io_pdf->ezStream(); }
$la_data[1] =array('numdoc'=>$ls_numdoc,'fecmov'=>$ld_fecha,'feccad'=>$ld_feccad,'beneficiario'=>$ls_nomproben,'monto'=>number_format($ldec_monto,2,",",".")); if ($y==1) { $ls_show=1; } else { $ls_show=0; } uf_print_detalle($la_data,$ls_show,$io_pdf); } $ld_total_monto=number_format($ld_total_monto,2,",","."); uf_print_pie_cabecera($ld_total_monto,$li_total,$io_pdf); unset($la_data); } else { $lb_valido2=false; } } }//for if ($lb_valido2) { $io_pdf->ezStopPageNumbers(1,1); if (isset($d) && $d) { $ls_pdfcode = $io_pdf->ezOutput(1);
$ld_totalde=$ld_totaldebe; $ld_totalha=$ld_totalhaber; $ld_totalsal=$ld_totalsaldo_final; $ld_totaldebe=0; $ld_totalhaber=0; if ($io_pdf->ezPageCount==$thisPageNum) {// Hacemos el commit de los registros que se desean imprimir $io_pdf->transaction('commit'); } elseif($thisPageNum>1) {// Hacemos un rollback de los registros, agregamos una nueva página y volvemos a imprimir $io_pdf->transaction('rewind'); $io_pdf->ezNewPage(); // Insertar una nueva página uf_print_cabecera($as_cuenta,$ls_denominacion,$ld_saldo_anterior,$io_pdf); uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle uf_print_pie_cabecera($ld_totalde,$ld_totalha,$ld_totalsal,$io_pdf); } else { $io_pdf->transaction('commit'); } unset($la_data); }//if }//for $io_pdf->ezStopPageNumbers(1,1); if (isset($d) && $d) { $ls_pdfcode = $io_pdf->ezOutput(1); $ls_pdfcode = str_replace("\n","\n<br>",htmlspecialchars($ls_pdfcode)); echo '<html><body>';
$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,",","."); $ld_total_pagado_general=number_format($ld_total_pagado_general,2,",","."); //Bolivares 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.'); //Bolivar Fuerte uf_print_pie_cabecera($ld_total_asignado_general_bsf,$ld_total_precompromiso_general_bsf, $ld_total_compromiso_general_bsf,$ld_total_causado_general_bsf, $ld_total_pagado_general_bsf,$io_pdf,'Total Bs.F'); } } unset($la_data); }//if }//for $io_pdf->ezStopPageNumbers(1,1); if (isset($d) && $d) { $ls_pdfcode = $io_pdf->ezOutput(1); $ls_pdfcode = str_replace("\n","\n<br>",htmlspecialchars($ls_pdfcode)); echo '<html><body>'; echo trim($ls_pdfcode); echo '</body></html>';
if($ls_estatus==6){ $status="Pre-Comp.Anulada"; } if($ls_estatus==7){ $status="Servicio Recibido"; } $la_data[$li_i]= array('codigo'=>$ls_numord,'nombre'=>$ls_nombre,'estcondat'=>$ls_estcondat, 'fecha'=>$ls_fecha,'estatus'=>$status,'monto'=>$ld_monto); } uf_print_listado($la_data,$io_pdf); // Imprimimos el detalle $ldec_monto = number_format($ldec_monto,2,",","."); uf_print_pie_cabecera($li_i,$ldec_monto,$io_pdf); if($lb_valido) // Si no ocurrio ningún error { $io_pdf->ezStopPageNumbers(1,1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte } else // Si hubo algún error { print("<script language=JavaScript>"); print("alert('Ocurrio un error al generar el reporte. Intente de Nuevo');"); print("close();"); print("</script>"); } unset($io_pdf); } else
if ($io_pdf->ezPageCount == $li_numpag) { // Hacemos el commit de los registros que se desean imprimir $li_total = $io_fun_activos->uf_formatonumerico($li_total); $li_totcosgen = $io_fun_activos->uf_formatonumerico($li_totcosgen); uf_print_pie_cabecera($li_total, $li_totcosgen, $li_tot_activo, $li_totactgen, $io_pdf); $io_pdf->transaction('commit'); } else { // Hacemos un rollback de los registros, agregamos una nueva página y volvemos a imprimir $io_pdf->transaction('rewind'); $io_pdf->ezNewPage(); // Insertar una nueva página uf_print_cabecera($ls_codemp, $ls_nomemp, $ls_codgru, $ls_dengru, $io_pdf); // Imprimimos la cabecera del registro uf_print_detalle($la_data, $io_pdf); // Imprimimos el detalle uf_print_pie_cabecera($li_total, $li_totcosgen, $li_tot_activo, $li_totactgen, $io_pdf); //uf_print_pie_de_pagina(&$io_pdf); } } } unset($la_data); } if ($lb_valido && $i > 0) { $io_pdf->ezStopPageNumbers(1, 1); $io_pdf->ezStream(); } else { print "<script language=JavaScript>"; print " alert('No hay nada que Reportar');"; print " close();"; print "</script>"; }
uf_print_detalle_egreso($la_data_egr,$io_pdf); // Imprimimos el detalle if($lb_valido_ing) { $ld_total_ingresos=str_replace('.','',$ld_total_ingresos); $ld_total_ingresos=str_replace(',','.',$ld_total_ingresos); } else { $ld_total_ingresos=0; } $ld_total_egresos=abs($ld_total_egresos); $ld_total=trim($ld_total_ingresos)-($ld_total_egresos); $ld_total_egresos=number_format($ld_total_egresos,2,",","."); uf_print_pie_cabecera_egreso($ld_total_egresos,$io_pdf); // Imprimimos pie de la cabecera $ld_total=number_format($ld_total,2,",","."); uf_print_pie_cabecera($ld_total,$io_pdf); }//if unset($la_data); unset($la_data_egr); $io_pdf->ezStopPageNumbers(1,1); if (isset($d) && $d) { $ls_pdfcode = $io_pdf->ezOutput(1); $ls_pdfcode = str_replace("\n","\n<br>",htmlspecialchars($ls_pdfcode)); echo '<html><body>'; echo trim($ls_pdfcode); echo '</body></html>'; } else { $io_pdf->ezStream();
$ls_resul_1=$ls_resul_1; $ls_suma1= $ls_resul_1+$ls_total_egreso; $ls_suma2=""; $ls_resul_Balnace_2=$ls_resul_1; $ls_suma_Balance_2=$ls_tot_haber_g+$ls_resul_Balnace_2; $ls_suma_Balance_1=""; $ls_resul_Balnace_1=""; $ls_resul_Balnace_2=number_format($ls_resul_Balnace_2,2,",","."); $ls_resul_1=number_format($ls_resul_1,2,",","."); $ls_suma1=number_format($ls_suma1,2,",","."); $ls_suma_Balance_2=number_format($ls_suma_Balance_2,2,",","."); $ls_denomina="Superavit Fiscal"; } uf_print_pie_cabecera($ldec_totaldebe,$ldec_totalhaber,$ldec_total_saldo,$ls_total_egreso,$ls_total_ingreso, $ls_tot_debe_g,$ls_tot_haber_g,$ls_resul_1,$ls_resul_2,$ls_denomina, $ls_resul_Balnace_1,$ls_resul_Balnace_2,$ls_suma1,$ls_suma2, $ls_suma_Balance_1,$ls_suma_Balance_2,$io_pdf); unset($la_data); $io_pdf->ezStopPageNumbers(1,1); if (isset($d) && $d) { $ls_pdfcode = $io_pdf->ezOutput(1); $ls_pdfcode = str_replace("\n","\n<br>",htmlspecialchars($ls_pdfcode)); echo '<html><body>'; echo trim($ls_pdfcode); echo '</body></html>'; } else { $io_pdf->ezStream();
{ uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle uf_print_pie_cabecera(number_format($ld_total_monto,2,",","."),"Total",$io_pdf); $ld_total_monto_general+=$ld_total_monto; $ls_codespro=$io_report->ds_reporte_final->getValue("codestpro",$z); $ls_spg_cuenta=$io_report->ds_reporte_final->getValue("spg_cuenta",$z); $ls_denominacion=$io_report->ds_reporte_final->getValue("denominacion",$z); uf_print_cuenta($ls_codespro, $ls_spg_cuenta, $ls_denominacion,$io_pdf); $ld_total_monto=0; $la_data=array(); } $la_data[$z]=array('numdoc'=>$ls_numdoc,'fecha'=>$ldt_fecha,'beneficiario'=>$ls_nom_benef,'concepto'=>$ls_descripcion, 'codope'=>$ls_codope,'monto'=>$ld_monto); }//for uf_print_pie_cabecera(number_format($ld_total_monto_general,2,",","."),"Total General",$io_pdf); $io_pdf->ezStopPageNumbers(1,1); if (isset($d) && $d) { $ls_pdfcode = $io_pdf->ezOutput(1); $ls_pdfcode = str_replace("\n","\n<br>",htmlspecialchars($ls_pdfcode)); echo '<html><body>'; echo trim($ls_pdfcode); echo '</body></html>'; } else { $io_pdf->ezStream(); } unset($io_pdf); }
$ls_canart=$io_report->dts_reporte->data["canart"][$li_s]; $ls_preuniart=number_format($io_report->dts_reporte->data["preuniart"][$li_s],2,",","."); $ls_nompro=$io_report->dts_reporte->data["nompro"][$li_s]; $ls_cedrep=$io_report->dts_reporte->data["cedrep"][$li_s]; $ls_nomreppro=$io_report->dts_reporte->data["nomreppro"][$li_s]; $ls_denart=$io_report->dts_reporte->data["denart"][$li_s]; $ls_estpro=$io_report->dts_reporte->data["estpro"][$li_s]; $ldt_fecrec=$io_funciones->uf_convertirfecmostrar($io_report->dts_reporte->data["fecrec"][$li_s]); $ls_montotart=$io_report->dts_reporte->data["montotart"][$li_s]; $la_data[$li_s]=array('codart'=>$ls_codart,'denart'=>$ls_denart,'canart'=>$ls_canart,'preuniart'=>$ls_preuniart); }//for uf_cabezera($ls_nomresalm,$ls_nompro,$ls_nomreppro,$ls_nombre,$io_pdf); uf_cabezera_detalle($io_pdf); uf_print_pie_detalle($ls_estpro,$ls_numordcom,$ls_nombre,$ls_montotart,$ls_ciuemp,$ldt_fecrec,$io_pdf); uf_print_pie_cabecera($ls_nombre,$io_pdf); uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle unset($la_data); $io_pdf->ezStopPageNumbers(1,1); if (isset($d) && $d) { $ls_pdfcode = $io_pdf->ezOutput(1); $ls_pdfcode = str_replace("\n","\n<br>",htmlspecialchars($ls_pdfcode)); echo '<html><body>'; echo trim($ls_pdfcode); echo '</body></html>'; } else { $io_pdf->ezStream(); }
$ls_estact = $io_report->ds->data["estact"][$li_i]; $ls_catalogo = $io_report->ds->data["catalogo"][$li_i]; $ld_fecmpact = $io_report->ds->data["feccmpact"][$li_i]; $ld_fecmpactaux = $io_funciones->uf_convertirfecmostrar($ld_fecmpact); $li_costo = $io_report->ds->data["costo"][$li_i]; if ($ls_estact == 'D') { $li_costo = $li_costo * -1; } $ld_total_costo = $ld_total_costo + $li_costo; $li_costo = number_format($li_costo, 2, ',', '.'); $la_data[$li_i] = array('codact' => $ls_codact, 'denact' => $ls_denact, 'resuso' => $ls_nomresuso, 'maract' => $ls_maract, 'modact' => $ls_modact, 'feccmpact' => $ld_fecmpactaux, 'costo' => $li_costo, 'catalogo' => $ls_catalogo); } uf_print_detalle($la_data, $io_pdf); // Imprimimos el detalle $ld_total_costo = $io_fun_activos->uf_formatonumerico($ld_total_costo); uf_print_pie_cabecera($ld_total_costo, $io_pdf); unset($la_data); if ($lb_valido) { $io_pdf->ezStopPageNumbers(1, 1); $io_pdf->ezStream(); } else { print "<script language=JavaScript>"; print " alert('No hay nada que Reportar');"; print " close();"; print "</script>"; } unset($io_pdf); } unset($io_report); unset($io_funciones); unset($io_fun_nomina);
//***** HASTA AQUI ******** if ($io_pdf->ezPageCount == $li_numpag) { // Hacemos el commit de los registros que se desean imprimir $io_pdf->transaction('commit'); } else { // Hacemos un rollback de los registros, agregamos una nueva página y volvemos a imprimir $io_pdf->transaction('rewind'); if ($li_numpag != 1) { $io_pdf->ezNewPage(); // Insertar una nueva página } uf_print_cabecera($ls_codemp, $ls_nomemp, $ls_codcau, $ls_dencau, $ls_descmp, $io_pdf); // Imprimimos la cabecera del registro uf_print_detalle($la_data, $io_pdf); // Imprimimos el detalle uf_print_pie_cabecera($li_montot, $io_pdf); // Imprimimos pie de la cabecera } } unset($la_data); } if ($lb_valido) { $io_pdf->ezStopPageNumbers(1, 1); $io_pdf->ezStream(); } unset($io_pdf); } unset($io_report); unset($io_funciones); unset($io_fun_nomina); ?>
if ($io_pdf->ezPageCount == $li_numpag) { // Hacemos el commit de los registros que se desean imprimir //$li_total_cantidad = $io_fun_activos->uf_formatonumerico($li_total_cantidad); $li_total_precio = $io_fun_activos->uf_formatonumerico($li_total_precio); uf_print_pie_cabecera($li_total_cantidad, $li_total_precio, $io_pdf); $io_pdf->transaction('commit'); } else { // Hacemos un rollback de los registros, agregamos una nueva página y volvemos a imprimir $io_pdf->transaction('rewind'); $io_pdf->ezNewPage(); // Insertar una nueva página uf_print_cabecera($li_cod_pro, $li_nompro, $io_pdf); // Imprimimos la cabecera del registro uf_print_detalle($la_data, $io_pdf); // Imprimimos el detalle uf_print_pie_cabecera($li_total_cantidad, $li_total_precio, $io_pdf); //uf_print_pie_de_pagina(&$io_pdf); } } } unset($la_data); } if ($lb_valido && $i > 0) { $io_pdf->ezStopPageNumbers(1, 1); $io_pdf->ezStream(); } else { print "<script language=JavaScript>"; print " alert('No hay nada que Reportar');"; print " close();"; print "</script>"; }
uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle uf_print_pie_cabecera($li_totprenom,$li_totant,$io_pdf); // Imprimimos pie de la cabecera if ($io_pdf->ezPageCount==$li_numpag) {// Hacemos el commit de los registros que se desean imprimir $io_pdf->transaction('commit'); } else {// Hacemos un rollback de los registros, agregamos una nueva página y volvemos a imprimir $io_pdf->transaction('rewind'); if($li_numpag!=1) { $io_pdf->ezNewPage(); // Insertar una nueva página } uf_print_cabecera($ls_numtom,$ls_codalm,$ls_nomfisalm,$ls_obstom,$io_pdf); // Imprimimos la cabecera del registro uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle uf_print_pie_cabecera($li_totprenom,$li_totant,$io_pdf); // Imprimimos pie de la cabecera } } unset($la_data); } if($lb_valido) { $io_pdf->ezStopPageNumbers(1,1); $io_pdf->ezStream(); } unset($io_pdf); } unset($io_report); unset($io_funciones); unset($io_fun_nomina); ?>
$li_existencia=number_format($li_existencia,2,",","."); $la_data[$li_s]=array('codigo'=>$ls_codart,'articulo'=>$ls_denart,'existencia'=>$li_existencia); } uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle uf_print_pie_cabecera("","",$io_pdf); // Imprimimos pie de la cabecera if ($io_pdf->ezPageCount==$li_numpag) {// Hacemos el commit de los registros que se desean imprimir $io_pdf->transaction('commit'); } else {// Hacemos un rollback de los registros, agregamos una nueva página y volvemos a imprimir $io_pdf->transaction('rewind'); $io_pdf->ezNewPage(); // Insertar una nueva página uf_print_cabecera($ls_nomemp,$ls_nomfisalm,$io_pdf); // Imprimimos la cabecera del registro uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle uf_print_pie_cabecera("","",$io_pdf); // Imprimimos pie de la cabecera } } unset($la_data); } if($lb_valido) { $io_pdf->ezStopPageNumbers(1,1); $io_pdf->ezStream(); } unset($io_pdf); } unset($io_report); unset($io_funciones); unset($io_fun_nomina); ?>
$ld_cantidad = number_format($ld_cantidad,2,",","."); $ld_precio = number_format($ld_precio,2,",","."); $ld_subtotal = number_format($ld_subtotal,2,",","."); $ld_cargo = number_format($ld_cargo,2,",","."); $ld_total = number_format($ld_total,2,",","."); $la_dataser[$li_ser]= array('codigo'=>$ls_codigo,'denominacion'=>$ls_denominacion,'cantidad'=>$ld_cantidad, 'precio'=>$ld_precio,'subtotal'=>$ld_subtotal,'cargos'=>$ld_cargo,'total'=>$ld_total); } uf_print_detalle_servicios($la_dataser,$io_pdf); } } $ld_monto = str_replace(".","",$ld_monto); $ld_monto = str_replace(",",".",$ld_monto); uf_print_pie_cabecera($ld_monbas,$ld_moncar,$ld_monto,&$io_pdf); $ls_tipoencabenzadosol = "Detalle Presupuestario"; $numalet->setNumero($ld_monto); $ls_monto= $numalet->letra(); // $io_pdf->ezStartPageNumbers(588,710,7,'','',1); uf_print_encabezado_pie(number_format($ld_monto,2,",","."),$ls_proveedor,$ls_monto, $ls_lugcom,$ls_codmoneda,$ls_moneda,$ld_tasa,$ld_mondiv,$ls_estcondat, $ls_pais,$ls_estado,$ls_municipio,$ls_parroquia,$ls_estcondat,$ls_codmoneda, &$io_pdf); uf_print_cuadros_inferiores($ls_obsordcom,$ls_observacion,$ld_tasa,$li_totconv,&$io_pdf); } if($lb_valido) { $io_pdf->ezStream();
$li_total_pagado = $li_total_pagado + $io_report->ds_detalle->data["montotdoc"][$li_s]; $li_total_retencion = $li_total_retencion + $io_report->ds_detalle->data["monobjret"][$li_s]; $li_total_impuesto = $li_total_impuesto + $io_report->ds_detalle->data["monret"][$li_s]; $li_totalacumulado = $li_totalacumulado + $io_report->ds_detalle->data["monobjret"][$li_s]; $li_retencionacumulada = $li_retencionacumulada + $io_report->ds_detalle->data["monret"][$li_s]; $li_total = number_format($li_totalacumulado, 2, ",", "."); $li_retencion = number_format($li_retencionacumulada, 2, ",", "."); $la_data[$li_s] = array('fecha' => $ls_fecha, 'total' => $li_montotdoc, 'retencion' => $li_monobjret, 'porcentaje' => $li_porded, 'impuesto' => $li_monret, 'totalacumulado' => $li_total, 'retencionacumulada' => $li_retencion); } uf_print_detalle($la_data, $io_pdf); // Imprimimos el detalle unset($la_data); $li_total_pagado = number_format($li_total_pagado, 2, ",", "."); $li_total_retencion = number_format($li_total_retencion, 2, ",", "."); $li_total_impuesto = number_format($li_total_impuesto, 2, ",", "."); uf_print_pie_cabecera($li_total_pagado, $li_total_retencion, $li_total_impuesto, &$io_pdf); $io_pdf->stopObject($io_cabecera); // Detener el objeto cabecera if ($li_i < $li_totrow) { $io_pdf->ezNewPage(); // Insertar una nueva página } $io_report->ds_detalle->reset_ds(); } } $io_report->DS->reset_ds(); if ($lb_valido) { $io_pdf->ezStopPageNumbers(1, 1); // Detenemos la impresión de los números de página $io_pdf->ezStream(); // Mostramos el reporte
} else { $ld_totaldebe=number_format($ld_totaldebe,2,",","."); } if($ld_totalhaber<0) { $ld_totalhaber_aux=abs($ld_totalhaber); $ld_totalhaber_aux=number_format($ld_totalhaber_aux,2,",","."); $ld_totalhaber="(".$ld_totalhaber_aux.")"; } else { $ld_totalhaber=number_format($ld_totalhaber,2,",","."); } uf_print_pie_cabecera($ld_totaldebe,$ld_totalhaber,$ld_totalsaldo_final,$io_pdf,$li_ocultar); $ld_totalde=$ld_totaldebe; $ld_totalha=$ld_totalhaber; $ld_totalsal=$ld_totalsaldo_final; $ld_totaldebe=str_replace('.','',$ld_totaldebe); $ld_totaldebe=str_replace(',','.',$ld_totaldebe); $ld_totalhaber=str_replace('.','',$ld_totalhaber); $ld_totalhaber=str_replace(',','.',$ld_totalhaber); $ld_montototaldebe=$ld_montototaldebe+$ld_totaldebe; $ld_montototalhaber=$ld_montototalhaber+$ld_totalhaber; $ld_totaldebe=0; $ld_totalhaber=0;
uf_print_titulo("Mensual",$io_pdf); uf_print_cabecera("Mensual",$io_pdf); } $io_encabezado=$io_pdf->openObject(); uf_print_titulo_proyecto("ACCIONES CENTRALIZADAS",$io_encabezado,$io_pdf); $io_pdf->stopObject($io_encabezado); uf_print_detalle_acciones($la_data_a,$io_pdf); // Imprimimos el detalle //uf_print_pie_cabecera_acciones($la_data_tot_a,$io_pdf); if($ls_tipoformato==1) { uf_print_pie_cabecera($la_data_totales,$io_pdf); } else { uf_print_pie_cabecera($la_data_totales,$io_pdf); uf_print_pie_cabecera($la_data_totales_bsf,$io_pdf); } unset($la_data_a); unset($la_data_tot_a); unset($la_data_totales); }//if if (isset($d) && $d) { $ls_pdfcode = $io_pdf->ezOutput(1); $ls_pdfcode = str_replace("\n","\n<br>",htmlspecialchars($ls_pdfcode)); echo '<html><body>'; echo trim($ls_pdfcode); echo '</body></html>'; } else
$ld_total_pagado=number_format($ld_total_pagado,2,",","."); $ld_total_por_paga=number_format($ld_total_por_paga,2,",","."); $la_data_tot[$z]=array('total'=>'<b>TOTAL</b>','asignado'=>$ld_total_asignado,'aumento'=>$ld_total_aumento, 'disminución'=>$ld_total_disminucion,'montoactualizado'=>$ld_total_monto_actualizado, 'precomprometido'=>$ld_total_precompromiso,'comprometido'=>$ld_total_compromiso, 'saldoporcomprometer'=>$ld_total_saldo_comprometer,'causado'=>$ld_total_causado, 'pagado'=>$ld_total_pagado,'porpagar'=>$ld_total_por_paga); }//if }//for $io_encabezado=$io_pdf->openObject(); uf_print_titulo_reporte($io_encabezado,$ls_programatica,$ls_denestpro,$io_pdf); $io_cabecera=$io_pdf->openObject(); uf_print_cabecera($io_cabecera,$io_pdf); uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle uf_print_pie_cabecera($la_data_tot,$io_pdf); $io_pdf->stopObject($io_encabezado); $io_pdf->stopObject($io_cabecera); unset($la_data); unset($la_data_tot); }//if if($li<$li_total) { $io_pdf->ezNewPage(); // Insertar una nueva página } }//while $io_pdf->ezStopPageNumbers(1,1); if (isset($d) && $d) { $ls_pdfcode = $io_pdf->ezOutput(1); $ls_pdfcode = str_replace("\n","\n<br>",htmlspecialchars($ls_pdfcode));
$ls_feccot = $io_funciones->uf_convertirfecmostrar($ls_feccot); $ls_obscot = $row["obscot"]; $ls_tipcot = $row["tipcot"]; if ($ls_tipcot=='B') { $ls_tipcot = "Bienes"; } elseif($ls_tipcot=='S') { $ls_tipcot = "Servicios"; } $ls_nompro = $row["nompro"]; $la_data[$li_i] = array('numcot'=>$ls_numcot,'nompro'=>$ls_nompro,'obscot'=>$ls_obscot,'feccot'=>$ls_feccot,'tipcot'=>$ls_tipcot); } uf_print_detalles($la_data,$io_pdf);//Imprimimos el detalle uf_print_pie_cabecera($li_i,$io_pdf); $io_pdf->setStrokeColor(0,0,0); $io_pdf->line(20,50,580,50); $io_pdf->ezStopPageNumbers(1,1); $io_pdf->ezStream(); unset($io_pdf); unset($io_report); unset($io_funciones); } else { print("<script language=JavaScript>"); print(" alert('No hay nada que Reportar');"); print(" close();"); print("</script>"); }
$la_valores["denomasig"]=$la_data_a[$li_s]["denominacion"]; $la_valores["valorasig"]=$la_data_a[$li_s]["valor"]; } if($li_s<=$li_dedu) { $la_valores["denomdedu"]=$la_data_d[$li_s]["denominacion"]; $la_valores["valordedu"]=$la_data_d[$li_s]["valor"]; } $la_data[$li_s]=$la_valores; } uf_print_detalle($la_data,$io_pdf); // Imprimimos el detalle $li_totnet=$li_toting-$li_totded; $li_toting=$io_fun_nomina->uf_formatonumerico($li_toting); $li_totded=$io_fun_nomina->uf_formatonumerico($li_totded); $li_totnet=$io_fun_nomina->uf_formatonumerico($li_totnet); uf_print_pie_cabecera($li_toting,$li_totded,$li_totnet,$ls_codcueban,$io_pdf); // Imprimimos pie de la cabecera uf_print_firmas($ls_cedper,$ls_nomper,&$io_pdf); unset($la_data_a); unset($la_data_d); unset($la_data); $io_pdf->stopObject($io_cabecera); // Detener el objeto cabecera if($li_i<$li_totrow) { $io_pdf->ezNewPage(); // Insertar una nueva página } } $li_i++; $io_report->rs_data->MoveNext(); } if($lb_valido) // Si no ocurrio ningún error {
$li_totdesinc = ""; } $la_data[$li_i] = array('codact' => $ls_codact, 'tot_inc' => $li_totinc, 'tot_desinc' => $li_totdesinc); } if ($la_data != "") { $i = $i + 1; uf_print_cabecera($ls_codemp, $ls_nomemp, $ls_coduniadm, $ls_denuniadm, $io_pdf); // Imprimimos la cabecera del registro uf_print_detalle($la_data, $io_pdf); // Imprimimos el detalle //uf_print_pie_de_pagina(&$io_pdf); if ($io_pdf->ezPageCount == $li_numpag) { // Hacemos el commit de los registros que se desean imprimir $li_tot_gen_inc = $io_fun_activos->uf_formatonumerico($li_tot_gen_inc); $li_tot_gen_desinc = $io_fun_activos->uf_formatonumerico($li_tot_gen_desinc); uf_print_pie_cabecera($li_tot_gen_inc, $li_tot_gen_desinc, $io_pdf); $io_pdf->transaction('commit'); } else { // Hacemos un rollback de los registros, agregamos una nueva página y volvemos a imprimir $io_pdf->transaction('rewind'); $io_pdf->ezNewPage(); // Insertar una nueva página uf_print_cabecera($ls_codemp, $ls_nomemp, $ls_codgru, $ls_dengru, $io_pdf); // Imprimimos la cabecera del registro uf_print_detalle($la_data, $io_pdf); // Imprimimos el detalle //uf_print_pie_cabecera($li_tot_gen_inc,$li_tot_gen_desinc,$io_pdf); //uf_print_pie_de_pagina(&$io_pdf); } } unset($la_data);