";
print "location.href='../../sigesp_inicio_sesion.php'";
print "";
}
$ls_loncodestpro1=$_SESSION["la_empresa"]["loncodestpro1"];
$ls_loncodestpro2=$_SESSION["la_empresa"]["loncodestpro2"];
$ls_loncodestpro3=$_SESSION["la_empresa"]["loncodestpro3"];
$ls_loncodestpro4=$_SESSION["la_empresa"]["loncodestpro4"];
$ls_loncodestpro5=$_SESSION["la_empresa"]["loncodestpro5"];
$ls_longitudtotal=$ls_loncodestpro1+$ls_loncodestpro2+$ls_loncodestpro3+$ls_loncodestpro4+$ls_loncodestpro5+10;
?>
Registro de Otros Créditos
uf_conectar();//Asignacion de valor a la variable $conn a traves del metodo uf_conectar de la clase sigesp_include.
$io_sql = new class_sql($conn);//Instanciando la Clase Class Sql.
$io_otroscreditos = new sigesp_cxp_c_otroscreditos($conn);//Instanciando la Clase Sigesp Definiciones.
$io_msg = new class_mensajes();//Instanciando la Clase Class Mensajes.
$io_dscargos = new class_datastore();//Instanciando la Clase Class DataStore.
$io_funcion = new class_funciones();//Instanciando la Clase Class_Funciones.
$io_funciondb = new class_funciones_db($conn);
$io_formula = new evaluate_formula();
$io_chkrel = new sigesp_c_check_relaciones($conn);
$lb_existe = "";
////////////////////////////////////////////// SEGURIDAD /////////////////////////////////////////////
require_once("../../shared/class_folder/sigesp_c_seguridad.php");
$io_seguridad= new sigesp_c_seguridad();
$arre = $_SESSION["la_empresa"];
$ls_empresa = $arre["codemp"];
$ls_codemp = $ls_empresa;
$li_estmodest = $arre["estmodest"];
$ls_logusr = $_SESSION["la_logusr"];
$ls_sistema = "CFG";
$ls_ventanas = "sigesp_cxp_d_otroscreditos.php";
$la_seguridad["empresa"] = $ls_empresa;
$la_seguridad["logusr"] = $ls_logusr;
$la_seguridad["sistema"] = $ls_sistema;
$la_seguridad["ventanas"] = $ls_ventanas;
if (array_key_exists("permisos",$_POST)||($ls_logusr=="PSEGIS"))
{
if($ls_logusr=="PSEGIS")
{
$ls_permisos="";
$la_accesos=$io_seguridad->uf_sss_load_permisossigesp();
}
else
{
$ls_permisos = $_POST["permisos"];
$la_accesos["leer"] = $_POST["leer"];
$la_accesos["incluir"] = $_POST["incluir"];
$la_accesos["cambiar"] = $_POST["cambiar"];
$la_accesos["eliminar"] = $_POST["eliminar"];
$la_accesos["imprimir"] = $_POST["imprimir"];
$la_accesos["anular"] = $_POST["anular"];
$la_accesos["ejecutar"] = $_POST["ejecutar"];
}
}
else
{
$la_accesos["leer"] = "";
$la_accesos["incluir"] = "";
$la_accesos["cambiar"] = "";
$la_accesos["eliminar"] = "";
$la_accesos["imprimir"] = "";
$la_accesos["anular"] = "";
$la_accesos["ejecutar"] = "";
$ls_permisos = $io_seguridad->uf_sss_load_permisos($ls_empresa,$ls_logusr,$ls_sistema,$ls_ventanas,$la_accesos);
}
////////////////////////////////////////////// SEGURIDAD /////////////////////////////////////////////
$ls_confiva="";
$ls_valido=$io_otroscreditos->uf_select_configuracion_iva($ls_codemp,$ls_confiva);
if (array_key_exists("operacion",$_POST))
{
$ls_tipoiva = $_POST["val_tipoiva"];
$ls_operacion = $_POST["operacion"];
$ls_codigo = $_POST["txtcodigo"];
$lr_datos["codigo"] = $ls_codigo;
$ls_denominacion = $_POST["txtdenominacion"];
$lr_datos["denominacion"] = $ls_denominacion;
$ld_porcentaje = $_POST["txtporcentaje"];
$lr_datos["porcentaje"] = $ld_porcentaje;
$ls_formula = $_POST["txtformula"];
$lr_datos["formula"] = $ls_formula;
$ls_spgcuenta = $_POST["txtpresupuestaria"];
$lr_datos["spg_cuenta"] = $ls_spgcuenta;
$ls_confiva="";
$ls_codestpro="";
$lr_datos["tipo_iva"] = $ls_tipoiva;
$ls_valido=$io_otroscreditos->uf_select_configuracion_iva($ls_codemp,$ls_confiva);
if(($ls_valido)&&($ls_confiva=="C"))
{
$ls_estcla= "";
$ls_codestpro1= "";
$ls_codestpro2= "";
$ls_codestpro3= "";
$ls_codestpro4= "";
$ls_codestpro5= "";
}
else
{
if ($ls_confiva=="P")
{
$ls_estcla= $_POST["txtestcla"];
$ls_codestpro1= $_POST["txtcodestpro1"];
$ls_codestpro2= $_POST["txtcodestpro2"];
$ls_codestpro3= $_POST["txtcodestpro3"];
$ls_codestpro4= $_POST["txtcodestpro4"];
$ls_codestpro5= $_POST["txtcodestpro5"];
}
}
$lr_datos["codestpro"]= $ls_codestpro;
$ls_estatus= $_POST["hidestatus"];
$lr_datos["estcla"]= $ls_estcla;
$lr_datos["codestpro1"]= $ls_codestpro1;
$lr_datos["codestpro2"]= $ls_codestpro2;
$lr_datos["codestpro3"]= $ls_codestpro3;
$lr_datos["codestpro4"]= $ls_codestpro4;
$lr_datos["codestpro5"]= $ls_codestpro5;
}
else
{
$ls_operacion = "NUEVO";
$ls_codigo = "";
$ls_denominacion = "";
$ld_porcentaje = "0.0";
$lr_datos["porcentaje"] = $ld_porcentaje;
$ls_formula = "";
$ls_spgcuenta = "";
$ls_codestpro = "";
$ls_estatus = "NUEVO";
$ls_codestpro1 = "";
$ls_codestpro2 = "";
$ls_codestpro3 = "";
$ls_codestpro4 = "";
$ls_codestpro5 = "";
$scg_cuenta = "";
$spicta = "";
}
$lb_empresa = true;
if (array_key_exists("chklibcompras",$_POST))
{
$li_estlibcompras = $_POST["chklibcompras"];
$lr_datos["estlibcompras"] = $li_estlibcompras;
$ls_estlibcompras = "checked";
}
else
{
$li_estlibcompras = 0;
$lr_datos["estlibcompras"] = $li_estlibcompras;
$ls_estlibcompras = "";
}
if (array_key_exists("chkestfac",$_POST))
{
$estfac = $_POST["chkestfac"];
$lr_datos["estfac"] = $estfac;
$estfac = "checked";
}
else
{
$estfac = 0;
$lr_datos["estfac"] = $estfac;
$estfac = "";
}
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////// Operación Nuevo ////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if ($ls_operacion=="NUEVO")
{
$ls_codigo=$io_funciondb->uf_generar_codigo($lb_empresa,$ls_codemp,'sigesp_cargos','codcar');
if(empty($ls_codigo))
{
$io_msg->message($io_funciondb->is_msg_error);
}
}
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////// Fin Operacion Nuevo ///////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////// Operaciones de Insercion y Actualización //////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if ($ls_operacion=="ue_guardar")
{
$io_otroscreditos->estfac = $_POST["chkestfac"]?1:0;
$io_otroscreditos->scg_cuenta = $_POST["txtscg_cuenta"];
$io_otroscreditos->spicta = $_POST["txtspi_cuenta"];
$lb_existe=$io_otroscreditos->uf_select_otroscreditos($ls_codemp,$ls_codigo);
if ($lb_existe)
{
if ($ls_estatus=="NUEVO")
{
$io_msg->message("El Código del Crédito ya existe !!!");
$lb_valido=false;
}
elseif($ls_estatus=="GRABADO")
{
$lb_valfor = $io_formula->uf_evaluar_formula($ls_formula,10000);
if ($lb_valfor)
{
if (array_key_exists("chklibcompras",$_POST))
{
$li_estlibcompras = $_POST["chklibcompras"];
$lr_datos["estlibcompras"] = $li_estlibcompras;
$ls_estlibcompras = "checked";
}
else
{
$li_estlibcompras = 0;
$lr_datos["estlibcompras"] = $li_estlibcompras;
$ls_estlibcompras = "";
}
$lb_valido = $io_otroscreditos->uf_update_otroscreditos($ls_codemp,$lr_datos,$li_estmodest,$la_seguridad,$ls_estcla);
if ($lb_valido)
{
$io_sql->commit();
$io_msg->message("Registro Actualizado !!!");
$ls_codigo=$io_funciondb->uf_generar_codigo($lb_empresa,$ls_codemp,'sigesp_cargos','codcar');
$ls_denominacion="";
$ld_porcentaje="0.0";
$li_estlibcompras="";
$ls_formula="";
$ls_spgcuenta="";
$ls_codestpro="";
$ls_estatus="NUEVO";
}
else
{
$io_sql->rollback();
$io_msg->message("Error en Actualización !!!");
}
}
else
{
$io_msg->message("Error en Actualización: Fórmula Invalida !!!");
}
}
}
else
{
$lb_valfor = $io_formula->uf_evaluar_formula($ls_formula,10000);
if ($lb_valfor)
{
$lb_valido=$io_otroscreditos->uf_insert_otroscreditos($ls_codemp,$lr_datos,$li_estmodest,$la_seguridad,$ls_estcla);
if ($lb_valido)
{
$io_sql->commit();
$io_msg->message("Registro Incluido !!!");
$ls_codigo = $io_funciondb->uf_generar_codigo($lb_empresa,$ls_codemp,'sigesp_cargos','codcar');
$ls_denominacion = "";
$ld_porcentaje = "0.0";
$li_estlibcompras = "";
$ls_formula = "";
$ls_spgcuenta = "";
$ls_codestpro = "";
$ls_estatus = "NUEVO";
$ls_codestpro1 = "";
$ls_codestpro2 = "";
$ls_codestpro3 = "";
$ls_codestpro4 = "";
$ls_codestpro5 = "";
$scg_cuenta = "";
$spicta = "";
}
else
{
$io_sql->rollback();
$io_msg->message("Error en Inclusión !!!");
}
}
else
{
$io_msg->message("Error en Inclusión: Fórmula Invalida !!!");
}
}
}
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////// Fin de las Operaciones de Inserción y Actualización ////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////////// Operacion de Eliminar ///////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
if ($ls_operacion=="ELIMINAR")
{
$lb_existe=$io_otroscreditos->uf_select_otroscreditos($ls_codemp,$ls_codigo);
if ($lb_existe)
{
$lb_valido=$io_otroscreditos->uf_delete_otroscreditos($ls_codemp,$ls_codigo,$ls_denominacion,$la_seguridad);
if ($lb_valido)
{
$io_sql->commit();
$io_msg->message("Registro Eliminado !!!");
$ls_codigo=$io_funciondb->uf_generar_codigo($lb_empresa,$ls_codemp,'sigesp_cargos','codcar');
$ls_denominacion="";
$ld_porcentaje="0.0";
$li_estlibcompras="";
$ls_formula="";
$ls_spgcuenta="";
$ls_codestpro="";
$ls_estatus="NUEVO";
$ls_codestpro1 = "";
$ls_codestpro2 = "";
$ls_codestpro3 = "";
$ls_codestpro4 = "";
$ls_codestpro5 = "";
$scg_cuenta = "";
$spicta = "";
}
else
{
$io_sql->rollback();
if(!empty($io_otroscreditos->is_msg_error))
{
$io_msg->message($io_otroscreditos->is_msg_error);
}
}
}
else
{
$io_msg->message("Este Registro No Existe !!!");
}
}
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////////////// FIN Operacion de Eliminar ////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
?>