BAPPERIDA-MEMPAWAH/esapipd
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

update: penggunaan periode bulan dan tahun aktif sebagai acuan data tampilan tabel dan dashboard

Browse Source
This commit is contained in:
siaupheng
2026-05-06 13:02:24 +07:00
parent 3f06971165
commit fdf81fe722
16 changed files with 232 additions and 390 deletions
Download Patch File Download Diff File Expand all files Collapse all files
apps/php/index.php
+17 -8
View File
@@ -6,7 +6,7 @@
Desc. : PHP - Halaman Utama Desktop
Created By : Siau Pheng ([email protected]).
Created Date : May 24th, 2010.
Last Modified : April 19th, 2026.
Last Modified : May 6th, 2026.
(c) 2010 - 2026, 3FONIA Software; WWW.3FONIA.COM.
@@ -31,6 +31,8 @@ $db = $db ?? new MySQL();
$ajson = [];
$data = Param::Get("data");
$tahun = $_SESSION['__WEB_APP']['REAL_THN'] ?? 0;
$bulan = $_SESSION['__WEB_APP']['REAL_BLN'];
$field_map = $_SESSION['__WEB_APP']['REAL_FIELD'];
$aapp = $_SESSION['__WEB_APP'];
if ( $data == "periode-show" ) {
@@ -38,10 +40,15 @@ if ( $data == "periode-show" ) {
if ($tahun == 0 || Param::Get("reset", 0) == 1) {
$form = new Form($db);
$lthn = $form->option("_", "OPTION_THN", $tahun, true, false, tahun_ang());
$lbln = $form->option("_", "OPTION_BLN", $bulan, true, false, bulan_array());
$ajson['aktif'] = 0;
$ajson['html'] = '
<div class="row mb-1">
<label class="col-sm-5 col-lg-4 col-form-label" for="OPTION_THN">Tahun Anggaran</label>
<label class="col-sm-5 col-lg-4 col-form-label" for="OPTION_BLN">Bulan Data</label>
<div class="col">'.$lbln.'</div>
</div>
<div class="row mb-1">
<label class="col-sm-5 col-lg-4 col-form-label" for="OPTION_THN">Tahun Data</label>
<div class="col">'.$lthn.'</div>
</div>';
}
@@ -50,17 +57,19 @@ if ( $data == "periode-show" ) {
// penyimpanan periode tahun dan bulan login !
$alogin = $_SESSION['__WEB_APP'];
$alogin['REAL_THN'] = Param::Get("OPTION_THN", $alogin['REAL_THN']);
$alogin['REAL_BLN'] = Param::Get("OPTION_BLN", $alogin['REAL_BLN']);
// mapping tahun nomenklatur submap
$alogin['SUBMAP_TAHUN'] = map_tahun_submap($alogin['REAL_THN']);
$alogin['REAL_FIELD'] = "_".isi_nol($alogin['REAL_BLN'], 2);
$_SESSION['__WEB_APP'] = $alogin;
$ajson['sukses'] = 1;
} else if ( $data == "periode-info") {
$ajson = ['html'=>'<a class="nav-link" onclick="IndexJS.periode_show(1);"><i class="icon bi-calendar"></i></a>'];
$ajson = ['html'=>'<a class="nav-link" onclick="IndexJS.periode_show(1);"><i class="bi-calendar"></i></a>'];
if ($tahun > 0) {
$txtinfo = "TA " . $tahun;
$ajson['html'] = '<a class="nav-link text-info fw-bolder" title="'.$txtinfo.'" onclick="IndexJS.periode_show(1);"><i class="icon me-2 bi-calendar-check"></i>'.$txtinfo.'</a>';
$txtinfo = bulan_array()[$bulan] .' '.$tahun;
$ajson['html'] = '<a class="nav-link text-info fw-bolder" title="'.$txtinfo.'" onclick="IndexJS.periode_show(1);"><i class="me-2 bi-calendar-check"></i>'.$txtinfo.'</a>';
}
} else if ( $data == "json-map" ) {
@@ -70,10 +79,10 @@ if ( $data == "periode-show" ) {
} else if ( $data == "chart-map" ) {
$tot_pagu = 0; $ajson['data'] = [];
$db->Query("SELECT SUM(Rupiah) Pagu FROM sapi_keg WHERE Tahun='".$tahun."'");
$db->Query("SELECT SUM(Rupiah".$field_map.") Pagu FROM sapi_keg WHERE Tahun='".$tahun."'");
if ($db->Next()) $tot_pagu = $db->Row("Pagu", 0);
$db->Query("SELECT IFNULL(L.LokasiID,0) LokasiID,A.Pagu FROM (SELECT KecID,SUM(Rupiah) Pagu FROM sapi_keg WHERE Tahun='".$tahun."' GROUP BY KecID) A LEFT JOIN para_lokasi L ON (L.LokasiID=A.KecID)");
$db->Query("SELECT IFNULL(L.LokasiID,0) LokasiID,A.Pagu FROM (SELECT KecID,SUM(Rupiah".$field_map.") Pagu FROM sapi_keg WHERE Tahun='".$tahun."' GROUP BY KecID) A LEFT JOIN para_lokasi L ON (L.LokasiID=A.KecID)");
while ($db->Next()) {
if ($db->Row("LokasiID", 0) == 0) continue;
$ajson['data'][] = ['id_kec'=>$db->Row("LokasiID"), 'value'=>uang2($db->Row("Pagu",0)>0?$tot_pagu/$db->Row("Pagu",0):0)];
@@ -81,7 +90,7 @@ if ( $data == "periode-show" ) {
} else if ( $data == "chart-bar" ) {
$ajson['tipe'] = "chart";
$db->Query("SELECT IFNULL(L.LokasiID,0) LokasiID,L.N_Lokasi,S.* FROM (SELECT KecID,SUM(IF(Jenis=1,Rupiah,0)) POK,SUM(IF(Jenis=2,Rupiah,0)) MUS,SUM(IF(Jenis=3,Rupiah,0)) REN FROM sapi_keg WHERE Tahun='".$tahun."' GROUP BY KecID) S LEFT JOIN para_lokasi L ON (L.LokasiID=S.KecID) ORDER BY L.K_Lokasi");
$db->Query("SELECT IFNULL(L.LokasiID,0) LokasiID,L.N_Lokasi,S.* FROM (SELECT KecID,SUM(IF(Jenis=1,Rupiah".$field_map.",0)) POK,SUM(IF(Jenis=2,Rupiah".$field_map.",0)) MUS,SUM(IF(Jenis=3,Rupiah".$field_map.",0)) REN FROM sapi_keg WHERE Tahun='".$tahun."' GROUP BY KecID) S LEFT JOIN para_lokasi L ON (L.LokasiID=S.KecID) ORDER BY L.K_Lokasi");
$adata['datasets'] = [];
$adata['labels'] = [];
apps/php/induk/asmas.php
+31 -43
View File
@@ -7,7 +7,7 @@
Desc. : PHP - Kegiatan Aspirasi Masyarakat
Created By : Siau Pheng ([email protected]).
Created Date : October 28th, 2011.
Last Modified : May 3rd, 2026.
Last Modified : May 6th, 2026.
(c) 2011 - 2026, 3FONIA Software; WWW.3FONIA.COM.
@@ -29,6 +29,7 @@ $mode = Param::Get("mode");
$mode_detail = Param::Get("mode_detail");
$thn_renja = $_SESSION['__WEB_APP']['REAL_THN'];
$thn_submap = $_SESSION['__WEB_APP']['SUBMAP_TAHUN'];
$field_map = $_SESSION['__WEB_APP']['REAL_FIELD'];
$id_sapi = Param::Get("SapiID", 0);
$id_kec = Param::Get("KecID", 0);
$id_kel = Param::Get("KelID", 0);
@@ -59,7 +60,7 @@ if ( in_array($data, ["tabel-kec","tabel-kel","tabel-keg"]) ) {
if ( $data == "tabel-kec" ) {
$obj = new Table($db);
$obj->set_query("SELECT K.*,IFNULL(K.ITEM_ERR,0) ITEM_ERR2,IF(IFNULL(K.ITEM_ERR,0)=0,0,1) ITEM_VER,M.LokasiID KecID2,M.K_Lokasi,M.N_Lokasi FROM para_lokasi M LEFT JOIN (SELECT KecID,COUNT(DISTINCT KelID) ITEM_KEL,COUNT(*) ITEM_KEG,SUM(IF(OPDID=0 OR KecID=0,1,0)) ITEM_ERR,SUM(Rupiah) TOT_RUPIAH FROM sapi_keg WHERE ".$qsql2." GROUP BY KecID) K ON (K.KecID=M.LokasiID) WHERE ".$msql);
$obj->set_query("SELECT K.*,IFNULL(K.ITEM_ERR,0) ITEM_ERR2,IF(IFNULL(K.ITEM_ERR,0)=0,0,1) ITEM_VER,M.LokasiID KecID2,M.K_Lokasi,M.N_Lokasi FROM para_lokasi M LEFT JOIN (SELECT KecID,COUNT(DISTINCT KelID) ITEM_KEL,COUNT(*) ITEM_KEG,SUM(IF(OPDID=0 OR KecID=0,1,0)) ITEM_ERR,SUM(Rupiah".$field_map.") TOT_RUPIAH FROM sapi_keg WHERE ".$qsql2." GROUP BY KecID) K ON (K.KecID=M.LokasiID) WHERE ".$msql);
$obj->add_field("KecID2", "ID", "hid");
$obj->add_field("K_Lokasi", "Kode", "c");
$obj->add_field("N_Lokasi", "Nama Kecamatan", "awr");
@@ -76,7 +77,7 @@ if ( $data == "tabel-kec" ) {
} else if ( $data == "tabel-kel" ) {
$obj = new Table($db);
$obj->set_query("SELECT K.*,IFNULL(K.ITEM_ERR,0) ITEM_ERR2,IF(IFNULL(K.ITEM_ERR,0)=0,0,1) ITEM_VER,M.LokasiID KelID2,M.K_Lokasi,M.N_Lokasi FROM para_lokasi M LEFT JOIN (SELECT KelID,COUNT(*) ITEM_KEG,SUM(IF(OPDID=0 OR KecID=0,1,0)) ITEM_ERR,SUM(Rupiah) TOT_RUPIAH FROM sapi_keg WHERE ".$qsql." GROUP BY KelID) K ON (K.KelID=M.LokasiID) WHERE ".$msql);
$obj->set_query("SELECT K.*,IFNULL(K.ITEM_ERR,0) ITEM_ERR2,IF(IFNULL(K.ITEM_ERR,0)=0,0,1) ITEM_VER,M.LokasiID KelID2,M.K_Lokasi,M.N_Lokasi FROM para_lokasi M LEFT JOIN (SELECT KelID,COUNT(*) ITEM_KEG,SUM(IF(OPDID=0 OR KecID=0,1,0)) ITEM_ERR,SUM(Rupiah".$field_map.") TOT_RUPIAH FROM sapi_keg WHERE ".$qsql." GROUP BY KelID) K ON (K.KelID=M.LokasiID) WHERE ".$msql);
$obj->add_field("KelID2", "ID", "hid");
$obj->add_field("K_Lokasi", "Kode", "c");
$obj->add_field("N_Lokasi", "Nama Kelurahan / Desa", "awr");
@@ -100,42 +101,37 @@ if ( $data == "tabel-kec" ) {
$sql->add_param("SubID");
$sql->add_param("Lokasi");
$sql->add_param("Masalah");
$sql->add_param("Rupiah");
$sql->add_param("Hidden");
$sql->add_param("Rupiah");
$sql->add_param("Rupiah_01");
$sql->add_param("Rupiah_02");
$sql->add_param("Rupiah_03");
$sql->add_param("Rupiah_04");
$sql->add_param("Rupiah_05");
$sql->add_param("Rupiah_06");
$sql->add_param("Rupiah_07");
$sql->add_param("Rupiah_08");
$sql->add_param("Rupiah_09");
$sql->add_param("Rupiah_10");
$sql->add_param("Rupiah_11");
$sql->add_param("Rupiah_12");
$sql->add_param("Pending_01");
$sql->add_param("Pending_02");
$sql->add_param("Pending_03");
$sql->add_param("Pending_04");
$sql->add_param("Pending_05");
$sql->add_param("Pending_06");
$sql->add_param("Pending_07");
$sql->add_param("Pending_08");
$sql->add_param("Pending_09");
$sql->add_param("Pending_10");
$sql->add_param("Pending_11");
$sql->add_param("Pending_12");
$sql->add_param_stamp();
$sql->add_param_userid();
$sql->add_where("Tahun", $thn_renja);
$sql->add_where("SapiID");
$sql2 = new SQL($db);
$sql2->set_table("sapi_keg_tag");
$sql2->add_param("Rupiah_01");
$sql2->add_param("Rupiah_02");
$sql2->add_param("Rupiah_03");
$sql2->add_param("Rupiah_04");
$sql2->add_param("Rupiah_05");
$sql2->add_param("Rupiah_06");
$sql2->add_param("Rupiah_07");
$sql2->add_param("Rupiah_08");
$sql2->add_param("Rupiah_09");
$sql2->add_param("Rupiah_10");
$sql2->add_param("Rupiah_11");
$sql2->add_param("Rupiah_12");
$sql2->add_param("Pending_01");
$sql2->add_param("Pending_02");
$sql2->add_param("Pending_03");
$sql2->add_param("Pending_04");
$sql2->add_param("Pending_05");
$sql2->add_param("Pending_06");
$sql2->add_param("Pending_07");
$sql2->add_param("Pending_08");
$sql2->add_param("Pending_09");
$sql2->add_param("Pending_10");
$sql2->add_param("Pending_11");
$sql2->add_param("Pending_12");
$sql2->add_where("Tahun", $thn_renja);
$sql2->add_where("SapiID");
switch ($mode_detail) {
case "insert":
$sql->add_param("Tahun", $thn_renja);
@@ -145,29 +141,23 @@ if ( $data == "tabel-kec" ) {
$sql->add_param("KelID");
$sql->add_param("Kode", Kegiatan_Baru($thn_renja, "M"));
$sql->InsertDB();
$_id = $sql->LastInsertID();
$sql2->add_param("SapiID", $_id);
$sql2->add_param("Tahun", $thn_renja);
$sql2->InsertDB();
break;
case "update":
$sql->UpdateDB();
$sql2->UpdateDB();
break;
case "delete":
//$sql->DeleteDB();
//$sql2->DeleteDB();
break;
}
}
$obj = new Table($db);
$obj->set_query("SELECT R.*,X.Nama_Sub FROM (SELECT *,IF(OPDID=0 OR KecID=0,1,0) ITEM_ERR FROM sapi_keg WHERE ".$qsql.") R LEFT JOIN (SELECT SubID,K_Sub,N_Sub,Nama_Sub FROM vi_para90_submap WHERE Tahun='".$aapp['SUBMAP_TAHUN']."') X ON (X.SubID=R.SubID)");
$obj->set_query("SELECT R.*,X.Nama_Sub FROM (SELECT *,Rupiah".$field_map." Rupiah_X,IF(OPDID=0 OR KecID=0,1,0) ITEM_ERR FROM sapi_keg WHERE ".$qsql.") R LEFT JOIN (SELECT SubID,K_Sub,N_Sub,Nama_Sub FROM vi_para90_submap WHERE Tahun='".$aapp['SUBMAP_TAHUN']."') X ON (X.SubID=R.SubID)");
$obj->add_field("SapiID", "ID", "hid");
$obj->add_field("Kode", "Kode", "c");
$obj->add_field("Nama_Sub", "Kegiatan Asmas", "l");
$obj->add_field("Lokasi", "Lokasi", "l");
$obj->add_field("Rupiah", "Pagu", "r", "rupiah");
$obj->add_field("Rupiah_X", "Pagu", "r", "rupiah");
$obj->add_field("ITEM_ERR", "Status", "c", "Kolom_Status2");
$obj->set_field_order("SIPD_UsulanID", "A");
$obj->set_row_color("ITEM_ERR", 1, "ryellow");
@@ -182,8 +172,6 @@ if ( $data == "tabel-kec" ) {
if ($id_sapi > 0) {
$db->Query("SELECT * FROM sapi_keg WHERE Tahun='".$thn_renja."' AND SapiID='".$id_sapi."' LIMIT 1");
if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
$db->Query("SELECT * FROM sapi_keg_tag WHERE Tahun='".$thn_renja."' AND SapiID='".$adetail['SapiID']."' LIMIT 1");
if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
if ($adetail['OPDID'] > 0) {
$db->Query("SELECT AK_Bidu FROM vi_para90_opd WHERE OPDID='".$adetail['OPDID']."' LIMIT 1");
if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
apps/php/induk/pokir.php
+30 -42
View File
@@ -7,7 +7,7 @@
Desc. : PHP - Kegiatan Pokir
Created By : Siau Pheng ([email protected]).
Created Date : October 28th, 2011.
Last Modified : May 3rd, 2026.
Last Modified : May 6th, 2026.
(c) 2011 - 2026, 3FONIA Software; WWW.3FONIA.COM.
@@ -29,6 +29,7 @@ $mode = Param::Get("mode");
$mode_detail = Param::Get("mode_detail");
$thn_renja = $_SESSION['__WEB_APP']['REAL_THN'];
$thn_submap = $_SESSION['__WEB_APP']['SUBMAP_TAHUN'];
$field_map = $_SESSION['__WEB_APP']['REAL_FIELD'];
$id_dprd = Param::Get("DPRDID", 0);
$id_dapil = Param::Get("DapilID", 0);
$id_sapi = Param::Get("SapiID", 0);
@@ -56,7 +57,7 @@ if ( in_array($data, ["tabel-dprd","tabel-keg"]) ) {
if ( $data == "tabel-dprd" ) {
$obj = new Table($db);
$obj->set_query("SELECT K.*,IFNULL(K.ITEM_ERR,0) ITEM_ERR2,IF(IFNULL(K.ITEM_ERR,0)=0,0,1) ITEM_VER,M.DPRDID DPRDID2,M.K_DPRD,M.N_DPRD,M.F_DPRD,M.DapilID,CONCAT(M.N_DPRD,' / Fraksi: ',M.F_DPRD,' / Komisi: ',M.Komisi_DPRD) Nama_Plus FROM para_dprd M LEFT JOIN (SELECT DPRDID,COUNT(*) ITEM_KEG,SUM(IF(OPDID=0 OR KecID=0,1,0)) ITEM_ERR,SUM(Rupiah) TOT_RUPIAH FROM sapi_keg WHERE ".$qsql." GROUP BY DPRDID) K ON (K.DPRDID=M.DPRDID) WHERE ".$msql);
$obj->set_query("SELECT K.*,IFNULL(K.ITEM_ERR,0) ITEM_ERR2,IF(IFNULL(K.ITEM_ERR,0)=0,0,1) ITEM_VER,M.DPRDID DPRDID2,M.K_DPRD,M.N_DPRD,M.F_DPRD,M.DapilID,CONCAT(M.N_DPRD,' / Fraksi: ',M.F_DPRD,' / Komisi: ',M.Komisi_DPRD) Nama_Plus FROM para_dprd M LEFT JOIN (SELECT DPRDID,COUNT(*) ITEM_KEG,SUM(IF(OPDID=0 OR KecID=0,1,0)) ITEM_ERR,SUM(Rupiah".$field_map.") TOT_RUPIAH FROM sapi_keg WHERE ".$qsql." GROUP BY DPRDID) K ON (K.DPRDID=M.DPRDID) WHERE ".$msql);
$obj->add_field("DPRDID2", "ID", "hid");
$obj->add_field("DapilID", "DapilID", "hid");
$obj->add_field("Nama_Plus", "Nama_Plus", "hid");
@@ -85,42 +86,37 @@ if ( $data == "tabel-dprd" ) {
$sql->add_param("KelID");
$sql->add_param("Lokasi");
$sql->add_param("Masalah");
$sql->add_param("Rupiah");
$sql->add_param("Hidden");
$sql->add_param("Rupiah");
$sql->add_param("Rupiah_01");
$sql->add_param("Rupiah_02");
$sql->add_param("Rupiah_03");
$sql->add_param("Rupiah_04");
$sql->add_param("Rupiah_05");
$sql->add_param("Rupiah_06");
$sql->add_param("Rupiah_07");
$sql->add_param("Rupiah_08");
$sql->add_param("Rupiah_09");
$sql->add_param("Rupiah_10");
$sql->add_param("Rupiah_11");
$sql->add_param("Rupiah_12");
$sql->add_param("Pending_01");
$sql->add_param("Pending_02");
$sql->add_param("Pending_03");
$sql->add_param("Pending_04");
$sql->add_param("Pending_05");
$sql->add_param("Pending_06");
$sql->add_param("Pending_07");
$sql->add_param("Pending_08");
$sql->add_param("Pending_09");
$sql->add_param("Pending_10");
$sql->add_param("Pending_11");
$sql->add_param("Pending_12");
$sql->add_param_stamp();
$sql->add_param_userid();
$sql->add_where("Tahun", $thn_renja);
$sql->add_where("SapiID");
$sql2 = new SQL($db);
$sql2->set_table("sapi_keg_tag");
$sql2->add_param("Rupiah_01");
$sql2->add_param("Rupiah_02");
$sql2->add_param("Rupiah_03");
$sql2->add_param("Rupiah_04");
$sql2->add_param("Rupiah_05");
$sql2->add_param("Rupiah_06");
$sql2->add_param("Rupiah_07");
$sql2->add_param("Rupiah_08");
$sql2->add_param("Rupiah_09");
$sql2->add_param("Rupiah_10");
$sql2->add_param("Rupiah_11");
$sql2->add_param("Rupiah_12");
$sql2->add_param("Pending_01");
$sql2->add_param("Pending_02");
$sql2->add_param("Pending_03");
$sql2->add_param("Pending_04");
$sql2->add_param("Pending_05");
$sql2->add_param("Pending_06");
$sql2->add_param("Pending_07");
$sql2->add_param("Pending_08");
$sql2->add_param("Pending_09");
$sql2->add_param("Pending_10");
$sql2->add_param("Pending_11");
$sql2->add_param("Pending_12");
$sql2->add_where("Tahun", $thn_renja);
$sql2->add_where("SapiID");
switch ($mode_detail) {
case "insert":
$sql->add_param("Tahun", $thn_renja);
@@ -129,29 +125,23 @@ if ( $data == "tabel-dprd" ) {
$sql->add_param("DPRDID");
$sql->add_param("Kode", Kegiatan_Baru($thn_renja, "P"));
$sql->InsertDB();
$_id = $sql->LastInsertID();
$sql2->add_param("SapiID", $_id);
$sql2->add_param("Tahun", $thn_renja);
$sql2->InsertDB();
break;
case "update":
$sql->UpdateDB();
$sql2->UpdateDB();
break;
case "delete":
//$sql->DeleteDB();
//$sql2->DeleteDB();
break;
}
}
$obj = new Table($db);
$obj->set_query("SELECT R.*,X.Nama_Sub FROM (SELECT *,IF(OPDID=0 OR KecID=0,1,0) ITEM_ERR FROM sapi_keg WHERE ".$qsql.") R LEFT JOIN (SELECT SubID,K_Sub,N_Sub,Nama_Sub FROM vi_para90_submap WHERE Tahun='".$aapp['SUBMAP_TAHUN']."') X ON (X.SubID=R.SubID)");
$obj->set_query("SELECT R.*,X.Nama_Sub FROM (SELECT *,Rupiah".$field_map." Rupiah_X,IF(OPDID=0 OR KecID=0,1,0) ITEM_ERR FROM sapi_keg WHERE ".$qsql.") R LEFT JOIN (SELECT SubID,K_Sub,N_Sub,Nama_Sub FROM vi_para90_submap WHERE Tahun='".$aapp['SUBMAP_TAHUN']."') X ON (X.SubID=R.SubID)");
$obj->add_field("SapiID", "ID", "hid");
$obj->add_field("Kode", "Kode", "c");
$obj->add_field("Nama_Sub", "Kegiatan Pokir", "l");
$obj->add_field("Lokasi", "Lokasi", "l");
$obj->add_field("Rupiah", "Pagu", "r", "rupiah");
$obj->add_field("Rupiah_X", "Pagu", "r", "rupiah");
$obj->add_field("ITEM_ERR", "Status", "c", "Kolom_Status2");
$obj->set_field_order("Kode", "A");
$obj->set_row_color("ITEM_ERR", 1, "ryellow");
@@ -173,8 +163,6 @@ if ( $data == "tabel-dprd" ) {
if ($id_sapi > 0) {
$db->Query("SELECT * FROM sapi_keg WHERE Tahun='".$thn_renja."' AND SapiID='".$id_sapi."' LIMIT 1");
if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
$db->Query("SELECT * FROM sapi_keg_tag WHERE Tahun='".$thn_renja."' AND SapiID='".$adetail['SapiID']."' LIMIT 1");
if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
if ($adetail['OPDID'] > 0) {
$db->Query("SELECT AK_Bidu FROM vi_para90_opd WHERE OPDID='".$adetail['OPDID']."' LIMIT 1");
if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
apps/php/induk/renja.php
+30 -42
View File
@@ -7,7 +7,7 @@
Desc. : PHP - Kegiatan Renja
Created By : Siau Pheng ([email protected]).
Created Date : October 28th, 2011.
Last Modified : May 3rd, 2026.
Last Modified : May 6th, 2026.
(c) 2011 - 2026, 3FONIA Software; WWW.3FONIA.COM.
@@ -29,6 +29,7 @@ $mode = Param::Get("mode");
$mode_detail = Param::Get("mode_detail");
$thn_renja = $_SESSION['__WEB_APP']['REAL_THN'];
$thn_submap = $_SESSION['__WEB_APP']['SUBMAP_TAHUN'];
$field_map = $_SESSION['__WEB_APP']['REAL_FIELD'];
$id_sapi = Param::Get("SapiID", 0);
$id_kec = Param::Get("KecID", 0);
$id_kel = Param::Get("KelID", 0);
@@ -54,7 +55,7 @@ if ( in_array($data, ["tabel-opd","tabel-keg"]) ) {
if ( $data == "tabel-opd" ) {
$obj = new Table($db);
$obj->set_query("SELECT K.*,IFNULL(K.ITEM_ERR,0) ITEM_ERR2,IF(IFNULL(K.ITEM_ERR,0)=0,0,1) ITEM_VER,M.OPDID OPDID2,M.K_OPD,M.N_OPD,M.Nama_OPD,M.AK_Bidu FROM vi_para90_opd M LEFT JOIN (SELECT OPDID,COUNT(*) ITEM_KEG,SUM(IF(OPDID=0 OR KecID=0,1,0)) ITEM_ERR,SUM(Rupiah) TOT_RUPIAH FROM sapi_keg WHERE ".$qsql." GROUP BY OPDID) K ON (K.OPDID=M.OPDID) WHERE ".$msql);
$obj->set_query("SELECT K.*,IFNULL(K.ITEM_ERR,0) ITEM_ERR2,IF(IFNULL(K.ITEM_ERR,0)=0,0,1) ITEM_VER,M.OPDID OPDID2,M.K_OPD,M.N_OPD,M.Nama_OPD,M.AK_Bidu FROM vi_para90_opd M LEFT JOIN (SELECT OPDID,COUNT(*) ITEM_KEG,SUM(IF(OPDID=0 OR KecID=0,1,0)) ITEM_ERR,SUM(Rupiah".$field_map.") TOT_RUPIAH FROM sapi_keg WHERE ".$qsql." GROUP BY OPDID) K ON (K.OPDID=M.OPDID) WHERE ".$msql);
$obj->add_field("OPDID2", "ID", "hid");
$obj->add_field("AK_Bidu", "AK_Bidu", "hid");
$obj->add_field("Nama_OPD", "Nama OPD", "hid");
@@ -81,42 +82,37 @@ if ( $data == "tabel-opd" ) {
$sql->add_param("KelID");
$sql->add_param("Lokasi");
$sql->add_param("Masalah");
$sql->add_param("Rupiah");
$sql->add_param("Hidden");
$sql->add_param("Rupiah");
$sql->add_param("Rupiah_01");
$sql->add_param("Rupiah_02");
$sql->add_param("Rupiah_03");
$sql->add_param("Rupiah_04");
$sql->add_param("Rupiah_05");
$sql->add_param("Rupiah_06");
$sql->add_param("Rupiah_07");
$sql->add_param("Rupiah_08");
$sql->add_param("Rupiah_09");
$sql->add_param("Rupiah_10");
$sql->add_param("Rupiah_11");
$sql->add_param("Rupiah_12");
$sql->add_param("Pending_01");
$sql->add_param("Pending_02");
$sql->add_param("Pending_03");
$sql->add_param("Pending_04");
$sql->add_param("Pending_05");
$sql->add_param("Pending_06");
$sql->add_param("Pending_07");
$sql->add_param("Pending_08");
$sql->add_param("Pending_09");
$sql->add_param("Pending_10");
$sql->add_param("Pending_11");
$sql->add_param("Pending_12");
$sql->add_param_stamp();
$sql->add_param_userid();
$sql->add_where("Tahun", $thn_renja);
$sql->add_where("SapiID");
$sql2 = new SQL($db);
$sql2->set_table("sapi_keg_tag");
$sql2->add_param("Rupiah_01");
$sql2->add_param("Rupiah_02");
$sql2->add_param("Rupiah_03");
$sql2->add_param("Rupiah_04");
$sql2->add_param("Rupiah_05");
$sql2->add_param("Rupiah_06");
$sql2->add_param("Rupiah_07");
$sql2->add_param("Rupiah_08");
$sql2->add_param("Rupiah_09");
$sql2->add_param("Rupiah_10");
$sql2->add_param("Rupiah_11");
$sql2->add_param("Rupiah_12");
$sql2->add_param("Pending_01");
$sql2->add_param("Pending_02");
$sql2->add_param("Pending_03");
$sql2->add_param("Pending_04");
$sql2->add_param("Pending_05");
$sql2->add_param("Pending_06");
$sql2->add_param("Pending_07");
$sql2->add_param("Pending_08");
$sql2->add_param("Pending_09");
$sql2->add_param("Pending_10");
$sql2->add_param("Pending_11");
$sql2->add_param("Pending_12");
$sql2->add_where("Tahun", $thn_renja);
$sql2->add_where("SapiID");
switch ($mode_detail) {
case "insert":
$sql->add_param("Tahun", $thn_renja);
@@ -125,29 +121,23 @@ if ( $data == "tabel-opd" ) {
$sql->add_param("OPDID");
$sql->add_param("Kode", Kegiatan_Baru($thn_renja, "R"));
$sql->InsertDB();
$_id = $sql->LastInsertID();
$sql2->add_param("SapiID", $_id);
$sql2->add_param("Tahun", $thn_renja);
$sql2->InsertDB();
break;
case "update":
$sql->UpdateDB();
$sql2->UpdateDB();
break;
case "delete":
//$sql->DeleteDB();
//$sql2->DeleteDB();
break;
}
}
$obj = new Table($db);
$obj->set_query("SELECT R.*,X.Nama_Sub FROM (SELECT *,IF(OPDID=0 OR KecID=0,1,0) ITEM_ERR FROM sapi_keg WHERE ".$qsql.") R LEFT JOIN (SELECT SubID,K_Sub,N_Sub,Nama_Sub FROM vi_para90_submap WHERE Tahun='".$aapp['SUBMAP_TAHUN']."') X ON (X.SubID=R.SubID)");
$obj->set_query("SELECT R.*,X.Nama_Sub FROM (SELECT *,Rupiah".$field_map." Rupiah_X,IF(OPDID=0 OR KecID=0,1,0) ITEM_ERR FROM sapi_keg WHERE ".$qsql.") R LEFT JOIN (SELECT SubID,K_Sub,N_Sub,Nama_Sub FROM vi_para90_submap WHERE Tahun='".$aapp['SUBMAP_TAHUN']."') X ON (X.SubID=R.SubID)");
$obj->add_field("SapiID", "ID", "hid");
$obj->add_field("Kode", "Kode", "c");
$obj->add_field("Nama_Sub", "Kegiatan Renja", "l");
$obj->add_field("Lokasi", "Lokasi", "l");
$obj->add_field("Rupiah", "Pagu", "r", "rupiah");
$obj->add_field("Rupiah_X", "Pagu", "r", "rupiah");
$obj->add_field("ITEM_ERR", "Status", "c", "Kolom_Status2");
$obj->set_field_order("Kode", "A");
$obj->set_row_color("ITEM_ERR", 1, "ryellow");
@@ -162,8 +152,6 @@ if ( $data == "tabel-opd" ) {
if ($id_sapi > 0) {
$db->Query("SELECT * FROM sapi_keg WHERE Tahun='".$thn_renja."' AND SapiID='".$id_sapi."' LIMIT 1");
if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
$db->Query("SELECT * FROM sapi_keg_tag WHERE Tahun='".$thn_renja."' AND SapiID='".$adetail['SapiID']."' LIMIT 1");
if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
}
$form = new Form($db);
apps/php/repo/browse.php
+11 -18
View File
@@ -27,9 +27,10 @@ $ajson = [];
$data = Param::Get("data");
$mode = Param::Get("mode");
$mode_detail = Param::Get("mode_detail");
$bln_renja = $_SESSION['__WEB_APP']['REAL_BLN'];
$thn_renja = $_SESSION['__WEB_APP']['REAL_THN'];
$thn_submap = $_SESSION['__WEB_APP']['SUBMAP_TAHUN'];
$bln_renja = Param::Get("Bulan", date('n'));
$field_map = $_SESSION['__WEB_APP']['REAL_FIELD'];
$id_jenis = Param::Get("Jenis", 0);
$tanda_pagu = Param::Get("Tanda_Pagu", "A");
$nilai_pagu = Param::Get("Nilai_Pagu", 0);
@@ -43,7 +44,6 @@ $aapp = $_SESSION['__WEB_APP'];
if ( in_array($data, ["tabel-keg","excel"]) ) {
$qsql1 = "Tahun='".$thn_renja."'";
$qsql2 = "Tahun='".$thn_renja."'";
if ($id_jenis > 0) $qsql1 .= " AND Jenis='".$id_jenis."'";
if ($id_dprd > 0) $qsql1 .= " AND DPRDID='".$id_dprd."'";
@@ -52,20 +52,19 @@ if ( in_array($data, ["tabel-keg","excel"]) ) {
if ($id_opd > 0) $qsql1 .= " AND OPDID='".$id_opd."'";
if ($id_sub > 0) $qsql1 .= " AND SubID='".$id_sub."'";
$bln_nol = isi_nol($bln_renja, 2);
if ($nilai_pagu > 0) $qsql2 .= " AND Rupiah_".$bln_nol.($tanda_pagu=="A"?">":"<").$nilai_pagu;
if ($nilai_pagu > 0) $qsql1 .= " AND Rupiah".$field_map.($tanda_pagu=="A"?">":"<").$nilai_pagu;
}
if ( $data == "tabel-keg" ) {
if ($kunci_cari <> "") $qsql1 .= " AND CONCAT(Kode,Lokasi) LIKE '%".$kunci_cari."%'";
$obj = new Table($db);
$obj->set_table("(SELECT *,IF(OPDID=0 OR KecID=0,1,0) ITEM_ERR FROM sapi_keg WHERE ".$qsql1.") R INNER JOIN (SELECT SapiID,Rupiah_".$bln_nol." Rupiah_X,Pending_".$bln_nol." Pending_X FROM sapi_keg_tag WHERE ".$qsql2.") T ON (T.SapiID=R.SapiID) LEFT JOIN (SELECT SubID,K_Sub,N_Sub,Nama_Sub FROM vi_para90_submap WHERE Tahun='".$aapp['SUBMAP_TAHUN']."') X ON (X.SubID=R.SubID)", "R.*,IFNULL(T.Rupiah_X,0) Rupiah_X,IFNULL(T.Pending_X,0) Pending_X,X.Nama_Sub", "");
$obj->set_table("(SELECT *,Rupiah".$field_map." Rupiah_X,Pending".$field_map." Pending_X,IF(OPDID=0 OR KecID=0,1,0) ITEM_ERR FROM sapi_keg WHERE ".$qsql1.") R LEFT JOIN (SELECT SubID,K_Sub,N_Sub,Nama_Sub FROM vi_para90_submap WHERE Tahun='".$aapp['SUBMAP_TAHUN']."') X ON (X.SubID=R.SubID)", "R.*,X.Nama_Sub", "");
$obj->add_field("SapiID", "ID", "hid");
$obj->add_field("Kode", "Kode", "c");
$obj->add_field("Nama_Sub", "Nama Sub Kegiatan", "l");
$obj->add_field("Lokasi", "Lokasi", "l");
$obj->add_field("Rupiah_X", "Pagu ".substr(bulan_array()[$bln_renja],0,3), "nwr r", "rupiah");
$obj->add_field("Rupiah_X", "Pagu", "r", "rupiah");
$obj->add_field("Pending_X", "Pend", "c", "checkbox");
$obj->add_field("Hidden", "Hidd", "c", "checkbox");
$obj->add_field("ITEM_ERR", "Status", "c", "Kolom_Status2");
@@ -73,13 +72,11 @@ if ( $data == "tabel-keg" ) {
$obj->set_row_color("ITEM_ERR", 1, "ryellow");
$obj->set_func_navi("RepoBrowseJS.data_query('tabel-keg')");
$ajson[] = $obj->db_table("divKEG");
$ajson[] = ['sql'=>"(SELECT *,IF(OPDID=0 OR KecID=0,1,0) ITEM_ERR FROM sapi_keg WHERE ".$qsql1.") R LEFT JOIN (SELECT SapiID,Rupiah_".$bln_nol." Rupiah_X,Pending_".$bln_nol." Pending_X FROM sapi_keg_tag WHERE ".$qsql2.") T ON (T.SapiID=R.SapiID) LEFT JOIN (SELECT SubID,K_Sub,N_Sub,Nama_Sub FROM vi_para90_submap WHERE Tahun='".$aapp['SUBMAP_TAHUN']."') X ON (X.SubID=R.SubID)"];
} else if ( $data == "detail_filter" ) {
$form = new Form($db);
$tjenis = $form->radio("_", "Fi_Jenis", $id_jenis, true, false, [0=>"Semua",1=>"Pokir",2=>"Asmas",3=>"Renja"]);
$tbulan = $form->option("_", "Fi_Bulan", $bln_renja, true, false, array_map(fn($i) => $i ." ". $thn_renja, bulan_array()));
$tpagu1 = '<div class="input-group-text"><input type="hidden" id="Fi_Tanda_Pagu" value="'.$tanda_pagu.'"><div class="form-check"><input class="form-check-input" type="radio" id="Fi_Tanda_PaguA" name="Fi_Tanda_Pagu" '.($tanda_pagu=="A"?'checked="checked"':'').' onclick="if(this.checked)$(\'#Fi_Tanda_Pagu\').val(\'A\');"><label class="form-check-label" for="Fi_Tanda_PaguA">&gt; Lebih Dari</label></div><div class="form-check ms-3"><input class="form-check-input" type="radio" id="Fi_Tanda_PaguZ" name="Fi_Tanda_Pagu" '.($tanda_pagu=="Z"?'checked="checked"':'').' onclick="if(this.checked)$(\'#Fi_Tanda_Pagu\').val(\'Z\');"><label class="form-check-label" for="Fi_Tanda_PaguZ">&lt; Kurang Dari</label></div></div>';
$tpagu1 = '<input type="hidden" id="Fi_Tanda_Pagu" value="'.$tanda_pagu.'"><div class="form-check form-check-inline"><input class="form-check-input" type="radio" id="Fi_Tanda_PaguA" name="Fi_Tanda_Pagu" '.($tanda_pagu=="A"?'checked="checked"':'').' onclick="if(this.checked)$(\'#Fi_Tanda_Pagu\').val(\'A\');"><label class="form-check-label" for="Fi_Tanda_PaguA">&gt; Lebih Dari</label></div><div class="form-check form-check-inline"><input class="form-check-input" type="radio" id="Fi_Tanda_PaguZ" name="Fi_Tanda_Pagu" '.($tanda_pagu=="Z"?'checked="checked"':'').' onclick="if(this.checked)$(\'#Fi_Tanda_Pagu\').val(\'Z\');"><label class="form-check-label" for="Fi_Tanda_PaguZ">&lt; Kurang Dari</label></div>';
$tpagu2 = $form->textbox("_", "Fi_Nilai_Pagu", $nilai_pagu, true, false, "double");
$tdprd = $form->option_que("_", "Fi_DPRDID", $id_dprd, true, false, "SELECT * FROM para_dprd WHERE Aktif=1 AND DPRDID IN (SELECT DPRDID FROM sapi_keg WHERE Tahun='".$thn_renja."') ORDER BY K_DPRD", ["DPRDID","N_DPRD"], [0,"SEMUA ANGGOTA DEWAN"]);
$topd = $form->option_que("_", "Fi_OPDID", $id_opd, true, false, "SELECT * FROM vi_para90_opd WHERE Aktif=1 AND OPDID IN (SELECT OPDID FROM sapi_keg WHERE Tahun='".$thn_renja."') ORDER BY K_OPD", ["OPDID","Nama_OPD"], [0,"SEMUA PERANGKAT DAERAH"], null, "RepoBrowseJS.oc_OPD()");
@@ -91,13 +88,10 @@ if ( $data == "tabel-keg" ) {
<label class="col-sm-4 col-lg-2 col-form-label" for="Fi_Jenis">Sumber Kegiatan</label>
<div class="col-sm-8 col-lg-10 col-form-label">'.$tjenis.'</div>
</div>
<div class="row mb-1">
<label class="col-sm-4 col-lg-2 col-form-label" for="Fi_Bulan">Periode Bulan</label>
<div class="col-sm-8 col-lg-10">'.$tbulan.'</div>
</div>
<div class="row mb-1">
<label class="col-sm-4 col-lg-2 col-form-label" for="Fi_Nilai_Pagu">Kriteria Pagu</label>
<div class="col-sm-8 col-lg-10"><div class="input-group">'.$tpagu1.$tpagu2.'</div></div>
<div class="col-sm-4 col-lg-5 col-form-label">'.$tpagu1.'</div>
<div class="col-sm-4 col-lg-5">'.$tpagu2.'</div>
</div>
<div class="row mb-1">
<label class="col-sm-4 col-lg-2 col-form-label" for="Fi_DPRDID">Anggota Dewan</label>
@@ -169,9 +163,9 @@ if ( $data == "tabel-keg" ) {
$tgl_header = bulan_array()[$bln_renja] . " " . $thn_renja;
if ($ex_hidden == 1) $qsql1 .= " AND Hidden=0";
if ($ex_pend == 1) $qsql2 .= " AND Pending_".$bln_nol."=0";
if ($ex_pend == 1) $qsql1 .= " AND Pending".$field_map."=0";
$db->Query("SELECT R.*,IFNULL(T.Rupiah_X,0) Rupiah_X,X.N_Sub,O.S_OPD FROM (SELECT SapiID,OPDID,SubID,Lokasi,Jenis FROM sapi_keg WHERE ".$qsql1.") R INNER JOIN (SELECT SapiID,Rupiah_".$bln_nol." Rupiah_X FROM sapi_keg_tag WHERE ".$qsql2.") T ON (T.SapiID=R.SapiID) LEFT JOIN (SELECT SubID,K_Sub,N_Sub,Nama_Sub FROM vi_para90_submap WHERE Tahun='".$aapp['SUBMAP_TAHUN']."') X ON (X.SubID=R.SubID) LEFT JOIN para90_opd O ON (O.OPDID=R.OPDID) ORDER BY O.K_OPD,X.K_Sub,R.Jenis");
$db->Query("SELECT R.*,X.N_Sub,O.S_OPD FROM (SELECT SapiID,OPDID,SubID,Lokasi,Jenis,Rupiah".$field_map." Rupiah_X FROM sapi_keg WHERE ".$qsql1.") R LEFT JOIN (SELECT SubID,K_Sub,N_Sub,Nama_Sub FROM vi_para90_submap WHERE Tahun='".$aapp['SUBMAP_TAHUN']."') X ON (X.SubID=R.SubID) LEFT JOIN para90_opd O ON (O.OPDID=R.OPDID) ORDER BY O.K_OPD,X.K_Sub,R.Jenis");
$xls = new SimpleXLS([
'title'=>"Data Pelaporan",
@@ -206,7 +200,7 @@ if ( $data == "tabel-keg" ) {
} else if ( $data == "default" ) {
echo '
<div class="fade-in">
<div class="card"><div class="card-header custom-style">Tampilan Data Pelaporan</div><div class="card-body">
<div class="card"><div class="card-header custom-style">Data Pelaporan :: '.bulan_array()[$bln_renja].' '.$thn_renja.'</div><div class="card-body">
<div class="row mb-1">
<div class="col">
<div class="input-group">
@@ -220,7 +214,6 @@ if ( $data == "tabel-keg" ) {
</div>
<div id="divKEG">&nbsp;</div>
<input type="hidden" id="Jenis" value="'.$id_jenis.'">
<input type="hidden" id="Bulan" value="'.$bln_renja.'">
<input type="hidden" id="Tanda_Pagu" value="'.$tanda_pagu.'">
<input type="hidden" id="Nilai_Pagu" value="'.$nilai_pagu.'">
<input type="hidden" id="DPRDID" value="'.$id_dprd.'">
apps/php/ubah/asmas.php
+31 -43
View File
@@ -7,7 +7,7 @@
Desc. : PHP - Perubahan Kegiatan Aspirasi Masyarakat
Created By : Siau Pheng ([email protected]).
Created Date : October 28th, 2011.
Last Modified : May 3rd, 2026.
Last Modified : May 6th, 2026.
(c) 2011 - 2026, 3FONIA Software; WWW.3FONIA.COM.
@@ -29,6 +29,7 @@ $mode = Param::Get("mode");
$mode_detail = Param::Get("mode_detail");
$thn_renja = $_SESSION['__WEB_APP']['REAL_THN'];
$thn_submap = $_SESSION['__WEB_APP']['SUBMAP_TAHUN'];
$field_map = $_SESSION['__WEB_APP']['REAL_FIELD'];
$id_sapi = Param::Get("SapiID", 0);
$id_kec = Param::Get("KecID", 0);
$id_kel = Param::Get("KelID", 0);
@@ -59,7 +60,7 @@ if ( in_array($data, ["tabel-kec","tabel-kel","tabel-keg"]) ) {
if ( $data == "tabel-kec" ) {
$obj = new Table($db);
$obj->set_query("SELECT K.*,IFNULL(K.ITEM_ERR,0) ITEM_ERR2,IF(IFNULL(K.ITEM_ERR,0)=0,0,1) ITEM_VER,M.LokasiID KecID2,M.K_Lokasi,M.N_Lokasi FROM para_lokasi M LEFT JOIN (SELECT KecID,COUNT(DISTINCT KelID) ITEM_KEL,COUNT(*) ITEM_KEG,SUM(IF(OPDID=0 OR KecID=0,1,0)) ITEM_ERR,SUM(Rupiah) TOT_RUPIAH FROM sapi_keg WHERE ".$qsql2." GROUP BY KecID) K ON (K.KecID=M.LokasiID) WHERE ".$msql);
$obj->set_query("SELECT K.*,IFNULL(K.ITEM_ERR,0) ITEM_ERR2,IF(IFNULL(K.ITEM_ERR,0)=0,0,1) ITEM_VER,M.LokasiID KecID2,M.K_Lokasi,M.N_Lokasi FROM para_lokasi M LEFT JOIN (SELECT KecID,COUNT(DISTINCT KelID) ITEM_KEL,COUNT(*) ITEM_KEG,SUM(IF(OPDID=0 OR KecID=0,1,0)) ITEM_ERR,SUM(Rupiah".$field_map.") TOT_RUPIAH FROM sapi_keg WHERE ".$qsql2." GROUP BY KecID) K ON (K.KecID=M.LokasiID) WHERE ".$msql);
$obj->add_field("KecID2", "ID", "hid");
$obj->add_field("K_Lokasi", "Kode", "c");
$obj->add_field("N_Lokasi", "Nama Kecamatan", "awr");
@@ -76,7 +77,7 @@ if ( $data == "tabel-kec" ) {
} else if ( $data == "tabel-kel" ) {
$obj = new Table($db);
$obj->set_query("SELECT K.*,IFNULL(K.ITEM_ERR,0) ITEM_ERR2,IF(IFNULL(K.ITEM_ERR,0)=0,0,1) ITEM_VER,M.LokasiID KelID2,M.K_Lokasi,M.N_Lokasi FROM para_lokasi M LEFT JOIN (SELECT KelID,COUNT(*) ITEM_KEG,SUM(IF(OPDID=0 OR KecID=0,1,0)) ITEM_ERR,SUM(Rupiah) TOT_RUPIAH FROM sapi_keg WHERE ".$qsql." GROUP BY KelID) K ON (K.KelID=M.LokasiID) WHERE ".$msql);
$obj->set_query("SELECT K.*,IFNULL(K.ITEM_ERR,0) ITEM_ERR2,IF(IFNULL(K.ITEM_ERR,0)=0,0,1) ITEM_VER,M.LokasiID KelID2,M.K_Lokasi,M.N_Lokasi FROM para_lokasi M LEFT JOIN (SELECT KelID,COUNT(*) ITEM_KEG,SUM(IF(OPDID=0 OR KecID=0,1,0)) ITEM_ERR,SUM(Rupiah".$field_map.") TOT_RUPIAH FROM sapi_keg WHERE ".$qsql." GROUP BY KelID) K ON (K.KelID=M.LokasiID) WHERE ".$msql);
$obj->add_field("KelID2", "ID", "hid");
$obj->add_field("K_Lokasi", "Kode", "c");
$obj->add_field("N_Lokasi", "Nama Kelurahan / Desa", "awr");
@@ -100,42 +101,37 @@ if ( $data == "tabel-kec" ) {
$sql->add_param("SubID");
$sql->add_param("Lokasi");
$sql->add_param("Masalah");
$sql->add_param("Rupiah");
$sql->add_param("Hidden");
$sql->add_param("Rupiah");
$sql->add_param("Rupiah_01");
$sql->add_param("Rupiah_02");
$sql->add_param("Rupiah_03");
$sql->add_param("Rupiah_04");
$sql->add_param("Rupiah_05");
$sql->add_param("Rupiah_06");
$sql->add_param("Rupiah_07");
$sql->add_param("Rupiah_08");
$sql->add_param("Rupiah_09");
$sql->add_param("Rupiah_10");
$sql->add_param("Rupiah_11");
$sql->add_param("Rupiah_12");
$sql->add_param("Pending_01");
$sql->add_param("Pending_02");
$sql->add_param("Pending_03");
$sql->add_param("Pending_04");
$sql->add_param("Pending_05");
$sql->add_param("Pending_06");
$sql->add_param("Pending_07");
$sql->add_param("Pending_08");
$sql->add_param("Pending_09");
$sql->add_param("Pending_10");
$sql->add_param("Pending_11");
$sql->add_param("Pending_12");
$sql->add_param_stamp();
$sql->add_param_userid();
$sql->add_where("Tahun", $thn_renja);
$sql->add_where("SapiID");
$sql2 = new SQL($db);
$sql2->set_table("sapi_keg_tag");
$sql2->add_param("Rupiah_01");
$sql2->add_param("Rupiah_02");
$sql2->add_param("Rupiah_03");
$sql2->add_param("Rupiah_04");
$sql2->add_param("Rupiah_05");
$sql2->add_param("Rupiah_06");
$sql2->add_param("Rupiah_07");
$sql2->add_param("Rupiah_08");
$sql2->add_param("Rupiah_09");
$sql2->add_param("Rupiah_10");
$sql2->add_param("Rupiah_11");
$sql2->add_param("Rupiah_12");
$sql2->add_param("Pending_01");
$sql2->add_param("Pending_02");
$sql2->add_param("Pending_03");
$sql2->add_param("Pending_04");
$sql2->add_param("Pending_05");
$sql2->add_param("Pending_06");
$sql2->add_param("Pending_07");
$sql2->add_param("Pending_08");
$sql2->add_param("Pending_09");
$sql2->add_param("Pending_10");
$sql2->add_param("Pending_11");
$sql2->add_param("Pending_12");
$sql2->add_where("Tahun", $thn_renja);
$sql2->add_where("SapiID");
switch ($mode_detail) {
case "insert":
$sql->add_param("Tahun", $thn_renja);
@@ -145,30 +141,24 @@ if ( $data == "tabel-kec" ) {
$sql->add_param("KelID");
$sql->add_param("Kode", Kegiatan_Baru($thn_renja, "M"));
$sql->InsertDB();
$_id = $sql->LastInsertID();
$sql2->add_param("SapiID", $_id);
$sql2->add_param("Tahun", $thn_renja);
$sql2->InsertDB();
break;
case "update":
$sql->UpdateDB();
$sql2->UpdateDB();
break;
case "delete":
//$sql->DeleteDB();
//$sql2->DeleteDB();
break;
}
}
$obj = new Table($db);
$obj->set_query("SELECT R.*,X.Nama_Sub FROM (SELECT *,IF(OPDID=0 OR KecID=0,1,0) ITEM_ERR FROM sapi_keg WHERE ".$qsql.") R LEFT JOIN (SELECT SubID,K_Sub,N_Sub,Nama_Sub FROM vi_para90_submap WHERE Tahun='".$aapp['SUBMAP_TAHUN']."') X ON (X.SubID=R.SubID)");
$obj->set_query("SELECT R.*,X.Nama_Sub FROM (SELECT *,Rupiah".$field_map." Rupiah_X,IF(OPDID=0 OR KecID=0,1,0) ITEM_ERR FROM sapi_keg WHERE ".$qsql.") R LEFT JOIN (SELECT SubID,K_Sub,N_Sub,Nama_Sub FROM vi_para90_submap WHERE Tahun='".$aapp['SUBMAP_TAHUN']."') X ON (X.SubID=R.SubID)");
$obj->add_field("SapiID", "ID1", "hid");
$obj->add_field("Tahapan", "ID2", "hid");
$obj->add_field("Kode", "Kode", "c");
$obj->add_field("Nama_Sub", "Kegiatan Asmas", "l");
$obj->add_field("Lokasi", "Lokasi", "l");
$obj->add_field("Rupiah", "Pagu", "r", "rupiah");
$obj->add_field("Rupiah_X", "Pagu", "r", "rupiah");
$obj->add_field("ITEM_ERR", "Status", "c", "Kolom_Status2");
$obj->set_field_order("SIPD_UsulanID", "A");
$obj->set_row_color("ITEM_ERR", 1, "ryellow");
@@ -184,8 +174,6 @@ if ( $data == "tabel-kec" ) {
if ($id_sapi > 0) {
$db->Query("SELECT * FROM sapi_keg WHERE Tahun='".$thn_renja."' AND SapiID='".$id_sapi."' LIMIT 1");
if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
$db->Query("SELECT * FROM sapi_keg_tag WHERE Tahun='".$thn_renja."' AND SapiID='".$adetail['SapiID']."' LIMIT 1");
if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
if ($adetail['OPDID'] > 0) {
$db->Query("SELECT AK_Bidu FROM vi_para90_opd WHERE OPDID='".$adetail['OPDID']."' LIMIT 1");
if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
apps/php/ubah/pokir.php
+30 -42
View File
@@ -7,7 +7,7 @@
Desc. : PHP - Perubahan Kegiatan Pokir
Created By : Siau Pheng ([email protected]).
Created Date : October 28th, 2011.
Last Modified : May 3rd, 2026.
Last Modified : May 6th, 2026.
(c) 2011 - 2026, 3FONIA Software; WWW.3FONIA.COM.
@@ -29,6 +29,7 @@ $mode = Param::Get("mode");
$mode_detail = Param::Get("mode_detail");
$thn_renja = $_SESSION['__WEB_APP']['REAL_THN'];
$thn_submap = $_SESSION['__WEB_APP']['SUBMAP_TAHUN'];
$field_map = $_SESSION['__WEB_APP']['REAL_FIELD'];
$id_dprd = Param::Get("DPRDID", 0);
$id_dapil = Param::Get("DapilID", 0);
$id_sapi = Param::Get("SapiID", 0);
@@ -56,7 +57,7 @@ if ( in_array($data, ["tabel-dprd","tabel-keg"]) ) {
if ( $data == "tabel-dprd" ) {
$obj = new Table($db);
$obj->set_query("SELECT K.*,IFNULL(K.ITEM_ERR,0) ITEM_ERR2,IF(IFNULL(K.ITEM_ERR,0)=0,0,1) ITEM_VER,M.DPRDID DPRDID2,M.K_DPRD,M.N_DPRD,M.F_DPRD,M.DapilID,CONCAT(M.N_DPRD,' / Fraksi: ',M.F_DPRD,' / Komisi: ',M.Komisi_DPRD) Nama_Plus FROM para_dprd M LEFT JOIN (SELECT DPRDID,COUNT(*) ITEM_KEG,SUM(IF(OPDID=0 OR KecID=0,1,0)) ITEM_ERR,SUM(Rupiah) TOT_RUPIAH FROM sapi_keg WHERE ".$qsql." GROUP BY DPRDID) K ON (K.DPRDID=M.DPRDID) WHERE ".$msql);
$obj->set_query("SELECT K.*,IFNULL(K.ITEM_ERR,0) ITEM_ERR2,IF(IFNULL(K.ITEM_ERR,0)=0,0,1) ITEM_VER,M.DPRDID DPRDID2,M.K_DPRD,M.N_DPRD,M.F_DPRD,M.DapilID,CONCAT(M.N_DPRD,' / Fraksi: ',M.F_DPRD,' / Komisi: ',M.Komisi_DPRD) Nama_Plus FROM para_dprd M LEFT JOIN (SELECT DPRDID,COUNT(*) ITEM_KEG,SUM(IF(OPDID=0 OR KecID=0,1,0)) ITEM_ERR,SUM(Rupiah".$field_map.") TOT_RUPIAH FROM sapi_keg WHERE ".$qsql." GROUP BY DPRDID) K ON (K.DPRDID=M.DPRDID) WHERE ".$msql);
$obj->add_field("DPRDID2", "ID", "hid");
$obj->add_field("DapilID", "DapilID", "hid");
$obj->add_field("Nama_Plus", "Nama_Plus", "hid");
@@ -85,42 +86,37 @@ if ( $data == "tabel-dprd" ) {
$sql->add_param("KelID");
$sql->add_param("Lokasi");
$sql->add_param("Masalah");
$sql->add_param("Rupiah");
$sql->add_param("Hidden");
$sql->add_param("Rupiah");
$sql->add_param("Rupiah_01");
$sql->add_param("Rupiah_02");
$sql->add_param("Rupiah_03");
$sql->add_param("Rupiah_04");
$sql->add_param("Rupiah_05");
$sql->add_param("Rupiah_06");
$sql->add_param("Rupiah_07");
$sql->add_param("Rupiah_08");
$sql->add_param("Rupiah_09");
$sql->add_param("Rupiah_10");
$sql->add_param("Rupiah_11");
$sql->add_param("Rupiah_12");
$sql->add_param("Pending_01");
$sql->add_param("Pending_02");
$sql->add_param("Pending_03");
$sql->add_param("Pending_04");
$sql->add_param("Pending_05");
$sql->add_param("Pending_06");
$sql->add_param("Pending_07");
$sql->add_param("Pending_08");
$sql->add_param("Pending_09");
$sql->add_param("Pending_10");
$sql->add_param("Pending_11");
$sql->add_param("Pending_12");
$sql->add_param_stamp();
$sql->add_param_userid();
$sql->add_where("Tahun", $thn_renja);
$sql->add_where("SapiID");
$sql2 = new SQL($db);
$sql2->set_table("sapi_keg_tag");
$sql2->add_param("Rupiah_01");
$sql2->add_param("Rupiah_02");
$sql2->add_param("Rupiah_03");
$sql2->add_param("Rupiah_04");
$sql2->add_param("Rupiah_05");
$sql2->add_param("Rupiah_06");
$sql2->add_param("Rupiah_07");
$sql2->add_param("Rupiah_08");
$sql2->add_param("Rupiah_09");
$sql2->add_param("Rupiah_10");
$sql2->add_param("Rupiah_11");
$sql2->add_param("Rupiah_12");
$sql2->add_param("Pending_01");
$sql2->add_param("Pending_02");
$sql2->add_param("Pending_03");
$sql2->add_param("Pending_04");
$sql2->add_param("Pending_05");
$sql2->add_param("Pending_06");
$sql2->add_param("Pending_07");
$sql2->add_param("Pending_08");
$sql2->add_param("Pending_09");
$sql2->add_param("Pending_10");
$sql2->add_param("Pending_11");
$sql2->add_param("Pending_12");
$sql2->add_where("Tahun", $thn_renja);
$sql2->add_where("SapiID");
switch ($mode_detail) {
case "insert":
$sql->add_param("Tahun", $thn_renja);
@@ -129,30 +125,24 @@ if ( $data == "tabel-dprd" ) {
$sql->add_param("DPRDID");
$sql->add_param("Kode", Kegiatan_Baru($thn_renja, "P"));
$sql->InsertDB();
$_id = $sql->LastInsertID();
$sql2->add_param("SapiID", $_id);
$sql2->add_param("Tahun", $thn_renja);
$sql2->InsertDB();
break;
case "update":
$sql->UpdateDB();
$sql2->UpdateDB();
break;
case "delete":
//$sql->DeleteDB();
//$sql2->DeleteDB();
break;
}
}
$obj = new Table($db);
$obj->set_query("SELECT R.*,X.Nama_Sub FROM (SELECT *,IF(OPDID=0 OR KecID=0,1,0) ITEM_ERR FROM sapi_keg WHERE ".$qsql.") R LEFT JOIN (SELECT SubID,K_Sub,N_Sub,Nama_Sub FROM vi_para90_submap WHERE Tahun='".$aapp['SUBMAP_TAHUN']."') X ON (X.SubID=R.SubID)");
$obj->set_query("SELECT R.*,X.Nama_Sub FROM (SELECT *,Rupiah".$field_map." Rupiah_X,IF(OPDID=0 OR KecID=0,1,0) ITEM_ERR FROM sapi_keg WHERE ".$qsql.") R LEFT JOIN (SELECT SubID,K_Sub,N_Sub,Nama_Sub FROM vi_para90_submap WHERE Tahun='".$aapp['SUBMAP_TAHUN']."') X ON (X.SubID=R.SubID)");
$obj->add_field("SapiID", "ID1", "hid");
$obj->add_field("Tahapan", "ID2", "hid");
$obj->add_field("Kode", "Kode", "c");
$obj->add_field("Nama_Sub", "Kegiatan Pokir", "l");
$obj->add_field("Lokasi", "Lokasi", "l");
$obj->add_field("Rupiah", "Pagu", "r", "rupiah");
$obj->add_field("Rupiah_X", "Pagu", "r", "rupiah");
$obj->add_field("ITEM_ERR", "Status", "c", "Kolom_Status2");
$obj->set_field_order("Kode", "A");
$obj->set_row_color("ITEM_ERR", 1, "ryellow");
@@ -175,8 +165,6 @@ if ( $data == "tabel-dprd" ) {
if ($id_sapi > 0) {
$db->Query("SELECT * FROM sapi_keg WHERE Tahun='".$thn_renja."' AND SapiID='".$id_sapi."' LIMIT 1");
if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
$db->Query("SELECT * FROM sapi_keg_tag WHERE Tahun='".$thn_renja."' AND SapiID='".$adetail['SapiID']."' LIMIT 1");
if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
if ($adetail['OPDID'] > 0) {
$db->Query("SELECT AK_Bidu FROM vi_para90_opd WHERE OPDID='".$adetail['OPDID']."' LIMIT 1");
if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
apps/php/ubah/renja.php
+30 -42
View File
@@ -7,7 +7,7 @@
Desc. : PHP - Perubahan Kegiatan Renja
Created By : Siau Pheng ([email protected]).
Created Date : October 28th, 2011.
Last Modified : May 3rd, 2026.
Last Modified : May 6th, 2026.
(c) 2011 - 2026, 3FONIA Software; WWW.3FONIA.COM.
@@ -29,6 +29,7 @@ $mode = Param::Get("mode");
$mode_detail = Param::Get("mode_detail");
$thn_renja = $_SESSION['__WEB_APP']['REAL_THN'];
$thn_submap = $_SESSION['__WEB_APP']['SUBMAP_TAHUN'];
$field_map = $_SESSION['__WEB_APP']['REAL_FIELD'];
$id_sapi = Param::Get("SapiID", 0);
$id_kec = Param::Get("KecID", 0);
$id_kel = Param::Get("KelID", 0);
@@ -54,7 +55,7 @@ if ( in_array($data, ["tabel-opd","tabel-keg"]) ) {
if ( $data == "tabel-opd" ) {
$obj = new Table($db);
$obj->set_query("SELECT K.*,IFNULL(K.ITEM_ERR,0) ITEM_ERR2,IF(IFNULL(K.ITEM_ERR,0)=0,0,1) ITEM_VER,M.OPDID OPDID2,M.K_OPD,M.N_OPD,M.Nama_OPD,M.AK_Bidu FROM vi_para90_opd M LEFT JOIN (SELECT OPDID,COUNT(*) ITEM_KEG,SUM(IF(OPDID=0 OR KecID=0,1,0)) ITEM_ERR,SUM(Rupiah) TOT_RUPIAH FROM sapi_keg WHERE ".$qsql." GROUP BY OPDID) K ON (K.OPDID=M.OPDID) WHERE ".$msql);
$obj->set_query("SELECT K.*,IFNULL(K.ITEM_ERR,0) ITEM_ERR2,IF(IFNULL(K.ITEM_ERR,0)=0,0,1) ITEM_VER,M.OPDID OPDID2,M.K_OPD,M.N_OPD,M.Nama_OPD,M.AK_Bidu FROM vi_para90_opd M LEFT JOIN (SELECT OPDID,COUNT(*) ITEM_KEG,SUM(IF(OPDID=0 OR KecID=0,1,0)) ITEM_ERR,SUM(Rupiah".$field_map.") TOT_RUPIAH FROM sapi_keg WHERE ".$qsql." GROUP BY OPDID) K ON (K.OPDID=M.OPDID) WHERE ".$msql);
$obj->add_field("OPDID2", "ID", "hid");
$obj->add_field("AK_Bidu", "AK_Bidu", "hid");
$obj->add_field("Nama_OPD", "Nama OPD", "hid");
@@ -81,42 +82,37 @@ if ( $data == "tabel-opd" ) {
$sql->add_param("KelID");
$sql->add_param("Lokasi");
$sql->add_param("Masalah");
$sql->add_param("Rupiah");
$sql->add_param("Hidden");
$sql->add_param("Rupiah");
$sql->add_param("Rupiah_01");
$sql->add_param("Rupiah_02");
$sql->add_param("Rupiah_03");
$sql->add_param("Rupiah_04");
$sql->add_param("Rupiah_05");
$sql->add_param("Rupiah_06");
$sql->add_param("Rupiah_07");
$sql->add_param("Rupiah_08");
$sql->add_param("Rupiah_09");
$sql->add_param("Rupiah_10");
$sql->add_param("Rupiah_11");
$sql->add_param("Rupiah_12");
$sql->add_param("Pending_01");
$sql->add_param("Pending_02");
$sql->add_param("Pending_03");
$sql->add_param("Pending_04");
$sql->add_param("Pending_05");
$sql->add_param("Pending_06");
$sql->add_param("Pending_07");
$sql->add_param("Pending_08");
$sql->add_param("Pending_09");
$sql->add_param("Pending_10");
$sql->add_param("Pending_11");
$sql->add_param("Pending_12");
$sql->add_param_stamp();
$sql->add_param_userid();
$sql->add_where("Tahun", $thn_renja);
$sql->add_where("SapiID");
$sql2 = new SQL($db);
$sql2->set_table("sapi_keg_tag");
$sql2->add_param("Rupiah_01");
$sql2->add_param("Rupiah_02");
$sql2->add_param("Rupiah_03");
$sql2->add_param("Rupiah_04");
$sql2->add_param("Rupiah_05");
$sql2->add_param("Rupiah_06");
$sql2->add_param("Rupiah_07");
$sql2->add_param("Rupiah_08");
$sql2->add_param("Rupiah_09");
$sql2->add_param("Rupiah_10");
$sql2->add_param("Rupiah_11");
$sql2->add_param("Rupiah_12");
$sql2->add_param("Pending_01");
$sql2->add_param("Pending_02");
$sql2->add_param("Pending_03");
$sql2->add_param("Pending_04");
$sql2->add_param("Pending_05");
$sql2->add_param("Pending_06");
$sql2->add_param("Pending_07");
$sql2->add_param("Pending_08");
$sql2->add_param("Pending_09");
$sql2->add_param("Pending_10");
$sql2->add_param("Pending_11");
$sql2->add_param("Pending_12");
$sql2->add_where("Tahun", $thn_renja);
$sql2->add_where("SapiID");
switch ($mode_detail) {
case "insert":
$sql->add_param("Tahun", $thn_renja);
@@ -125,30 +121,24 @@ if ( $data == "tabel-opd" ) {
$sql->add_param("OPDID");
$sql->add_param("Kode", Kegiatan_Baru($thn_renja, "R"));
$sql->InsertDB();
$_id = $sql->LastInsertID();
$sql2->add_param("SapiID", $_id);
$sql2->add_param("Tahun", $thn_renja);
$sql2->InsertDB();
break;
case "update":
$sql->UpdateDB();
$sql2->UpdateDB();
break;
case "delete":
//$sql->DeleteDB();
//$sql2->DeleteDB();
break;
}
}
$obj = new Table($db);
$obj->set_query("SELECT R.*,X.Nama_Sub FROM (SELECT *,IF(OPDID=0 OR KecID=0,1,0) ITEM_ERR FROM sapi_keg WHERE ".$qsql.") R LEFT JOIN (SELECT SubID,K_Sub,N_Sub,Nama_Sub FROM vi_para90_submap WHERE Tahun='".$aapp['SUBMAP_TAHUN']."') X ON (X.SubID=R.SubID)");
$obj->set_query("SELECT R.*,X.Nama_Sub FROM (SELECT *,Rupiah".$field_map." Rupiah_X,IF(OPDID=0 OR KecID=0,1,0) ITEM_ERR FROM sapi_keg WHERE ".$qsql.") R LEFT JOIN (SELECT SubID,K_Sub,N_Sub,Nama_Sub FROM vi_para90_submap WHERE Tahun='".$aapp['SUBMAP_TAHUN']."') X ON (X.SubID=R.SubID)");
$obj->add_field("SapiID", "ID1", "hid");
$obj->add_field("Tahapan", "ID2", "hid");
$obj->add_field("Kode", "Kode", "c");
$obj->add_field("Nama_Sub", "Kegiatan Renja", "l");
$obj->add_field("Lokasi", "Lokasi", "l");
$obj->add_field("Rupiah", "Pagu", "r", "rupiah");
$obj->add_field("Rupiah_X", "Pagu", "r", "rupiah");
$obj->add_field("ITEM_ERR", "Status", "c", "Kolom_Status2");
$obj->set_field_order("Kode", "A");
$obj->set_row_color("ITEM_ERR", 1, "ryellow");
@@ -164,8 +154,6 @@ if ( $data == "tabel-opd" ) {
if ($id_sapi > 0) {
$db->Query("SELECT * FROM sapi_keg WHERE Tahun='".$thn_renja."' AND SapiID='".$id_sapi."' LIMIT 1");
if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
$db->Query("SELECT * FROM sapi_keg_tag WHERE Tahun='".$thn_renja."' AND SapiID='".$adetail['SapiID']."' LIMIT 1");
if ($db->Next()) $adetail = array_merge($adetail, $db->AllRow());
if ($adetail['Tahapan'] == 1) $enable = false;
}