New Task 1728: Aide à l'encodage - Journaux négatifs (note de crédit)
This commit is contained in:
Dany De Bontridder
parent
03cf9df238
commit
c997708f95
21 changed files with 1794 additions and 623 deletions
83
include/export/export_printtva_csv.php
Normal file
83
include/export/export_printtva_csv.php
Normal file
|
|
@ -0,0 +1,83 @@
|
|||
<?php
|
||||
/*
|
||||
* This file is part of NOALYSS.
|
||||
*
|
||||
* NOALYSS 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 2 of the License, or
|
||||
* (at your option) any later version.
|
||||
*
|
||||
* NOALYSS 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 NOALYSS; if not, write to the Free Software
|
||||
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
*/
|
||||
|
||||
// Copyright Author Dany De Bontridder danydb@noalyss.eu
|
||||
/**
|
||||
* @file
|
||||
* @brief
|
||||
*
|
||||
*/
|
||||
if ( ! defined ('ALLOWED') ) die('Appel direct ne sont pas permis');
|
||||
|
||||
require_once NOALYSS_INCLUDE."/class/tax_summary.class.php";
|
||||
require_once NOALYSS_INCLUDE."/lib/noalyss_csv.class.php";
|
||||
$http=new HttpInput();
|
||||
$tax_summary = new Tax_Summary($cn,$http->get("date_start"),$http->get("date_end"));
|
||||
$tax_summary->check();
|
||||
|
||||
$csv=new Noalyss_Csv("summary_tva");
|
||||
$csv->send_header();
|
||||
// Sale
|
||||
$csv->write_header([
|
||||
_("Journal"),
|
||||
("Code TVA"),
|
||||
_("Taux"),
|
||||
_("Montant HT"),
|
||||
_("Montant TVA"),
|
||||
_("Montant Autoliquidation")]);
|
||||
$array=$tax_summary->get_row_sale();
|
||||
$nb_array=count($array);
|
||||
for ($i=0;$i < $nb_array;$i++) {
|
||||
$csv->add ($array[$i]['jrn_def_name']);
|
||||
$csv->add ($array[$i]['tva_label']);
|
||||
$csv->add ($array[$i]['tva_rate'],'number');
|
||||
$csv->add ($array[$i]['amount_wovat'],'number');
|
||||
$csv->add ($array[$i]['amount_vat'],'number');
|
||||
$csv->add ($array[$i]['amount_sided'],'number');
|
||||
$csv->write();
|
||||
}
|
||||
//Purchase
|
||||
$csv->write_header([
|
||||
_("Journal"),
|
||||
("Code TVA"),
|
||||
_("Taux"),
|
||||
_("Montant HT"),
|
||||
_("Privée"),
|
||||
_("Montant TVA"),
|
||||
_("Montant Autoliquidation"),
|
||||
_("Montant ND"),
|
||||
_("TVA Non Déd"),
|
||||
_("TVA Non Déd & récup")
|
||||
]);
|
||||
$array=$tax_summary->get_row_purchase();
|
||||
$nb_array=count($array);
|
||||
for ($i=0;$i < $nb_array;$i++) {
|
||||
$csv->add ($array[$i]['jrn_def_name']);
|
||||
$csv->add ($array[$i]['tva_label']);
|
||||
$csv->add ($array[$i]['tva_rate'],'number');
|
||||
$csv->add ($array[$i]['amount_wovat'],'number');
|
||||
$csv->add ($array[$i]['amount_private'],'number');
|
||||
$csv->add ($array[$i]['amount_vat'],'number');
|
||||
$csv->add ($array[$i]['amount_sided'],'number');
|
||||
$csv->add ($array[$i]['amount_noded_amount'],'number');
|
||||
$csv->add ($array[$i]['amount_noded_tax'],'number');
|
||||
$csv->add ($array[$i]['amount_noded_return'],'number');
|
||||
$csv->write();
|
||||
}
|
||||
353
include/export/export_printtva_pdf.php
Normal file
353
include/export/export_printtva_pdf.php
Normal file
|
|
@ -0,0 +1,353 @@
|
|||
<?php
|
||||
/*
|
||||
* This file is part of NOALYSS.
|
||||
*
|
||||
* NOALYSS 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 2 of the License, or
|
||||
* (at your option) any later version.
|
||||
*
|
||||
* NOALYSS 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 NOALYSS; if not, write to the Free Software
|
||||
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
*/
|
||||
|
||||
// Copyright Author Dany De Bontridder danydb@noalyss.eu
|
||||
/**
|
||||
* @file
|
||||
* @brief export PDF
|
||||
*
|
||||
*/
|
||||
if (!defined('ALLOWED')) die('Appel direct ne sont pas permis');
|
||||
require_once NOALYSS_INCLUDE . "/class/tax_summary.class.php";
|
||||
require_once NOALYSS_INCLUDE . '/class/user.class.php';
|
||||
require_once NOALYSS_INCLUDE . '/class/pdf_land.class.php';
|
||||
require_once NOALYSS_INCLUDE . '/lib/http_input.class.php';
|
||||
bcscale(4);
|
||||
$http = new HttpInput();
|
||||
|
||||
$from_periode = $http->request("date_start");
|
||||
$to_periode = $http->request("date_end");
|
||||
|
||||
|
||||
$gDossier = dossier::id();
|
||||
|
||||
/* Security */
|
||||
$cn = Dossier::connect();
|
||||
$tax_summary = new Tax_Summary($cn, $from_periode, $to_periode);
|
||||
$pdf = new PDFLand($cn);
|
||||
$pdf->setDossierInfo(sprintf(_("Date") . " : %s %s", $from_periode, $to_periode));
|
||||
$pdf->AliasNbPages();
|
||||
$pdf->AddPage();
|
||||
$pdf->SetAuthor('NOALYSS');
|
||||
$pdf->setTitle(_("Résumé TVA"), true);
|
||||
|
||||
|
||||
|
||||
|
||||
//-------------------------------------------------------------------------
|
||||
// Sales
|
||||
//-------------------------------------------------------------------------
|
||||
$a_sale_header = [_("Code TVA"), _("Taux"), _("Montant HT"), _("Montant TVA"),
|
||||
_("Montant Autoliquidation")];
|
||||
$nb_sale = count($a_sale_header);
|
||||
$array = $tax_summary->get_row_sale();
|
||||
// Table header
|
||||
$nb_array = count($array);
|
||||
$tot_vat = 0;
|
||||
$tot_wovat = 0;
|
||||
$tot_sided = 0;
|
||||
$ledger_name = "";
|
||||
//-------------------------------------------------------------------------
|
||||
// For each sale ledger
|
||||
//-------------------------------------------------------------------------
|
||||
// Table with total
|
||||
$a_col=['tva_label','tva_rate','amount_wovat','amount_vat','amount_sided'];
|
||||
$nb_col=count($a_col);
|
||||
$a_tot=[];
|
||||
// initialize totals
|
||||
for ($e=2;$e<$nb_col;$e++){
|
||||
$a_tot[$a_col[$e]]=0;
|
||||
}
|
||||
|
||||
for ($i = 0; $i < $nb_array; $i++) {
|
||||
for ($e=2;$e<$nb_col;$e++){
|
||||
$colname=$a_col[$e];
|
||||
$a_tot[$colname]=bcadd($a_tot[$colname],$array[$i][$colname]);
|
||||
}
|
||||
|
||||
if ($i == 0) {
|
||||
// Display ledger name
|
||||
|
||||
$ledger_name = $array[$i]['jrn_def_name'];
|
||||
$pdf->SetFont('DejaVuCond', 'B', 10);
|
||||
$pdf->write_cell(50, 8, $ledger_name);
|
||||
$pdf->line_new();
|
||||
|
||||
// Display Header
|
||||
$pdf->SetFont('DejaVuCond', 'B', 7);
|
||||
for ($e=0;$e<$nb_col;$e++){
|
||||
if ( $e == 0 ) {
|
||||
$pdf->write_cell(40, 5,$a_sale_header[$e], 1, 0, 'L');
|
||||
} else {
|
||||
$pdf->write_cell(40, 5,$a_sale_header[$e], 1, 0, 'R');
|
||||
}
|
||||
$a_tot[$colname]=0;
|
||||
}
|
||||
$pdf->line_new();
|
||||
$pdf->SetFont('DejaVuCond', '', 7);
|
||||
}
|
||||
if ($ledger_name != $array[$i]['jrn_def_name']) {
|
||||
// Display totals
|
||||
$pdf->SetFont('DejaVuCond', 'B', 7);
|
||||
$pdf->line_new();
|
||||
$pdf->write_cell(70, 5, "");
|
||||
for ($e=2;$e<$nb_col;$e++){
|
||||
$colname=$a_col[$e];
|
||||
$pdf->write_cell(40, 5, nbm($a_tot[$colname]), 0, 0, 'R');
|
||||
$a_tot[$colname]=0;
|
||||
}
|
||||
$pdf->line_new();
|
||||
$pdf->SetFont('DejaVuCond', 'B', 7);
|
||||
|
||||
// Display ledger name
|
||||
$ledger_name = $array[$i]['jrn_def_name'];
|
||||
$pdf->SetFont('DejaVuCond', 'B', 10);
|
||||
$pdf->write_cell(50, 8, $ledger_name);
|
||||
$pdf->line_new();
|
||||
|
||||
// Display Header
|
||||
for ($e=0;$e<$nb_col;$e++){
|
||||
if ( $e == 0 ) {
|
||||
$pdf->write_cell(40, 5,$a_sale_header[$e], 1, 0, 'L');
|
||||
} else {
|
||||
$pdf->write_cell(40, 5,$a_sale_header[$e], 1, 0, 'R');
|
||||
}
|
||||
$a_tot[$colname]=0;
|
||||
}
|
||||
}
|
||||
for ($e=0;$e<$nb_col;$e++){
|
||||
$colname=$a_col[$e];
|
||||
if ( $e ==0 ) {
|
||||
$pdf->write_cell(40, 5, $array[$i][$colname], 1, 0, 'L');
|
||||
} elseif ($e == 1 ){
|
||||
$pdf->write_cell(40, 5, nbm($array[$i][$colname]*100), 1, 0, 'R');
|
||||
}else {
|
||||
$pdf->write_cell(40, 5, nbm($array[$i][$colname]), 1, 0, 'R');
|
||||
}
|
||||
}
|
||||
$pdf->line_new();
|
||||
}
|
||||
$pdf->SetFont('DejaVuCond', 'B', 7);
|
||||
$pdf->write_cell(80, 5, "");
|
||||
for ($e=2;$e<$nb_col;$e++){
|
||||
$colname=$a_col[$e];
|
||||
$pdf->write_cell(40, 5, nbm($a_tot[$colname]), 1, 0, 'R');
|
||||
}
|
||||
|
||||
//-------------------------------------------------------------------------
|
||||
// Summary sales
|
||||
//-------------------------------------------------------------------------
|
||||
$a_sum = $tax_summary->get_summary_sale();
|
||||
$pdf->line_new();
|
||||
$pdf->SetFont('DejaVuCond', 'B', 10);
|
||||
$pdf->write_cell(50, 8, _("Résumé TVA vente"));
|
||||
$pdf->line_new();
|
||||
|
||||
$pdf->SetFont('DejaVuCond', 'B', 7);
|
||||
for ($i = 0; $i < $nb_sale; $i++) {
|
||||
if ($i > 0 ) {
|
||||
$pdf->write_cell(40, 5, $a_sale_header[$i], 1, 0, 'R');
|
||||
} else {
|
||||
$pdf->write_cell(40, 5, $a_sale_header[$i], 1, 0, 'L');
|
||||
}
|
||||
}
|
||||
$pdf->line_new();
|
||||
|
||||
$nb_array = count($array);
|
||||
// initialize totals
|
||||
for ($e=2;$e<$nb_col;$e++){
|
||||
$a_tot[$a_col[$e]]=0;
|
||||
}
|
||||
$pdf->SetFont('DejaVuCond', '', 7);
|
||||
|
||||
for ($i = 0; $i < $nb_array; $i++) {
|
||||
// display each row
|
||||
for ($e=0;$e<$nb_col;$e++){
|
||||
$colname=$a_col[$e];
|
||||
if ( $e ==0 ) {
|
||||
// first column TVA_LABEL
|
||||
$pdf->write_cell(40, 5, $array[$i][$colname], 1, 0, 'L');
|
||||
} elseif ($e == 1 ){
|
||||
// Secund col. tva rate
|
||||
$pdf->write_cell(40, 5, nbm($array[$i][$colname]*100), 1, 0, 'R');
|
||||
}else {
|
||||
// Other cols,display amount and compute total
|
||||
$a_tot[$colname] = bcadd($a_tot[$colname], $array[$i][$colname]);
|
||||
$pdf->write_cell(40, 5, nbm($array[$i][$colname]), 1, 0, 'R');
|
||||
}
|
||||
}
|
||||
$pdf->line_new();
|
||||
}
|
||||
$pdf->SetFont('DejaVuCond', 'B', 7);
|
||||
$pdf->write_cell(80, 5, "");
|
||||
for ($e=2;$e<$nb_col;$e++){
|
||||
$colname=$a_col[$e];
|
||||
$pdf->write_cell(40, 5, nbm($a_tot[$colname]), 1, 0, 'R');
|
||||
}
|
||||
$pdf->line_new();
|
||||
|
||||
//------------------------------------------------------------------------------------------
|
||||
// Purchase
|
||||
//------------------------------------------------------------------------------------------
|
||||
$array = $tax_summary->get_row_purchase();
|
||||
$a_colp=['tva_label','tva_rate','amount_wovat','amount_private','amount_vat','amount_sided',
|
||||
'amount_noded_amount','amount_noded_tax','amount_noded_return'];
|
||||
$a_purchase_header = [_("Code TVA"), _("Taux"), _("Montant HT"), _("Privée"), _("Montant TVA"),
|
||||
_("Montant Autoliquidation"), _("Montant Non Déd"), _("TVA Non Déd"), _("TVA Non Déd & récup")];
|
||||
$nb_purchase = count($a_purchase_header);
|
||||
|
||||
for ($e=2;$e<$nb_col;$e++){
|
||||
$a_tot[$a_col[$e]]=0;
|
||||
}
|
||||
|
||||
for ($i = 0; $i < $nb_array; $i++) {
|
||||
for ($e=2;$e<$nb_col;$e++){
|
||||
$colname=$a_col[$e];
|
||||
$a_tot[$colname]=bcadd($a_tot[$colname],$array[$i][$colname]);
|
||||
}
|
||||
|
||||
if ($i == 0) {
|
||||
// Display ledger name
|
||||
|
||||
$ledger_name = $array[$i]['jrn_def_name'];
|
||||
$pdf->SetFont('DejaVuCond', 'B', 10);
|
||||
$pdf->write_cell(50, 8, $ledger_name);
|
||||
$pdf->line_new();
|
||||
|
||||
// Display Header
|
||||
$pdf->SetFont('DejaVuCond', 'B', 7);
|
||||
for ($e=0;$e<$nb_col;$e++){
|
||||
if ( $e == 0 ) {
|
||||
$pdf->write_cell(40, 5,$a_purchase_header[$e], 1, 0, 'L');
|
||||
} else {
|
||||
$pdf->write_cell(40, 5,$a_purchase_header[$e], 1, 0, 'R');
|
||||
}
|
||||
$a_tot[$colname]=0;
|
||||
}
|
||||
$pdf->line_new();
|
||||
$pdf->SetFont('DejaVuCond', '', 7);
|
||||
}
|
||||
if ($ledger_name != $array[$i]['jrn_def_name']) {
|
||||
// Display totals
|
||||
$pdf->SetFont('DejaVuCond', 'B', 7);
|
||||
$pdf->line_new();
|
||||
$pdf->write_cell(70, 5, "");
|
||||
for ($e=2;$e<$nb_col;$e++){
|
||||
$colname=$a_col[$e];
|
||||
$pdf->write_cell(40, 5, nbm($a_tot[$colname]), 0, 0, 'R');
|
||||
$a_tot[$colname]=0;
|
||||
}
|
||||
$pdf->line_new();
|
||||
$pdf->SetFont('DejaVuCond', 'B', 7);
|
||||
|
||||
// Display ledger name
|
||||
$ledger_name = $array[$i]['jrn_def_name'];
|
||||
$pdf->SetFont('DejaVuCond', 'B', 10);
|
||||
$pdf->write_cell(50, 8, $ledger_name);
|
||||
$pdf->line_new();
|
||||
|
||||
// Display Header
|
||||
for ($e=0;$e<$nb_col;$e++){
|
||||
if ( $e == 0 ) {
|
||||
$pdf->write_cell(40, 5,$a_purchase_header[$e], 1, 0, 'L');
|
||||
} else {
|
||||
$pdf->write_cell(40, 5,$a_purchase_header[$e], 1, 0, 'R');
|
||||
}
|
||||
$a_tot[$colname]=0;
|
||||
}
|
||||
}
|
||||
for ($e=0;$e<$nb_col;$e++){
|
||||
$colname=$a_col[$e];
|
||||
if ( $e ==0 ) {
|
||||
$pdf->write_cell(40, 5, $array[$i][$colname], 1, 0, 'L');
|
||||
} elseif ($e == 1 ){
|
||||
$pdf->write_cell(40, 5, nbm($array[$i][$colname]*100), 1, 0, 'R');
|
||||
}else {
|
||||
$pdf->write_cell(40, 5, nbm($array[$i][$colname]), 1, 0, 'R');
|
||||
}
|
||||
}
|
||||
$pdf->line_new();
|
||||
}
|
||||
$pdf->SetFont('DejaVuCond', 'B', 7);
|
||||
$pdf->write_cell(80, 5, "");
|
||||
for ($e=2;$e<$nb_col;$e++){
|
||||
$colname=$a_col[$e];
|
||||
$pdf->write_cell(40, 5, nbm($a_tot[$colname]), 1, 0, 'R');
|
||||
}
|
||||
|
||||
//-------------------------------------------------------------------------
|
||||
// Summary sales
|
||||
//-------------------------------------------------------------------------
|
||||
$a_sum = $tax_summary->get_summary_sale();
|
||||
$pdf->line_new();
|
||||
$pdf->SetFont('DejaVuCond', 'B', 10);
|
||||
$pdf->write_cell(50, 8, _("Résumé TVA Achat"));
|
||||
$pdf->line_new();
|
||||
|
||||
$pdf->SetFont('DejaVuCond', 'B', 7);
|
||||
for ($e=0;$e<$nb_col;$e++){
|
||||
if ( $e == 0 ) {
|
||||
$pdf->write_cell(40, 5,$a_purchase_header[$e], 1, 0, 'L');
|
||||
} else {
|
||||
$pdf->write_cell(40, 5,$a_purchase_header[$e], 1, 0, 'R');
|
||||
}
|
||||
$a_tot[$colname]=0;
|
||||
}
|
||||
$pdf->line_new();
|
||||
|
||||
$nb_array = count($array);
|
||||
// initialize totals
|
||||
for ($e=2;$e<$nb_col;$e++){
|
||||
$a_tot[$a_col[$e]]=0;
|
||||
}
|
||||
$pdf->SetFont('DejaVuCond', '', 7);
|
||||
|
||||
for ($i = 0; $i < $nb_array; $i++) {
|
||||
// display each row
|
||||
for ($e=0;$e<$nb_col;$e++){
|
||||
$colname=$a_col[$e];
|
||||
if ( $e ==0 ) {
|
||||
// first column TVA_LABEL
|
||||
$pdf->write_cell(40, 5, $array[$i][$colname], 1, 0, 'L');
|
||||
} elseif ($e == 1 ){
|
||||
// Secund col. tva rate
|
||||
$pdf->write_cell(40, 5, nbm($array[$i][$colname]*100), 1, 0, 'R');
|
||||
}else {
|
||||
// Other cols,display amount and compute total
|
||||
$a_tot[$colname] = bcadd($a_tot[$colname], $array[$i][$colname]);
|
||||
$pdf->write_cell(40, 5, nbm($array[$i][$colname]), 1, 0, 'R');
|
||||
}
|
||||
}
|
||||
$pdf->line_new();
|
||||
}
|
||||
$pdf->SetFont('DejaVuCond', 'B', 7);
|
||||
$pdf->write_cell(80, 5, "");
|
||||
for ($e=2;$e<$nb_col;$e++){
|
||||
$colname=$a_col[$e];
|
||||
$pdf->write_cell(40, 5, nbm($a_tot[$colname]), 1, 0, 'R');
|
||||
}
|
||||
$pdf->line_new();
|
||||
|
||||
|
||||
//---------------------------------- Output --------------------------------------------------
|
||||
|
||||
$fDate = date('Ymd-Hi');
|
||||
|
||||
$pdf->Output('tva-' . $fDate . '.pdf', 'D');
|
||||
Loading…
Add table
Add a link
Reference in a new issue