discount.class.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2005      Rodolphe Quiedeville <rodolphe@quiedeville.org>
 * Copyright (C) 2004-2018 Laurent Destailleur  <eldy@users.sourceforge.net>
 *
 * 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 <https://www.gnu.org/licenses/>.
 */

class DiscountAbsolute
{
  public $db;

  public $error;

  public $errors = array();

  public $id;

  public $fk_soc;

  public $discount_type; // 0 => customer discount, 1 => supplier discount
  public $amount_ht; //
  public $amount_tva; //
  public $amount_ttc; //
  public $multicurrency_amount_ht;
  public $multicurrency_amount_tva;
  public $multicurrency_amount_ttc;
  // Vat rate
  public $tva_tx;
  public $vat_src_code;

  public $fk_user;

  public $description;

  public $datec;

  public $fk_facture_line;

  public $fk_facture;

  public $fk_facture_source;
  public $ref_facture_source; // Ref credit note or deposit used to create the discount
  public $type_facture_source;

  public $fk_invoice_supplier_source;
  public $ref_invoice_supplier_source; // Ref credit note or deposit used to create the discount
  public $type_invoice_supplier_source;

  public function __construct($db)
  {
    $this->db = $db;
  }


  public function fetch($rowid, $fk_facture_source = 0, $fk_invoice_supplier_source = 0)
  {
    global $conf;

    // Check parameters
    if (!$rowid && !$fk_facture_source && !$fk_invoice_supplier_source)
    {
      $this->error = 'ErrorBadParameters';
      return -1;
    }

    $sql = "SELECT sr.rowid, sr.fk_soc, sr.discount_type,";
    $sql .= " sr.fk_user,";
    $sql .= " sr.amount_ht, sr.amount_tva, sr.amount_ttc, sr.tva_tx, sr.vat_src_code,";
    $sql .= " sr.multicurrency_amount_ht, sr.multicurrency_amount_tva, sr.multicurrency_amount_ttc,";
    $sql .= " sr.fk_facture_line, sr.fk_facture, sr.fk_facture_source, sr.fk_invoice_supplier_line, sr.fk_invoice_supplier, sr.fk_invoice_supplier_source, sr.description,";
    $sql .= " sr.datec,";
    $sql .= " f.ref as ref_facture_source, f.type as type_facture_source,";
    $sql .= " fsup.ref as ref_invoice_supplier_source, fsup.type as type_invoice_supplier_source";
    $sql .= " FROM ".MAIN_DB_PREFIX."societe_remise_except as sr";
    $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."facture as f ON sr.fk_facture_source = f.rowid";
    $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."facture as fsup ON sr.fk_invoice_supplier_source = fsup.rowid";
    $sql .= " WHERE sr.entity IN (".getEntity('invoice').")";
    if ($rowid) $sql .= " AND sr.rowid=".$rowid;
    if ($fk_facture_source) $sql .= " AND sr.fk_facture_source=".$fk_facture_source;
    if ($fk_invoice_supplier_source) $sql .= " AND sr.fk_invoice_supplier_source=".$fk_invoice_supplier_source;

    dol_syslog(get_class($this)."::fetch", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql)
    {
      if ($this->db->num_rows($resql))
      {
        $obj = $this->db->fetch_object($resql);

        $this->id = $obj->rowid;
        $this->fk_soc = $obj->fk_soc;
        $this->discount_type = $obj->discount_type;

        $this->amount_ht = $obj->amount_ht;
        $this->amount_tva = $obj->amount_tva;
        $this->amount_ttc = $obj->amount_ttc;

        $this->multicurrency_amount_ht = $this->multicurrency_subprice = $obj->multicurrency_amount_ht;
        $this->multicurrency_amount_tva = $obj->multicurrency_amount_tva;
        $this->multicurrency_amount_ttc = $obj->multicurrency_amount_ttc;

        $this->tva_tx = $obj->tva_tx;
        $this->vat_src_code = $obj->vat_src_code;

        $this->fk_user = $obj->fk_user;
        $this->fk_facture_line = $obj->fk_facture_line;
        $this->fk_facture = $obj->fk_facture;
        $this->fk_facture_source = $obj->fk_facture_source; // Id credit note or deposit source
        $this->ref_facture_source = $obj->ref_facture_source; // Ref credit note or deposit  source
        $this->type_facture_source = $obj->type_facture_source; // Type credit note or deposit  source
        $this->fk_invoice_supplier_line = $obj->fk_invoice_supplier_line;
        $this->fk_invoice_supplier = $obj->fk_invoice_supplier;
        $this->fk_invoice_supplier_source = $obj->fk_invoice_supplier_source; // Id credit note or deposit source
        $this->ref_invoice_supplier_source = $obj->ref_invoice_supplier_source; // Ref credit note or deposit  source
        $this->type_invoice_supplier_source = $obj->type_invoice_supplier_source; // Type credit note or deposit  source
        $this->description = $obj->description;
        $this->datec = $this->db->jdate($obj->datec);

        $this->db->free($resql);
        return 1;
      } else {
        $this->db->free($resql);
        return 0;
      }
    } else {
      $this->error = $this->db->error();
      return -1;
    }
  }


