".$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'
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'
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'
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'
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_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, '.', '').'%)';
}
?>