$ls_observacion=$_GET["observacion"]; $lb_valido=uf_insert_seguridad(); if($lb_valido) { uf_print_encabezado_pagina($ls_numanacot,$ls_observacion,$ld_fecha,$io_pdf); $lb_valido=$io_class_report->uf_cargar_cotizaciones($ls_numanacot, $la_cotizaciones); if($lb_valido) { uf_print_proveedores($la_cotizaciones,$io_pdf); $lb_valido=$io_class_report->uf_select_items($ls_numanacot,$ls_tipsolcot,$la_items); if($lb_valido) { $io_pdf->set_margenes(20,20,0,0); uf_print_items($ls_tipsolcot,$la_items,$io_pdf); $la_ganadores=$io_class_report->uf_select_cotizacion_analisis($ls_numanacot,$ls_tipsolcot); uf_print_ganadores($ls_numanacot,$ls_tipsolcot,$la_ganadores,$io_pdf); $io_pdf->set_margenes(0,0,0,0); uf_print_pie_pagina($io_pdf); $io_pdf->ezStream(); unset($io_pdf); } } } if(!$lb_valido) { print("<script language=JavaScript>"); print(" alert('No hay nada que reportar');"); print(" close();"); print("</script>"); } ?>
$ls_numdoc = $ds_voucher->data["numdoc"][$li_i]; $ls_codban = $ds_voucher->data["codban"][$li_i]; $ls_nomban = $class_report->uf_select_data($io_sql,"SELECT * FROM scb_banco WHERE codban ='".$ls_codban."' AND codemp='".$ls_codemp."'","nomban"); $ls_ctaban = $ds_voucher->data["ctaban"][$li_i]; $ls_chevau = $ds_voucher->data["chevau"][$li_i]; $ld_fecmov = $io_funciones->uf_convertirfecmostrar($ds_voucher->data["fecmov"][$li_i]); $ls_nomproben = $ds_voucher->data["nomproben"][$li_i]; $ls_solicitudes = $class_report->uf_select_solicitudes($ls_numdoc,$ls_codban,$ls_ctaban); $ls_conmov = $ds_voucher->getValue("conmov",$li_i); $ldec_monret = $ds_voucher->getValue("monret",$li_i); $ldec_monto = $ds_voucher->getValue("monto",$li_i); $ldec_total = $ldec_monto-$ldec_monret; $ls_monto = $numalet->uf_convertir_letra($ldec_total,'',''); $io_encabezado = $io_pdf->openObject(); uf_print_encabezado_pagina(number_format($ldec_total,2,",","."),$ls_nomproben,$ls_monto,$_SESSION["la_empresa"]["ciuemp"].", ".$ld_fecmov,$io_pdf,$y_pos); // Imprimimos el encabezado de la página uf_print_pie_pagina($ls_numdoc,$ls_nomban,$ls_ctaban,$ls_nomproben,$ld_fecmov,$ls_conmov,$ls_chevau,$io_pdf); // Imprimimos la cabecera del registro $io_pdf->closeObject(); $io_pdf->addObject($io_encabezado,'all'); $ds_dt_scg->data=$class_report->uf_cargar_dt_scg($ls_numdoc,$ls_codban,$ls_ctaban,$ls_codope); // Obtenemos el detalle del reporte $ds_dt_spg->data=$class_report->uf_cargar_dt_spg($ls_numdoc,$ls_codban,$ls_ctaban,$ls_codope); $la_campos=array("scg_cuenta"); $la_monto=array("monto"); $ds_dt_scg->group_by($la_campos,$la_monto,"scg_cuenta"); $la_campos=array("spg_cuenta","estpro"); $ds_dt_spg->group_by($la_campos,$la_monto,"spg_cuenta"); $li_totrow_det=$ds_dt_scg->getRowCount("scg_cuenta"); $li_totrow_spg=$ds_dt_spg->getRowCount("spg_cuenta"); $la_contable = array(); /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Hago un ciclo para unir en una sola matriz los detalles de presupuesto y los contables para proceder luego a pintarlos if($li_totrow_det>=$li_totrow_spg)
$io_ds_detallepro->insertRow("cod_pro",$la_cotizaciones[$li_i]["cod_pro"]); $io_ds_detallepro->insertRow("nompro",$la_cotizaciones[$li_i]["nompro"]); } $io_ds_detallepro->group('cod_pro'); $io_ds_detalle->group('codigo'); $lb_valido=$io_class_report->uf_count_cotizaciones($ls_numanacot,$ls_countcot); $ls_countcot=count($ls_countcot); if($lb_valido) { uf_print_proveedores($la_cotizaciones,$io_ds_detalle,$io_ds_detallepro,$ls_countcot,$io_pdf); } $lb_valido=$io_class_report->uf_select_items($ls_numanacot,$ls_tipsolcot,$la_items); if($lb_valido) { //uf_print_items($ls_tipsolcot,$la_items,$io_pdf); $la_ganadores=$io_class_report->uf_select_cotizacion_analisis($ls_numanacot,$ls_tipsolcot); uf_print_ganadores($ls_numanacot,$ls_tipsolcot,$la_ganadores,$io_pdf); uf_print_pie_pagina($ls_observacion,$io_pdf); $io_pdf->ezStream(); unset($io_pdf); } } } if(!$lb_valido) { print("<script language=JavaScript>"); print(" alert('No hay nada que reportar');"); print(" close();"); print("</script>"); } ?>