  public function create($user)
  {
    global $conf, $langs;

    // Clean parameters
    $this->amount_ht = price2num($this->amount_ht);
    $this->amount_tva = price2num($this->amount_tva);
    $this->amount_ttc = price2num($this->amount_ttc);

    $this->tva_tx = price2num($this->tva_tx);

    $this->multicurrency_amount_ht = price2num($this->multicurrency_amount_ht);
    $this->multicurrency_amount_tva = price2num($this->multicurrency_amount_tva);
    $this->multicurrency_amount_ttc = price2num($this->multicurrency_amount_ttc);

    if (empty($this->multicurrency_amount_ht)) $this->multicurrency_amount_ht = 0;
    if (empty($this->multicurrency_amount_tva)) $this->multicurrency_amount_tva = 0;
    if (empty($this->multicurrency_amount_ttc)) $this->multicurrency_amount_ttc = 0;
    if (empty($this->tva_tx)) $this->tva_tx = 0;

    // Check parameters
    if (empty($this->description))
    {
      $this->error = 'BadValueForPropertyDescription';
      dol_syslog(get_class($this)."::create ".$this->error, LOG_ERR);
      return -1;
    }

    $userid = $user->id;
    if (!($userid > 0))   // For example when record is saved into an anonymous context with a not loaded object $user.
    {
      include_once DOL_DOCUMENT_ROOT.'/compta/facture/class/facture.class.php';
      $tmpinvoice = new Facture($this->db);
      $tmpinvoice->fetch($this->fk_facture_source);
      $userid = $tmpinvoice->fk_user_author; // We use the author of invoice
    }

    // Insert request
    $sql = "INSERT INTO ".MAIN_DB_PREFIX."societe_remise_except";
    $sql .= " (entity, datec, fk_soc, discount_type, fk_user, description,";
    $sql .= " amount_ht, amount_tva, amount_ttc, tva_tx, vat_src_code,";
    $sql .= " multicurrency_amount_ht, multicurrency_amount_tva, multicurrency_amount_ttc,";
    $sql .= " fk_facture_source, fk_invoice_supplier_source";
    $sql .= ")";
    $sql .= " VALUES (".$conf->entity.", '".$this->db->idate($this->datec != '' ? $this->datec : dol_now())."', ".$this->fk_soc.", ".(empty($this->discount_type) ? 0 : intval($this->discount_type)).", ".$userid.", '".$this->db->escape($this->description)."',";
    $sql .= " ".$this->amount_ht.", ".$this->amount_tva.", ".$this->amount_ttc.", ".$this->tva_tx.", '".$this->db->escape($this->vat_src_code)."',";
    $sql .= " ".$this->multicurrency_amount_ht.", ".$this->multicurrency_amount_tva.", ".$this->multicurrency_amount_ttc.", ";
    $sql .= " ".($this->fk_facture_source ? "'".$this->db->escape($this->fk_facture_source)."'" : "null").",";
    $sql .= " ".($this->fk_invoice_supplier_source ? "'".$this->db->escape($this->fk_invoice_supplier_source)."'" : "null");
    $sql .= ")";

    dol_syslog(get_class($this)."::create", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql)
    {
      $this->id = $this->db->last_insert_id(MAIN_DB_PREFIX."societe_remise_except");
      return $this->id;
    } else {
      $this->error = $this->db->lasterror().' - sql='.$sql;
      return -1;
    }
  }


