Tema cerrado, por favor lee las normas, antes de animarte a postear, saludos.
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes Menúcreate or replace PROCEDURE ordenarFicha
IS
-- Declaracion de variables locales
CURSOR cur_ficha IS SELECT * FROM ficha;
reg_ficha ficha%ROWTYPE;
var_anio_actual NUMBER(4);
var_anio_ficha NUMBER(4);
var_diferencia_anio NUMBER(4);
BEGIN
-- Sentencias
var_anio_actual := EXTRACT(YEAR FROM SYSDATE);
OPEN cur_ficha;
LOOP
FETCH cur_ficha INTO reg_ficha;
EXIT WHEN cur_ficha%NOTFOUND;
var_anio_ficha := EXTRACT(YEAR FROM reg_ficha.fecha);
var_diferencia_anio := (var_anio_actual - var_anio_ficha);
IF var_diferencia_anio > 5 THEN
execute immediate 'CREATE TABLE FICHA_' || TO_CHAR(var_anio_ficha) || '(ID_FICHA int primary key, NOMBRE VARCHAR2(60 BYTE), APELLID VARCHAR2(60 BYTE), FECHA DATE)';
END IF;
DBMS_OUTPUT.PUT_LINE(reg_ficha.nombre);
END LOOP;
CLOSE cur_ficha;
EXCEPTION
WHEN OTHERS THEN
IF SQLCODE = -955 THEN
NULL; -- suprime la excepción ORA-00955
ELSE
RAISE;
END IF;
END ordenarFicha;
Cita de: jona010 en 25 Noviembre 2015, 15:03 PM
Mil disculpa pero no es que soy ciego pero palabras como por ejemplo "totorales" no entiendo!!! Voy a esperar un año así tengo la antigüedad necesaria para hacer una pregunta. Gracias si?
PD: al foro lo visito desde hace 2 meses ya. Pero para entrar a la comunidad y hacer preguntas hay que estar registrado¡Los errores se comenten una sola ves!
CitarOjala me puedan orientar así puedo llegar a mi meta. Ollydbg se sus funciones
Citarcategoria1, categoria2, categoria3
Citarteconologia, computadores, notebook
tecnologia, computadores, notebook
tecnologia, computadores, ordenador
electrohogar, refrigeracion, freezer
Citartecnologia -> computadores -> notebook
-> ordenador
electrohogar -> refrigeracion -> freezer