"; ?>

PT.HUTAMA KARYA (Persero)
DIREKTORAT PEMASARAN
REKAPITULASI PROYEK-PROYEK PROSES TENDER
SD 01 "; echo combo_bulan("bulan_xx",$bulan_xx); echo combo_tanggal("tahun_xx",$tahun_xx,1997,2010); echo ""; echo "

"; $sqllok="select lokasi_kode,lokasi_nama from qry_pasar_definitif where p_definitif_analisa='ADA' and p_definitif_status_tender='PROSES' and lokasi_kode='$r[lokasi_kode]' group by lokasi_kode,lokasi_nama"; $reslok=dbresult($sqllok); while($y=pg_fetch_array($reslok)){ $penawaran=$y[p_definitif_jml_penawaran]; echo " "; $sqlpro="select sum(p_dini_nilai_proyek) as proyek from qry_pasar_definitif where p_definitif_analisa='ADA' and p_definitif_status_tender='PROSES' and lokasi_kode='$y[lokasi_kode]' and divisi_kode='$r[divisi_kode]'"; $respro=dbresult($sqlpro); $r_pro=pg_fetch_array($respro); echo ""; $sqlpen="select sum(p_definitif_jml_penawaran) as penawaran from qry_pasar_definitif where p_definitif_analisa='ADA' and p_definitif_status_tender='PROSES' and lokasi_kode='$y[lokasi_kode]' and divisi_kode='$r[divisi_kode]'"; $respen=dbresult($sqlpen); $r_pen=pg_fetch_array($respen); $penawaran=$r_pen[penawaran]; if($penawaran==""){ $penawaran=$r_pro[proyek]; }else{ $penawaran="0"; } echo " "; echo ""; } $subtotal=$subtotal+$penawaran; $subpro=$r_pro[proyek]; $subpen=$r_pen[penawaran]; $totpro=$totpro+$r_pro[proyek]; $totpen=$totpen+$r_pen[penawaran]; $total=$total+$subtotal; echo ""; $no++; } echo " "; ?>

NO	WILAYAH	NILAI PROYEK (HB) / (RPp)	PROSES		KETERANGAN
			HITUNG	EVALUASI
$no	$r[divisi_name]
	- $r[lokasi_nama]	$r_pro[proyek]	$penawaran	$r_pen[penawaran]
	Sub Total	$subpro	$subtotal	$subpen
	TOTAL	$totpro	$total	$totpen