  public function delete($user)
  {
    global $conf, $langs;

    // Check if we can remove the discount
    if ($this->fk_facture_source)
    {
      $sql = "SELECT COUNT(rowid) as nb";
      $sql .= " FROM ".MAIN_DB_PREFIX."societe_remise_except";
      $sql .= " WHERE (fk_facture_line IS NOT NULL"; // Not used as absolute simple discount
      $sql .= " OR fk_facture IS NOT NULL)"; // Not used as credit note and not used as deposit
      $sql .= " AND fk_facture_source = ".$this->fk_facture_source;
      //$sql.=" AND rowid != ".$this->id;

      dol_syslog(get_class($this)."::delete Check if we can remove discount", LOG_DEBUG);
      $resql = $this->db->query($sql);
      if ($resql)
      {
        $obj = $this->db->fetch_object($resql);
        if ($obj->nb > 0)
        {
          $this->error = 'ErrorThisPartOrAnotherIsAlreadyUsedSoDiscountSerieCantBeRemoved';
          return -2;
        }
      } else {
        dol_print_error($this->db);
        return -1;
      }
    }

    // Check if we can remove the discount
    if ($this->fk_invoice_supplier_source)
    {
      $sql = "SELECT COUNT(rowid) as nb";
      $sql .= " FROM ".MAIN_DB_PREFIX."societe_remise_except";
      $sql .= " WHERE (fk_invoice_supplier_line IS NOT NULL"; // Not used as absolute simple discount
      $sql .= " OR fk_invoice_supplier IS NOT NULL)"; // Not used as credit note and not used as deposit
      $sql .= " AND fk_invoice_supplier_source = ".$this->fk_invoice_supplier_source;
      //$sql.=" AND rowid != ".$this->id;

      dol_syslog(get_class($this)."::delete Check if we can remove discount", LOG_DEBUG);
      $resql = $this->db->query($sql);
      if ($resql)
      {
        $obj = $this->db->fetch_object($resql);
        if ($obj->nb > 0)
        {
          $this->error = 'ErrorThisPartOrAnotherIsAlreadyUsedSoDiscountSerieCantBeRemoved';
          return -2;
        }
      } else {
        dol_print_error($this->db);
        return -1;
      }
    }

    $this->db->begin();

    // Delete but only if not used
    $sql = "DELETE FROM ".MAIN_DB_PREFIX."societe_remise_except ";
    if ($this->fk_facture_source) $sql .= " WHERE fk_facture_source = ".$this->fk_facture_source; // Delete all lines of same serie
    elseif ($this->fk_invoice_supplier_source) $sql .= " WHERE fk_invoice_supplier_source = ".$this->fk_invoice_supplier_source; // Delete all lines of same serie
    else $sql .= " WHERE rowid = ".$this->id; // Delete only line
    $sql .= " AND (fk_facture_line IS NULL"; // Not used as absolute simple discount
    $sql .= " AND fk_facture IS NULL)"; // Not used as credit note and not used as deposit
    $sql .= " AND (fk_invoice_supplier_line IS NULL"; // Not used as absolute simple discount
    $sql .= " AND fk_invoice_supplier IS NULL)"; // Not used as credit note and not used as deposit

    dol_syslog(get_class($this)."::delete Delete discount", LOG_DEBUG);
    $result = $this->db->query($sql);
    if ($result)
    {
      // If source of discount was a credit note or deposit, we change source statut.
      if ($this->fk_facture_source)
      {
        $sql = "UPDATE ".MAIN_DB_PREFIX."facture";
        $sql .= " set paye=0, fk_statut=1";
        $sql .= " WHERE (type = 2 or type = 3) AND rowid=".$this->fk_facture_source;

        dol_syslog(get_class($this)."::delete Update credit note or deposit invoice statut", LOG_DEBUG);
        $result = $this->db->query($sql);
        if ($result)
        {
          $this->db->commit();
          return 1;
        } else {
          $this->error = $this->db->lasterror();
          $this->db->rollback();
          return -1;
        }
      } elseif ($this->fk_invoice_supplier_source) {
        $sql = "UPDATE ".MAIN_DB_PREFIX."facture_fourn";
        $sql .= " set paye=0, fk_statut=1";
        $sql .= " WHERE (type = 2 or type = 3) AND rowid=".$this->fk_invoice_supplier_source;

        dol_syslog(get_class($this)."::delete Update credit note or deposit invoice statut", LOG_DEBUG);
        $result = $this->db->query($sql);
        if ($result)
        {
          $this->db->commit();
          return 1;
        } else {
          $this->error = $this->db->lasterror();
          $this->db->rollback();
          return -1;
        }
      } else {
        $this->db->commit();
        return 1;
      }
    } else {
      $this->error = $this->db->lasterror();
      $this->db->rollback();
      return -1;
    }
  }



  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function link_to_invoice($rowidline, $rowidinvoice)
  {
    // phpcs:enable
    // Check parameters
    if (!$rowidline && !$rowidinvoice)
    {
      $this->error = 'ErrorBadParameters';
      return -1;
    }
    if ($rowidline && $rowidinvoice)
    {
      $this->error = 'ErrorBadParameters';
      return -2;
    }

    $sql = "UPDATE ".MAIN_DB_PREFIX."societe_remise_except";
    if (!empty($this->discount_type)) {
      if ($rowidline)    $sql .= " SET fk_invoice_supplier_line = ".$rowidline;
      if ($rowidinvoice) $sql .= " SET fk_invoice_supplier = ".$rowidinvoice;
    } else {
      if ($rowidline)    $sql .= " SET fk_facture_line = ".$rowidline;
      if ($rowidinvoice) $sql .= " SET fk_facture = ".$rowidinvoice;
    }
    $sql .= " WHERE rowid = ".$this->id;

    dol_syslog(get_class($this)."::link_to_invoice", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql)
    {
      if (!empty($this->discount_type)) {
        $this->fk_invoice_supplier_line = $rowidline;
        $this->fk_invoice_supplier = $rowidinvoice;
      } else {
        $this->fk_facture_line = $rowidline;
        $this->fk_facture = $rowidinvoice;
      }
      return 1;
    } else {
      $this->error = $this->db->error();
      return -3;
    }
  }


  // phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
  public function unlink_invoice()
  {
    // phpcs:enable
    $sql = "UPDATE ".MAIN_DB_PREFIX."societe_remise_except";
    if (!empty($this->discount_type)) {
      $sql .= " SET fk_invoice_supplier_line = NULL, fk_invoice_supplier = NULL";
    } else {
      $sql .= " SET fk_facture_line = NULL, fk_facture = NULL";
    }
    $sql .= " WHERE rowid = ".$this->id;

    dol_syslog(get_class($this)."::unlink_invoice", LOG_DEBUG);
    $resql = $this->db->query($sql);
    if ($resql)
    {
      return 1;
    } else {
      $this->error = $this->db->error();
      return -3;
    }
  }


  public function getAvailableDiscounts($company = '', $user = '', $filter = '', $maxvalue = 0, $discount_type = 0, $multicurrency = 0)
  {
    global $conf;

    dol_syslog(get_class($this)."::getAvailableDiscounts discount_type=".$discount_type, LOG_DEBUG);

    $sql = "SELECT SUM(rc.amount_ttc) as amount, SUM(rc.multicurrency_amount_ttc) as multicurrency_amount";
    $sql .= " FROM ".MAIN_DB_PREFIX."societe_remise_except as rc";
    $sql .= " WHERE rc.entity = ".$conf->entity;
    $sql .= " AND rc.discount_type=".intval($discount_type);
    if (!empty($discount_type)) {
      $sql .= " AND (rc.fk_invoice_supplier IS NULL AND rc.fk_invoice_supplier_line IS NULL)"; // Available from supplier
    } else {
      $sql .= " AND (rc.fk_facture IS NULL AND rc.fk_facture_line IS NULL)"; // Available to customer
    }
    if (is_object($company)) $sql .= " AND rc.fk_soc = ".$company->id;
    if (is_object($user))    $sql .= " AND rc.fk_user = ".$user->id;
    if ($filter)   $sql .= ' AND ('.$filter.')';
    if ($maxvalue) $sql .= ' AND rc.amount_ttc <= '.price2num($maxvalue);

    $resql = $this->db->query($sql);
    if ($resql)
    {
      $obj = $this->db->fetch_object($resql);
      //while ($obj)
      //{
      //print 'zz'.$obj->amount;
      //$obj = $this->db->fetch_object($resql);
      //}
      if ($multicurrency)
      {
        return $obj->amount_multicurrency;
      }

      return $obj->amount;
    }
    return -1;
  }


  public function getSumDepositsUsed($invoice, $multicurrency = 0)
  {
    dol_syslog(get_class($this)."::getSumDepositsUsed", LOG_DEBUG);

    if ($invoice->element == 'facture' || $invoice->element == 'invoice')
    {
      $sql = 'SELECT sum(rc.amount_ttc) as amount, sum(rc.multicurrency_amount_ttc) as multicurrency_amount';
      $sql .= ' FROM '.MAIN_DB_PREFIX.'societe_remise_except as rc, '.MAIN_DB_PREFIX.'facture as f';
      $sql .= ' WHERE rc.fk_facture_source=f.rowid AND rc.fk_facture = '.$invoice->id;
      $sql .= ' AND f.type = 3';
    } elseif ($invoice->element == 'invoice_supplier')
    {
      $sql = 'SELECT sum(rc.amount_ttc) as amount, sum(rc.multicurrency_amount_ttc) as multicurrency_amount';
      $sql .= ' FROM '.MAIN_DB_PREFIX.'societe_remise_except as rc, '.MAIN_DB_PREFIX.'facture_fourn as f';
      $sql .= ' WHERE rc.fk_invoice_supplier_source=f.rowid AND rc.fk_invoice_supplier = '.$invoice->id;
      $sql .= ' AND f.type = 3';
    } else {
      $this->error = get_class($this)."::getSumDepositsUsed was called with a bad object as a first parameter";
      dol_print_error($this->error);
      return -1;
    }

    $resql = $this->db->query($sql);
    if ($resql)
    {
      $obj = $this->db->fetch_object($resql);
      if ($multicurrency == 1) return $obj->multicurrency_amount;
      else return $obj->amount;
    } else {
      $this->error = $this->db->lasterror();
      return -1;
    }
  }

