Plsql

PLSQL

Tabela Filme

Nome Nulo? Tipo ----------------------------------------- -------- -------------- COD_FILME NOT NULL NUMBER(3) TITULO NOT NULL VARCHAR2(25) ANO NOT NULL NUMBER(4) COD_CATEGORIA NOT NULL NUMBER(2) COD_REALIZADOR NOT NULL NUMBER(3)

Tabela Categoria

Nome Nulo? Tipo ----------------------------------------- -------- -------------- COD_CATEGORIA NOT NULL NUMBER(2) DESIGN_CATEGORIA NOT NULL VARCHAR2(25)

Tabela Realizador

Nome Nulo? Tipo ----------------------------------------- -------- -------------- COD_REALIZADOR NOT NULL NUMBER(3) NOME NOT NULL VARCHAR2(30)

1. Criar um procedimento de nome Proc_Filmes, que executa as seguintes acções: Através da criação de um cursor utilizando somente as secções BEGIN e END, listar no ecrã a totalidade dos registos da tabela de filmes (FILME), ordenados por ano (ANO), com o seguinte formato: (COD_FILME)-(TITULO))-(ANO)-(DESIGN_CATEGORIA)-(NOME). No fim da listagem deverá aparecer a mensagem ‘Fim do Cursor’.

CREATE OR REPLACE PROCEDURE PROC_FILMES IS BEGIN FOR VAR IN (SELECT COD_FILME, TITULO,ANO,NOME,DESIGN_CATEGORIA FROM FILME,REALIZADOR,CATEGORIA WHERE FILME.COD_CATEGORIA=CATEGORIA.COD_CATEGORIA AND REALIZADOR.COD_REALIZADOR = FILME.COD_REALIZADOR ORDER BY ANO) LOOP