32require
'../../main.inc.php';
33require_once DOL_DOCUMENT_ROOT.
'/compta/tva/class/tva.class.php';
34require_once DOL_DOCUMENT_ROOT.
'/compta/tva/class/paymentvat.class.php';
35require_once DOL_DOCUMENT_ROOT.
'/compta/facture/class/facture.class.php';
36require_once DOL_DOCUMENT_ROOT.
'/core/modules/facture/modules_facture.php';
37if (isModEnabled(
"bank")) {
38 require_once DOL_DOCUMENT_ROOT.
'/compta/bank/class/account.class.php';
50$langs->loadLangs(array(
'bills',
'banks',
'companies'));
54$action =
GETPOST(
'action',
'aZ09');
57 $socid = $user->socid;
76if ($action ==
'confirm_delete' && $confirm ==
'yes' && $user->hasRight(
'tax',
'charges',
'supprimer')) {
79 $result =
$object->delete($user);
82 header(
"Location: ".DOL_URL_ROOT.
"/compta/tva/payments.php?mode=tvaonly");
140$form =
new Form($db);
145$head[$h][0] = DOL_URL_ROOT.
'/compta/payment_vat/card.php?id='.
$id;
146$head[$h][1] = $langs->trans(
"VATPayment");
147$hselected = (string) $h;
156print
dol_get_fiche_head($head, $hselected, $langs->trans(
"VATPayment"), -1,
'payment');
161if ($action ==
'delete') {
162 print $form->formconfirm(
'card.php?id='.
$object->id, $langs->trans(
"DeletePayment"), $langs->trans(
"ConfirmDeletePayment"),
'confirm_delete',
'', 0, 2);
167$linkback =
'<a href="'.DOL_URL_ROOT.
'/compta/tva/payments.php">'.$langs->trans(
"BackToList").
'</a>';
169dol_banner_tab(
$object,
'id', $linkback, 1,
'rowid',
'id',
'');
172print
'<div class="fichecenter">';
173print
'<div class="underbanner clearboth"></div>';
175print
'<table class="border centpercent">';
178print
'<tr><td>'.$langs->trans(
'Date').
'</td><td>'.
dol_print_date(
$object->datep,
'day').
'</td></tr>';
181print
'<tr><td>'.$langs->trans(
'Mode').
'</td><td>'.$langs->trans(
"PaymentType".
$object->type_code).
'</td></tr>';
187print
'<tr><td>'.$langs->trans(
'Amount').
'</td><td>'.
price(
$object->amount, 0, $outputlangs, 1, -1, -1,
$conf->currency).
'</td></tr>';
193if (isModEnabled(
"bank")) {
196 $bankline->fetch(
$object->bank_line);
199 print
'<td>'.$langs->trans(
'BankTransactionLine').
'</td>';
201 print $bankline->getNomUrl(1, 0,
'showall');
219$sql =
'SELECT f.rowid as scid, f.label as label, f.paye, f.amount as tva_amount, pf.amount';
220$sql .=
' FROM '.MAIN_DB_PREFIX.
'payment_vat as pf,'.MAIN_DB_PREFIX.
'tva as f';
221$sql .=
' WHERE pf.fk_tva = f.rowid';
222$sql .=
' AND f.entity = '.$conf->entity;
223$sql .=
' AND pf.rowid = '.((int)
$object->id);
225dol_syslog(
"compta/payment_vat/card.php", LOG_DEBUG);
226$resql = $db->query($sql);
228 $num = $db->num_rows($resql);
232 print
'<br><table class="noborder centpercent">';
233 print
'<tr class="liste_titre">';
234 print
'<td>'.$langs->trans(
'VATDeclaration').
'</td>';
236 print
'<td>'.$langs->trans(
'Label').
'</td>';
237 print
'<td class="right">'.$langs->trans(
'ExpectedToPay').
'</td>';
238 print
'<td class="center">'.$langs->trans(
'Status').
'</td>';
239 print
'<td class="right">'.$langs->trans(
'PayedByThisPayment').
'</td>';
244 $objp = $db->fetch_object($resql);
246 print
'<tr class="oddeven">';
249 $tva->fetch($objp->scid);
250 print $tva->getNomUrl(1);
257 print
'<td>'.$objp->label.
'</td>';
259 print
'<td class="right"><span class="amount">'.price($objp->tva_amount).
'</span></td>';
261 print
'<td class="center">'.$tva->getLibStatut(4, $objp->amount).
'</td>';
263 print
'<td class="right"><span class="amount">'.price($objp->amount).
'</span></td>';
265 if ($objp->paye == 1) {
268 $total += $objp->amount;
285print
'<div class="tabsAction">';
288 if ($user->hasRight(
'tax',
'charges',
'supprimer')) {
289 if (!$disable_delete) {
292 print
dolGetButtonAction($langs->trans(
"CantRemovePaymentVATPaid"), $langs->trans(
"Delete"),
'delete', $_SERVER[
"PHP_SELF"].
'?id='.
$object->id.
'&action=delete&token='.
newToken(),
'delete', 0);
if( $user->socid > 0) if(! $user->hasRight('accounting', 'chartofaccount')) $object
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader($head='', $title='', $help_url='', $target='', $disablejs=0, $disablehead=0, $arrayofjs='', $arrayofcss='', $morequerystring='', $morecssonbody='', $replacemainareaby='', $disablenofollow=0, $disablenoindex=0)
Empty header.
Class to manage bank transaction lines.
Class to manage payments of social contributions.
Class to manage VAT - Value-added tax (also known in French as TVA - Taxe sur la valeur ajoutée)
setEventMessages($mesg, $mesgs, $style='mesgs', $messagekey='', $noduplicate=0, $attop=0)
Set event messages in dol_events session object.
GETPOSTINT($paramname, $method=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
dol_string_onlythesehtmltags($stringtoclean, $cleanalsosomestyles=1, $removeclassattribute=1, $cleanalsojavascript=0, $allowiframe=0, $allowed_tags=array(), $allowlink=0, $allowscript=0, $allowstyle=0)
Clean a string to keep only desirable HTML tags.
dol_get_fiche_head($links=array(), $active='', $title='', $notab=0, $picto='', $pictoisfullpath=0, $morehtmlright='', $morecss='', $limittoshow=0, $moretabssuffix='', $dragdropfile=0)
Show tabs of a record.
dol_get_fiche_end($notab=0)
Return tab footer of a card.
price($amount, $form=0, $outlangs='', $trunc=1, $rounding=-1, $forcerounding=-1, $currency_code='')
Function to format a value into an amount for visual output Function used into PDF and HTML pages.
dol_print_date($time, $format='', $tzoutput='auto', $outputlangs=null, $encodetooutput=false)
Output date in a string format according to outputlangs (or langs if not defined).
newToken()
Return the value of token currently saved into session with name 'newtoken'.
dolGetButtonAction($label, $text='', $actionType='default', $url='', $id='', $userRight=1, $params=array())
Function dolGetButtonAction.
dol_htmlcleanlastbr($stringtodecode)
This function remove all ending and br at end.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
dol_print_error($db=null, $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
dol_syslog($message, $level=LOG_INFO, $ident=0, $suffixinfilename='', $restricttologhandler='', $logcontext=null)
Write log message into outputs.
dol_escape_htmltag($stringtoescape, $keepb=0, $keepn=0, $noescapetags='', $escapeonlyhtmltags=0, $cleanalsojavascript=0)
Returns text escaped for inclusion in HTML alt or title or value tags, or into values of HTML input f...
global $conf
The following vars must be defined: $type2label $form $conf, $lang, The following vars may also be de...