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 = '';
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 "
".$arinci[$id_rinc]."";
}
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 = '