Hello Wadi,

Thursday, December 10, 2009, 11:43:49 AM, you wrote:

   Terima kasih, akan saya coba dulu klu ada kendala saya akan tanya
   lagi.
   sekalian tanya varchar2 max berapa ya.
   seandainya scriptnya tidak muat di vsql bisa nggak di bagi 2
   tks

  
  
> 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



-- 
Best regards,
fansul                            
mailto:[email protected]

__________________________________________________
Apakah Anda Yahoo!?
Lelah menerima spam?  Surat Yahoo! memiliki perlindungan terbaik terhadap spam  
http://id.mail.yahoo.com 

Kirim email ke