Menu de navegação

[Anônimo]

Pessoal

Preciso de uma ajuda.

Estou fazendo um Procedure com um Cursor Dinamico, pois preciso montar o select conforme os parametros enviados para a Procedure.
Dentro dessa procedure criei um Type do tipo cursor e depois criei uma vari?vel com esse novo Type de Cursor que criei.

Segue proc resumida:

CREATE OR REPLACE PROCEDURE SP_DIRF_RENDIMENTOSPG_IRRFPJ
IS
TYPE TipoCursor IS REF CURSOR RETURN TAB_MOVIMENTO_TRIBUTOS%rowtype;
v_MeuCursor TipoCursor;
v_MeuRecord TAB_MOVIMENTO_TRIBUTOS%rowtype;
BEGIN

OPEN v_MeuCursor FOR SELECT * FROM TAB_MOVIMENTO_TRIBUTOS;
FETCH v_MeuCursor INTO v_MeuRecord;

END;

Gostaria de saber, como que fa?o para retornar o resultado desse cursor ?
Vou pegar o resultado e usar no Visual Basic.

Atenciosamente

Alessandro Rodrigues

[Anônimo]

Pessoal Consegui.

Basta Criar um package com o novo Type Cursor e depois criar um vari?vel do tipo OUT na PROCEDURE com o novo Type que est? no package.

ex:

CREATE OR REPLACE PACKAGE TIPOS AS
TYPE MeuCursor IS REF CURSOR;
END TIPOS;

CREATE OR REPLACE PROCEDURE SP_TESTE_CURSOR
(
v_MeuCursor OUT tipos.meucursor –Est? no PACKAGE TIPOS
)
BEGIN

OPEN v_MeuCursor FOR SELECT * FROM TAB_MOVIMENTO_TRIBUTOS;

END;

[Autor]

Posts