Detalle Comprobante

"; print "close();"; print "opener.document.form1.submit();"; print ""; } //---------------------------------------------------------------------------------------------------------------------------- function uf_imprimirresultados($as_mes,$as_ano,$as_disponibilidad) { //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_imprimirresultados // Access: private // Arguments: as_mes // Mes de la Depreciación // as_ano // Año de la Depreciación // 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; 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(); require_once("../shared/class_folder/class_fecha.php"); $io_fecha=new class_fecha(); uf_buscarconfiguracion($ls_depreciacion); $ls_codemp=$_SESSION["la_empresa"]["codemp"]; require_once("../shared/class_folder/class_sigesp_int.php"); require_once("../shared/class_folder/class_sigesp_int_int.php"); require_once("../shared/class_folder/class_sigesp_int_scg.php"); require_once("../shared/class_folder/class_sigesp_int_spg.php"); $io_int_spg=new class_sigesp_int_spg(); $ls_sql="SELECT SUM(mondepmen) AS monto ". " FROM saf_depreciacion ". " WHERE codemp='".$ls_codemp."' ". " AND SUBSTR(CAST(fecdep AS CHAR(10)),1,4) = '".$as_ano."' ". " AND SUBSTR(CAST(fecdep AS CHAR(10)),6,2) = '".$as_mes."' ". " GROUP BY SUBSTR(CAST(fecdep AS CHAR(10)),1,4), SUBSTR(CAST(fecdep AS CHAR(10)),6,2) "; $rs_data=$io_sql->select($ls_sql); if($rs_data===false) { $io_mensajes->message("ERROR->".$io_funciones->uf_convertirmsg($io_sql->message)); } else { $ld_fecha='01/'.$as_mes.'/'.$as_ano; $_SESSION["fechacomprobante"]=$ld_fecha; while(!$rs_data->EOF) { $ls_comprobante=str_pad($as_mes.$as_ano,15,"0",0); $ls_descripcion="DEPRECIACIÓN DE LOS ACTIVOS FIJOS CORRESPONDIENTES AL AÑO ".$as_ano." MES DE ".strtoupper($io_fecha->uf_load_nombre_mes($as_mes)); $li_monto=number_format($rs_data->fields["monto"],2,",","."); 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."
Descripción	".$ls_descripcion."
Monto Total	".$li_monto."
Contabilización	COMPROMETE, CAUSA Y PAGA

"; if($ls_depreciacion!="C") { $ls_sql="SELECT SUM(saf_depreciacion.mondepmen) AS monto, saf_activo.codestpro1, saf_activo.codestpro2, ". " saf_activo.codestpro3, saf_activo.codestpro4, saf_activo.codestpro5, saf_activo.estcla, saf_activo.spg_cuenta_dep ". " FROM saf_depreciacion, saf_activo ". " WHERE saf_depreciacion.codemp='".$ls_codemp."' ". " AND SUBSTR(CAST(saf_depreciacion.fecdep AS CHAR(10)),1,4) = '".$as_ano."' ". " AND SUBSTR(CAST(saf_depreciacion.fecdep AS CHAR(10)),6,2) = '".$as_mes."' ". " AND saf_depreciacion.codemp = saf_activo.codemp ". " AND saf_depreciacion.codact = saf_activo.codact ". " GROUP BY saf_activo.codestpro1, saf_activo.codestpro2, saf_activo.codestpro3, saf_activo.codestpro4, ". " saf_activo.codestpro5, saf_activo.estcla, saf_activo.spg_cuenta_dep "; $rs_data2=$io_sql2->select($ls_sql); if($rs_data2===false) { $io_mensajes->message("ERROR->".$io_funciones->uf_convertirmsg($io_sql2->message)); } else { $ls_titulo=""; $li_len1=0; $li_len2=0; $li_len3=0; $li_len4=0; $li_len5=0; $in_class_mis->uf_loadmodalidad($li_len1,$li_len2,$li_len3,$li_len4,$li_len5,$ls_titulo); print ""; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; print " "; $li_total=0; while(!$rs_data2->EOF) { $ls_cuenta=$rs_data2->fields["spg_cuenta_dep"]; $li_total=$li_total+$rs_data2->fields["monto"]; $li_monto=$in_class_mis->uf_formatonumerico($rs_data2->fields["monto"]); $ls_codestpro=$rs_data2->fields["codestpro1"].$rs_data2->fields["codestpro2"].$rs_data2->fields["codestpro3"].$rs_data2->fields["codestpro4"].$rs_data2->fields["codestpro5"]; $ls_estcla=$rs_data2->fields["estcla"]; $ls_programatica=""; $ls_estatus=""; $ls_imagen='blank.gif'; $ls_imagen='ok.png'; $li_disponibilidad=0; uf_disponibilidad($ls_codemp,$rs_data2,$io_int_spg,$ls_imagen,$li_disponibilidad); $li_disponibilidad=$in_class_mis->uf_formatonumerico($li_disponibilidad); $in_class_mis->uf_formatoprogramatica($ls_codestpro,$ls_programatica); switch($ls_estcla) { case "A": $ls_estatus="Acción"; break; case "P": $ls_estatus="Proyecto"; break; } print ""; print ""; print ""; print ""; print ""; print ""; print ""; $rs_data2->MoveNext(); } $li_total=$in_class_mis->uf_formatonumerico($li_total); print " "; print " "; print " "; print " "; print "

