";
print "location.href='../../sigesp_inicio_sesion.php'";
print "";
}
$ls_logusr=$_SESSION["la_logusr"];
require_once("../class_folder/class_funciones_cfg.php");
$io_fun_cfg=new class_funciones_cfg();
$io_fun_cfg->uf_load_seguridad("CFG","sigesp_scg_d_plan_unico.php",$ls_permisos,$la_seguridad,$la_permisos,"../../");
?>
Plan de Cuentas Patrimoniales
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);
}
$ls_format_scg = $arre["formcont"];
$ls_format_scg = str_replace("-","",$ls_format_scg);
$li_size_form = strlen(trim($ls_format_scg));
$ls_formplan = $arre["formplan"];
$disabled = "";
////////////////////////////////////////////// SEGURIDAD /////////////////////////////////////////////
$ls_format = $_SESSION["la_empresa"]["formplan"];
$ls_format = str_replace("-","",$ls_format);
$li_size_form = strlen(trim($ls_format));
if (array_key_exists("operacion",$_POST))
{
$ls_operacion = $_POST["operacion"];
$ls_status = $_POST["status"];
$ls_cuenta = $_POST["txtcuenta"];
$ls_dencta = $_POST["txtdenominacion"];
}
else
{
$ls_operacion = $ls_cuenta = $ls_dencta = "";
}
if ($ls_operacion=="GUARDAR")
{
$lb_valido = $int_scg->uf_insert_plan_unico_cuenta($ls_cuenta,$ls_dencta,$ls_status);
if ($lb_valido)
{
$lb_existe = $int_scg->uf_select_plan_unico_cuenta($ls_cuenta,$ls_dencta);
if ($lb_existe)
{
$io_msg->message("Registro Actualizado !!!");
$ls_evento="UPDATE";
$ls_descripcion="Actualizo la cuenta de plan unico $ls_cuenta, con denominacion $ls_dencta";
}
else
{
$io_msg->message("Registro Incluido !!!");
$ls_evento="INSERT";
$ls_descripcion="Inserto la cuenta de plan unico $ls_cuenta, con denominacion $ls_dencta";
}
$io_seguridad->uf_sss_insert_eventos_ventana($ls_empresa,$ls_sistema,$ls_evento,$ls_logusr,$ls_ventanas,$ls_descripcion);
$ls_cuenta = $ls_dencta = "";
}
else
{
$io_msg->message("".$int_scg->is_msg_error);
}
}
if ($ls_operacion=="ELIMINAR")
{
$lb_tiene = $io_plauni->uf_load_relacion($ls_cuenta);
if (!$lb_tiene)
{
$lb_valido = $io_plauni->uf_delete_planunico($ls_cuenta,$ls_dencta);
if ($lb_valido)
{
$io_msg->message("Registro Eliminado !!!");
$ls_descripcion="Elimino la cuenta de plan unico $ls_cuenta, con denominacion $ls_dencta";
$io_seguridad->uf_sss_insert_eventos_ventana($ls_empresa,$ls_sistema,"DELETE",$ls_logusr,$ls_ventanas,$ls_descripcion);
}
else
{
$io_msg->message("No se encontro el registro !!!");
}
$ls_cuenta="";
$ls_dencta="";
}
else
{
$io_msg->message("Error en Eliminación, Existen Registro asociados a esta Cuenta en el Plan de Cuentas Contable !!!");
}
}
if ($ls_operacion=="NUEVO")
{
$ls_cuenta="";
$ls_dencta="";
$ls_status='N';
}
?>