Detalle Comprobante

"; print "close();"; print "opener.document.form1.submit();"; print ""; } $ls_modalidad=$_SESSION["la_empresa"]["estmodest"]; switch($ls_modalidad) { case "1": // Modalidad por Proyecto $ls_titulo="Estructura Presupuestaria "; $li_len1=20; $li_len2=6; $li_len3=3; $li_len4=2; $li_len5=2; break; case "2": // Modalidad por Presupuesto $ls_titulo="Estructura Programática "; $li_len1=2; $li_len2=2; $li_len3=2; $li_len4=2; $li_len5=2; break; } //---------------------------------------------------------------------------------------------------------------------------- function uf_imprimirresultados($as_codcom,$as_procede) { //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_imprimirresultados // Access: private // Arguments: as_codcom // Comprobante // as_procede // Procede del Documento // Description: Función que Imprime los detalles del comprobante // Creado Por: Ing. Yesenia Moreno // Fecha Creación: 31/10/2006 Fecha Última Modificación : //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// global $in_class_mis; global $ls_titulo, $li_len1, $li_len2, $li_len3, $li_len4, $li_len5; require_once("../shared/class_folder/sigesp_include.php"); $in=new sigesp_include(); $con=$in->uf_conectar(); require_once("../shared/class_folder/class_mensajes.php"); $io_mensajes=new class_mensajes(); require_once("../shared/class_folder/class_sql.php"); $io_sql=new class_sql($con); require_once("../shared/class_folder/class_sql.php"); $io_sql2=new class_sql($con); require_once("../shared/class_folder/class_funciones.php"); $io_funciones=new class_funciones(); $ls_codemp=$_SESSION["la_empresa"]["codemp"]; $ls_sql="SELECT comprobante, fecha, procede ". " FROM mis_sigesp_nc ". " WHERE codemp = '".$ls_codemp."' ". " AND procede = '".$as_procede."' ". " AND comprobante = '".$as_codcom."' ". " GROUP BY procede, comprobante, fecha". " ORDER BY fecha, comprobante "; $rs_data=$io_sql->select($ls_sql); if($rs_data===false) { $io_mensajes->message("ERROR->".$io_funciones->uf_convertirmsg($io_sql->message)); } else { while($row=$io_sql->fetch_row($rs_data)) { $ls_comprobante=$row["comprobante"]; $ld_fecha=$io_funciones->uf_convertirfecmostrar($row["fecha"]); $ls_procede=$row["procede"]; $ls_descripcion="MOVIMIENTO DE NOTAS DE CRÉDITO - INTEGRACIÓN MÓDULO FACTURACIÓN Y COBRANZAS ".$ls_comprobante."-".$ld_fecha; print ""; print " "; print " "; print " "; print "

Información del Comprobante

"; print ""; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print "

Comprobante	".$ls_comprobante."
Fecha	".$ld_fecha."
Procede	".$ls_procede."
Descripción	".$ls_descripcion."

"; $ls_sql="SELECT spi_cuenta, monto, '-------------------------' as codestpro1, '-------------------------' as codestpro2,". " '-------------------------' as codestpro3, '-------------------------' as codestpro4, '-------------------------' as codestpro5,'-' as estcla ". " FROM mis_sigesp_nc ". " WHERE codemp = '".$ls_codemp."' ". " AND procede = '".$as_procede."' ". " AND comprobante = '".$as_codcom."'". " AND spi_cuenta<>''"; $rs_data2=$io_sql2->select($ls_sql); if($rs_data2===false) { $io_mensajes->message("ERROR->".$io_funciones->uf_convertirmsg($io_sql2->message)); } else { //------------------------------------------------- $ls_estpreing=$_SESSION["la_empresa"]["estpreing"]; $ls_estmodest = $_SESSION["la_empresa"]["estmodest"]; $li_loncodestpro1 = $_SESSION["la_empresa"]["loncodestpro1"]; $li_loncodestpro2 = $_SESSION["la_empresa"]["loncodestpro2"]; $li_loncodestpro3 = $_SESSION["la_empresa"]["loncodestpro3"]; $li_loncodestpro4 = $_SESSION["la_empresa"]["loncodestpro4"]; $li_loncodestpro5 = $_SESSION["la_empresa"]["loncodestpro5"]; //-------------------------------------------------- if ($ls_estpreing==0) { print ""; print " "; print " "; print " "; print " "; print " "; print " "; print " "; } else { print "

