commit pertama

2026-01-30 13:07:53 +07:00
commit 48199537d4
303 changed files with 136097 additions and 0 deletions
@@ -0,0 +1,122 @@
+<?php
+
+/*******************************************************************
+
+    App. Name     : SISTEM INFORMASI PERENCANAAN PEMBANGUNAN DAERAH
+    Module        : /apps/php/pok/data_usul_dewan.php
+    Desc.         : PHP - Export Data Usulan / Dewan
+    Created By    : Siau Pheng ([email protected]).
+    Created Date  : March 19th, 2020.
+    Last Modified : May 4th, 2020.
+
+    (c) 2020, 3FONIA Software; WWW.3FONIA.COM.
+
+*******************************************************************/
+
+require_once(dirname(__FILE__)."/../../../../../modules/web.auth.php");
+require_once(dirname(__FILE__)."/../../../../../modules/web.form.php");
+require_once(dirname(__FILE__)."/../../../../../modules/data.xls.php");
+require_once(dirname(__FILE__)."/../func.sippd.php");
+
+function report_show() {
+    $id_dprd = ($_SESSION['__WEB_USER']['Level']==5) ? $_SESSION['__WEB_USER']['DPRDID'] : 0;
+	form_clear();
+    form_option("Tahun", $_SESSION['__WEB_USER']['TAHUN_RENJA'], "enabled", "para_periode", array("Tahun","Tahun"));
+    form_option("DPRDID", $id_dprd, "enabled", "para_dprd", array("DPRDID","N_DPRD"), "", "Aktif=1 ORDER BY N_DPRD", ($_SESSION['__WEB_USER']['Level']==5?"":array(0,"SEMUA DEWAN")));
+    form_radio_array("BAksi", 9, "enabled", array(9=>"Semua",1=>"Diterima",2=>"Ditolak",0=>"Belum"));
+    form_radio_array("OAksi", 9, "enabled", array(9=>"Semua",1=>"Diterima",2=>"Ditolak",0=>"Belum"));
+	form_show('<table width="100%" height="180">
+    <tr>
+      <td width="150">Tahun Data</td>
+      <td>_Tahun_</td>
+    </tr>
+    <tr>
+      <td>Nama Dewan</td>
+      <td>_DPRDID_</td>
+    </tr>
+    <tr>
+      <td colspan="2"><hr></td>
+    </tr>
+    <tr>
+      <td>Verifikasi Bappeda</td>
+      <td>_BAksi_</td>
+    </tr>
+    <tr>
+      <td>Verifikasi OPD</td>
+      <td>_OAksi_</td>
+    </tr>
+    </table>');
+}
+
+/************************** RESPON HERE ***************************/
+
+$db = DB();
+$data = $ap->getParam("data");
+$id_rpjmd = $_SESSION['__WEB_APP']['RENC_RPJMDID'];
+$tahun = $ap->getParam("Tahun", $_SESSION['__WEB_USER']['TAHUN_RENJA']);
+$id_dprd = $ap->getParam("DPRDID", 0);
+$ak_b = $ap->getParam("BAksi", 0);
+$ak_o = $ap->getParam("OAksi", 0);
+
+if ( $data == "excel" ) {
+    $tsql = ($id_dprd==0) ? "" : " AND DPRDID='".$id_dprd."'";
+    $tsql .= ($ak_b==9) ? "" : " AND BAksi='".$ak_b."'";
+    $tsql .= ($ak_o==9) ? "" : " AND OAksi='".$ak_o."'";
+
+    $tglheader = "TAHUN USULAN ".$tahun;
+
+    $db->Query("SELECT U.*,L.K_DPRD,L.N_DPRD,O.K_OPD,O.N_OPD,D.K_Lokasi K_Desa,D.N_Lokasi N_Desa,K.K_Lokasi K_Kec,K.N_Lokasi N_Kec,S.N_Satuan,IFNULL(R.K_Keg,'') K_Keg FROM (SELECT * FROM pok_usulan_dewan WHERE Tahun='".$tahun."'".$tsql.") U LEFT JOIN para_dprd L ON (U.DPRDID=L.DPRDID) LEFT JOIN para_opd O ON (U.OPDID=O.OPDID) LEFT JOIN para_lokasi K ON (U.KecID=K.LokasiID AND K.Level=1) LEFT JOIN para_lokasi D ON (U.KelID=D.LokasiID AND D.Level=2) LEFT JOIN para_satuan S ON (U.SatuanID=S.SatuanID) LEFT JOIN (SELECT RKegID,K_Keg FROM renja_keg WHERE RPJMDID='".$id_rpjmd."' AND Tahun='".$tahun."') R ON (U.RKegID=R.RKegID)");
+
+    $xls = new cXLS("DATA USULAN DEWAN");
+    $xls->add_header(strtoupper($_SESSION['__WEB_APP']['REG_NAME']));
+    $xls->add_header("DATA USULAN DEWAN");
+    $xls->add_header($tglheader);
+
+    $xls->add_field("Kode", 6, "C");
+    $xls->add_field("Lokasi", 20, "L");
+    $xls->add_field("Dusun", 20, "L");
+    $xls->add_field("RT", 10, "L");
+    $xls->add_field("Masalah", 20, "L");
+    $xls->add_field("Usulan", 20, "L");
+    $xls->add_field("Sasaran", 20, "L");
+    $xls->add_field("Waktu", 10, "L");
+    $xls->add_field("Volume", 7, "R,N0");
+    $xls->add_field("Satuan", 10, "L");
+    $xls->add_field("Anggaran", 12, "R,N");
+    $xls->add_field("Veri Bappeda", 6, "C,N0");
+    $xls->add_field("Catatan Bappeda", 30, "L");
+    $xls->add_field("Veri OPD", 6, "C,N0");
+    $xls->add_field("Catatan OPD", 30, "L");
+    $xls->add_field("Kode Urusan", 8, "L");
+    $xls->add_field("Kode Program", 10, "L");
+    $xls->add_field("Kode Kegiatan", 12, "L");
+    $xls->add_field("Jenis Usulan", 20, "L");
+    $xls->add_field("Dewan", 5, "L");
+    $xls->add_field("Nama Dewan", 12, "L");
+    $xls->add_field("OPD", 5, "L");
+    $xls->add_field("Nama OPD", 12, "L");
+    $xls->add_field("Desa", 5, "L");
+    $xls->add_field("Nama Desa", 12, "L");
+    $xls->add_field("Kec", 4, "L");
+    $xls->add_field("Nama Kec", 12, "L");
+    $xls->add_field("ID UNIQ", 8, "L,N0");
+    $xls->add_field("ID DPRD", 8, "L,N0");
+    $xls->add_field("ID OPD", 8, "L,N0");
+    $xls->add_field("ID Kec", 8, "L,N0");
+    $xls->add_field("ID Kel", 8, "L,N0");
+    $xls->add_field("ID Satuan", 10, "L,N0");
+    $xls->add_sheet("Usulan Dewan", false);
+    $xls->show_headers();
+
+    while ($db->Next()) {
+        $xls->add_value($db->Row("Kode"), $db->Row("Lokasi"), $db->Row("Dusun"), $db->Row("RT"), $db->Row("Masalah"), $db->Row("Usulan"), $db->Row("Sasaran"), $db->Row("Waktu"), $db->Row("Volume"), $db->Row("N_Satuan"), $db->Row("Rupiah"), $db->Row("BAksi"), $db->Row("BKet"), $db->Row("OAksi"), $db->Row("OKet"), substr($db->Row("K_Keg"),0,4), substr($db->Row("K_Keg"),0,13), $db->Row("K_Keg"), $db->Row("OJenis"), $db->Row("K_DPRD"), $db->Row("N_DPRD"),$db->Row("K_OPD"), $db->Row("N_OPD"), $db->Row("K_Desa"), $db->Row("N_Desa"), $db->Row("K_Kec"), $db->Row("N_Kec"), $db->Row("UsulanDID"), $db->Row("DPRDID"), $db->Row("OPDID"), $db->Row("KecID"), $db->Row("KelID"), $db->Row("SatuanID"));
+    }
+    $xls->add_stamp(1, true);
+    $xls->send();
+    unset($xls);
+
+} else if ( $data == "default") {
+    report_show();
+}
+
+?>