  public function getSumCreditNotesUsed($invoice, $multicurrency = 0)
  {
    dol_syslog(get_class($this)."::getSumCreditNotesUsed", LOG_DEBUG);

    if ($invoice->element == 'facture' || $invoice->element == 'invoice')
    {
      $sql = 'SELECT sum(rc.amount_ttc) as amount, sum(rc.multicurrency_amount_ttc) as multicurrency_amount';
      $sql .= ' FROM '.MAIN_DB_PREFIX.'societe_remise_except as rc, '.MAIN_DB_PREFIX.'facture as f';
      $sql .= ' WHERE rc.fk_facture_source=f.rowid AND rc.fk_facture = '.$invoice->id;
      $sql .= ' AND f.type IN ('.$invoice::TYPE_STANDARD.', '.$invoice::TYPE_CREDIT_NOTE.', '.$invoice::TYPE_SITUATION.')'; // Find discount coming from credit note or excess received
    } elseif ($invoice->element == 'invoice_supplier')
    {
      $sql = 'SELECT sum(rc.amount_ttc) as amount, sum(rc.multicurrency_amount_ttc) as multicurrency_amount';
      $sql .= ' FROM '.MAIN_DB_PREFIX.'societe_remise_except as rc, '.MAIN_DB_PREFIX.'facture_fourn as f';
      $sql .= ' WHERE rc.fk_invoice_supplier_source=f.rowid AND rc.fk_invoice_supplier = '.$invoice->id;
      $sql .= ' AND f.type IN ('.$invoice::TYPE_STANDARD.', '.$invoice::TYPE_CREDIT_NOTE.')'; // Find discount coming from credit note or excess paid
    } else {
      $this->error = get_class($this)."::getSumCreditNotesUsed was called with a bad object as a first parameter";
      dol_print_error($this->error);
      return -1;
    }

    $resql = $this->db->query($sql);
    if ($resql)
    {
      $obj = $this->db->fetch_object($resql);
      if ($multicurrency == 1) return $obj->multicurrency_amount;
      else return $obj->amount;
    } else {
      $this->error = $this->db->lasterror();
      return -1;
    }
  }
  public function getSumFromThisCreditNotesNotUsed($invoice, $multicurrency = 0)
  {
    dol_syslog(get_class($this)."::getSumCreditNotesUsed", LOG_DEBUG);

    if ($invoice->element == 'facture' || $invoice->element == 'invoice')
    {
      $sql = 'SELECT sum(rc.amount_ttc) as amount, sum(rc.multicurrency_amount_ttc) as multicurrency_amount';
      $sql .= ' FROM '.MAIN_DB_PREFIX.'societe_remise_except as rc';
      $sql .= ' WHERE rc.fk_facture IS NULL AND rc.fk_facture_source = '.$invoice->id;
    } elseif ($invoice->element == 'invoice_supplier')
    {
      $sql = 'SELECT sum(rc.amount_ttc) as amount, sum(rc.multicurrency_amount_ttc) as multicurrency_amount';
      $sql .= ' FROM '.MAIN_DB_PREFIX.'societe_remise_except as rc';
      $sql .= ' WHERE rc.fk_invoice_supplier IS NULL AND rc.fk_invoice_supplier_source = '.$invoice->id;
    } else {
      $this->error = get_class($this)."::getSumCreditNotesUsed was called with a bad object as a first parameter";
      dol_print_error($this->error);
      return -1;
    }

    $resql = $this->db->query($sql);
    if ($resql)
    {
      $obj = $this->db->fetch_object($resql);
      if ($multicurrency) return $obj->multicurrency_amount;
      else return $obj->amount;
    } else {
      $this->error = $this->db->lasterror();
      return -1;
    }
  }

  public function getNomUrl($withpicto, $option = 'invoice')
  {
    global $langs;

    $result = '';
    $link = '';
    $linkend = '';
    $label = '';
    $picto = '';
    $ref = '';

    if ($option == 'invoice') {
      $facid = !empty($this->discount_type) ? $this->fk_invoice_supplier_source : $this->fk_facture_source;
      $link = !empty($this->discount_type) ? '/fourn/facture/card.php' : '/compta/facture/card.php';
      $label = $langs->trans("ShowSourceInvoice").': '.$this->ref_facture_source;
      $link = '<a href="'.DOL_URL_ROOT.$link.'?facid='.$facid.'" title="'.dol_escape_htmltag($label, 1).'" class="classfortooltip">';
      $linkend = '</a>';
      $ref = !empty($this->discount_type) ? $this->ref_invoice_supplier_source : $this->ref_facture_source;
      $picto = 'bill';
    }
    if ($option == 'discount') {
      $label = $langs->trans("Discount");
      $link = '<a href="'.DOL_URL_ROOT.'/comm/remx.php?id='.$this->fk_soc.'" title="'.dol_escape_htmltag($label, 1).'" class="classfortooltip">';
      $linkend = '</a>';
      $ref = $langs->trans("Discount");
      $picto = 'generic';
    }


    if ($withpicto) $result .= ($link.img_object($label, $picto, 'class="classfortooltip"').$linkend);
    if ($withpicto && $withpicto != 2) $result .= ' ';
    $result .= $link.$ref.$linkend;
    return $result;
  }


  public function initAsSpecimen()
  {
    global $user, $langs, $conf;

    $this->fk_soc         = 1;
    $this->amount_ht      = 10;
    $this->amount_tva     = 1.96;
    $this->amount_ttc     = 11.96;
    $this->tva_tx         = 19.6;
    $this->description    = 'Specimen discount';
  }
}