Detalle Presupuestario
".$ls_titulo."	Estatus	Cuenta	Monto	Disponibilidad
".$ls_programatica."	".$ls_estatus."	".$ls_cuenta."	".$li_monto."
Total			".$li_total."

"; $io_sql2->free_result($rs_data2); } $ls_sql="SELECT SUM(saf_depreciacion.mondepmen) AS monto, 'D' AS operacion, spg_cuentas.sc_cuenta ". " FROM saf_depreciacion,saf_activo, spg_cuentas ". " WHERE saf_depreciacion.codemp='".$ls_codemp."' ". " AND SUBSTR(CAST(saf_depreciacion.fecdep AS CHAR(10)),1,4) = '".$as_ano."' ". " AND SUBSTR(CAST(saf_depreciacion.fecdep AS CHAR(10)),6,2) = '".$as_mes."' ". " AND saf_depreciacion.codemp = saf_activo.codemp ". " AND saf_depreciacion.codact = saf_activo.codact ". " AND saf_activo.codemp = spg_cuentas.codemp ". " AND saf_activo.codestpro1 = spg_cuentas.codestpro1 ". " AND saf_activo.codestpro2 = spg_cuentas.codestpro2 ". " AND saf_activo.codestpro3 = spg_cuentas.codestpro3 ". " AND saf_activo.codestpro4 = spg_cuentas.codestpro4 ". " AND saf_activo.codestpro5 = spg_cuentas.codestpro5 ". " AND saf_activo.spg_cuenta_dep = spg_cuentas.spg_cuenta ". " GROUP BY spg_cuentas.sc_cuenta ". " UNION ". "SELECT SUM(saf_depreciacion.mondepmen) AS monto, 'H' AS operacion, saf_activo.sc_cuenta ". " FROM saf_depreciacion,saf_activo, spg_ep1 ". " WHERE saf_depreciacion.codemp='".$ls_codemp."' ". " AND SUBSTR(CAST(saf_depreciacion.fecdep AS CHAR(10)),1,4) = '".$as_ano."' ". " AND SUBSTR(CAST(saf_depreciacion.fecdep AS CHAR(10)),6,2) = '".$as_mes."' ". " AND spg_ep1.estint=0". " AND saf_depreciacion.codemp = saf_activo.codemp ". " AND saf_depreciacion.codact = saf_activo.codact ". " AND saf_activo.codemp=spg_ep1.codemp". " AND saf_activo.codestpro1=spg_ep1.codestpro1". " AND saf_activo.estcla=spg_ep1.estcla". " GROUP BY saf_activo.sc_cuenta". " UNION ". "SELECT SUM(saf_depreciacion.mondepmen) AS monto, 'H' AS operacion, trim(spg_ep1.sc_cuenta) as sc_cuenta ". " FROM saf_depreciacion,saf_activo, spg_ep1 ". " WHERE saf_depreciacion.codemp='".$ls_codemp."' ". " AND SUBSTR(CAST(saf_depreciacion.fecdep AS CHAR(10)),1,4) = '".$as_ano."' ". " AND SUBSTR(CAST(saf_depreciacion.fecdep AS CHAR(10)),6,2) = '".$as_mes."' ". " AND spg_ep1.estint=1". " AND saf_depreciacion.codemp = saf_activo.codemp ". " AND saf_depreciacion.codact = saf_activo.codact ". " AND saf_activo.codemp=spg_ep1.codemp". " AND saf_activo.codestpro1=spg_ep1.codestpro1". " AND saf_activo.estcla=spg_ep1.estcla". " GROUP BY spg_ep1.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 { $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["operacion"]; 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."

"; $io_sql2->free_result($rs_data2); } } else { $ls_sql="SELECT SUM(saf_depreciacion.mondepmen) AS monto, 'D' AS operacion, saf_activo.spg_cuenta_dep AS sc_cuenta ". " FROM saf_depreciacion,saf_activo, spg_ep1 ". " WHERE saf_depreciacion.codemp='".$ls_codemp."' ". " AND SUBSTR(CAST(saf_depreciacion.fecdep AS CHAR(10)),1,4) = '".$as_ano."' ". " AND SUBSTR(CAST(saf_depreciacion.fecdep AS CHAR(10)),6,2) = '".$as_mes."' ". " AND spg_ep1.estint=0". " AND saf_depreciacion.codemp = saf_activo.codemp ". " AND saf_depreciacion.codact = saf_activo.codact ". " AND saf_activo.codemp=spg_ep1.codemp". " AND saf_activo.codestpro1=spg_ep1.codestpro1". " AND saf_activo.estcla=spg_ep1.estcla". " GROUP BY saf_activo.spg_cuenta_dep". " UNION ". "SELECT SUM(saf_depreciacion.mondepmen) AS monto, 'H' AS operacion, saf_activo.sc_cuenta ". " FROM saf_depreciacion,saf_activo, spg_ep1 ". " WHERE saf_depreciacion.codemp='".$ls_codemp."' ". " AND SUBSTR(CAST(saf_depreciacion.fecdep AS CHAR(10)),1,4) = '".$as_ano."' ". " AND SUBSTR(CAST(saf_depreciacion.fecdep AS CHAR(10)),6,2) = '".$as_mes."' ". " AND spg_ep1.estint=0". " AND saf_depreciacion.codemp = saf_activo.codemp ". " AND saf_depreciacion.codact = saf_activo.codact ". " AND saf_activo.codemp=spg_ep1.codemp". " AND saf_activo.codestpro1=spg_ep1.codestpro1". " AND saf_activo.estcla=spg_ep1.estcla". " GROUP BY saf_activo.sc_cuenta". " UNION ". "SELECT SUM(saf_depreciacion.mondepmen) AS monto, 'H' AS operacion, trim(spg_ep1.sc_cuenta) as sc_cuenta ". " FROM saf_depreciacion,saf_activo, spg_ep1 ". " WHERE saf_depreciacion.codemp='".$ls_codemp."' ". " AND SUBSTR(CAST(saf_depreciacion.fecdep AS CHAR(10)),1,4) = '".$as_ano."' ". " AND SUBSTR(CAST(saf_depreciacion.fecdep AS CHAR(10)),6,2) = '".$as_mes."' ". " AND spg_ep1.estint=1". " AND saf_depreciacion.codemp = saf_activo.codemp ". " AND saf_depreciacion.codact = saf_activo.codact ". " AND saf_activo.codemp=spg_ep1.codemp". " AND saf_activo.codestpro1=spg_ep1.codestpro1". " AND saf_activo.estcla=spg_ep1.estcla". " GROUP BY spg_ep1.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 { $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["operacion"]; 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."

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

"; $rs_data->MoveNext(); } $io_sql->free_result($rs_data); } } //---------------------------------------------------------------------------------------------------------------------------- //---------------------------------------------------------------------------------------------------------------------------- function uf_buscarconfiguracion(&$as_depreciacion) { //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_buscarconfiguracion // Access: private // Arguments: as_depreciacion // Indica la configuracion de la depreciacion // Description: Función que Busca como esta configurada la depreciacion de los activos. // Creado Por: Ing. Yesenia Moreno // Fecha Creación: 31/10/2006 Fecha Última Modificación : //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $as_depreciacion="P"; 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_funciones.php"); $io_funciones=new class_funciones(); require_once("../shared/class_folder/class_fecha.php"); $io_fecha=new class_fecha(); $ls_codemp=$_SESSION["la_empresa"]["codemp"]; $ls_sql="SELECT value FROM sigesp_config". " WHERE codemp='".$ls_codemp."'". " AND codsis='SAF'". " AND seccion='DEPRECIACION'"; $rs_data=$io_sql->select($ls_sql); if($rs_data===false) { $io_mensajes->message("ERROR->".$io_funciones->uf_convertirmsg($io_sql->message)); } else { if($row=$io_sql->fetch_row($rs_data)) { $as_depreciacion=$row["value"]; } } } //---------------------------------------------------------------------------------------------------------------------------- //----------------------------------------------------------------------------------------------------------------------------------- function uf_disponibilidad($ls_codemp,$rs_data2,$io_int_spg,&$ls_imagen,$li_disponibilidad) { ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // Function: uf_disponibilidad // Access: public // Argument: uf_disponibilidad // data // Description: busca la disponibilidad presupuiestaria // Returns: mensaje // Creado Por: Ing. Yesenia Moreno // Modificado Por: Ing. Yesenia Moreno Fecha Última Modificación : ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// $ls_cuenta=$rs_data2->fields["spg_cuenta_dep"]; $ls_estprog[0]=$rs_data2->fields["codestpro1"]; $ls_estprog[1]=$rs_data2->fields["codestpro2"]; $ls_estprog[2]=$rs_data2->fields["codestpro3"]; $ls_estprog[3]=$rs_data2->fields["codestpro4"]; $ls_estprog[4]=$rs_data2->fields["codestpro5"]; $ls_estprog[5]=$rs_data2->fields["estcla"]; $la_empresa=$_SESSION["la_empresa"]; $ls_vali_nivel=$la_empresa["vali_nivel"]; if($ls_vali_nivel==5) { $ls_formpre=str_replace("-","",$la_empresa["formpre"]); $ls_vali_nivel=$io_int_spg->uf_spg_obtener_nivel($ls_formpre); } if($_SESSION["la_empresa"]["estvaldis"]==0) { $ls_vali_nivel=0; } $lb_valido=true; $li_nivel=$io_int_spg->uf_spg_obtener_nivel($ls_cuenta); if ($li_nivel <= $ls_vali_nivel) { $ls_status=""; $li_asignado=0; $li_aumento=0; $li_disminucion=0; $li_precomprometido=0; $li_comprometido=0; $li_causado=0; $li_pagado=0; $io_int_spg->uf_spg_saldo_select($ls_codemp,$ls_estprog,$ls_cuenta,$ls_status,$li_asignado,$li_aumento,$li_disminucion, $li_precomprometido,$li_comprometido,$li_causado,$li_pagado,'ACTUAL'); $li_disponibilidad=(($li_asignado + $li_aumento) - ( $li_disminucion + $li_comprometido + $li_precomprometido)); if(round($rs_data2->fields["monto"],2) >= round($li_disponibilidad,2)) { $ls_imagen='failed.png'; $lb_valido=false; } if($lb_valido) { $ls_status=""; $li_asignado=0; $li_aumento=0; $li_disminucion=0; $li_precomprometido=0; $li_comprometido=0; $li_causado=0; $li_pagado=0; $io_int_spg->uf_spg_saldo_select($ls_codemp,$ls_estprog,$ls_cuenta,$ls_status,$li_asignado,$li_aumento,$li_disminucion, $li_precomprometido,$li_comprometido,$li_causado,$li_pagado,'COMPROBANTE'); $li_disponibilidad=(($li_asignado + $li_aumento) - ( $li_disminucion + $li_comprometido + $li_precomprometido)); if(round($rs_data2->fields["monto"],2) >= round($li_disponibilidad,2)) { $ls_imagen='failed.png'; $lb_valido=false; } } } return true; } // end function uf_show_error_disponible //----------------------------------------------------------------------------------------------------------------------------------- ?> Detalle Comprobante