diff --git a/htdocs/compta/compta-files.php b/htdocs/compta/compta-files.php index a04cd2a7c66..679d21c000f 100644 --- a/htdocs/compta/compta-files.php +++ b/htdocs/compta/compta-files.php @@ -16,13 +16,11 @@ * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ - /** * \file htdocs/compta/recap-compta.php - * \ingroup compta + * \ingroup compta * \brief Page de fiche recap customer */ - require '../main.inc.php'; require_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php'; require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php'; @@ -32,35 +30,27 @@ require_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php'; require_once DOL_DOCUMENT_ROOT.'/fourn/class/fournisseur.facture.class.php'; require_once DOL_DOCUMENT_ROOT.'/compta/sociales/class/chargesociales.class.php'; restrictedArea($user,'banque'); - $langs->load("companies"); if (! empty($conf->facture->enabled)) $langs->load("bills"); - -$date_start =GETPOST('date_start','alpha'); +$date_start =GETPOST('date_start','alpha'); $date_startDay= GETPOST('date_startday','int'); $date_startMonth= GETPOST('date_startmonth','int'); $date_startYear= GETPOST('date_startyear','int'); $date_start=($date_startDay)?dol_mktime(0,0,0,$date_startMonth,$date_startDay,$date_startYear):strtotime($date_start); - -$date_stop =GETPOST('date_stop','alpha'); +$date_stop =GETPOST('date_stop','alpha'); $date_stopDay= GETPOST('date_stopday','int'); $date_stopMonth= GETPOST('date_stopmonth','int'); $date_stopYear= GETPOST('date_stopyear','int'); -//FIXME doldate +//FIXME doldate $date_stop=($date_stopDay)?dol_mktime(0,0,0,$date_stopMonth,$date_stopDay,$date_stopYear):strtotime($date_stop); - -$action =GETPOST('action','alpha'); +$action =GETPOST('action','alpha'); // Security check //if ($user->societe_id) $id=$user->societe_id; //$result = restrictedArea($user, 'societe', $id, '&societe'); - //$object = new Societe($db); //if ($id > 0) $object->fetch($id); - - // Initialize technical object to manage hooks of page. Note that conf->hooks_modules contains array of hook context $hookmanager->initHooks(array('comptafilescard','globalcard')); - // Load variable for pagination $limit = GETPOST('limit','int')?GETPOST('limit','int'):$conf->liste_limit; $sortfield = GETPOST('sortfield','alpha'); @@ -72,95 +62,91 @@ $pageprev = $page - 1; $pagenext = $page + 1; if (! $sortfield) $sortfield="f.datef,f.rowid"; // Set here default search field if (! $sortorder) $sortorder="DESC"; - - $arrayfields=array( 'date'=>array('label'=>"Date", 'checked'=>1), //... ); - /* * Actions */ //$parameters = array('socid' => $id); //$reshook = $hookmanager->executeHooks('doActions', $parameters, $object); // Note that $object may have been modified by some hooks //if ($reshook < 0) setEventMessages($hookmanager->error, $hookmanager->errors, 'errors'); - /* - * Fetch the lines/files from db / + * Fetch the lines/files from db / */ $filesarray=array(); $result=false; if(($action=="searchfiles"||$action=="dl" ) && $date_start && $date_stop){ $wheretail=" '".$db->idate($date_start)."' AND '".$db->idate($date_stop)."'"; - $sql="SELECT rowid, facnumber as ref,paye as paid,total_ttc,fk_soc,datef as date, 'Invoice' as item FROM ".MAIN_DB_PREFIX."facture"; + $sql="SELECT rowid as id, facnumber as ref,paye as paid,total_ttc,fk_soc,datef as date, 'Invoice' as item FROM ".MAIN_DB_PREFIX."facture"; $sql.=" WHERE datef between ".$wheretail; $sql.=" UNION ALL"; - $sql.=" SELECT rowid,ref, paye as paid, total_ttc, fk_soc,datef as date, 'InvoiceSupplier' as item FROM ".MAIN_DB_PREFIX."facture_fourn"; + $sql.=" SELECT rowid as id,ref, paye as paid, total_ttc, fk_soc,datef as date, 'InvoiceSupplier' as item FROM ".MAIN_DB_PREFIX."facture_fourn"; $sql.=" WHERE datef between ".$wheretail; $sql.=" UNION ALL"; - $sql.=" SELECT rowid,ref,paid,total_ttc,fk_user_author as fk_soc,date_fin as date,'Expense' as item FROM ".MAIN_DB_PREFIX."expensereport"; + $sql.=" SELECT rowid as id,ref,paid,total_ttc,fk_user_author as fk_soc,date_fin as date,'Expense' as item FROM ".MAIN_DB_PREFIX."expensereport"; $sql.=" WHERE date_fin between ".$wheretail; $sql.=" UNION ALL"; - $sql.=" SELECT rowid,ref,paid,amount as total_ttc,CONCAT(firstname,' ',lastname) as fk_soc,datedon as date,'Donation' as item FROM ".MAIN_DB_PREFIX."don"; + $sql.=" SELECT rowid as id,ref,paid,amount as total_ttc,CONCAT(firstname,' ',lastname) as fk_soc,datedon as date,'Donation' as item FROM ".MAIN_DB_PREFIX."don"; $sql.=" WHERE datedon between ".$wheretail; $sql.=" UNION ALL"; - $sql.=" SELECT rowid,label as ref,1 as paid,amount as total_ttc,fk_user as fk_soc,datep as date,'Salary' as item FROM ".MAIN_DB_PREFIX."payment_salary"; + $sql.=" SELECT rowid as id,label as ref,1 as paid,amount as total_ttc,fk_user as fk_soc,datep as date,'Salary' as item FROM ".MAIN_DB_PREFIX."payment_salary"; $sql.=" WHERE datep between ".$wheretail; $sql.=" UNION ALL"; - $sql.=" SELECT rowid,num_paiement as ref,1 as paid,amount as total_ttc,fk_charge as fk_soc,datep as date,'Charge' as item FROM ".MAIN_DB_PREFIX."paiementcharge"; + $sql.=" SELECT rowid as id,num_paiement as ref,1 as paid,amount as total_ttc,fk_charge as fk_soc,datep as date,'Charge' as item FROM ".MAIN_DB_PREFIX."paiementcharge"; $sql.=" WHERE datep between ".$wheretail; $resd = $db->query($sql); - $files=array(); + $files=array(); $link=''; - + if ($resd) { $numd = $db->num_rows($resd); - + $upload_dir =''; $i=0; while($i<$numd) { - - + + $objd = $db->fetch_object($resd); - + switch($objd->item){ - case "Invoice": + case "Invoice": $subdir=dol_sanitizeFileName($objd->ref); $upload_dir = $conf->facture->dir_output.'/'.$subdir; $link="../../document.php?modulepart=facture&file=".str_replace('/','%2F',$subdir).'%2F'; - break; - case "InvoiceSupplier": - $subdir=get_exdir($objd->id,2,0,0,$objd,'invoice_supplier').$objd->ref; + break; + case "InvoiceSupplier": + $subdir=get_exdir($objd->id,2,0,0,$objd,'invoice_supplier').dol_sanitizeFileName($objd->ref); $upload_dir = $conf->fournisseur->facture->dir_output.'/'.$subdir; $link="../../document.php?modulepart=facture_fournisseur&file=".str_replace('/','%2F',$subdir).'%2F'; - break; + break; case "Expense": $subdir=dol_sanitizeFileName($objd->ref); $upload_dir = $conf->expensereport->dir_output.'/'.$subdir; $link="../../document.php?modulepart=expensereport&file=".str_replace('/','%2F',$subdir).'%2F'; break; case "Salary": - $subdir=dol_sanitizeFileName($objd->rowid); + $subdir=dol_sanitizeFileName($objd->id); $upload_dir = $conf->salaries->dir_output.'/'.$subdir; $link="../../document.php?modulepart=salaries&file=".str_replace('/','%2F',$subdir).'%2F'; break; case "Donation": - $subdir=get_exdir(null,2,0,1,$objd,'donation'). '/'. dol_sanitizeFileName($objd->idd); + $subdir=get_exdir(null,2,0,1,$objd,'donation'). '/'. dol_sanitizeFileName($objd->id); $upload_dir = $conf->don->dir_output . '/' . $subdir; $link="../../document.php?modulepart=don&file=".str_replace('/','%2F',$subdir).'%2F'; break; case "Charge": - $subdir=dol_sanitizeFileName($objd->rowid); + $subdir=dol_sanitizeFileName($objd->id); $upload_dir = $conf->tax->dir_output . '/' . $subdir; $link="../../document.php?modulepart=tax&file=".str_replace('/','%2F',$subdir).'%2F'; break; default: break; } - + if(!empty($upload_dir)){ $result=true; $files=dol_dir_list($upload_dir,"files",0,'','(\.meta|_preview\.png)$','',SORT_ASC,1); @@ -182,39 +168,33 @@ if(($action=="searchfiles"||$action=="dl" ) && $date_start && $date_stop){ $nofile['ref']=$objd->ref; $nofile['fk']=$objd->fk_soc; $nofile['item']=$objd->item; - $filesarray[]=$nofile; } } - $i++; + $i++; } - } + } $db->free($resd); - + } /* * cleanup of old ZIP */ //FIXME - - /* *ZIP creation */ if($result & $action=="dl"){ - unset($zip); + unset($zip); $log='date,type,ref,total,paid,filename,item_id'."\n"; $zipname = 'export.zip'; $zip = new ZipArchive; $res = $zip->open($zipname, ZipArchive::OVERWRITE|ZipArchive::CREATE); - if ($res){ - foreach ($filesarray as $key=> $file) { - + if ($res){ + foreach ($filesarray as $key=> $file) { if(file_exists($file["fullname"])) $zip->addFile($file["fullname"],$file["name"]);// $log.=$file['date'].','.$file['item'].','.$file['ref'].','.$file['amount'].','.$file['paid'].','.$file["name"].','.$file['fk']."\n"; } - - $zip->addFromString('log.csv', $log); $zip->close(); ///Then download the zipped file. @@ -222,37 +202,27 @@ if($result & $action=="dl"){ header('Content-disposition: attachment; filename='.$zipname); header('Content-Length: ' . filesize($zipname)); readfile($zipname); - exit(); - } + exit(); + } } - - // None - - /* - * View + * View */ - $form = new Form($db); $userstatic=new User($db); - $title=$langs->trans("ComptaFiles").' - '.$langs->trans("List"); //if (! empty($conf->global->MAIN_HTML_TITLE) && preg_match('/thirdpartynameonly/',$conf->global->MAIN_HTML_TITLE) && $object->name) $title=$object->name.' - '.$langs->trans("Symmary"); $help_url='EN:Module_Accounting|FR:Module_Compatibilite'; //FIXME - llxHeader('',$title,$help_url); - print '
'."\n\t\t\t"; print ''.$langs->trans("dateStart").': '.$form->select_date($date_start,'date_start',0,0,0,"",1,1,1)."\n"; print ''.$langs->trans("dateStop").': '.$form->select_date($date_stop,'date_stop',0,0,0,"",1,1,1)."\n"; - print '
'."\n\t\t"; - if (!empty($date_start) && !empty($date_stop))echo dol_print_date($date_start)." - ".dol_print_date($date_stop); print ''; print ''; -//if (! empty($arrayfields['f.datef']['checked'])) +//if (! empty($arrayfields['f.datef']['checked'])) print_liste_field_titre($arrayfields['date']['label'],$_SERVER["PHP_SELF"],"date","",$param,'align="center" class="nowrap"',$sortfield,$sortorder); print ''; print ''; @@ -261,53 +231,41 @@ print ''; print ''; print ''; print ''; - print ''; - if ($result) { $TData = dol_sort_array($filesarray, 'date', 'ASC'); - if(empty($TData)) { - print ''; - } else { + if(empty($TData)) { + print ''; + } else { + // Sort array by date ASC to calucalte balance - // Sort array by date ASC to calucalte balance - - $totalDebit = 0; - $totalCredit = 0; - // Balance calculation - $balance = 0; - foreach($TData as &$data1) { - if($data1['item']!='Invoice'&& $data1['item']!='Donation' ){ + $totalDebit = 0; + $totalCredit = 0; + // Balance calculation + $balance = 0; + foreach($TData as &$data1) { + if($data1['item']!='Invoice'&& $data1['item']!='Donation' ){ $data1['amount']=-$data1['amount']; } if ($data1['amount']>0){ - - }else{ - + }else{ } $balance += $data1['amount']; - $data1['balance'] = $balance; - } - - - + $data1['balance'] = $balance; + } // Display array foreach($TData as $data) { - $html_class = ''; //if (!empty($data['fk_facture'])) $html_class = 'facid-'.$data['fk_facture']; //elseif (!empty($data['fk_paiement'])) $html_class = 'payid-'.$data['fk_paiement']; - print ''; - print "\n"; print ''; print ''; print '\n"; - print ''; print '\n"; $totalDebit += ($data['amount'] > 0) ? abs($data['amount']) : 0; @@ -315,12 +273,8 @@ if ($result) $totalCredit += ($data['amount'] > 0) ? 0 : abs($data['amount']); // Balance print '\n"; - - - print "\n"; } - print ''; print ''; print ''; @@ -328,16 +282,24 @@ if ($result) print ''; print ''; print "\n"; - } + } - - } + } print "
'.$langs->trans("Type").''.$langs->trans("Ref").''.$langs->trans("Paid").''.$langs->trans("Debit").''.$langs->trans("Credit").''.$langs->trans("Balance").'
'.$langs->trans("NoItem").'
'.$langs->trans("NoItem").'
"; print dol_print_date($data['date'],'day'); print "'.$data['item'].''.$data['ref'].' ".$data['name']."'.$data['paid'].''.(($data['amount'] > 0) ? price(abs($data['amount'])) : '')."'.price($data['balance'])."
 '.price($totalDebit).''.price(price2num($totalDebit - $totalCredit, 'MT')).'
"; print '
'."\n\t\t\t"; -print ''; -print ''; +print ''; +print ''; + +print ''; +print ''; +print ''; + + + + print '
'."\n\t\t\n\t\t\n\t\t\t"; -llxFooter(); + +llxFooter(); $db->close();