init

modules/EcmPaymentStates/CreateXLS.php

@@ -0,0 +1,116 @@
+<?php
+set_include_path('include/PHPExcel/');
+
+include 'PHPExcel.php';
+include 'PHPExcel/Writer/Excel2007.php';
+include 'PHPExcel/IOFactory.php';
+
+$objPHPExcel = new PHPExcel();
+$objPHPExcel->getProperties()->setCreator("E5 CRM");
+$objPHPExcel->getProperties()->setLastModifiedBy("E5 CRM");
+$objPHPExcel->getProperties()->setTitle("Office 2007 PAYMENTS");
+$objPHPExcel->getProperties()->setSubject("Office 2007 PAYMENTS");
+$objPHPExcel->getProperties()->setDescription("PAYMENTS");
+
+$alf="ABCDEFGHIJKLMNOPQRSTUVWXYZ";
+
+
+$objPHPExcel->getActiveSheet()->getColumnDimension('A')->setWidth(5);
+$objPHPExcel->getActiveSheet()->getColumnDimension('B')->setWidth(30);
+$objPHPExcel->getActiveSheet()->getColumnDimension('C')->setWidth(30);
+$objPHPExcel->getActiveSheet()->getColumnDimension('D')->setWidth(20);
+$objPHPExcel->getActiveSheet()->getColumnDimension('E')->setWidth(5);
+$objPHPExcel->getActiveSheet()->getColumnDimension('F')->setWidth(5);
+$objPHPExcel->getActiveSheet()->getColumnDimension('G')->setWidth(30);
+$objPHPExcel->getActiveSheet()->getColumnDimension('H')->setWidth(30);
+$objPHPExcel->getActiveSheet()->getColumnDimension('I')->setWidth(20);
+
+
+$objPHPExcel->getActiveSheet()->setTitle('Simple');
+$objPHPExcel->setActiveSheetIndex(0);
+
+$objPHPExcel->getActiveSheet()->SetCellValue("B1","Register date");
+$objPHPExcel->getActiveSheet()->SetCellValue("C1","Name");
+$objPHPExcel->getActiveSheet()->SetCellValue("D1","Total");
+$objPHPExcel->getActiveSheet()->SetCellValue("G1","Payment date");
+$objPHPExcel->getActiveSheet()->SetCellValue("H1","Name");
+$objPHPExcel->getActiveSheet()->SetCellValue("I1","Value");
+$i=2;
+
+if($_REQUEST['not_matched']==1){
+	$wh_paid_i=true;
+	$wh_paid_p=true;
+}
+
+$w=$GLOBALS['db']->query("select p.id,p.document_no,p.paid,p.register_date,p.payment_date,p.total,p.ecminvoiceout_id from ecmpayments_ecminvoiceouts as p where p.deleted='0' and p.account_id='".$_REQUEST['account_id']."' order by p.register_date desc,p.document_no desc");
+while($r=$GLOBALS['db']->fetchByAssoc($w)){		
+	if($r['paid']!=0)$paid="*";
+	else $paid="";
+	$exp=explode("-",$r['register_date']);
+		
+	if($r['paid']==0)$arrear+=$r['total'];
+		
+	if($r['paid']==0 || !$wh_paid_i){
+		$objPHPExcel->getActiveSheet()->SetCellValue("A".$i,$paid);
+		$objPHPExcel->getActiveSheet()->SetCellValue("B".$i,$r['register_date']);
+		$objPHPExcel->getActiveSheet()->SetCellValue("C".$i,$r['document_no']);
+		$objPHPExcel->getActiveSheet()->SetCellValue("D".$i,$r['total']);
+		$i++;
+	}
+	$total_wn+=$r['total'];
+}
+$i=2;
+$w=$GLOBALS['db']->query("select payment_date,id,description,value,paid,name from ecmpayments where deleted='0' and parent_id='".$_REQUEST['account_id']."' order by payment_date desc,description desc");
+while($r=$GLOBALS['db']->fetchByAssoc($w)){
+	if($r['paid'])$paid="*";
+	else $paid="";
+		
+	if($r['paid']==0 || !$wh_paid_p){
+		$objPHPExcel->getActiveSheet()->SetCellValue("F".$i,$paid);
+		$objPHPExcel->getActiveSheet()->SetCellValue("G".$i,$r['payment_date']);
+		$objPHPExcel->getActiveSheet()->SetCellValue("H".$i,$r['name']);
+		$objPHPExcel->getActiveSheet()->SetCellValue("I".$i,$r['value']);
+		$i++;
+	}
+	$total_ma+=$r['value'];
+	
+}
+
+$objPHPExcel->getActiveSheet()->duplicateStyleArray(
+	array(
+		'fill' => array(
+			'type'	=> PHPExcel_Style_Fill::FILL_SOLID,
+			'color'	=> array('argb' => 'F0F0F0')
+		),
+		'borders' => array(	
+			'bottom'	=> array('style' => PHPExcel_Style_Border::BORDER_THIN),
+			'right'		=> array('style' => PHPExcel_Style_Border::BORDER_MEDIUM)
+		)
+	),
+	"A1:I1"
+);
+/*
+$objPHPExcel->getActiveSheet()->duplicateStyleArray(
+	array(
+		'fill' => array(
+			'type'	=> PHPExcel_Style_Fill::FILL_SOLID,
+			'color'	=> array('argb' => 'F0F0F0')
+		),
+		'borders' => array(	
+			'bottom'	=> array('style' => PHPExcel_Style_Border::BORDER_THIN),
+			'right'		=> array('style' => PHPExcel_Style_Border::BORDER_MEDIUM)
+		)
+	),
+	"A".($i).":I".($i)
+);*/
+
+
+$objWriter = PHPExcel_IOFactory::createWriter($objPHPExcel, 'Excel2007');
+chmod("cache/upload",0777);
+$microtime=str_replace(".","",str_replace(" ","",microtime()));
+$name="cache/upload/PaymentStates".$microtime.".xlsx";
+$objWriter->save($name);
+chmod($name,0777);
+
+header("Location: ".$name);
+?>