147 lines
5.8 KiB
PHP
147 lines
5.8 KiB
PHP
<?php
|
|
|
|
/*******************************************************************
|
|
|
|
App. Name : SISTEM INFORMASI PERENCANAAN PEMBANGUNAN DAERAH
|
|
Module : /apps/php/func.musrenbang.php
|
|
Desc. : PHP - Fungsi Musrenbang
|
|
Created By : Siau Pheng ([email protected]).
|
|
Created Date : May 15th, 2012.
|
|
Last Modified : January 30th, 2024.
|
|
|
|
(c) 2012 - 2024, 3FONIA Software; WWW.3FONIA.COM.
|
|
|
|
*******************************************************************/
|
|
|
|
require_once(__DIR__."/../../../../vendor/autoload.php");
|
|
|
|
use siaupheng\fonia3\DB\MySQL;
|
|
use siaupheng\fonia3\DB\SQL;
|
|
|
|
$fdb = new MySQL();
|
|
|
|
function map_tahun_submap($id_rpjmd = 0) {//oke
|
|
$amap = [2 => 2021, 3 => 2025, 4 => 2026];
|
|
return $amap[$id_rpjmd];
|
|
}
|
|
|
|
/*************** POKIR ***************/
|
|
|
|
function PokAksi_Array($is_form = false) {
|
|
$aaksi = [0=>"Belum Verifikasi", 1=>"Diterima", 2=>"Ditolak", 3=>"Mohon Klarifikasi"];
|
|
if ($is_form == true) unset($aaksi[0]);
|
|
return $aaksi;
|
|
}
|
|
|
|
/*************** MUSRENBANG ***************/
|
|
|
|
function Kode_Usulan_Kec($tahun = 0, $id_kec = 0) {//oke
|
|
global $fdb;
|
|
$tno = ($tahun == 0) ? "00" : substr("".$tahun, -2);
|
|
if ($id_kec > 0) {
|
|
$fdb->Query("SELECT RIGHT(K_Lokasi,2) Kode FROM para_lokasi WHERE LokasiID='".$id_kec."' LIMIT 1");
|
|
if ($fdb->Next()) $tno .= $fdb->Row("Kode")."-";
|
|
} else $tno .= "00-";
|
|
$ino = 0;
|
|
$fdb->Query("SELECT MAX(RIGHT(Kode,3)) Nomor FROM mus_usulan WHERE Tahun='".$tahun."' AND KecID='".$id_kec."' AND JU=3");
|
|
if ($fdb->Next()) $ino = intval($fdb->Row("Nomor", 0));
|
|
$tno .= isi_nol($ino+1, 3);
|
|
return $tno;
|
|
}
|
|
|
|
function Kode_Usulan_Desa($tahun = 0, $id_desa = 0) {//oke
|
|
global $fdb;
|
|
$tno = ($tahun == 0) ? "00" : substr("".$tahun, -2);
|
|
if ($id_desa > 0) {
|
|
$fdb->Query("SELECT K_Lokasi FROM para_lokasi WHERE LokasiID='".$id_desa."' LIMIT 1");
|
|
if ($fdb->Next()) $tno .= $fdb->Row("K_Lokasi")."-";
|
|
} else $tno .= "000-";
|
|
$ino = 0;
|
|
$fdb->Query("SELECT MAX(RIGHT(Kode,3)) Nomor FROM mus_usulan WHERE LEFT(Kode,".strlen($tno).")='".$tno."'");
|
|
if ($fdb->Next()) $ino = intval($fdb->Row("Nomor", 0));
|
|
$tno .= isi_nol($ino+1, 3);
|
|
return $tno;
|
|
}
|
|
|
|
function MUSPrio($iprio=0) {//oke
|
|
$hasil = '<select class="form-select form-select-sm" onchange="MUsulPrioJS.oc_Prio(this);" required=true aria-label="Pilihan Prioritas">';
|
|
for ($o=0; $o<=10; $o++) {
|
|
$hasil .= '<option value="'.$o.'"'.($o==$iprio?' selected="selected"':'').'>'.$o.'</option>';
|
|
}
|
|
$hasil .= '</select>';
|
|
return $hasil;
|
|
}
|
|
|
|
|
|
/*************** PEMAKAIAN BERSAMA RKPD / POKIR / MUSRENBANG ***************/
|
|
|
|
function data_rincian($id_rinc = 0, $data = false) {
|
|
$arinci = [0=>"-", 1=>"Pembangunan Jalan Lingkungan / Pemukiman", 2=>"Pembangunan Drainase", 3=>"Pembangunan Pagar Makam"];
|
|
if ($data) return $arinci;
|
|
if ($id_rinc == 0) return "";
|
|
return "<br><i>".$arinci[$id_rinc]."</i>";
|
|
}
|
|
|
|
function data_ju($id_opd = 0, $id_sub = 0){
|
|
global $fdb;
|
|
if (!isset($_SESSION['__APP_SIPPD']['TAG4'])) {
|
|
$fdb->Query("SELECT GROUP_CONCAT(SubID) TAG4 FROM para90_subtag WHERE Tahun='".$_SESSION['__WEB_APP']['SUBMAP_TAHUN']."' AND Tipe=4");
|
|
if ($fdb->Next()) $_SESSION['__APP_SIPPD']['TAG4'] = explode(",", $fdb->Row("TAG4","0"));
|
|
}
|
|
return ($id_opd==4 && !in_array($id_sub, $_SESSION['__APP_SIPPD']['TAG4'])) ? 1 : 0;
|
|
}
|
|
|
|
function array_jalan($id_sub = 0) {
|
|
global $fdb;
|
|
if (!isset($_SESSION['__APP_SIPPD']['TAG2'])) {
|
|
$fdb->Query("SELECT GROUP_CONCAT(SubID) TAG2 FROM para90_subtag WHERE Tahun='".$_SESSION['__WEB_APP']['SUBMAP_TAHUN']."' AND Tipe=2");
|
|
if ($fdb->Next()) $_SESSION['__APP_SIPPD']['TAG2'] = explode(",", $fdb->Row("TAG2","0"));
|
|
}
|
|
return ($id_sub == 0 ? $_SESSION['__APP_SIPPD']['TAG2'] : in_array($id_sub, $_SESSION['__APP_SIPPD']['TAG2']));
|
|
}
|
|
|
|
function array_rinci($id_sub = 0) {
|
|
global $fdb;
|
|
if (!isset($_SESSION['__APP_SIPPD']['TAG5'])) {
|
|
$fdb->Query("SELECT GROUP_CONCAT(SubID) TAG5 FROM para90_subtag WHERE Tahun='".$_SESSION['__WEB_APP']['SUBMAP_TAHUN']."' AND Tipe=5");
|
|
if ($fdb->Next()) $_SESSION['__APP_SIPPD']['TAG5'] = explode(",", $fdb->Row("TAG5","0"));
|
|
}
|
|
return ($id_sub == 0 ? $_SESSION['__APP_SIPPD']['TAG5'] : in_array($id_sub, $_SESSION['__APP_SIPPD']['TAG5']));
|
|
}
|
|
|
|
function array_poktan($id_sub = 0) {
|
|
global $fdb;
|
|
if (!isset($_SESSION['__APP_SIPPD']['TAG3'])) {
|
|
$fdb->Query("SELECT GROUP_CONCAT(SubID) TAG3 FROM para90_subtag WHERE Tahun='".$_SESSION['__WEB_APP']['SUBMAP_TAHUN']."' AND Tipe=3");
|
|
if ($fdb->Next()) $_SESSION['__APP_SIPPD']['TAG3'] = explode(",", $fdb->Row("TAG3","0"));
|
|
}
|
|
return ($id_sub == 0 ? $_SESSION['__APP_SIPPD']['TAG3'] : in_array($id_sub, $_SESSION['__APP_SIPPD']['TAG3']));
|
|
}
|
|
|
|
function array_tagging($id = 0) {
|
|
global $fdb;
|
|
if (!isset($_SESSION['__APP_SIPPD']['TAG1'])) {
|
|
$fdb->Query("SELECT GROUP_CONCAT(SubID) TAG1 FROM para90_subtag WHERE Tahun='".$_SESSION['__WEB_APP']['SUBMAP_TAHUN']."' AND Tipe=1");
|
|
if ($fdb->Next()) $_SESSION['__APP_SIPPD']['TAG1'] = explode(",", $fdb->Row("TAG1","0"));
|
|
}
|
|
return ($id_sub == 0 ? $_SESSION['__APP_SIPPD']['TAG1'] : in_array($id_sub, $_SESSION['__APP_SIPPD']['TAG1']));
|
|
}
|
|
|
|
/*************** REPORT ***************/
|
|
|
|
function Report_Empty($ltabel = "") {
|
|
global $fdb;
|
|
if ($ltabel == "") return false;
|
|
$fdb->Query("DELETE FROM rep_".$ltabel." WHERE (Unix='".user_unix()."' OR Unix<'".(user_unix()-604800)."') AND UserID='".user_id()."'");
|
|
}
|
|
|
|
function Report_Header($tlapor="", $tperiod="") {
|
|
$thasil = '<div style="text-align:center;font-size:12pt;"><b>'.strtoupper($_SESSION['__WEB_APP']['REG_NAME']);
|
|
$thasil .= (($tlapor=="") ? "" : '<br>'.$tlapor) . '</b>';
|
|
$thasil .= ($tperiod=="") ? "" : '<br><span style="font-size:11pt;">'.$tperiod.'</span>';
|
|
$thasil .= '</div><br>';
|
|
echo $thasil;
|
|
}
|
|
|
|
?>
|