187 lines
9.4 KiB
PHP
187 lines
9.4 KiB
PHP
<?php
|
|
header("Content-type: application/vnd-ms-excel");
|
|
header("Content-Disposition: attachment; filename=data_lunas.xls");
|
|
include('../koneksi.php');
|
|
|
|
/* list variabel */
|
|
$thn=$_GET['thn'];
|
|
$bln=$_GET['bln'];
|
|
$axx=$_GET['axx'];
|
|
$axxx=$_GET['axxx'];
|
|
$bxx=$_GET['bxx'];
|
|
$cxx=$_GET['cxx'];
|
|
$tm1=$_GET['m'];
|
|
$tm1=str_replace('/','-',$tm1);
|
|
$tt1=date('Y',strtotime($tm1));
|
|
$bb1=date('m',strtotime($tm1));
|
|
$hh1=date('d',strtotime($tm1));
|
|
|
|
$ts1=$_GET['s'];
|
|
$ts1=str_replace('/','-',$ts1);
|
|
$tt2=date('Y',strtotime($ts1));
|
|
$bb2=date('m',strtotime($ts1));
|
|
$hh2=date('d',strtotime($ts1));
|
|
?>
|
|
|
|
<style>
|
|
td {
|
|
vertical-align: middle;
|
|
}
|
|
</style>
|
|
|
|
<table border="1" style="font-family:Arial;font-size:12;">
|
|
<thead>
|
|
<tr style="font-weight:bold">
|
|
<td align="center" width="30">No</td>
|
|
<td align="center" width="80">Tgl Lunas</td>
|
|
<td align="center" width="160">No Kwitansi</td>
|
|
<td align="center" width="50">KPA</td>
|
|
<td align="center" width="400">Uraian</td>
|
|
<td align="center" width="250">Rekening</td>
|
|
<td align="center" width="130">Pengeluaran</td>
|
|
<td align="center" width="90">PPN</td>
|
|
<td align="center" width="90">PPH-21</td>
|
|
<td align="center" width="90">PPH-22</td>
|
|
<td align="center" width="90">PPH-23</td>
|
|
<td align="center" width="90">PPH-FNL</td>
|
|
<td align="center" width="50">Inisial</td>
|
|
<td align="center" width="110">Status UM</td>
|
|
<td align="center" width="200">Kwi/SP/SPK</td>
|
|
<td align="center" width="210">Tgl SP/SPK</td>
|
|
<td align="center" width="80">Tgl Setor</td>
|
|
<td align="center" width="170">No Faktur</td>
|
|
<td align="center" width="80">Tgl Faktur</td>
|
|
<td align="center" width="130">Jns Pembayaran</td>
|
|
<tr>
|
|
</thead>
|
|
<tbody>
|
|
<?php
|
|
$d=pg_query("SELECT
|
|
l.tanggal_lunas,l.no_kwi_bend,k.inisial,s.kegiatan,p.kegiatan_pengadaan,COALESCE(n.nama,p.cad1),
|
|
s.kd_panggil,s.ra,s.rb,s.rc,s.rd,s.re,s.rf,s.rg,s.rh,s.kd_sibaku,
|
|
l.nilai_pelunasan,l.ppn,l.pph_21,l.pph_22,l.pph_23,l.pph_final,
|
|
l.inisial_bend,l.status_um,p.no_sp,p.tgl_mulai_sp,p.tgl_selesai_sp,l.tanggal_setor,l.no_faktur,l.tanggal_faktur,
|
|
l.jenis_pembayaran,l.kode_perben,
|
|
CASE WHEN r.st_termin='termin' THEN
|
|
l.data_ke
|
|
ELSE '0' END,r.st_termin,r.stum,l.ket,
|
|
(SELECT pg.nama_non FROM sp_peg pg WHERE pg.pekerjaan_id=p.id),r.pekerjaan_id,st.untuk,st.tgl_berangkat,st.tgl_kembali
|
|
FROM pekerjaan p
|
|
INNER JOIN sub_kegiatan s ON (p.sub_kegiatan_id=s.id)
|
|
INNER JOIN vr_realisasi r ON (r.pekerjaan_id=p.id)
|
|
INNER JOIN vr_pelunasan l ON (l.vr_realisasi_id=r.id)
|
|
LEFT OUTER JOIN rekanan n ON (n.id=p.rekanan_id)
|
|
INNER JOIN kpa k ON (k.id=s.kpa_id)
|
|
LEFT OUTER JOIN sp_peg sp ON (p.id=sp.pekerjaan_id)
|
|
LEFT OUTER JOIN sp_spt st ON (sp.sp_spt_id=st.id)
|
|
WHERE EXTRACT(YEAR FROM DATE(l.tanggal_lunas))='$thn'
|
|
AND EXTRACT(MONTH FROM DATE(l.tanggal_lunas))='$bln' AND l.status_berkas='FIX' AND l.tanggal_setor IS NOT NULL AND l.tanggal_lunas IS NOT NULL
|
|
".($tm1 == null ? "" : "AND l.tanggal_lunas::DATE BETWEEN '$tt1-$bb1-$hh1' AND '$tt2-$bb2-$hh2'")."
|
|
".($axx == 'ALL' ? "" : "
|
|
".($axx == 'FUNGSIONAL' ? "AND LEFT(s.kegiatan,2) NOT IN ('**')" : "AND LEFT(s.kegiatan,2) IN ('**')")."
|
|
")."
|
|
".($axxx == '' ? "" : "AND s.kpa_id='$axxx'")."
|
|
".($cxx == 'ALL' ? "" : "
|
|
".($cxx == 'FARMASI' ? "AND lower(s.sub_kegiatan) LIKE '%farmasi%'" : "AND lower(s.sub_kegiatan) NOT LIKE '%farmasi%'")."
|
|
")."
|
|
".($bxx == 'ALL' ? "" : "
|
|
".($bxx == 'NON UANG MUKA' ? "AND l.status_um='Non Uang Muka'" : "AND l.status_um='Uang Muka'")."
|
|
")."
|
|
ORDER BY l.idx_kwi_bend ASC");
|
|
$a=1;
|
|
while($r=pg_fetch_array($d)) {
|
|
if($r[5]=='') {$soporek=$r[36];} else {$soporek=$r[5];}
|
|
$stum=$r['stum'];
|
|
|
|
$ket1=strtoupper($r['ket']);
|
|
if ($ket1=='KURANG BAYAR') {$ket2=' ('.$ket1.')';} else {$ket2='';}
|
|
//if ($r[32]=='0') {$trm='';} else {$trm=' - '.strtoupper(($r['st_termin'].' '.$r[32]));}
|
|
if ($r[32]=='0') {
|
|
if ($stum=='uang_muka') {$trm=' - UANG MUKA';} else {$trm='';}
|
|
|
|
} else {$trm=' - '.strtoupper(($r['st_termin'].' '.$r[32]));}
|
|
|
|
if (($r['tgl_mulai_sp']==null) || ($r['tgl_mulai_sp']=='1970-01-01 00:00:00')) {$tg='';} else {
|
|
$tg=date('d-m-Y',strtotime($r['tgl_mulai_sp'])).' s/d '.date('d-m-Y',strtotime($r['tgl_selesai_sp'])); }
|
|
|
|
if (($r['tanggal_setor']=="1970-01-01 00:00:00") || ($r['tanggal_setor']==NULL) || ($r['tanggal_setor']=="")) {
|
|
$trl="-";} else {
|
|
$trl=date('d-m-Y',strtotime($r['tanggal_setor']));
|
|
}
|
|
|
|
if (($r['tanggal_lunas']=="1970-01-01 00:00:00") || ($r['tanggal_lunas']==NULL) || ($r['tanggal_lunas']=="")) {
|
|
$tr2="-";} else {
|
|
$tr2=date('d-m-Y',strtotime($r['tanggal_lunas']));
|
|
}
|
|
|
|
if (($r['tanggal_faktur']=="1970-01-01 00:00:00+07") || ($r['tanggal_faktur']==NULL) || ($r['tanggal_faktur']=="")) {
|
|
$tfk="-";} else {
|
|
$tfk=date('d-m-Y',strtotime($r['tanggal_faktur']));
|
|
}
|
|
|
|
$rek=$r['kd_panggil'].'.'.$r['ra'].'.'.$r['rb'].'.'.$r['rc'].'.'.$r['rd'].'.'.$r['re'].'.'.$r['rf'].'.'.$r['rg'].'.'.$r['rh'];
|
|
|
|
|
|
if ((isset($r['pph_21'])) && ($r['pph_21']!=0)) {
|
|
$pph21=$r['pph_21'];
|
|
$pasal21='21';
|
|
} else {$pph21=0;$pasal21='';}
|
|
|
|
|
|
if ((isset($r['pph_22'])) && ($r['pph_22']!=0)) {
|
|
$pph22=$r['pph_22'];
|
|
$pasal22='22';
|
|
} else {$pph22=0;$pasal22='';}
|
|
|
|
if ((isset($r['pph_23'])) && ($r['pph_23']!=0)) {
|
|
$pph23=$r['pph_23'];
|
|
$pasal23='23';
|
|
} else {$pph23=0;$pasal23='';}
|
|
|
|
if ((isset($r['pph_final'])) && ($r['pph_final']!=0)) {
|
|
$pph_fnl=$r['pph_final'];
|
|
$pasal_fnl='FNL';
|
|
} else {$pph_fnl=0;$pasal_fnl='';}
|
|
|
|
if ((isset($r['ppn'])) && ($r['ppn']!=0)) {$ppn=$r['ppn'];} else {$ppn=0;}
|
|
|
|
$cek_sppd=substr($r['no_sp'],0,4);
|
|
if ($cek_sppd=='SPPD') {
|
|
$drangka=$r['untuk'];$sbrk=$r['tgl_berangkat'];$skbl=$r['tgl_kembali'];
|
|
$ketel=strtoupper($r['kegiatan'].' dalam rangka '.$drangka);
|
|
$tglsppd=':::: Tanggal. '.date('d-m-Y',strtotime($sbrk)).' s/d '.date('d-m-Y',strtotime($skbl));
|
|
$ketan=':::: a.n. '.$soporek;
|
|
$keder=$ketel.' '.$tglsppd.' '.$ketan;
|
|
} else {
|
|
$keder=strtoupper($r['kegiatan'].' - '.$r['kegiatan_pengadaan'].' - '.$soporek.''.$trm.''.$ket2);
|
|
}
|
|
|
|
?>
|
|
<tr>
|
|
<td align="center"><?php echo $a; ?></td>
|
|
<td align="center"><?php echo $tr2; ?></td>
|
|
<td align="center"><?php echo $r['no_kwi_bend'].''.$r['kode_perben']; ?></td>
|
|
<td align="center"><?php echo $r['inisial']; ?></td>
|
|
<td align="left"><?php echo $keder; ?></td>
|
|
<td align="center"><?php echo $rek; ?></td>
|
|
<td align="right"><?php echo number_format($r['nilai_pelunasan'],0,',','.'); ?></td>
|
|
<td align="right"><?php echo number_format($ppn,0,',','.'); ?></td>
|
|
<td align="right"><?php echo number_format($pph21,0,',','.'); ?></td>
|
|
<td align="right"><?php echo number_format($pph22,0,',','.'); ?></td>
|
|
<td align="right"><?php echo number_format($pph23,0,',','.'); ?></td>
|
|
<td align="right"><?php echo number_format($pph_fnl,0,',','.'); ?></td>
|
|
<td align="center"><?php echo $r['inisial_bend']; ?></td>
|
|
<td align="center"><?php echo $r['status_um']; ?></td>
|
|
<td align="center"><?php echo $r['no_sp']; ?></td>
|
|
<td align="center"><?php echo $tg; ?></td>
|
|
<td align="center"><?php echo $trl; ?></td>
|
|
<td align="center"><?php echo $r['no_faktur']; ?></td>
|
|
<td align="center"><?php echo $tfk; ?></td>
|
|
<td align="center"><?php echo $r['jenis_pembayaran']; ?></td>
|
|
</tr>
|
|
<?php
|
|
$a++;
|
|
} ?>
|
|
</tbody>
|
|
</table>
|