Hello Yoel,
Monday, April 5, 2010, 5:28:26 PM, you wrote:

Yang terjadi procedure yang pertama selalu sukses, pas mau jalankan
procedure yang kedua yang keluar error.
Ini scriptnya, tolong salahnya dimana.
ALTER SESSION CLOSE DATABASE LINK <dbLink> harus di tulis di sebelah
mana ya, saya coba tulis di paling bawah sebelum end, waktu di
compiler error

ini script untuk Cab A, Procedure yang 2nya lagi itu sama
hanya beda di Dlink aja (Cabb dan CabC)
tks

---

create or replace procedure insert_data_cabang
is

vcount smallint;
begin

---- Hapus data yang ada perubahan -----

  for i in
    (
     select
       a.nomor
     from
       jual_...@caba a
     where
       a.status = 'N'
    )
  loop

  vcount := 0 ;
  select
    count(*)
  into
    vcount
  from
    jual_global b
  where
    trim(b.nomor) = trim(i.nomor)

      if vcount > 0
      then

        delete jual_global x
        where
          trim(b.nomor) = trim(i.nomor) ;

          update jual_...@caba z
            set z.status = 'Y'
          where
             trim(i.nomor) = trim(z.nomor) ;

      end if;
  end loop;
  commit ;
-------------------

   for i in
     (
       select
         c.nomor,
         sum(c.nilai)   as nilai
       from
         jual_i...@caba c
       where
         c.status = 'N'
       group by
         c.nomor
     )

   loop

     vcount := 0;
     select
       count(*)
     into
       vcount
     from jual_global x
     where
       trim(x.nomor) = trim(i.nomor) ;

     if vcount > 0
     then
       update jual_global x
         set x.nilai = nvl(i.nilai,0)
       where
         trim(x.nomor) = trim(i.nomor) ;
     else
        insert into jual_global x
            (
             x.nomor,
             x.nilai
            )
        values
          (
            i.nomor,
            i.nilai
            );
      end if ;

      update jual_i...@caba z
        set z.status = 'Y'
      where
         trim(i.nomor) = trim(z.nomor) ;
   end loop;
   commit;

   ---- masih error untuk Alter ---
   
--   ALTER SESSION
--   CLOSE DATABASE LINK CabA;
   
end;





> Meskipun process sudah selesai, database link itu gak akan di close kalo
> sessionnya tidak di close

> Solusi:
> Lakukan COMMIT kemudian ALTER SESSION CLOSE DATABASE LINK <dbLink> setiap
> selesai 1 procedurenya.




-- 
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