Dúvida em código

[rogerio morandi]

Saudações, estou estudando pl/sql ai apareceu este código, mas não entendi nada, tem um monte de instruções novas, alguém pode me ajudar a entender.

Grato Roger

DECLARE
       e EXCEPTION;
      PRAGMA EXCEPTION_INIT(e,-20001);
    BEGIN
      RAISE_APPLICATION_ERROR(-20001,'A less than original message.');
    EXCEPTION
      WHEN e THEN
        dbms_output.put_line(SQLERRM);
    END;

Editado Junho 9, 2010 por kuroi
Adicionar tag CODE

[fulvio]

Tópico movido para o Fórum Script Brasil > Banco de Dados > Demais Bancos.