Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- CREATE OR REPLACE TYPE REG_TESTE AS object
- (
- EMP_ID NUMBER,
- EMP_NOME VARCHAR2(100)
- )
- CREATE OR REPLACE TYPE TAB_REG_TESTE IS TABLE OF REG_TESTE;
- CREATE OR REPLACE FUNCTION Busca_REG_TESTE RETURN TAB_REG_TESTE
- PIPELINED IS
- V_out_rec REG_TESTE;
- BEGIN
- V_out_rec := REG_TESTE(NULL,NULL);
- FOR c IN (
- SELECT * FROM EMPRESA
- )
- LOOP
- V_out_rec.EMP_ID := C.EMP_ID;
- V_out_rec.EMP_NOME := C.EMP_NOME;
- PIPE ROW(V_out_rec);
- END LOOP;
- RETURN;
- END Busca_REG_TESTE;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement