I worked many years with Sql Server and it was easy to do, but I don't 
know how to do in Oracle:

How a Oracle 8 Stored Procedure can return to PowerBuilder 8 the result 
of a query or a recordset (in Sql Server is as easy as put a select 
sentence at the end of the procedure). I don't want to use temporary 
tables for a concurrence issue.

Can anyone give me a help?

Thanks in advance,

Ra�l La Torre

You need a REF CURSOR.  See enclosed datawindow examples.

-- 
Terry Dykstra (TeamSybase)
http://powerbuilder.codeXchange.sybase.com/
http://www.pb9books.com
product enhancement requests:
http://www.isug.com/cgi-bin/ISUG2/submit_enhancement


"Raul La Torre" <rlatorre@sencico.gob.pe> wrote in message
news:416eab44@forums-1-dub...
> I worked many years with Sql Server and it was easy to do, but I don't
> know how to do in Oracle:
>
> How a Oracle 8 Stored Procedure can return to PowerBuilder 8 the result
> of a query or a recordset (in Sql Server is as easy as put a select
> sentence at the end of the procedure). I don't want to use temporary
> tables for a concurrence issue.
>
> Can anyone give me a help?
>
> Thanks in advance,
>
> Ra�l La Torre


begin 666 sp_as_source_for_dw.sql
M+2T@3F%M93H@<W!?87-?<V]U<F-E7V9O<E]D=RYS<6P-"BTM($%U=&AO<CH@
M5&5R<GD@1'EK<W1R82!;5&5A;5-Y8F%S95T-"BTM(" @(" @(" @0V%N861I
M86X@1F]R97-T($]I;"!,=&0N#0HM+2!$871E.B Q.3DX+S U+S Y#0HM+2!2
M97%U:7)E;65N=',Z($]R86-L92 W+C(@;W(@;&%T97(-"BTM($YO=&5S.B!9
M;W4@9&5F:6YE(&$@<&%C:V%G92!H96%D97(@=&AA="!U<V5S(&$@<F5F(&-U
M<G-O<BX-"BTM(%1H96X@>6]U(&-R96%T92!A('-T86YD+6%L;VYE('!R;V-E
M9'5R92!T:&%T(')E9F5R96YC97,@=&AE(')E<W5L="!S970@9&5F:6YE9"!I
M;B!T:&4@<&%C:V%G92!H96%D97(N#0HM+2!.;W<@8W)E871E(&$@9&%T87=I
M;F1O=R!U<VEN9R!S=&]R960@<')O8V5D=7)E(&%S('-O=7)C92!A;F0@<V5L
M96-T('1H92!P<F]C961U<F4-"@T*+2T@,C P,B\P,2\Q-#H@061D960@97AA
M;7!L92!U<VEN9R!A('!L+W-Q;"!T86)L92!I;G-T96%D(&]F(&$@<F5A;"!T
M86)L92X@($)A<V5D(&]N(&%N(&5X86UP;&4@8GD@5&AO;6%S($MY=&4N#0HM
M+0D)4F5Q=6ER97,@3W)A8VQE(#@@;W(@;&%T97(-"@T*+2T@4V5T=&EN9W,Z
M(" )1$)087)M(%!"1$)-4STP#0HM+2!/<F%C;&4@<')I=FEL96=E<SH@86YY
M(&]F($5814-55$4@04Y9(%!23T-%1%5212P@0U)%051%(%!23T-%1%5212P@
M0U)%051%($%.62!04D]#14154D4L(&1E<&5N9&EN9R -"BTM(&]N('=H870@
M>6]U<B!$0D$@86QL;W=S+@T*+2T@4G5N('1H:7,@<V-R:7!T(&9R;VT@<W%L
M+W!L=7,N( T*#0H-"BTM($-R96%T92!E>&%M<&QE('1A8FQE#0HM+2 ]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T-"F1R;W @=&%B;&4@=V]R
M:U]O<F1E<G,-"B\-"@T*8W)E871E('1A8FQE('=O<FM?;W)D97)S("@-"F-O
M;7!A;GD)"79A<F-H87(R*#,I+ T*;W)D97)?;F\)=F%R8VAA<C(H,3 I+ T*
M;W)D97)?9&%T90ED871E+ T*;W)D97)?86UT"6YU;6)E<B@Q,RPU*2D-"B\-
M"@T*:6YS97)T(&EN=&\@=V]R:U]O<F1E<G,@=F%L=65S("@G04)#)RPG,3 P
M,"<L('1O7V1A=&4H)S$Y.3DO,#,O,#4G+"=Y>7EY+VUM+V1D)RDL(#$R,S4N
M-S@Y*0T*+PT*:6YS97)T(&EN=&\@=V]R:U]O<F1E<G,@=F%L=65S("@G04)#
M)RPG,3 P,2<L('1O7V1A=&4H)S$Y.3DO,#,O,#<G+"=Y>7EY+VUM+V1D)RDL
M(#,T+C4V*0T*+PT*:6YS97)T(&EN=&\@=V]R:U]O<F1E<G,@=F%L=65S("@G
M04)#)RPG,3 P,B<L('1O7V1A=&4H)S$Y.3DO,#,O,#8G+"=Y>7EY+VUM+V1D
M)RDL(#@Y,"XQ,C,I#0HO#0II;G-E<G0@:6YT;R!W;W)K7V]R9&5R<R!V86QU
M97,@*"="0T0G+"<Q,# R)RP@=&]?9&%T92@G,3DY.2\P,R\P-B<L)WEY>7DO
M;6TO9&0G*2P@,3(I#0HO#0II;G-E<G0@:6YT;R!W;W)K7V]R9&5R<R!V86QU
M97,@*"="0T0G+"<Q,# U)RP@=&]?9&%T92@G,3DY.2\P,R\Q-2<L)WEY>7DO
M;6TO9&0G*2PQ,BXU*0T*+PT*:6YS97)T(&EN=&\@=V]R:U]O<F1E<G,@=F%L
M=65S("@G0D-$)RPG,3 P-B<L('1O7V1A=&4H)S(P,#$O,#0O,#$G+"=Y>7EY
M+VUM+V1D)RDL,3(N-3$I#0HO#0II;G-E<G0@:6YT;R!W;W)K7V]R9&5R<R!V
M86QU97,@*"="0T0G+"<Q,# T)RP@=&]?9&%T92@G,C P,"\Q,2\Q-R<L)WEY
M>7DO;6TO9&0G*2PQ,BXU,3<I#0HO#0IC;VUM:70-"B\-"@T*+2T@0W)E871E
M(%!A8VMA9V4N("!.86UE.B!A7V1E;6\-"BTM(#T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/0T*0U)%051%($]2(%)%4$Q!0T4@4$%#2T%'12!A
M7V1E;6\@25,-"@T*(%194$4@;7E?<F5S=6QT7W-E="!)4R!2148@0U524T]2
M(%)%5%523B!W;W)K7V]R9&5R<R523U=465!%.PT*#0I%3D0@85]D96UO.PT*
M+PT*#0H-"BTM($-R96%T92!0<F]C961U<F4N("!.86UE.B!P<F]C7V1E;6\-
M"BTM("!2969E<F5N8V5S('!A8VMA9V4@85]D96UO#0HM+2 ]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T-"D-214%412!/4B!215!,04-%(%!2
M3T-%1%5212!P<F]C7V1E;6\@*&]U=%]R97-U;'0@24X@3U54(&%?9&5M;RYM
M>5]R97-U;'1?<V5T*0T*($%3#0H-"B!"14=)3@T*#0HM+2!R971U<FX@<F5S
M=6QT('1O(&1A=&%W:6YD;W<-"B @3U!%3B!O=71?<F5S=6QT#0H@($9/4B!3
M14Q%0U0@*B!&4D]-('=O<FM?;W)D97)S.PT*#0I%3D0@<')O8U]D96UO.PT*
M+PT*#0H-"BTM(#T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/0T*
M+2T@4VEM:6QA<B!E>&%M<&QE+"!B=70@;F]W('5S:6YG(&]N92!R971R:65V
M86P@87)G=6UE;G0-"@T*+2T@0W)E871E(%!A8VMA9V4N("!.86UE.B!A7V1E
M;6\R#0HM+2 ]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T-"D-2
M14%412!/4B!215!,04-%(%!!0TM!1T4@85]D96UO,B!)4PT*#0H@5%E012!M
M>5]R97-U;'1?<V5T($E3(%)%1B!#55)33U(@4D5455).('=O<FM?;W)D97)S
M)5)/5U194$4[#0H-"D5.1"!A7V1E;6\R.PT*+PT*#0H-"BTM($-R96%T92!0
M<F]C961U<F4N("!.86UE.B!P<F]C7V1E;6\R#0HM+2 @4F5F97)E;F-E<R!P
M86-K86=E(&%?9&5M;S(-"BTM(#T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/0T*0U)%051%($]2(%)%4$Q!0T4@4%)/0T5$55)%('!R;V-?9&5M
M;S(@*&%S7V-O;7 @24X@5D%20TA!4C(L(&]U=%]R97-U;'0@24X@3U54(&%?
M9&5M;S(N;7E?<F5S=6QT7W-E="D-"B!!4PT*#0H@0D5'24X-"@T*+2T@<F5T
M=7)N(')E<W5L="!T;R!D871A=VEN9&]W#0H@($]014X@;W5T7W)E<W5L= T*
M("!&3U(@4T5,14-4("H@1E)/32!W;W)K7V]R9&5R<PT*"5=(15)%(&-O;7!A
M;GD@/2!A<U]C;VUP.PT*#0I%3D0@<')O8U]D96UO,CL-"B\-"@T*#0HM+2!#
M<F5A=&4@4')O8V5D=7)E+B @3F%M93H@<')O8U]D96UO,F$-"BTM("!2969E
M<F5N8V5S('!A8VMA9V4@85]D96UO,F$-"BTM(#T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/0T*0U)%051%($]2(%)%4$Q!0T4@4%)/0T5$55)%
M('!R;V-?9&5M;S)A("AA9%]O<F1E<F1A=&4@24X@1$%412P@;W5T7W)E<W5L
M="!)3B!/550@85]D96UO,BYM>5]R97-U;'1?<V5T*0T*($%3#0H-"B!"14=)
M3@T*#0HM+2!R971U<FX@<F5S=6QT('1O(&1A=&%W:6YD;W<-"B @3U!%3B!O
M=71?<F5S=6QT#0H@($9/4B!314Q%0U0@*B!&4D]-('=O<FM?;W)D97)S#0H)
M5TA%4D4@;W)D97)?9&%T92 ](&%D7V]R9&5R9&%T93L-"@T*14Y$('!R;V-?
M9&5M;S)A.PT*+PT*#0H-"BTM(#T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/0T*+2T@4VEM:6QA<B!E>&%M<&QE+"!B=70@;F]W('5S:6YG(&]N
M92!R971R:65V86P@87)G=6UE;G0@86YD(')E8V]R9"!T>7!E#0H-"BTM($-R
M96%T92!086-K86=E+B @3F%M93H@85]D96UO,PT*+2T@/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]#0I#4D5!5$4@3U(@4D503$%#12!004-+
M04=%(&%?9&5M;S,@25,-"@T*(%194$4@=&AE7W)E8V]R9%]S970@25,@4D5#
M3U)$("@-"@EL<U]C;VUP86YY"0EV87)C:&%R,B@S*2P-"@EL;%]O<F1E<E]C
M;W5N= EN=6UB97(H,RDI.PT*#0H@5%E012!M>5]R97-U;'1?<V5T($E3(%)%
M1B!#55)33U(@4D5455).('1H95]R96-O<F1?<V5T.PT*#0I%3D0@85]D96UO
M,SL-"B\-"@T*#0HM+2!#<F5A=&4@4')O8V5D=7)E+B @3F%M93H@<')O8U]D
M96UO,PT*+2T@(%)E9F5R96YC97,@<&%C:V%G92!A7V1E;6\S#0HM+2 ]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T-"B!#4D5!5$4@3U(@4D50
M3$%#12!04D]#14154D4@<')O8U]D96UO,R H87-?8V]M<"!)3B!605)#2$%2
M,BP@;W5T7W)E<W5L="!)3B!/550@85]D96UO,RYM>5]R97-U;'1?<V5T*0T*
M($%3#0H-"B!"14=)3@T*#0HM+2!R971U<FX@<F5S=6QT('1O(&1A=&%W:6YD
M;W<-"D]014X@;W5T7W)E<W5L= T*"49/4B!314Q%0U0@8V]M<&%N>2P@8V]U
M;G0H*BD@#0H)1E)/32!W;W)K7V]R9&5R<PT*"5=(15)%(&-O;7!A;GD@/2!A
M<U]C;VUP#0H)1U)/55 @0ED@8V]M<&%N>3L-"@T*14Y$('!R;V-?9&5M;S,[
M#0HO#0H-"@T*#0HO*B!5<V4@<W1O<F5D('!R;V-E9'5R92!W:71H:6X@<&%C
M:V%G92!B;V1Y+B @5&\@=7-E('1H:7,@:6X@=&AE($17+"!S<&5C:69Y.@T*
M97AE8W5T92!T:&5O=VYE<BY!7T1%34\T+E!23T-?1$5-3S0[,"!!4U]#3TU0
M(#T@.D%37T-/35 -"DYO=&4Z('-I;F-E('1H92!00C8O-R!$5R!P86EN=&5R
M(&-A;FYO="!S964@=&AE('!R;V-E9'5R92!W:71H:6X@=&AE('!A8VMA9V4L
M('EO=2!M=7-T(&9I<G-T(&-R96%T92!A( T*9'5M;7D@<W1A;F0M86QO;F4@
M<')O8V5D=7)E('1H870@:&%S('1H92!S86UE(&%R9W5M96YT<RX@("A00C@@
M<W @8G)O=W-E<B!S965S('!R;V-E9'5R97,@=VET:&EN('!A8VMA9V5S*2X-
M"D9O<B!T:&ES(&5X86UP;&4@>6]U(&-A;B!U<V4@=&AE('!R;V-?9&5M;S(@
M<')O8V5D=7)E+B @069T97(@>6]U)W)E(&1O;F4L('EO=2!C86X@9')O<"!T
M:&4@9'5M;7D@<')O8V5D=7)E("HO#0H-"BTM($-R96%T92!086-K86=E+B @
M3F%M93H@85]D96UO- T*+2T@/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]#0I#4D5!5$4@3U(@4D503$%#12!004-+04=%(&%?9&5M;S0@25,-
M"@T*(%194$4@;7E?<F5S=6QT7W-E="!)4R!2148@0U524T]2(%)%5%523B!W
M;W)K7V]R9&5R<R523U=465!%.PT*#0H@4%)/0T5$55)%('!R;V-?9&5M;S0@
M*&%S7V-O;7 @24X@5D%20TA!4C(L(&]U=%]R97-U;'0@24X@3U54(&%?9&5M
M;S0N;7E?<F5S=6QT7W-E="D[#0H-"D5.1"!A7V1E;6\T.PT*+PT*#0H-"D-2
M14%412!/4B!215!,04-%(%!!0TM!1T4@0D]$62!A7V1E;6\T($E3#0H-"B!0
M4D]#14154D4@<')O8U]D96UO-" H87-?8V]M<"!)3B!605)#2$%2,BP@;W5T
M7W)E<W5L="!)3B!/550@85]D96UO-"YM>5]R97-U;'1?<V5T*2!)4PT*#0H)
M0D5'24X-"@T*+2T@<F5T=7)N(')E<W5L="!T;R!D871A=VEN9&]W#0H)3U!%
M3B!O=71?<F5S=6QT#0H)("!&3U(@4T5,14-4("H@1E)/32!W;W)K7V]R9&5R
M<PT*"2 @5TA%4D4@8V]M<&%N>2 ](&%S7V-O;7 [#0H-"B!%3D0@<')O8U]D
M96UO-#L-"@T*14Y$(&%?9&5M;S0[#0HO#0H-"@T*#0H-"@T*+2T@1&5M;VYS
M=')A=&4@=7-I;F<@82!P;"]S<6P@=&%B;&4N("!"87-E9"!O;B!A;B!E>&%M
M<&QE(&)Y(%1H;VUA<R!+>71E+@T*+2T@5&AE<V4@='EP97,@87)E('5S960@
M:6X@<')O8U]P;'-Q;%]T86)L95]D96UO#0HM+2 ]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T-"F-R96%T92!O<B!R97!L86-E('1Y<&4@5'EP
M94)A8VMU<$)A<F-O9&4@87,@;V)J96-T("@-"G1A<&5T>7!E('9A<F-H87(R
M*#$I+ T*=&%P96YU;6)E<B!N=6UB97(H,RDI#0HO#0H-"F-R96%T92!O<B!R
M97!L86-E('1Y<&4@5&%B;&5"86-K=7!"87)C;V1E(&%S('1A8FQE(&]F(%1Y
M<&5"86-K=7!"87)C;V1E.PT*+PT*#0H-"BTM($-R96%T92!086-K86=E+B @
M3F%M93H@85]P;'-Q;%]T86)L95]D96UO#0HM+2 ]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T-"D-214%412!/4B!215!,04-%(%!!0TM!1T4@
M85]P;'-Q;%]T86)L95]D96UO($E3#0H-"@T*(%194$4@=&AE7W)E8V]R9%]S
M970@25,@4D5#3U)$("@-"@EL<U]B86-K=7!T>7!E"0EV87)C:&%R,B@Q*2P-
M"@EL;%]T87!E;G5M8F5R"0EN=6UB97(H,RDI.PT*#0H@5%E012!M>5]R97-U
M;'1?<V5T($E3(%)%1B!#55)33U(@4D5455).('1H95]R96-O<F1?<V5T.PT*
M#0I%3D0@85]P;'-Q;%]T86)L95]D96UO.PT*+PT*#0H-"BTM($-R96%T92!0
M<F]C961U<F4N("!.86UE.B!P<F]C7W!L<W%L7W1A8FQE7V1E;6\-"BTM(%)E
M9F5R96YC97,@<&%C:V%G92!A7W!L<W%L7W1A8FQE7V1E;6\-"BTM(%)E<75I
M<F5S($]R86-L92 X(&]R(&QA=&5R#0HM+2 ]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T-"B!#4D5!5$4@3U(@4D503$%#12!04D]#14154D4@
M<')O8U]P;'-Q;%]T86)L95]D96UO("AO=71?<F5S=6QT($E.($]55"!A7W!L
M<W%L7W1A8FQE7V1E;6\N;7E?<F5S=6QT7W-E="D-"B!!4PT*#0H@;%]T86)L
M92!486)L94)A8VMU<$)A<F-O9&4@.CT@5&%B;&5"86-K=7!"87)C;V1E*%1Y
M<&5"86-K=7!"87)C;V1E*"=$)RPP*2P-"B @(" @(" @(" @(" @(" @(" @
M(" @(" @(" @(" @(" @(" @(" @(" @(" @("!4>7!E0F%C:W5P0F%R8V]D
M92@G1"<L,2DL#0H@(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @
M(" @(" @(" @(" @(" @5'EP94)A8VMU<$)A<F-O9&4H)TXG+#(I+ T*(" @
M(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @
M(%1Y<&5"86-K=7!"87)C;V1E*"=.)RPS*2P-"B @(" @(" @(" @(" @(" @
M(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @("!4>7!E0F%C:W5P0F%R
M8V]D92@G22<L-"DL#0H@(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @
M(" @(" @(" @(" @(" @(" @5'EP94)A8VMU<$)A<F-O9&4H)T0G+#4I*3L-
M"@T*($)%1TE.#0H-"BTM(')E='5R;B!R97-U;'0@=&\@9&%T87=I;F1O=PT*
M3U!%3B!O=71?<F5S=6QT#0H)1D]2(%-%3$5#5" J( T*"4923TT@5$%"3$4H
M($-!4U0H(&Q?=&%B;&4@05,@5&%B;&5"86-K=7!"87)#;V1E*2D[#0H-"D5.
A1"!P<F]C7W!L<W%L7W1A8FQE7V1E;6\[#0HO#0H-"@T*
`
end