y dibuat ja dulu procedurenya di oracle.
di VB 6 dipanggil ja nama procedurenya di oracle
contoh:
cmdado.ActiveConnection = cnSPR
cmdado.CommandText = "nama_procedure di oracle"
cmdado.CommandType = adCmdStoredProc
cmdado.Parameters.Append cmdado.CreateParameter("parameter1", adWChar,
adParamInput, 12, Me.txtidpel.Text)
cmdado.Parameters.Append cmdado.CreateParameter("parameter3", adWChar,
adParamInput, 12, mblth)
cmdado.Parameters.Append cmdado.CreateParameter("parameter2", adDouble,
adParamInput, , 1)
cmdado.Parameters.Append cmdado.CreateParameter("p_hasil", adVarChar,
adParamOutput, 500)
________________________________
Dari: oracle-db-l <[email protected]>
Kepada: [email protected]
Terkirim: Sen, 21 Desember, 2009 06:59:42
Judul: Re: [indo-oracle] Select di Store procedure Oracle
Terima kasih Pa'Rudy, kayaknya yg bapa kasih lah solusinya namun saya ada
kendala sedikit, soalnya procedure tersebut akan saya panggil dengan VB 6.0,
untuk mendefinisakan
declare
result sys_refcursor;
var_nama number;
var_nik char(10);
Di Vb 6.0 caranya gimana ya ?, kalau dengan oracle mungkin engg masalah namun
kalau dari 6.0 waduh,
Thanks
Ismail Siregar
--- Pada Kam, 17/12/09, Rudy W Sitanggang <rudy.sitanggang@ gmail.com> menulis:
Dari: Rudy W Sitanggang <rudy.sitanggang@ gmail.com>
Judul: Re: [indo-oracle] Select di Store procedure Oracle
Kepada: indo-oracle@ yahoogroups. com
Tanggal: Kamis, 17 Desember, 2009, 5:59 AM
melanjutkan saja, bisa begini:
create Procedure A(var1 as Number, result int out sys_refcursor) is
Begin
open result for
'Select Nama,Nik From Karyawan Where Nik=' || @var1
End;
kalo nanti procedure nya di panggil, maka fetch aja cursor resultnya.
contoh eksekusi dari SQL plus:
declare
result sys_refcursor;
var_nama number;
var_nik char(10);
nik_yang_dicari number;
begin
a(nik_yang_dicari, result);
loop
fetch result into var_nama,var_ nik;
exit when result%notfound;
dbms_output. put_line( var_nama || ' ' || var_nik);
end loop;
end;
On Sat, Dec 12, 2009 at 7:12 AM, <febr...@yahoo. com> wrote:
> Hampir sama cuma dia ga bisa hanya select aja harus masukin ke table
> tujuan.
>
> Regards,
>
> Febry kurniawan
> Sent from my BlackBerry®
> powered by Sinyal Kuat INDOSAT
>
> -----Original Message-----
> From: oracle-db-l <ismail...@yahoo. com>
> Date: Fri, 11 Dec 2009 10:24:50
> To: <indo-oracle@ yahoogroups. com>
> Subject: [indo-oracle] Select di Store procedure Oracle
>
> Dear Rekan2
>
> Kalau di Sql Server storeprocedure untuk select (Query) seperti ini :
>
> Procedure A(@var1 as Numeric,Var2 As Char(10))
> Begin
> Select Nama,Nik From Karyawan Where n...@var1
> End;
>
> Nah Kalau di Oracle Gimana ya ?
>
> Thanks bangat ni bantuannya
>
> Tq
> Ismail
>
>
>
>
>
>
>
>
>
> Selalu bersama teman-teman di Yahoo! Messenger. Tambahkan mereka dari
> email atau jaringan sosial Anda sekarang!
> http://id.messenger .yahoo.com/ invite/
>
> [Non-text portions of this message have been removed]
>
>
>
>
> [Non-text portions of this message have been removed]
>
>
>
> ------------ --------- --------- ------
>
> --
> -----------I. N.D.O - O.R.A.C.L.E- --------- -----
> Keluar: indo-oracle- unsubscribe@ yahoogroups. com
> Website: http://indooracle. wordpress. com
> http://www.facebook .com/group. php?gid=51973053 515
> ------------ --------- --------- --------- --------
>
> Bergabung dengan Indonesia Thin Client User Groups,
> Terminal Server, Citrix, New Moon Caneveral, di:
> http://indo- thin.blogspot. comYahoo! Groups Links
>
>
>
>
--
Warm regards,
Rudy Wardhany
Yahoo ID: rudy_staredge@ yahoo.com
[Non-text portions of this message have been removed]
"Coba Yahoo! Mail baru yang LEBIH CEPAT. Rasakan bedanya sekarang!
http://id.mail. yahoo.com& quot;
[Non-text portions of this message have been removed]
Lebih aman saat online. Upgrade ke Internet Explorer 8 baru dan lebih
cepat yang dioptimalkan untuk Yahoo! agar Anda merasa lebih aman. Gratis.
Dapatkan IE8 di sini!
http://downloads.yahoo.com/id/internetexplorer/
[Non-text portions of this message have been removed]
