73 lines
2.5 KiB
PHP
73 lines
2.5 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 9th, 2026.
|
|
|
|
(c) 2012 - 2026, 3FONIA Software; WWW.3FONIA.COM.
|
|
|
|
*******************************************************************/
|
|
|
|
require_once(__DIR__."/../../../../../vendor/autoload.php");
|
|
|
|
use siaupheng\fonia3\DB\MySQL;
|
|
use siaupheng\fonia3\DB\SQL;
|
|
|
|
$fdb = (is_resource($fdb)) ? $fdb : new MySQL();
|
|
|
|
function ID_Usulan_Desa($id_rpjmd = 0, $tahun = 0) {
|
|
global $fdb;
|
|
$ino = 1;
|
|
$fdb->Query("SELECT MAX(UsulanLID)+1 Nomor FROM mus_usulan_desa WHERE RPJMDID='".$id_rpjmd."' AND Tahun='".$tahun."'");
|
|
if ($fdb->Next()) $ino = $fdb->Row("Nomor", 1);
|
|
return $ino;
|
|
}
|
|
|
|
function Kode_Usulan_Desa($tahun = 0, $id_desa = 0) {
|
|
global $fdb;
|
|
$k_desa = "000";
|
|
if ($id_desa > 0) {
|
|
$fdb->Query("SELECT K_Lokasi FROM para_lokasi WHERE LokasiID='".$id_desa."' LIMIT 1");
|
|
if ($fdb->Next()) $k_desa = $fdb->Row("K_Lokasi");
|
|
}
|
|
$tno = $k_desa . "-"; $ino = 0;
|
|
$fdb->Query("SELECT MAX(RIGHT(Kode,3)) Nomor FROM mus_usulan_desa WHERE Tahun='".$tahun."' AND LEFT(Kode,".strlen($tno).")='".$tno."'");
|
|
if ($fdb->Next()) $ino = (int)$fdb->Row("Nomor", 0);
|
|
$tno .= isi_nol($ino+1, 3);
|
|
return $tno;
|
|
}
|
|
|
|
function Kode_Usulan_Kec($tahun = 0, $id_kec = 0) {
|
|
global $fdb;
|
|
$k_kec = "00";
|
|
if ($id_kec > 0) {
|
|
$fdb->Query("SELECT RIGHT(K_Lokasi,2) Kode FROM para_lokasi WHERE LokasiID='".$id_kec."' LIMIT 1");
|
|
if ($fdb->Next()) $k_kec = $fdb->Row("Kode");
|
|
}
|
|
$tno = $k_kec . "-"; $ino = 0;
|
|
$fdb->Query("SELECT MAX(RIGHT(Kode,3)) Nomor FROM mus_usulan_desa WHERE Tahun='".$tahun."' AND KecID='".$id_kec."' AND JU=3");
|
|
if ($fdb->Next()) $ino = (int)$fdb->Row("Nomor", 0);
|
|
$tno .= isi_nol($ino+1, 3);
|
|
return $tno;
|
|
}
|
|
|
|
function MUSPrio($iprio=0) {
|
|
$hasil = '<select class="form-select form-select-sm" onchange="MUsulPrioJS.oc_Prio(this);" required=true aria-label="Pilihan Prioritas" >';
|
|
for ($o=0; $o<=5; $o++) {
|
|
$hasil .= '<option value="'.$o.'"'.($o==$iprio?' selected="selected"':'').'>'.$o.'</option>';
|
|
}
|
|
$hasil .= '</select>';
|
|
return $hasil;
|
|
}
|
|
|
|
function MusPrio_Array() {
|
|
return [0=>"0", 1=>"1", 2=>"2", 3=>"3", 4=>"4", 5=>"5"];
|
|
}
|
|
|
|
?>
|