Export excel, adjust anggaran

2022-11-17 11:08:28 +07:00
parent 16afa0b405
commit d65cfe6991
10 changed files with 204 additions and 121 deletions
@@ -64,4 +64,44 @@ class BelanjaRealisasi extends Eloquent
            WHERE a.C_ANGG_TAHUN = ".getTA()." ORDER BY a.D_SPDNO"
        ));
    }
+
+    public function tableData($ta, $filter, $offset=0, $limit=0)
+    {
+        $ta = getTA();
+        $sqlstr = "SELECT a.*,NVL(b.jml,0) as jml,
+                    CASE WHEN a.jenis_dana = 'DBH' AND a.nama_subjenis_dana<>'CHT' 
+                    THEN NVL(d.jml_spd, 0) ELSE NVL(c.jml_spd, 0) END AS jml_spd
+                    FROM VW_BELANJA_REALISASI a  
+                LEFT JOIN (
+                    SELECT I_IDRSK, SUM(REALISASI_1) AS jml 
+                    FROM NEWSIPKD.VW_REALISASI_BELANJA_PERBULAN 
+                    WHERE C_ANGG_TAHUN = $ta
+                    GROUP BY I_IDRSK 
+                ) b ON a.kode_rsk = b.I_IDRSK 
+                LEFT JOIN (
+                    SELECT id_rsk,count(id_rsk) as jml_spd 
+                    FROM SAMASA.belanja_realisasi_spd 
+                    WHERE TO_CHAR(TGL,'YYYY') = $ta
+                    GROUP BY id_rsk 
+                ) c ON a.kode_rsk = c.id_rsk 
+                LEFT JOIN (
+                    SELECT C_OPD,C_SUBGIAT,COUNT(JML) AS jml_spd
+                    FROM
+                    (
+                        SELECT C_OPD,C_SUBGIAT,SUM(V_SPD) AS JML  
+                        FROM NEWSIPKD.TMSPDRINCIBLJ x
+                        LEFT JOIN NEWSIPKD.TMDPASUBGIAT y ON x.I_IDSUBGIAT = y.I_ID 
+                        AND x.C_ANGG_TAHUN = $ta 
+                        LEFT JOIN NEWSIPKD.TROPD z ON z.I_ID = y.I_IDOPD 
+                        WHERE C_SUBGIAT IS NOT NULL 
+                        GROUP BY C_OPD,C_SUBGIAT,I_IDSPD
+                    ) GROUP BY C_OPD,C_SUBGIAT
+                ) d ON a.KODE_SUB_KEGIATAN = d.C_SUBGIAT AND a.KODE_SKPD = d.C_OPD 
+                ".$filter."
+                ORDER BY a.KODE_SKPD, a.KODE_RSK ";
+            
+        $sqlstr.= $offset>0?"OFFSET ".$offset." ROWS FETCH NEXT ".$limit." ROWS ONLY":""; 
+        
+        return $sqlstr;
+    }
 }