DECLARE
C1 VARCHAR2(20) := NULL;
C2 VARCHAR2(20) := '13240';
BEGIN
IF C1 <> C2 THEN
DBMS_OUTPUT.PUT_LINE('é diferente');
ELSE
DBMS_OUTPUT.PUT_LINE('é igual');
END IF;
END;
Resultado: é igual
|
DECLARE
C1 VARCHAR2(20) := NULL;
C2 VARCHAR2(20) := '13240';
BEGIN
IF C1 = C2 THEN
DBMS_OUTPUT.PUT_LINE('é diferente');
ELSE
DBMS_OUTPUT.PUT_LINE('é igual');
END IF;
END;
Resultado: é igual
|
DECLARE
C1 VARCHAR2(20) := NULL;
C2 VARCHAR2(20) := '13240';
BEGIN
IF nvl(C1,'*') <> C2 THEN
DBMS_OUTPUT.PUT_LINE('é diferente');
ELSE
DBMS_OUTPUT.PUT_LINE('é igual');
END IF;
END;
Restulado: é diferente
|
UNDO_MANAGEMENT e UNDO_RETENTION.SELECT para obter informações sobre como recuperar dados passados de uma tabelaFLASHBACK TABLE declaraçãoemployees_demo , com movimento de linha ativado, atualizar valores dentro da nova tabela, e emitir o FLASHBACK TABLE comunicado.employees_demo , com movimento de linha habilitada, a partir de tabela employees da amostra hr esquema:Como referência, listar os salários inferiores a 2500:CREATE TABLE employees_demo ENABLE ROW MOVEMENT AS SELECT * FROM employees;
SELECT salary FROM employees_demo WHERE salary < 2500;SALARY ---------- 2400 2200 2100 2400 2200
| Nota: Para dar tempo para o SCN para propagar a tabela de mapeamento usado pelo FLASHBACK TABLE declaração, espere um mínimo de 5 minutos antes de emitir a seguinte declaração. Esta espera não seria necessária se uma tabela previamente existentes foram usados neste exemplo. |
Como referência segunda, listar os salários que permanecem menos de 2500 na sequência do aumento de 10%:UPDATE employees_demo SET salary = salary * 1.1 WHERE salary < 2500; 5 rows updated. COMMIT;
Restaurar a tabelaSELECT salary FROM employees_demo WHERE salary < 2500;SALÁRIO ---------- 2420 2310 2420
employees_demo ao seu estado de um minuto antes da hora do sistema atual:Listar esses salários inferiores a 2500. Após oFLASHBACK TABLE employees_demo TO TIMESTAMP (SYSTIMESTAMP - INTERVAL '1' minute);
FLASHBACK TABLE comunicado emitido, esta lista deve coincidir com a lista na primeira referência.SELECT salary FROM employees_demo WHERE salary < 2500;SALÁRIO ---------- 2400 2200 2100 2400 2200
hr.employees tabela e deseja recuperá-lo, emitir a seguinte declaração:Se outraFLASHBACK TABLE employees TO BEFORE DROP;
employees tabela foi criada na hr esquema, use a RENAME TO cláusula para renomear a tabela acessado:Se você sabe que a tabela de funcionários foi derrubado várias vezes, e você deseja recuperar a versão mais antiga, consultar oFLASHBACK TABLE employees TO BEFORE DROP RENAME TO employees_old;
USER_RECYLEBIN tabela para determinar o nome gerado pelo sistema e, em seguida, usar esse nome no FLASHBACK TABLE comunicado. (Sistema de nomes gerados em seu banco de dados diferentes daqueles mostrados aqui.)SELECT object_name, droptime FROM user_recyclebin WHERE original_name = 'employees';DROPTIME OBJECT_NAME ------------------------------------------------- RB $ 45703 $ $ TABELA $ 0 2003-06-03:15:26:39 RB 45704 $ $ $ $ 0 TABELA 2003-06-12:12:27:27 RB 45705 $ $ $ $ 0 TABELA 2003-07-08:09:28:01
|
|
CREATE OR replace PROCEDURE Create_new_user(p_username VARCHAR2)
IS BEGIN EXECUTE IMMEDIATE 'CREATE USER '|| p_username|| ' identified BY atos DEFAULT tablespace USERS temporary tablespace TEMP profile DEFAULT' ; -- EXECUTE IMMEDIATE 'grant/Revoke role privileges EXECUTE IMMEDIATE 'grant CONNECT TO '|| p_username|| ''; EXECUTE IMMEDIATE 'grant RESOURCE TO '|| p_username|| ''; -- EXECUTE IMMEDIATE 'grant/Revoke system privileges EXECUTE IMMEDIATE 'grant CREATE PROCEDURE TO '|| p_username|| ''; EXECUTE IMMEDIATE 'grant CREATE sequence TO '|| p_username|| ''; EXECUTE IMMEDIATE 'grant CREATE synonym TO '|| p_username|| ''; EXECUTE IMMEDIATE 'grant CREATE TABLE TO '|| p_username|| ''; EXECUTE IMMEDIATE 'grant CREATE TRIGGER TO '|| p_username|| ''; EXECUTE IMMEDIATE 'grant CREATE view TO '|| p_username|| ''; EXECUTE IMMEDIATE 'grant unlimited tablespace TO '|| p_username|| ''; END create_new_user; |
CREATE OR REPLACE PROCEDURE
SQ_PROC_CURSORES (p_acao char) AS
V_EVENTO_MESTRE CHAR(1) := 'N';
v_ano
VARCHAR2(4);
CURSOR
creby IS (SELECT
CD_EVENTO, CD_MESTRE
FROM
BIG_OUTAGE
WHERE
EXTRACT(YEAR FROM
DT_PROCESSAMENTO) = v_ano
AND
EXTRACT(MONTH FROM
DT_PROCESSAMENTO) IN (10, 11));
CURSOR
krebe IS (SELECT
CD_EVENTO, CD_MESTRE
FROM
BIG_OUTAGE
WHERE
EXTRACT(YEAR FROM
DT_PROCESSAMENTO) = v_ano
AND
EXTRACT(MONTH FROM
DT_PROCESSAMENTO) IN (10, 11));
reg_krebe krebe%ROWTYPE;
forca_erro EXCEPTION;
-- Criado para fazer a
mudança de linha ----
crlf varchar2(2) := chr(13) ||
chr(10);
--------------------------------------------
BEGIN
IF
p_acao = '1' THEN
FOR RS IN (SELECT
CD_EVENTO, CD_MESTRE
FROM
BIG_OUTAGE
WHERE /*CD_MESTRE
= V_EVENTO_MESTRE
AND*/
EXTRACT(YEAR FROM
DT_PROCESSAMENTO) = '2012'
AND
EXTRACT(MONTH FROM
DT_PROCESSAMENTO) IN (10, 11)) LOOP
DBMS_OUTPUT.PUT_LINE(RS.CD_EVENTO || ' -
' || RS.CD_MESTRE);
IF
RS.CD_EVENTO IN (2744055, 2744083, 2744061) THEN
UPDATE
SQ_TESTE SET
LOG_ERROS = RS.CD_EVENTO
WHERE
CD_EVENTO = RS.CD_EVENTO;
END IF;
END LOOP;
ELSIF
p_acao = 2 THEN
v_ano := 2012;
FOR
reg_creby IN
creby LOOP
IF
reg_creby.CD_EVENTO IN (2744055, 2744083, 2744061) THEN
UPDATE
SQ_TESTE SET
LOG_ERROS = 'cursor 2'
WHERE
CD_EVENTO =reg_creby.CD_EVENTO;
END IF;
END LOOP;
ELSIF
p_acao =3 THEN
v_ano := 2012;
OPEN
krebe;
LOOP
FETCH
krebe INTO
reg_krebe;
EXIT WHEN
krebe%NOTFOUND;
IF
reg_krebe.CD_EVENTO IN (2744055, 2744083, 2744061) THEN
UPDATE
SQ_TESTE SET
LOG_ERROS = 'cursor 2'
WHERE
CD_EVENTO =reg_krebe.CD_EVENTO;
END IF;
END LOOP;
ELSIF
p_acao = 4 THEN
v_ano := 2012;
OPEN
krebe;
LOOP
FETCH
krebe INTO
reg_krebe;
EXIT WHEN
krebe%NOTFOUND;
IF
reg_krebe.CD_EVENTO = 2744055 THEN
RAISE
forca_erro;
END IF;
END LOOP;
END IF;
EXCEPTION
WHEN
forca_erro THEN
RAISE_application_error (-20004,'Krebynhu
- encontrado o evento ' ||
reg_krebe.CD_EVENTO
|| crlf ||
'------------------------------------------------' ||
crlf ||
'Código do erro: ' || SQLCODE || crlf ||
'Descrição do erro: ' || SQLERRM || crlf ||
'------------------------------------------------' ||
crlf );
END;
|
