function uf_valida_cuenta($as_cuenta ) { $li_nivel =0; $lb_valido=true; $ls_pad_cuenta="";$ls_denominacion="";$ls_status="";$ls_NextCuenta="";$ls_mensaje_error=""; $int_scg=new class_sigesp_int_scg(); $msg=new class_mensajes(); $dat=$_SESSION["la_empresa"]; $ls_formplan=$dat["formplan"]; $is_codemp=$dat["CodEmp"]; $ls_pad_cuenta = $int_scg->uf_pad_cuenta_plan($ls_formplan ,$as_cuenta); if(!$int_scg->uf_select_plan_unico_cuenta($ls_pad_cuenta,$ls_denominacion)) { $msg->message("La cuenta no existe en el Plan Unico de Cuentas."); return false; } /*if($int_scg->uf_scg_select_cuenta($is_codemp,$as_cuenta,$ls_status,$ls_denominacion)) { $msg->message("La cuenta ya existe en el Plan de Cuentas."); return false; }*/ // verifico si el nivel es el apropiado //$msg->message($as_cuenta); $int_scg->uf_init_niveles(); $li_nivel = $int_scg->uf_scg_obtener_nivel($as_cuenta); if($li_nivel<=1) { $msg->message("Las cuentas de nivel 1 no son validas."); return false; } // verifico si no hay cuentas con movimientos de nivel superior if($li_nivel > 1) { $ls_NextCuenta = $int_scg->uf_scg_next_cuenta_nivel($as_cuenta); do { if($int_scg->uf_scg_select_cuenta($is_codemp,$ls_NextCuenta,$ls_status,$ls_denominacion)) { if ($ls_status == "C") { $msg_message("Existen cuentas de nivel superior con Movimiento."); return false; } } $ls_NextCuenta = $int_scg->uf_scg_next_cuenta_nivel($ls_NextCuenta); $li_nivel=$int_scg->uf_scg_obtener_nivel($ls_NextCuenta); }while( $li_nivel > 1); } return $lb_valido; }//uf_valida_cuenta
$io_plauni = new sigesp_scg_class_definicion(); $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); } }