master/apps/php/func.musrenbang.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;
}

?>