mirror of
https://github.com/Dolibarr/dolibarr.git
synced 2025-12-06 17:48:25 +01:00
317 lines
15 KiB
PHP
317 lines
15 KiB
PHP
<?php
|
|
/* Copyright (C) 2001-2006 Rodolphe Quiedeville <rodolphe@quiedeville.org>
|
|
* Copyright (C) 2004-2018 Laurent Destailleur <eldy@users.sourceforge.net>
|
|
* Copyright (C) 2017 Pierre-Henry Favre <support@atm-consulting.fr>
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 3 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
/**
|
|
* \file htdocs/compta/compta-files.php
|
|
* \ingroup compta
|
|
* \brief Page to show portoflio and files of a thirdparty and download it
|
|
*/
|
|
require '../main.inc.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/compta/paiement/class/paiement.class.php';
|
|
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_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_stopDay= GETPOST('date_stopday','int');
|
|
$date_stopMonth= GETPOST('date_stopmonth','int');
|
|
$date_stopYear= GETPOST('date_stopyear','int');
|
|
//FIXME doldate
|
|
$date_stop=($date_stopDay)?dol_mktime(0,0,0,$date_stopMonth,$date_stopDay,$date_stopYear):strtotime($date_stop);
|
|
$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');
|
|
$sortorder = GETPOST('sortorder','alpha');
|
|
$page = GETPOST('page','int');
|
|
if (empty($page) || $page == -1) { $page = 0; } // If $page is not defined, or '' or -1
|
|
$offset = $limit * $page;
|
|
$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');
|
|
|
|
|
|
|
|
/*
|
|
* View
|
|
*/
|
|
|
|
$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 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 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 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 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 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 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();
|
|
$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":
|
|
$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').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;
|
|
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->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->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->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);
|
|
foreach ($files as $key => $file){
|
|
$file['date']=$db->idate($objd->date);
|
|
$file['paid']=$objd->paid;
|
|
$file['amount']=$objd->total_ttc;
|
|
$file['ref']=$objd->ref;
|
|
$file['fk']=$objd->fk_soc;
|
|
$file['item']=$objd->item;
|
|
$file['link']=$link.$file['name'];
|
|
$out.= '<br><a href="'.$link.$file['name'].'">'.$file['name'].'</a>';
|
|
$filesarray[]=$file;
|
|
}
|
|
if(count($files)<1){
|
|
$nofile['date']=$db->idate($objd->date);
|
|
$nofile['paid']=$objd->paid;
|
|
$nofile['amount']=$objd->total_ttc;
|
|
$nofile['ref']=$objd->ref;
|
|
$nofile['fk']=$objd->fk_soc;
|
|
$nofile['item']=$objd->item;
|
|
$filesarray[]=$nofile;
|
|
}
|
|
}
|
|
$i++;
|
|
}
|
|
}
|
|
$db->free($resd);
|
|
}
|
|
/*
|
|
* cleanup of old ZIP
|
|
*/
|
|
//FIXME
|
|
/*
|
|
*ZIP creation
|
|
*/
|
|
if($result & $action=="dl"){
|
|
unset($zip);
|
|
$log='date,type,ref,total,paid,filename,item_id'."\n";
|
|
$zipname = ($date_start)."-".($date_stop).'_export.zip';
|
|
$zip = new ZipArchive;
|
|
$res = $zip->open($zipname, ZipArchive::OVERWRITE|ZipArchive::CREATE);
|
|
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.
|
|
header('Content-Type: application/zip');
|
|
header('Content-disposition: attachment; filename='.$zipname);
|
|
header('Content-Length: ' . filesize($zipname));
|
|
readfile($zipname);
|
|
unlink($zipname);
|
|
exit();
|
|
}
|
|
}
|
|
// None
|
|
/*
|
|
* 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 '<div><form name="searchfiles" action="?action=searchfiles'.$tail.'" method="POST" >'."\n\t\t\t";
|
|
print '<a>'.$langs->trans("dateStart").': '.$form->select_date($date_start,'date_start',0,0,0,"",1,1,1)."\n</a>";
|
|
print '<a>'.$langs->trans("dateStop").': '.$form->select_date($date_stop,'date_stop',0,0,0,"",1,1,1)."\n</a>";
|
|
print '<input class="butAction" type="submit" value="Go" /></form></div>'."\n\t\t";
|
|
if (!empty($date_start) && !empty($date_stop))echo dol_print_date($date_start)." - ".dol_print_date($date_stop);
|
|
print '<table class="noborder" width="100%">';
|
|
print '<tr class="liste_titre">';
|
|
//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 '<td>'.$langs->trans("Type").'</td>';
|
|
print '<td align="right">'.$langs->trans("Ref").'</td>';
|
|
print '<td>'.$langs->trans("File").'</td>';
|
|
print '<td>'.$langs->trans("Paid").'</td>';
|
|
print '<td align="right">'.$langs->trans("Debit").'</td>';
|
|
print '<td align="right">'.$langs->trans("Credit").'</td>';
|
|
print '<td align="right">'.$langs->trans("Balance").'</td>';
|
|
print '</tr>';
|
|
if ($result)
|
|
{
|
|
$TData = dol_sort_array($filesarray, 'date', 'ASC');
|
|
if(empty($TData)) {
|
|
print '<tr class="oddeven"><td colspan="7">'.$langs->trans("NoItem").'</td></tr>';
|
|
} else {
|
|
// 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' ){
|
|
$data1['amount']=-$data1['amount'];
|
|
}
|
|
if ($data1['amount']>0){
|
|
}else{
|
|
}
|
|
$balance += $data1['amount'];
|
|
$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 '<tr class="oddeven '.$html_class.'">';
|
|
print "<td align=\"center\">";
|
|
print dol_print_date($data['date'],'day');
|
|
print "</td>\n";
|
|
print '<td aling="left">'.$data['item'].'</td>';
|
|
print '<td aling="left">'.$data['ref'].'</td>';
|
|
print '<td> <a href='.$data['link'].">".$data['name']."</a></td>\n";
|
|
print '<td aling="left">'.$data['paid'].'</td>';
|
|
print '<td align="right">'.(($data['amount'] > 0) ? price(abs($data['amount'])) : '')."</td>\n";
|
|
$totalDebit += ($data['amount'] > 0) ? abs($data['amount']) : 0;
|
|
print '<td align="right">'.(($data['amount'] > 0) ? '' : price(abs($data['amount'])))."</td>\n";
|
|
$totalCredit += ($data['amount'] > 0) ? 0 : abs($data['amount']);
|
|
// Balance
|
|
print '<td align="right">'.price($data['balance'])."</td>\n";
|
|
print "</tr>\n";
|
|
}
|
|
print '<tr class="liste_total">';
|
|
print '<td colspan="5"> </td>';
|
|
print '<td align="right">'.price($totalDebit).'</td>';
|
|
print '<td align="right">'.price($totalCredit).'</td>';
|
|
print '<td align="right">'.price(price2num($totalDebit - $totalCredit, 'MT')).'</td>';
|
|
print '<td></td>';
|
|
print "</tr>\n";
|
|
}
|
|
}
|
|
print "</table>";
|
|
print '<form name="dl" action="?action=dl" method="POST" >'."\n\t\t\t";
|
|
|
|
print '<input type="hidden" name="date_start" value="'.dol_print_date($date_start,'dayxcard').'" />';
|
|
print '<input type="hidden" name="date_stop" value="'.dol_print_date($date_stop, 'dayxcard').'" />';
|
|
|
|
//print '<input type="hidden" name="date_stopDay" value="'.dol_print_date($date_stop, '%d').'" />';
|
|
//print '<input type="hidden" name="date_stopMonth" value="'.dol_print_date($date_stop, '%m').'" />';
|
|
//print '<input type="hidden" name="date_stopYear" value="'.dol_print_date($date_stop, '%Y').'" />';
|
|
|
|
//print '<input type="hidden" name="date_startDay" value="'.dol_print_date($date_start, '%d').'" />';
|
|
//print '<input type="hidden" name="date_startMonth" value="'.dol_print_date($date_start, '%m').'" />';
|
|
//print '<input type="hidden" name="date_startYear" value="'.dol_print_date($date_start, '%m').'" />';
|
|
|
|
|
|
print '<input class="butAction" type="submit" value="Download" /></form>'."\n\t\t</th>\n\t\t<th>\n\t\t\t";
|
|
|
|
|
|
|
|
llxFooter();
|
|
$db->close();
|