From ae5c35d0eabdd15ed20cda314971f5cecab7d598 Mon Sep 17 00:00:00 2001 From: izuddin Date: Mon, 9 Feb 2026 15:05:56 +0700 Subject: [PATCH] Update --- sql.txt | 49 +++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 49 insertions(+) diff --git a/sql.txt b/sql.txt index c3d0117..f71b1d1 100644 --- a/sql.txt +++ b/sql.txt @@ -178,3 +178,52 @@ AND NOT EXISTS ( AND UNITKERJA_ID = dest.SKPD_ID AND KODEREKENING = dest.KODE_REKENING ) AND NVL(rek_anggaran_perubahan,0)>0 + +-- Baru +INSERT INTO SAMASA.AKB_PENDAPATAN( + TAHUN, + SKPD_ID, + KODE_REKENING, + NAMA_REKENING, + PAGU, + BULAN1, + BULAN2, + BULAN3, + BULAN4, + BULAN5, + BULAN6, + BULAN7, + BULAN8, + BULAN9, + BULAN10, + BULAN11, + BULAN12 +) +SELECT + C_ANGG_TAHUN, + I_IDOPD, + y.C_AKUN, + y.N_AKUN, + V_ANGG_TAPD REK_ANGGARAN, + V_SPS_BULAN01, + V_SPS_BULAN02, + V_SPS_BULAN03, + V_SPS_BULAN04, + V_SPS_BULAN05, + V_SPS_BULAN06, + V_SPS_BULAN07, + V_SPS_BULAN08, + V_SPS_BULAN09, + V_SPS_BULAN10, + V_SPS_BULAN11, + V_SPS_BULAN12 +FROM TMDPADPT x +JOIN NEWSIPKD.TRBAS y ON x.I_IDBAS = y.I_ID +WHERE C_ANGG_TAHUN = 2026 +AND NOT EXISTS ( + SELECT 1 + FROM SAMASA.AKB_PENDAPATAN dest + WHERE TAHUN = 2026 + AND I_IDOPD = dest.SKPD_ID + AND C_AKUN = dest.KODE_REKENING +) AND NVL(V_ANGG_TAPD,0)>0 \ No newline at end of file