Detalle Comprobante

"; print "close();"; print "opener.document.form1.submit();"; print ""; } //---------------------------------------------------------------------------------------------------------------------------- function uf_imprimirresultados($as_comprobante,$as_procede,$as_fecha,$as_codban,$as_ctaban) { //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_imprimirresultados // Access: private // Arguments: as_comprobante // Número de Documento // as_procede // Procede // as_fecha // Fecha // as_codban // Código de Banco // as_ctaban // Cuenta de Banco // Description: Función que Imprime los detalles del comprobante // Creado Por: Ing. Luis Anibal Lang // Fecha Creación: Fecha Última Modificación : //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// global $in_class_mis; 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 codban, MAX(descripcion) as descripcion, ". " (SELECT nomban FROM scb_banco ". " WHERE codemp = '".$ls_codemp."' ". " AND codban = '".$as_codban."' ) as nomban ". " FROM mis_sigesp_banco ". " WHERE codemp='".$ls_codemp."' ". " AND comprobante='".$as_comprobante."' ". " AND procede='".$as_procede."' ". " AND fecdep='".$as_fecha."' ". " AND codban='".$as_codban."' ". " AND ctaban='".$as_ctaban."' ". " GROUP BY comprobante, procede, fecdep, codban, ctaban "; $rs_data=$io_sql->select($ls_sql); if($rs_data===false) { $io_mensajes->message("ERROR->".$io_funciones->uf_convertirmsg($io_sql->message)); } else { if(!$rs_data->EOF) { $ls_codban=$rs_data->fields["codban"]; $ls_nomban=$rs_data->fields["nomban"]; $ls_descripcion=$rs_data->fields["descripcion"]; $ls_codope="DEPÓSITO"; 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	".$as_comprobante."
Descripción	".$ls_descripcion."
Operación	".$ls_codope."
Banco	".$ls_codban." - ".$ls_nomban."

"; $ls_sql="SELECT sc_cuenta, monto ". " FROM mis_sigesp_banco ". " WHERE codemp='".$ls_codemp."' ". " AND comprobante='".$as_comprobante."' ". " AND procede='".$as_procede."' ". " AND fecdep='".$as_fecha."' ". " AND codban='".$as_codban."' ". " AND ctaban='".$as_ctaban."' ". " AND modulo='SPI' ". " ORDER BY sc_cuenta "; $rs_data2=$io_sql2->select($ls_sql); if($rs_data2===false) { $io_mensajes->message("ERROR->".$io_funciones->uf_convertirmsg($io_sql2->message)); } else { print ""; print " "; print " "; print " "; print " "; print " "; print " "; print " "; $li_total=0; while(!$rs_data2->EOF) { $ls_cuenta=$rs_data2->fields["sc_cuenta"]; $li_total=$li_total+$rs_data2->fields["monto"]; $li_monto=$in_class_mis->uf_formatonumerico($rs_data2->fields["monto"]); print ""; print ""; print ""; print ""; $rs_data2->MoveNext(); } $li_total=$in_class_mis->uf_formatonumerico($li_total); print " "; print " "; print " "; print " "; print "

Detalle Presupuestario Ingreso
Cuenta	Monto
".$ls_cuenta."	".$li_monto."
Total	".$li_total."

"; } $ls_sql="SELECT sc_cuenta, debhab, monto ". " FROM mis_sigesp_banco ". " WHERE codemp='".$ls_codemp."' ". " AND comprobante='".$as_comprobante."' ". " AND procede='".$as_procede."' ". " AND fecdep='".$as_fecha."' ". " AND codban='".$as_codban."' ". " AND ctaban='".$as_ctaban."' ". " AND modulo='SCB' ". " 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(!$rs_data2->EOF) { $ls_cuenta=$rs_data2->fields["sc_cuenta"]; $li_monto=$rs_data2->fields["monto"]; $ls_debhab=$rs_data2->fields["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 ""; $rs_data2->MoveNext(); } $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."

"; } print "

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