Mas Fansul,

Kalau mau dynamic bisa seperti ini.
Sediakan table informasi cabang/kantor (tb_cabang)

cd_cabang nm_cabang nm_dblink
--------- --------- ----------
BJM       Bjmasin   CONNBJM
SBY       Surabaya  CONNSBY

proc insert_mutasi
(
 vkantor_new  data.kantor_new%type,
) as
  vcount smallint;
  vsql varchar2(3000);
  vdblink tb_cabang.nm_dblink%type;
begin
  select nm_dblink
  into vdblink
  from tb_cabang
  where cd_cabang = vkantor_new;

  vsql := 'insert into  data@:1' a ... ';
    ...
  execute immediate vsql using vdblink;

exception
  when no_data_found then
    raise;
  when others then
    DBMS_OUTPUT.PUT_LINE(SQLERRM);
    raise;
end;

Jadi pekerjaan berikutnya hanya create db_link, isi tb_cabang, dan execute
procedurenya

Yah kira2 kayak gitu.
Kalo ada yang kurang silakan ditambahkan sendiri.

Cheers,
Wadi Achmed

2009/12/10 <[email protected]>

> Hello indo-oracle,
>
>  Saya punya berapa user dalam 1 server ora.
>  misalnya user bjm, sby dan jkt.
>  kadang2 user saya bikin dblink dengan nama
>  user bjm = connbjm, key = 01
>  user sby = connsby, key = 02
>  user jkt = connjkt, key = 03
>  saya ada mutasi data dari user bjm, bisa ke user sby atau ke user
>  jkt, demikian juga sebaliknya.
>  yang sekarang saya lakukan adalah.
>  bikin proc yang key office di tulis mati.
>
>  yang mau saya tanyakan, adakah cara lain yang lebih baik, soalnya
>  klu ada penambahan kantor/dblink semua proc harus di tambah.
>  tks
>
>  proc insert_mutasi
>
> (
>  vkantor_new  data.kantor_new%type,
> ) as
>  vcount smallint;
> begin
>
>    if vkantor_new = '01'
>    then
>       insert into conn...@data a ...
>    end if
>
>    if vkantor_new = '02'
>    then
>       insert into conn...@data a ...
>    end if
>
>    if vkantor_new = '03'
>    then
>       insert into conn...@data a ....
>    end if
>
> end;
>
>
>
>
>
> --
> Best regards,
> fansul
> mailto:[email protected]
>
> __________________________________________________
> Apakah Anda Yahoo!?
> Lelah menerima spam?  Surat Yahoo! memiliki perlindungan terbaik terhadap
> spam
> http://id.mail.yahoo.com
>
>
>
> ------------------------------------
>
> --
> -----------I.N.D.O - O.R.A.C.L.E---------------
> Keluar: [email protected]
> Website: http://indooracle.wordpress.com
> http://www.facebook.com/group.php?gid=51973053515
> -----------------------------------------------
>
> Bergabung dengan Indonesia Thin Client User Groups,
> Terminal Server, Citrix, New Moon Caneveral, di:
> http://indo-thin.blogspot.comYahoo! Groups Links
>
>
>
>


[Non-text portions of this message have been removed]

Kirim email ke