Kamis, 30 Januari 2020

Looping Di Dalam Looping - PostgreSQL

NOTE: CONTOH UNTUK LOOPING YG KEDUA, DENGAN VARIABEL LEBIH DARI 1, JIKA HANYA 1 VARIABEL BISA TANPA SEPERTI INI
UPDATE ANGSURAN YANG TELAH DIBAYAR
 
DO $$
DECLARE norek VARCHAR;
DECLARE bulanke int;
declare byrangsuran record;

DECLARE nofas1 VARCHAR;
DECLARE ke int;
DECLARE tgl date;

cur1 CURSOR for
    SELECT REPLACE(nofas,' ','') nofas, max(angsurke) angske FROM "KRDANGS" where tglbyr is not null group by nofas ORDER BY nofas;

cur2 cursor for
    select REPLACE(nofas,' ','') nofas, angsurke, tglbyr
    from "KRDANGS" WHERE REPLACE(nofas,' ','')=norek
    order by REPLACE(nofas,' ',''), angsurke;
   
begin
open cur1;
loop

    FETCH  next from Cur1 INTO norek, bulanke;    
    EXIT WHEN NOT FOUND;
   
    open cur2;
        loop
       
        FETCH  next from Cur2 INTO nofas1, ke, tgl;    
    EXIT WHEN NOT FOUND;
   
    update "KRTKRD"
    SET "TGL_ANGS"=(case when tgl is not null then tgl
                                            else "TGL_JWL" end),
            "PKANGS"="POKOK", "BNG_ANGS"="BUNGA"               
    WHERE "NO_REK"=norek and "ANGS_KE"=ke
    and "ANGS_KE"<=bulanke;
   
    END LOOP;
  CLOSE cur2;
   
   

END LOOP;
CLOSE cur1;
END $$;

Tidak ada komentar:

Posting Komentar

Dynamic Query - SQL Server

Berikut adalah contoh dari bentuk dari Dynamic Query di SQL Server yang dibungkus ke dalam Store Procedure:  USE [Data00] GO SET ANSI_NULLS ...

Popular Posts