getDefaultStyle()->getFont()->setName('Arial'); $objPHPExcel->getDefaultStyle()->getFont()->setSize(9); $objPHPExcel->getDefaultStyle()->getAlignment()->setWrapText(true); $objPHPExcel->getSheet(0)->getColumnDimension('A')->setWidth(5); $objPHPExcel->getSheet(0)->getColumnDimension('B')->setWidth(12); $objPHPExcel->getSheet(0)->getColumnDimension('C')->setWidth(21); $objPHPExcel->getSheet(0)->getColumnDimension('D')->setWidth(7); $objPHPExcel->getSheet(0)->getColumnDimension('E')->setWidth(57); $objPHPExcel->getSheet(0)->getColumnDimension('F')->setWidth(30); $objPHPExcel->getSheet(0)->getColumnDimension('G')->setWidth(12); $objPHPExcel->getSheet(0)->getColumnDimension('H')->setWidth(16.86); $objPHPExcel->getSheet(0)->getColumnDimension('I')->setWidth(12.86); $objPHPExcel->getSheet(0)->getColumnDimension('J')->setWidth(12.86); $objPHPExcel->getSheet(0)->getColumnDimension('K')->setWidth(6.29); $objPHPExcel->getSheet(0)->getColumnDimension('L')->setWidth(12.86); $objPHPExcel->getSheet(0)->getColumnDimension('M')->setWidth(6.29); $objPHPExcel->getSheet(0)->getColumnDimension('N')->setWidth(12.86); $objPHPExcel->getSheet(0)->getColumnDimension('O')->setWidth(6.29); $objPHPExcel->getSheet(0)->getColumnDimension('P')->setWidth(12.86); $objPHPExcel->getSheet(0)->getColumnDimension('Q')->setWidth(6.29); $objPHPExcel->getSheet(0)->getColumnDimension('R')->setWidth(8); $objPHPExcel->getSheet(0)->getColumnDimension('S')->setWidth(13.86); $objPHPExcel->getSheet(0)->getColumnDimension('T')->setWidth(20); $objPHPExcel->getSheet(0)->getColumnDimension('U')->setWidth(23); $objPHPExcel->getSheet(0)->getColumnDimension('V')->setWidth(12); $objPHPExcel->getSheet(0)->getColumnDimension('W')->setWidth(17); $objPHPExcel->getSheet(0)->getColumnDimension('X')->setWidth(12); $objPHPExcel->getSheet(0)->getColumnDimension('Y')->setWidth(15); $styleBold = array('font' => array('bold' => true)); $objPHPExcel->getSheet(0)->getStyle('A3:Y3')->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('A3:Y3')->applyFromArray($styleBold); $objPHPExcel->getSheet(0)->getRowDimension('1')->setRowHeight(15); $objPHPExcel->getSheet(0)->setTitle('DATA LUNAS'); $objPHPExcel->getSheet(0)->getStyle('A1')->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_LEFT); $objPHPExcel->getSheet(0)->setCellValue('A1', 'Tanggal Lunas : '.$tm1.' s/d '.$ts1); $objPHPExcel->getActiveSheet()->getStyle('A1:Y1')->getAlignment()->setWrapText(false); $objPHPExcel->getSheet(0) ->setCellValue('A3', 'No') /* ->setCellValue('B3', 'No DPA') */ ->setCellValue('B3', 'Tgl Lunas') /*->setCellValue('D3', 'Sub') */ ->setCellValue('C3', 'No Kwitansi') ->setCellValue('D3', 'KPA') ->setCellValue('E3', 'Uraian') ->setCellValue('F3', 'Rekening') ->setCellValue('G3', 'Sibaku') ->setCellValue('H3', 'Pengeluaran') ->setCellValue('I3', 'PPN') ->setCellValue('J3', 'PPH-21') ->setCellValue('K3', 'Pasal') ->setCellValue('L3', 'PPH-22') ->setCellValue('M3', 'Pasal') ->setCellValue('N3', 'PPH-23') ->setCellValue('O3', 'Pasal') ->setCellValue('P3', 'PPH-FNL') ->setCellValue('Q3', 'Pasal') ->setCellValue('R3', 'Inisial') /*L*/ ->setCellValue('S3', 'Status UM') /*M*/ ->setCellValue('T3', 'Kwi/SP/SPK') /*N*/ ->setCellValue('U3', 'Tgl SP/SPK') /*O*/ ->setCellValue('V3', 'Tgl Setor') /*P*/ ->setCellValue('W3', 'No Faktur') /*Q*/ ->setCellValue('X3', 'Tgl Faktur') /*R*/ ->setCellValue('Y3', 'Jns Pembayaran'); /*S*/ $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 "; $hasil = pg_query($query); $baris = 4; $a=1; while ($r = pg_fetch_array($hasil)) { 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); } $objPHPExcel->getSheet(0) ->setCellValue('A'.$baris, $a) ->setCellValue('B'.$baris, $tr2) ->setCellValue('C'.$baris, $r['no_kwi_bend'].''.$r['kode_perben']) ->setCellValue('D'.$baris, $r['inisial']) ->setCellValue('E'.$baris, $keder) ->setCellValue('F'.$baris, $rek) ->setCellValue('G'.$baris, $r['kd_sibaku']) ->setCellValue('H'.$baris, $r['nilai_pelunasan']) ->setCellValue('I'.$baris, $ppn) ->setCellValue('J'.$baris, $pph21) ->setCellValue('K'.$baris, $pasal21) ->setCellValue('L'.$baris, $pph22) ->setCellValue('M'.$baris, $pasal22) ->setCellValue('N'.$baris, $pph23) ->setCellValue('O'.$baris, $pasal23) ->setCellValue('P'.$baris, $pph_fnl) ->setCellValue('Q'.$baris, $pasal_fnl) ->setCellValue('R'.$baris, $r['inisial_bend']) ->setCellValue('S'.$baris, $r['status_um']) ->setCellValue('T'.$baris, $r['no_sp']) ->setCellValue('U'.$baris, $tg) ->setCellValue('V'.$baris, $trl) ->setCellValue('W'.$baris, $r['no_faktur']) ->setCellValue('X'.$baris, $tfk) ->setCellValue('Y'.$baris, $r['jenis_pembayaran']); /* $objPHPExcel->getSheet(0)->getStyle('A3:A'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('B3:B'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('C3:C'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('D3:D'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('K3:K'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('M3:M'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('O3:O'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('Q3:Q'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('R3:R'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('S3:S'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('T3:T'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('U3:U'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('V3:V'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('X3:X'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('Y3:Y'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('A1:Y'.$baris)->getAlignment()->setVertical(PHPExcel_Style_Alignment::VERTICAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('H'.$baris)->getNumberFormat()->setFormatCode('#,##0'); $objPHPExcel->getSheet(0)->getStyle('I'.$baris)->getNumberFormat()->setFormatCode('#,##0'); $objPHPExcel->getSheet(0)->getStyle('J'.$baris)->getNumberFormat()->setFormatCode('#,##0'); $objPHPExcel->getSheet(0)->getStyle('L'.$baris)->getNumberFormat()->setFormatCode('#,##0'); $objPHPExcel->getSheet(0)->getStyle('N'.$baris)->getNumberFormat()->setFormatCode('#,##0'); $objPHPExcel->getSheet(0)->getStyle('P'.$baris)->getNumberFormat()->setFormatCode('#,##0');*/ $a++; $baris++; } $objPHPExcel->getSheet(0)->getStyle('A3:A'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('B3:B'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('C3:C'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('D3:D'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('K3:K'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('M3:M'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('O3:O'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('Q3:Q'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('R3:R'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('S3:S'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('T3:T'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('U3:U'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('V3:V'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('X3:X'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('Y3:Y'.$baris)->getAlignment()->setHorizontal(PHPExcel_Style_Alignment::HORIZONTAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('A1:Y'.$baris)->getAlignment()->setVertical(PHPExcel_Style_Alignment::VERTICAL_CENTER); $objPHPExcel->getSheet(0)->getStyle('H3:H'.$baris)->getNumberFormat()->setFormatCode('#,##0'); $objPHPExcel->getSheet(0)->getStyle('I3:I'.$baris)->getNumberFormat()->setFormatCode('#,##0'); $objPHPExcel->getSheet(0)->getStyle('J3:J'.$baris)->getNumberFormat()->setFormatCode('#,##0'); $objPHPExcel->getSheet(0)->getStyle('L3:L'.$baris)->getNumberFormat()->setFormatCode('#,##0'); $objPHPExcel->getSheet(0)->getStyle('N3:N'.$baris)->getNumberFormat()->setFormatCode('#,##0'); $objPHPExcel->getSheet(0)->getStyle('P3:P'.$baris)->getNumberFormat()->setFormatCode('#,##0'); $akhir=$baris-1; /*$objPHPExcel->getSheet(0)->setCellValue('I'.$baris, '=SUM(I2:I'.$akhir.')')->setCellValue('J'.$baris, '=SUM(J2:J'.$akhir.')'); $objPHPExcel->getSheet(0)->getStyle('I'.$baris)->getNumberFormat()->setFormatCode('#,##0'); $objPHPExcel->getSheet(0)->getStyle('J'.$baris)->getNumberFormat()->setFormatCode('#,##0'); $objPHPExcel->getSheet(0)->getStyle('I'.$baris.':J'.$baris)->applyFromArray($styleBold);*/ $objPHPExcel->getSheet(0)->removeColumn('G'); $objPHPExcel->getSheet(0)->removeColumn('J'); $objPHPExcel->getSheet(0)->removeColumn('K'); $objPHPExcel->getSheet(0)->removeColumn('L'); $objPHPExcel->getSheet(0)->removeColumn('M'); $objPHPExcel->setActiveSheetIndex(0); header('Content-Type: application/vnd.ms-excel'); header('Content-Disposition: attachment;filename="data_lunas.xls"'); header('Cache-Control: max-age=0'); $objWriter = PHPExcel_IOFactory::createWriter($objPHPExcel, 'Excel5'); $objWriter->save('php://output'); exit; ?>