Ma kasih atas jawabannya.
Tapi saya baru coba spt pak bowo deskripsikan dibawa ini diman query
nya saya ganti dengan perintah select spt ini:
CREATE OR REPLACE package d_transaksi.pack_balance as
procedure pr_hitung(v_table varchar2, v_field varchar2) as
end pack_balance;
CREATE OR REPLACE package body d_transaksi.pack_balance as
procedure pr_hitung(v_table varchar2, v_field varchar2) as
v_sqltxt varchar2(1000);
v_balance number(24,6);
begin
dbms_output.put_line ('ADA');
v_sqltxt := 'Select '||v_field||' into '||v_balance||' from '||v_table;
EXECUTE IMMEDIATE V_SQLTXT INTO v_balance;
dbms_output.put_line (v_balance);
end;
end pack_balance;
muncul error:
SQL> exec d_transaksi.pack_balance.pr_hitung('d_Transaksi.t_JnlIqr','Fn_PCBalanc
e');
ADA
BEGIN d_transaksi.pack_balance.pr_hitung('d_Transaksi.t_JnlIqr','Fn_PCBalance');
END;
*
ERROR at line 1:
ORA-00936: missing expression
ORA-06512: at "D_TRANSAKSI.PACK_BALANCE", line 8
ORA-06512: at line 1
Rgds
Betty
On 2/14/06, Yulius Wibowo <[EMAIL PROTECTED]> wrote:
> Coba dirubah menjadi PL/SQL Block (Anonymous)
>
> DECLARE
> v_sqltxt varchar2(2000);
> v_table varchar2(50);
> v_field varchar2(500);
> v_kondisi varchar2(50);
> BEGIN
> v_table := 'd_Transaksi.t_Coba1' ;
> v_field := 'KeluarMasukBalance';
> v_kondisi := 'Fc_Cabang=Cabang and Fc_Docno=Docno';
> v_sqltxt := 'update ' || v_table || ' set ' ||
> substr(v_field,12,7) || '= ' || substr(v_field,12,7) || '+' ||
> substr(v_field,7,5) || '-' || substr(v_field,1,6) ||
> 'where ' || v_kondisi ;
>
> EXECUTE IMMEDIATE v_sqltxt;
> END;
>
>
>
> --- In [email protected], "betabetha ." <[EMAIL PROTECTED]>
> wrote:
> >
> > Ma kasih banyak pak bowo. Yang aku maksud itu dengan variable makro
> > misal pengambilan nilai balance dari beberapa table yang berbeda
> > dengan nama field yang berbeda pula. Dan begitu juga untuk perintah
> > update value balance >1 table.
> > Conth perhitungan balance=Balance+Masuk-Keluar
> > variable v_sqltxt varchar2(2000);
> > variable v_table varchar2(50);
> > variable v_field varchar2(500);
> > variable v_kondisi varchar2(50);
> >
> > execute :v_table := 'd_Transaksi.t_Coba1' ;
> > execute :v_field := 'KeluarMasukBalance';
> > execute :v_kondisi = 'Fc_Cabang=Cabang and Fc_Docno=Docno';
> > execute v_sqltxt := update :v_table set
> > substr(v_field,12,7)=substr(v_field,12,7)+substr(v_field,7,5)-
> substr(v_field,1,6)
> > where v_kondisi;
> >
> > Rgds
> > betty
> >
> >
> >
> >
> >
> >
> >
> > On 2/13/06, AH <[EMAIL PROTECTED]> wrote:
> > > Bu Betty
> > >
> > > variable makro disini selain yang pak yulius bilang,
> > > apakah juga bentuk variable di mana di dalamnya berisi
> > > variable juga.
> > >
> > > --- Yulius Wibowo <[EMAIL PROTECTED]> wrote:
> > >
> > > > Apakah yg Betty maksud variable makro adalah
> > > > variable yg bisa
> > > > dipakai/diakses bersama (GLOBAL)oleh beberapa
> > > > procedure atau
> > > > function atau package dalam sebuah session ?
> > > >
> > > > Kalau ya, ada beberapa alternatif, a.l:
> > > > 1. Menggunakan package variable (hanya menggunakan
> > > > package
> > > > specification untuk mendeklarasikan variable tsb)
> > > > 2. Menggunakan temporary table
> > > >
> > > > Kalau dari session yg berbeda, bisa saja
> > > > menggunakan:
> > > > 1. Sbg data di table, syaratnya harus ada statement
> > > > commit setiap
> > > > kali merubah data (bisa menggunakan AUTONOMOUS
> > > > TRANSACTION).
> > > > 2. DBMS_PIPE, DBMS_ALERT
> > > > 3. Advanced Queueing (AQ)
> > > >
> > > >
> > > > Bowo
> > > >
> > > >
> > > >
> > > > --- In [email protected], "betabetha ."
> > > > <betabetha@>
> > > > wrote:
> > > > >
> > > > > Sore semuanya,
> > > > >
> > > > > Adakah pl/sql di oracle menggunakan variable
> > > > makro? kalo ada tolong
> > > > > dijelaskan penggunaannya bagaimana dan apa
> > > > fungsinya, soalnya saya
> > > > > mencoba membuat object oriented di database
> > > > oracle?
> > > > >
> > > > > Rgds
> > > > > Betty
> > > > >
> > > >
> > > >
> > > >
> > > >
> > > >
> > >
> > >
> > >
> > >
> > >
> > > --
> > > -----------I.N.D.O - O.R.A.C.L.E---------------
> > > Keluar: [EMAIL PROTECTED]
> > > Website: http://indo-oracle.lizt.org (NEW)
> > > -----------------------------------------------
> > >
> > > Bergabung dengan Indonesia Thin Client User Groups,
> > > Terminal Server, Citrix, New Moon Caneveral, di:
> > > http://indo-thin.vze.com
> > > Yahoo! Groups Links
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> >
>
>
>
>
>
>
>
> --
> -----------I.N.D.O - O.R.A.C.L.E---------------
> Keluar: [EMAIL PROTECTED]
> Website: http://indo-oracle.lizt.org (NEW)
> -----------------------------------------------
>
> Bergabung dengan Indonesia Thin Client User Groups,
> Terminal Server, Citrix, New Moon Caneveral, di:
> http://indo-thin.vze.com
> Yahoo! Groups Links
>
>
>
>
>
>
>
--
-----------I.N.D.O - O.R.A.C.L.E---------------
Keluar: [EMAIL PROTECTED]
Website: http://indo-oracle.lizt.org (NEW)
-----------------------------------------------
Bergabung dengan Indonesia Thin Client User Groups,
Terminal Server, Citrix, New Moon Caneveral, di:
http://indo-thin.vze.com
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/indo-oracle/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/