".$rk[1]."";
}
} else
if ($key=='cek_pptk') {
$k=pg_query("SELECT DISTINCT t.id,t.inisial FROM pptk t INNER JOIN sub_kegiatan k LEFT OUTER JOIN ppkom o ON (o.id=k.ppkom_id)
ON (t.id=k.pptk_id) WHERE k.thn='$thn' AND t.aktif='t'
".($pejabat_pengadaan_id == undefined ? "" : "AND k.pejabat_pengadaan_id='$pejabat_pengadaan_id'")."
".($ppkom_id == undefined ? "" : "
".($ppkom_id == "ALL" ? "AND (k.ppkom_id IS NOT NULL AND o.inisial <> 'PPK')" : "
".($ppkom_id == "NON" ? "AND (k.ppkom_id IS NULL OR o.inisial = 'PPK')" : "AND k.ppkom_id='$ppkom_id'")."
")."
")."
".($pptk_id == undefined ? "" : "AND k.pptk_id='$pptk_id'")."
ORDER BY t.inisial ASC");
while($rk=pg_fetch_array($k)) {
echo "";
}
} else
if ($key=='cek_pgn') {
$k=pg_query("SELECT DISTINCT p.id,p.inisial FROM pejabat_pengadaan p INNER JOIN sub_kegiatan k LEFT OUTER JOIN ppkom o ON (o.id=k.ppkom_id)
ON (p.id=k.pejabat_pengadaan_id) WHERE k.thn='$thn' AND p.aktif='t'
".($pejabat_pengadaan_id == undefined ? "" : "AND k.pejabat_pengadaan_id='$pejabat_pengadaan_id'")."
".($ppkom_id == undefined ? "" : "
".($ppkom_id == "ALL" ? "AND (k.ppkom_id IS NOT NULL AND o.inisial <> 'PPK')" : "
".($ppkom_id == "NON" ? "AND (k.ppkom_id IS NULL OR o.inisial = 'PPK')" : "AND k.ppkom_id='$ppkom_id'")."
")."
")."
".($pptk_id == undefined ? "" : "AND k.pptk_id='$pptk_id'")."
ORDER BY p.inisial ASC");
while($rk=pg_fetch_array($k)) {
echo "";
}
} else
if ($key=='cek_kom') {
$k=pg_query("SELECT DISTINCT p.id,p.inisial FROM ppkom p INNER JOIN sub_kegiatan k
ON (p.id=k.ppkom_id) WHERE k.thn='$thn' AND p.aktif='t'
".($pejabat_pengadaan_id == undefined ? "" : "AND k.pejabat_pengadaan_id='$pejabat_pengadaan_id'")."
".($ppkom_id == undefined ? "" : "
".($ppkom_id == "ALL" ? "AND (k.ppkom_id IS NOT NULL AND o.inisial <> 'PPK')" : "
".($ppkom_id == "NON" ? "AND (k.ppkom_id IS NULL OR o.inisial = 'PPK')" : "AND k.ppkom_id='$ppkom_id'")."
")."
")."
".($pptk_id == undefined ? "" : "AND k.pptk_id='$pptk_id'")."
ORDER BY p.inisial ASC");
while($rk=pg_fetch_array($k)) {
echo "";
}
} else
if ($key=='cek_kegiatan') {
$k=pg_query("SELECT DISTINCT k.kegiatan,CASE WHEN k.rh!='' THEN CONCAT(k.rh,' - ') ELSE '' END,
k.rh, NULLIF(regexp_replace(k.rh,'\D','','g'),'')::numeric
FROM sub_kegiatan k LEFT OUTER JOIN ppkom o ON (o.id=k.ppkom_id)
WHERE k.thn='$thn'
".($pejabat_pengadaan_id == undefined ? "" : "AND k.pejabat_pengadaan_id='$pejabat_pengadaan_id'")."
".($ppkom_id == undefined ? "" : "
".($ppkom_id == "ALL" ? "AND (k.ppkom_id IS NOT NULL AND o.inisial <> 'PPK')" : "
".($ppkom_id == "NON" ? "AND (k.ppkom_id IS NULL OR o.inisial = 'PPK')" : "AND k.ppkom_id='$ppkom_id'")."
")."
")."
".($pptk_id == undefined ? "" : "AND k.pptk_id='$pptk_id'")."
ORDER BY NULLIF(regexp_replace(k.rh,'\D','','g'),'')::numeric ASC,k.kegiatan ASC");
while($rk=pg_fetch_array($k)) {
echo "";
}
} else
if ($key=='cek_sub_kegiatan') {
$k=pg_query("SELECT DISTINCT k.sub_kegiatan
FROM sub_kegiatan k LEFT OUTER JOIN ppkom o ON (o.id=k.ppkom_id)
WHERE k.thn='$thn'
".($pejabat_pengadaan_id == undefined ? "" : "AND k.pejabat_pengadaan_id='$pejabat_pengadaan_id'")."
".($ppkom_id == undefined ? "" : "
".($ppkom_id == "ALL" ? "AND (k.ppkom_id IS NOT NULL AND o.inisial <> 'PPK')" : "
".($ppkom_id == "NON" ? "AND (k.ppkom_id IS NULL OR o.inisial = 'PPK')" : "AND k.ppkom_id='$ppkom_id'")."
")."
")."
".($pptk_id == undefined ? "" : "AND k.pptk_id='$pptk_id'")."
ORDER BY k.sub_kegiatan ASC");
while($rk=pg_fetch_array($k)) {
echo "";
}
} else
if ($key=='cek_gtotal') {
$kegiatan=$_POST['kegiatan'];
$kpa=$_POST['kpa'];
$pptk=$_POST['pptk'];
$pgn=$_POST['pgn'];
$kom=$_POST['kom'];
/*anggaran*/
/*
$c=pg_query("SELECT SUM(anggaran) FROM sub_kegiatan WHERE thn='$thn'
AND anggaran IS NOT NULL
".($pejabat_pengadaan_id == undefined ? "" : "AND pejabat_pengadaan_id='$pejabat_pengadaan_id'")."
".($ppkom_id == undefined ? "" : "AND ppkom_id='$ppkom_id'")."
".($pptk_id == undefined ? "" : "AND pptk_id='$pptk_id'")."
".($kegiatan == "" ? "" : "AND kegiatan='$kegiatan'")."
".($kpa == null ? "" : "AND kpa_id='$kpa'")."
");
*/
if (($pgn==null) && ($kom==null) && ($pptk==null)) {
$c=pg_query("SELECT SUM(k.anggaran) FROM sub_kegiatan k LEFT OUTER JOIN ppkom o ON (o.id=k.ppkom_id) WHERE k.thn='$thn'
AND k.anggaran IS NOT NULL
".($pejabat_pengadaan_id == undefined ? "" : "AND k.pejabat_pengadaan_id='$pejabat_pengadaan_id'")."
".($ppkom_id == undefined ? "" : "
".($ppkom_id == "ALL" ? "AND (k.ppkom_id IS NOT NULL AND o.inisial <> 'PPK')" : "
".($ppkom_id == "NON" ? "AND (k.ppkom_id IS NULL OR o.inisial = 'PPK')" : "AND k.ppkom_id='$ppkom_id'")."
")."
")."
".($pptk_id == undefined ? "" : "AND k.pptk_id='$pptk_id'")."
".($kegiatan == "" ? "" : "AND k.kegiatan='$kegiatan'")."
".($kpa == null ? "" : "AND k.kpa_id='$kpa'")."
");
} else {
$c=pg_query("SELECT SUM(k.anggaran) FROM sub_kegiatan k LEFT OUTER JOIN ppkom o ON (o.id=k.ppkom_id) WHERE k.thn='$thn'
AND k.anggaran IS NOT NULL
".($pgn == null ? "" : "AND k.pejabat_pengadaan_id='$pgn'")."
".($kom == null ? "" : "
".($kom == "ALL" ? "AND (k.ppkom_id IS NOT NULL AND o.inisial <> 'PPK')" : "
".($kom == "NON" ? "AND (k.ppkom_id IS NULL OR o.inisial = 'PPK')" : "AND k.ppkom_id='$kom'")."
")."
")."
".($pptk == null ? "" : "AND k.pptk_id='$pptk'")."
".($kegiatan == "" ? "" : "AND k.kegiatan='$kegiatan'")."
".($kpa == null ? "" : "AND k.kpa_id='$kpa'")."
");
}
while($rc=pg_fetch_array($c)) {$cr=$rc[0];}
/*resmi*/
/*
$d=pg_query("SELECT SUM(p.nilai_sp) FROM pekerjaan p
INNER JOIN sub_kegiatan s ON (s.id=p.sub_kegiatan_id)
WHERE s.thn='$thn'
AND s.anggaran IS NOT NULL
AND p.status_setor IS NULL AND p.status <> 'Extra'
".($pejabat_pengadaan_id == undefined ? "" : "AND s.pejabat_pengadaan_id='$pejabat_pengadaan_id'")."
".($ppkom_id == undefined ? "" : "AND s.ppkom_id='$ppkom_id'")."
".($pptk_id == undefined ? "" : "AND s.pptk_id='$pptk_id'")."
".($kegiatan == "" ? "" : "AND s.kegiatan='$kegiatan'")."
".($kpa == null ? "" : "AND s.kpa_id='$kpa'")."
");
*/
if (($pgn==null) && ($kom==null) && ($pptk==null)) {
$d=pg_query("SELECT SUM(p.nilai_sp) FROM pekerjaan p
INNER JOIN sub_kegiatan s ON (s.id=p.sub_kegiatan_id)
LEFT OUTER JOIN ppkom o ON (o.id=s.ppkom_id)
WHERE s.thn='$thn'
AND s.anggaran IS NOT NULL
AND p.status_setor IS NULL AND p.status <> 'Extra' AND p.cad3 IS NULL
".($pejabat_pengadaan_id == undefined ? "" : "AND s.pejabat_pengadaan_id='$pejabat_pengadaan_id'")."
".($ppkom_id == undefined ? "" : "
".($ppkom_id == "ALL" ? "AND (s.ppkom_id IS NOT NULL AND o.inisial <> 'PPK')" : "
".($ppkom_id == "NON" ? "AND (s.ppkom_id IS NULL OR o.inisial = 'PPK')" : "AND s.ppkom_id='$ppkom_id'")."
")."
")."
".($pptk_id == undefined ? "" : "AND s.pptk_id='$pptk_id'")."
".($kegiatan == "" ? "" : "AND s.kegiatan='$kegiatan'")."
".($kpa == null ? "" : "AND s.kpa_id='$kpa'")."
");
} else {
$d=pg_query("SELECT SUM(p.nilai_sp) FROM pekerjaan p
INNER JOIN sub_kegiatan s ON (s.id=p.sub_kegiatan_id)
LEFT OUTER JOIN ppkom o ON (o.id=s.ppkom_id)
WHERE s.thn='$thn'
AND s.anggaran IS NOT NULL
AND p.status_setor IS NULL AND p.status <> 'Extra' AND p.cad3 IS NULL
".($pgn == null ? "" : "AND s.pejabat_pengadaan_id='$pgn'")."
".($kom == null ? "" : "
".($kom == "ALL" ? "AND (s.ppkom_id IS NOT NULL AND o.inisial <> 'PPK')" : "
".($kom == "NON" ? "AND (s.ppkom_id IS NULL OR o.inisial = 'PPK')" : "AND s.ppkom_id='$kom'")."
")."
")."
".($pptk == null ? "" : "AND s.pptk_id='$pptk'")."
".($kegiatan == "" ? "" : "AND s.kegiatan='$kegiatan'")."
".($kpa == null ? "" : "AND s.kpa_id='$kpa'")."
");
}
while($rd=pg_fetch_array($d)) {$dr=$rd[0];}
/*extra*/
/*
$e=pg_query("SELECT SUM(p.nilai_sp) FROM pekerjaan p
INNER JOIN sub_kegiatan s ON (s.id=p.sub_kegiatan_id)
WHERE s.thn='$thn'
AND s.anggaran IS NOT NULL
AND p.status_setor IS NULL AND p.status = 'Extra'
".($pejabat_pengadaan_id == undefined ? "" : "AND s.pejabat_pengadaan_id='$pejabat_pengadaan_id'")."
".($ppkom_id == undefined ? "" : "AND s.ppkom_id='$ppkom_id'")."
".($pptk_id == undefined ? "" : "AND s.pptk_id='$pptk_id'")."
".($kegiatan == "" ? "" : "AND s.kegiatan='$kegiatan'")."
".($kpa == null ? "" : "AND s.kpa_id='$kpa'")."
");
*/
if (($pgn==null) && ($kom==null) && ($pptk==null)) {
$e=pg_query("SELECT SUM(p.nilai_sp) FROM pekerjaan p
INNER JOIN sub_kegiatan s ON (s.id=p.sub_kegiatan_id)
LEFT OUTER JOIN ppkom o ON (o.id=s.ppkom_id)
WHERE s.thn='$thn'
AND s.anggaran IS NOT NULL
AND p.status_setor IS NULL AND p.cad3 IS NOT NULL
".($pejabat_pengadaan_id == undefined ? "" : "AND s.pejabat_pengadaan_id='$pejabat_pengadaan_id'")."
".($ppkom_id == undefined ? "" : "
".($ppkom_id == "ALL" ? "AND (s.ppkom_id IS NOT NULL AND o.inisial <> 'PPK')" : "
".($ppkom_id == "NON" ? "AND (s.ppkom_id IS NULL OR o.inisial = 'PPK')" : "AND s.ppkom_id='$ppkom_id'")."
")."
")."
".($pptk_id == undefined ? "" : "AND s.pptk_id='$pptk_id'")."
".($kegiatan == "" ? "" : "AND s.kegiatan='$kegiatan'")."
".($kpa == null ? "" : "AND s.kpa_id='$kpa'")."
");
} else {
$e=pg_query("SELECT SUM(p.nilai_sp) FROM pekerjaan p
INNER JOIN sub_kegiatan s ON (s.id=p.sub_kegiatan_id)
LEFT OUTER JOIN ppkom o ON (o.id=s.ppkom_id)
WHERE s.thn='$thn'
AND s.anggaran IS NOT NULL
AND p.status_setor IS NULL AND p.cad3 IS NOT NULL
".($pgn == null ? "" : "AND s.pejabat_pengadaan_id='$pgn'")."
".($kom == null ? "" : "
".($kom == "ALL" ? "AND (s.ppkom_id IS NOT NULL AND o.inisial <> 'PPK')" : "
".($kom == "NON" ? "AND (s.ppkom_id IS NULL OR o.inisial = 'PPK')" : "AND s.ppkom_id='$kom'")."
")."
")."
".($pptk == null ? "" : "AND s.pptk_id='$pptk'")."
".($kegiatan == "" ? "" : "AND s.kegiatan='$kegiatan'")."
".($kpa == null ? "" : "AND s.kpa_id='$kpa'")."
");
}
while($re=pg_fetch_array($e)) {$er=$re[0];}
$total_penyerapan=$dr+$er;
$total_sisa=$cr-$total_penyerapan;
$pro_serap=@($total_penyerapan/$cr);
$pro_sisa=@($total_sisa/$cr);
echo 'Anggaran = '.number_format($cr,0,',','.').'
Penyerapan = '.number_format($dr,0,',','.').' :: Hutang = '.number_format($er,0,',','.').' :: Total = '.number_format($total_penyerapan,0,',','.').' ('.number_format($pro_serap*100, 0, '.', '').'%)
Sisa = '.number_format($total_sisa,0,',','.').' ('.number_format($pro_sisa*100, 0, '.', '').'%)';
} else
if ($key=='cek_org') {
$nm=$_POST['nm'];
$nmid=$nm.'_id';
$sub_kegiatan_id=$_POST['sub_kegiatan_id'];
$d=pg_query("SELECT ".$nmid." FROM sub_kegiatan WHERE id=$sub_kegiatan_id");
while($r=pg_fetch_array($d)) {$orgid=$r[0];}
$k=pg_query("SELECT o.id,o.inisial,p.nama FROM ".$nm." o
INNER JOIN data_pegawai p ON (o.data_pegawai_id=p.id)
WHERE o.aktif='t' ORDER BY o.inisial ASC");
while($rk=pg_fetch_array($k)) {
?>
0) {
$upd = pg_query("UPDATE sub_kegiatan
SET kpa='$kpa',
pptk='$pptk',
ra='$ra',
rb='$rb',
rc='$rc',
rd='$rd',
re='$re',
rf='$rf',
rg='$rg',
rh='$rh'
WHERE id=$sub_kegiatan_id");
} else {}
} else
if ($key=='simpan_belanja') {
$fs=$_POST['fs'];
$sub_kegiatan_id=$_POST['id'];
$sub_kegiatan=$_POST['sub_kegiatan'];
$kegiatan1=$_POST['kegiatan'];
$kegiatan2=str_replace("-",":",$kegiatan1);
if ($fs=='f') {$kegiatan=$kegiatan2;} else {$kegiatan='**'.$kegiatan2;}
$p1=$_POST['p1'];
$k1=$_POST['k1'];
$sk1=$_POST['sk1'];
$kd_panggil=$_POST['kd_panggil'];
$bp_id=$_POST['bp_id'];
$verifikator_id=$_POST['verifikator_id'];
$pelaksana_kegiatan_id=$_POST['pelaksana_kegiatan_id'];
$cek=pg_query("SELECT id FROM sub_kegiatan WHERE id=$sub_kegiatan_id");
$row = pg_fetch_row($cek);
if ($row[0] > 0) {
$upd = pg_query("UPDATE sub_kegiatan
SET sub_kegiatan='$sub_kegiatan',
kegiatan='$kegiatan',
p1='$p1',
k1='$k1',
sk1='$sk1'
WHERE id=$sub_kegiatan_id");
} else {}
} else
if ($key=='simpan_kdpanggil') {
$sub_kegiatan_id=$_POST['id'];
$kd_panggil=trim($_POST['kd_panggil']);
$cek=pg_query("SELECT id FROM sub_kegiatan WHERE id=$sub_kegiatan_id");
$row = pg_fetch_row($cek);
if ($row[0] > 0) {
$upd = pg_query("UPDATE sub_kegiatan
SET kd_panggil='$kd_panggil'
WHERE id=$sub_kegiatan_id");
} else {}
} else
if ($key=='simpan_anggaran') {
$sub_kegiatan_id=$_POST['id'];
$anggaran=$_POST['anggaran'];
$anggaran=str_replace('.','',$anggaran);
$anggaran=str_replace(',','',$anggaran);
$cek=pg_query("SELECT id FROM sub_kegiatan WHERE id=$sub_kegiatan_id");
$row = pg_fetch_row($cek);
if ($row[0] > 0) {
$upd = pg_query("UPDATE sub_kegiatan
SET anggaran='$anggaran',
anggaran_ori='$anggaran'
WHERE id=$sub_kegiatan_id");
} else {}
} else
if ($key=='add_pr_anggaran') {
$thn=$_POST['thn'];
pg_query("INSERT INTO sub_kegiatan (thn) VALUES ('$thn')");
} else
if ($key=='delete_anggaran') {
$id=$_POST['id'];
pg_query("DELETE FROM sub_kegiatan WHERE id=$id");
} else
if ($key=='cek_bp_id') {
$sub_kegiatan_id=$_POST['sub_kegiatan_id'];
$d=pg_query("SELECT bp_id FROM sub_kegiatan WHERE id=$sub_kegiatan_id");
while($r=pg_fetch_array($d)) {$orgid=$r[0];}
$k=pg_query("SELECT o.id,o.inisial,p.nama FROM bp o
INNER JOIN data_pegawai p ON (o.data_pegawai_id=p.id)
WHERE o.aktif='t' ORDER BY o.inisial ASC");
while($rk=pg_fetch_array($k)) {
?>
0) {
$upd = pg_query("UPDATE sub_kegiatan
SET sub_kegiatan='$sub_kegiatan',
kegiatan='$kegiatan',
p1='$p1',
k1='$k1',
sk1='$sk1',
anggaran='$anggaran',
kpa='$kpa',
pptk='$pptk',
ra='$ra',
rb='$rb',
rc='$rc',
rd='$rd',
re='$re',
rf='$rf',
rg='$rg',
rh='$rh'
WHERE id=$sub_kegiatan_id");
} else {
$ins = pg_query("INSERT INTO sub_kegiatan (
sub_kegiatan,
kegiatan,
p1,
k1,
sk1,
anggaran,
anggaran_ori,
kpa,
pptk,
ra,
rb,
rc,
rd,
re,
rf,
rg,
rh,
thn
) VALUES (
'$sub_kegiatan',
'$kegiatan',
'$p1',
'$k1',
'$sk1',
$anggaran,
$anggaran,
'$kpa',
'$pptk',
'$ra',
'$rb',
'$rc',
'$rd',
'$re',
'$rf',
'$rg',
'$rh',
'$thn'
)");
}
} else
if ($key=='cek_rek') {
$kegiatan=$_POST['kegiatan'];
$d=pg_query("SELECT kpa,pptk,ra,rb,rc,rd,re,rf,rg,rh FROM sub_kegiatan WHERE kegiatan='$kegiatan'");
while($r=pg_fetch_array($d)) {$kpa=$r[0];$pptk=$r[1];$ra=$r[2];$rb=$r[3];$rc=$r[4];$rd=$r[5];$re=$r[6];$rf=$r[7];$rg=$r[8];$rh=$r[9];}
$arr1 = str_split($rc);
echo $kpa.'!@#$'.$pptk.'!@#$'.$ra.'!@#$'.$rb.'!@#$'.$arr1[0].'!@#$'.$arr1[1].'!@#$'.$rd.'!@#$'.$re.'!@#$'.$rf.'!@#$'.$rg.'!@#$'.$rh;
} else
if ($key=='cek_jenis') {
$k=pg_query("SELECT id,nama FROM subkategori_kegiatan");
while($rk=pg_fetch_array($k)) {
?>