Detalle Presupuestario de Ingreso
Cuenta	Monto

"; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; } $li_total=0; while($row=$io_sql2->fetch_row($rs_data2)) { $ls_cuenta=$row["spi_cuenta"]; $li_total=$li_total+$row["monto"]; $li_monto=$in_class_mis->uf_formatonumerico($row["monto"]); //-------------------------------------------------------- $ls_estcla=$row["estcla"]; $ls_estatus=''; switch($ls_estcla) { case "A": $ls_estatus="Acción"; break; case "P": $ls_estatus="Proyecto"; break; } $ls_codestpro1 = trim(substr(substr($rs_data2->fields["codestpro1"],0,25),-$li_loncodestpro1)); $ls_codestpro2 = trim(substr(substr($rs_data2->fields["codestpro2"],0,25),-$li_loncodestpro2)); $ls_codestpro3 = trim(substr(substr($rs_data2->fields["codestpro3"],0,25),-$li_loncodestpro3)); if ($ls_estmodest==2) { $ls_denestcla=""; $ls_codestpro4 = trim(substr(substr($rs_data2->fields["codestpro4"],0,25),-$li_loncodestpro4)); $ls_codestpro5 = trim(substr(substr($rs_data2->fields["codestpro5"],0,25),-$li_loncodestpro5)); $ls_programatica = $ls_codestpro1."-".$ls_codestpro2."-".$ls_codestpro3."-".$ls_codestpro4."-".$ls_codestpro5; } else { $ls_programatica = $ls_codestpro1."-".$ls_codestpro2."-".$ls_codestpro3; } //--------------------------------------------------------------------------------------------------------- if ($ls_estpreing==0) { print ""; print ""; print ""; print ""; } else { print ""; print ""; print ""; print ""; print ""; print ""; } } $li_total=$in_class_mis->uf_formatonumerico($li_total); if ($ls_estpreing==0) { print " "; print " "; print " "; print " "; print "

Detalle Presupuestario de Ingreso
Estructura Presupuestaria	Estatus	Cuenta	Monto
".$ls_cuenta."	".$li_monto."
".$ls_programatica."	".$ls_estcla."	".$ls_cuenta."	".$li_monto."
Total	".$li_total."

"; } else { print " "; print " Total"; print " ".$li_total.""; print " "; print ""; } } $io_sql2->free_result($rs_data2); $ls_sql="SELECT sc_cuenta, debhab, monto ". " FROM mis_sigesp_nc ". " WHERE codemp = '".$ls_codemp."' ". " AND procede = '".$as_procede."' ". " AND comprobante = '".$as_codcom."' ". " ORDER BY debhab "; $rs_data2=$io_sql2->select($ls_sql); if($rs_data2===false) { $io_mensajes->message("ERROR->".$io_funciones->uf_convertirmsg($io_sql2->message)); } else { $li_total_deb=0; $li_total_hab=0; print ""; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; while($row=$io_sql2->fetch_row($rs_data2)) { $ls_cuenta=$row["sc_cuenta"]; $li_monto=$row["monto"]; $ls_debhab=$row["debhab"]; switch($ls_debhab) { case "D": $li_debe=$li_monto; $li_debe=$in_class_mis->uf_formatonumerico($li_debe); $li_haber="0,00"; $li_total_deb=$li_total_deb+$li_monto; break; case "H": $li_debe="0,00"; $li_haber=$li_monto; $li_haber=$in_class_mis->uf_formatonumerico($li_haber); $li_total_hab=$li_total_hab+$li_monto; break; } print ""; print ""; print ""; print ""; print ""; } $li_total_deb=$in_class_mis->uf_formatonumerico($li_total_deb); $li_total_hab=$in_class_mis->uf_formatonumerico($li_total_hab); print " "; print " "; print " "; print " "; print " "; print "

Detalle Contable
Cuenta	Debe	Haber
".$ls_cuenta."	".$li_debe."	".$li_haber."
Total	".$li_total_deb."	".$li_total_hab."

"; } $io_sql2->free_result($rs_data2); print "

"; } } $io_sql->free_result($rs_data); } //---------------------------------------------------------------------------------------------------------------------------- ?> Detalle Comprobante