projekt kivitendo

    qq|c_vendor_id = ?, | .

    qq|klass = ?, | .

    qq|currency_id = (SELECT id FROM currencies WHERE name = ?), | .

    qq|WHERE id = ?|;

  my @values = (

    $form->{customernumber},

    conv_i($form->{klass}),

    $form->{currency},

    $form->{taxincluded_checked} ne '' ? $form->{taxincluded_checked} : undef,

    $form->{id}

    );

  do_query( $form, $dbh, $query, @values );

    qq|  username = ?, | .

    qq|  user_password = ?, | .

    qq|  v_customer_id = ?, | .

    qq|WHERE id = ?|;

  my @values = (

    $form->{vendornumber},

    $form->{user_password},

    $form->{v_customer_id},

    $form->{currency},

    $form->{id}

    );

  do_query($form, $dbh, $query, @values);

         vc.*,

         pt.description AS payment_terms,

         b.description AS business,

       FROM ${vc} vc

       LEFT JOIN payment_terms pt ON (vc.payment_id = pt.id)

       LEFT JOIN business b ON (vc.business_id = b.id)

       LEFT JOIN language l ON (vc.language_id = l.id)

       WHERE vc.id = ?|;

  my $ref = selectfirst_hashref_query($form, $dbh, $query, $vc_id);

use SL::DB::Customer;

use SL::DB::Language;

use SL::DB::PaymentTerm;

use SL::DB::Vendor;

use SL::DB::Contact;

use SL::DB::History;

use Rose::Object::MakeMethods::Generic

(

 scalar                  => [ qw(controller file csv test_run save_with_cascade) ],

);

sub run {

  return { map { my $col = $_; ( $col => { map { ( $_->$col => $_ ) } @{ $all_payment_terms } } ) } qw(id description) };

}

sub init_all_vc {

  my ($self) = @_;

  return 1;

}

sub save_objects {

  my ($self, %params) = @_;

    $self->check_language($entry);

    $self->check_business($entry);

    $self->check_payment($entry);

    $self->check_currency($entry, take_default => 1);

    $self->handle_cvars($entry);

    $i++;

  }

  $self->add_cvar_raw_data_columns;

}

  my ($self) = @_;

  my $profile = $self->SUPER::init_profile;

  return $profile;

}

                                 { name => 'customernumber',    description => $::locale->text('Customer Number')                 },

                                 { name => 'department_1',      description => $::locale->text('Department 1')                    },

                                 { name => 'department_2',      description => $::locale->text('Department 2')                    },

                                 { name => 'direct_debit',      description => $::locale->text('direct debit')                    },

                                 { name => 'discount',          description => $::locale->text('Discount')                        },

                                 { name => 'email',             description => $::locale->text('E-mail')                          },

                                 { name => 'currency_id',             description => $::locale->text('Currency (database ID)')                },

                                 { name => 'cusordnumber',            description => $::locale->text('Customer Order Number')                 },

                                 { name => 'delivered',               description => $::locale->text('Delivered')                             },

                                 { name => 'employee_id',             description => $::locale->text('Employee (database ID)')                },

                                 { name => 'intnotes',                description => $::locale->text('Internal Notes')                        },

                                 { name => 'marge_percent',           description => $::locale->text('Margepercent')                          },

                          { header => $::locale->text('Customer/Vendor'), method => 'vc_name' });

  # Todo: access via ->[0] ok? Better: search first order column and use this

  $self->add_columns($self->_order_column,

  $self->add_columns($self->_order_column, 'globalproject_id') if exists $self->controller->data->[0]->{raw_data}->{globalprojectnumber};

  $self->add_columns($self->_order_column, 'cp_id')            if exists $self->controller->data->[0]->{raw_data}->{contact};

  $self->check_contact($entry);

  $self->check_language($entry);

  $self->check_payment($entry);

  $self->check_department($entry);

  $self->check_project($entry, global => 1);

  $self->check_ct_shipto($entry);

  $self->{all_payment_terms} = SL::DB::Manager::PaymentTerm->get_all();

  $self->{all_pricegroups} = SL::DB::Manager::Pricegroup->get_all();

  $query =

use SL::DB::DeliveryOrder;

use SL::DB::DeliveryOrderItem;

use SL::DB::DeliveryOrderItemsStock;

use SL::DB::Department;

use SL::DB::Draft;

use SL::DB::Dunning;

  _copy($self, $form, '', '', 0, qw(id type taxzone_id ordnumber quonumber invnumber donumber cusordnumber taxincluded shippingpoint shipvia notes intnotes cp_id

                                    employee_id salesman_id closed department_id language_id payment_id delivery_customer_id delivery_vendor_id shipto_id proforma

                                    globalproject_id delivered transaction_description container_type accepted_by_customer invoice terms storno storno_id dunning_config_id

  $form->{currency} = $form->{curr} = $self->currency_id ? $self->currency->name || '' : '';

  if (_has($self, 'transdate')) {

  my %args = ( map({ ( $_ => $source->$_ ) } qw(customer_id taxincluded shippingpoint shipvia notes intnotes salesman_id cusordnumber ordnumber quonumber

                                                department_id cp_id language_id payment_id delivery_customer_id delivery_vendor_id taxzone_id shipto_id

               transdate   => DateTime->today_local,

               gldate      => DateTime->today_local,

               duedate     => DateTime->today_local->add(days => $terms * 1),

  creditlimit         => { type => 'numeric', default => '0', precision => 5, scale => 15 },

  currency_id         => { type => 'integer', not_null => 1 },

  customernumber      => { type => 'text' },

  department_1        => { type => 'varchar', length => 75 },

  department_2        => { type => 'varchar', length => 75 },

  direct_debit        => { type => 'boolean', default => 'false' },

    key_columns => { currency_id => 'id' },

  },

  language_obj => {

    class       => 'SL::DB::Language',

    key_columns => { language_id => 'id' },

  cusordnumber            => { type => 'text' },

  customer_id             => { type => 'integer' },

  delivered               => { type => 'boolean', default => 'false' },

  department_id           => { type => 'integer' },

  donumber                => { type => 'text', not_null => 1 },

  employee_id             => { type => 'integer' },

    key_columns => { customer_id => 'id' },

  },

  department => {

    class       => 'SL::DB::Department',

    key_columns => { department_id => 'id' },

  customer_id               => { type => 'integer' },

  datepaid                  => { type => 'date' },

  delivery_customer_id      => { type => 'integer' },

  delivery_vendor_id        => { type => 'integer' },

  deliverydate              => { type => 'date' },

  department_id             => { type => 'integer' },

    key_columns => { customer_id => 'id' },

  },

  department => {

    class       => 'SL::DB::Department',

    key_columns => { department_id => 'id' },

  customer_id             => { type => 'integer' },

  delivered               => { type => 'boolean', default => 'false' },

  delivery_customer_id    => { type => 'integer' },

  delivery_vendor_id      => { type => 'integer' },

  department_id           => { type => 'integer' },

  employee_id             => { type => 'integer' },

    key_columns => { delivery_customer_id => 'id' },

  },

  delivery_vendor => {

    class       => 'SL::DB::Vendor',

    key_columns => { delivery_vendor_id => 'id' },

  cp_id                   => { type => 'integer' },

  currency_id             => { type => 'integer', not_null => 1 },

  datepaid                => { type => 'date' },

  deliverydate            => { type => 'date' },

  department_id           => { type => 'integer' },

  direct_debit            => { type => 'boolean', default => 'false' },

    key_columns => { currency_id => 'id' },

  },

  department => {

    class       => 'SL::DB::Department',

    key_columns => { department_id => 'id' },

__PACKAGE__->meta->table('vendor');

__PACKAGE__->meta->columns(

);

__PACKAGE__->meta->primary_key_columns([ 'id' ]);

    key_columns => { currency_id => 'id' },

  },

  language_obj => {

    class       => 'SL::DB::Language',

    key_columns => { language_id => 'id' },

         shippingpoint = ?, shipvia = ?, notes = ?, intnotes = ?, closed = ?,

         delivered = ?, department_id = ?, language_id = ?, shipto_id = ?,

         globalproject_id = ?, employee_id = ?, salesman_id = ?, cp_id = ?, transaction_description = ?,

       WHERE id = ?|;

  @values = ($form->{donumber}, $form->{ordnumber},

             $form->{transaction_description},

             $form->{type} =~ /^sales/ ? 't' : 'f',

             conv_i($form->{taxzone_id}), $form->{taxincluded} ? 't' : 'f', conv_i($form->{terms}), $form->{currency},

             conv_i($form->{id}));

  do_query($form, $dbh, $query, @values);

         d.description AS department, dord.language_id,

         dord.shipto_id,

         dord.globalproject_id, dord.delivered, dord.transaction_description,

       FROM delivery_orders dord

       JOIN ${vc} cv ON (dord.${vc}_id = cv.id)

       LEFT JOIN employee e ON (dord.employee_id = e.id)

  $h_pg->finish();

  $h_bin_wh->finish();

  $form->{username} = $myconfig->{name};

  $main::lxdebug->leave_sub();

                netamount    = ?, paid        = ?, duedate       = ?,

                invoice      = ?, taxzone_id  = ?, notes         = ?, taxincluded = ?,

                intnotes     = ?, storno_id   = ?, storno        = ?,

                globalproject_id = ?, direct_debit = ?

              WHERE id = ?|;

  @values = (

                $netamount,                  $form->{paid},      conv_date($form->{duedate}),

            '1',                             $taxzone_id,                  $form->{notes},          $form->{taxincluded} ? 't' : 'f',

                $form->{intnotes},           conv_i($form->{storno_id}),     $form->{storno}      ? 't' : 'f',

         conv_i($form->{globalproject_id}),

                $form->{direct_debit} ? 't' : 'f',

         conv_i($form->{id})

  $query = qq|SELECT cp_id, invnumber, transdate AS invdate, duedate,

                orddate, quodate, globalproject_id,

                ordnumber, quonumber, paid, taxincluded, notes, taxzone_id, storno, gldate,

              FROM ap

              WHERE id = ?|;

  $ref = selectfirst_hashref_query($form, $dbh, $query, conv_i($form->{id}));

    qq|SELECT

         v.id AS vendor_id, v.name AS vendor, v.discount as vendor_discount,

         v.creditlimit, v.terms, v.notes AS intnotes,

         v.street, v.zipcode, v.city, v.country, v.taxzone_id, cu.name AS curr, v.direct_debit,

         $duedate + COALESCE(pt.terms_netto, 0) AS duedate,

         b.description AS business

  $form->set_payment_options($myconfig, $form->{invdate});

  $form->{username} = $myconfig->{name};

  $main::lxdebug->leave_sub();

                cp_id       = ?, marge_total   = ?, marge_percent = ?,

                globalproject_id               = ?, delivery_customer_id             = ?,

                transaction_description        = ?, delivery_vendor_id               = ?,

              WHERE id = ?|;

  @values = (          $form->{"invnumber"},           $form->{"ordnumber"},             $form->{"quonumber"},          $form->{"cusordnumber"},

             conv_date($form->{"invdate"}),  conv_date($form->{"orddate"}),    conv_date($form->{"quodate"}),    conv_i($form->{"customer_id"}),

                conv_i($form->{"globalproject_id"}),                              conv_i($form->{"delivery_customer_id"}),

                       $form->{transaction_description},                          conv_i($form->{"delivery_vendor_id"}),

                       $form->{"donumber"}, $form->{"invnumber_for_credit_note"},        $form->{direct_debit} ? 't' : 'f',

                conv_i($form->{"id"}));

  do_query($form, $dbh, $query, @values);

           a.employee_id, a.salesman_id, a.payment_id,

           a.language_id, a.delivery_customer_id, a.delivery_vendor_id, a.type,

           a.transaction_description, a.donumber, a.invnumber_for_credit_note,

           e.name AS employee

         FROM ar a

         LEFT JOIN employee e ON (e.id = a.employee_id)

  $query =

    qq|SELECT

         c.id AS customer_id, c.name AS customer, c.discount as customer_discount, c.creditlimit, c.terms,

         c.street, c.zipcode, c.city, c.country,

         c.notes AS intnotes, c.klass as customer_klass, c.taxzone_id, c.salesman_id, cu.name AS curr,

         c.taxincluded_checked, c.direct_debit,

         customer_id = ?, amount = ?, netamount = ?, reqdate = ?, taxincluded = ?,

         shippingpoint = ?, shipvia = ?, notes = ?, intnotes = ?, currency_id = (SELECT id FROM currencies WHERE name=?), closed = ?,

         delivered = ?, proforma = ?, quotation = ?, department_id = ?, language_id = ?,

         globalproject_id = ?, employee_id = ?, salesman_id = ?, cp_id = ?, transaction_description = ?, marge_total = ?, marge_percent = ?

       WHERE id = ?|;

             conv_i($form->{shipto_id}), conv_i($form->{payment_id}),

             conv_i($form->{delivery_vendor_id}),

             conv_i($form->{delivery_customer_id}),

             conv_i($form->{globalproject_id}), conv_i($form->{employee_id}),

             conv_i($form->{salesman_id}), conv_i($form->{cp_id}),

             $form->{transaction_description},

           o.closed, o.reqdate, o.quonumber, o.department_id, o.cusordnumber,

           d.description AS department, o.payment_id, o.language_id, o.taxzone_id,

           o.delivery_customer_id, o.delivery_vendor_id, o.proforma, o.shipto_id,

         FROM oe o

         JOIN ${vc} cv ON (o.${vc}_id = cv.id)

         LEFT JOIN employee e ON (o.employee_id = e.id)

  $dbh->disconnect;

  $main::lxdebug->leave_sub();

}

use SL::Request qw(flatten);

use SL::DB::Business;

use SL::DB::Default;

use SL::Helper::Flash;

use SL::ReportGenerator;

use SL::MoreCommon qw(uri_encode);

  $form->{ALL_SALESMEN}           = SL::DB::Manager::Employee->get_all(query => [ or => [ id => $::form->{salesman_id},  deleted => 0 ] ]);

  $form->{USER}                   = SL::DB::Manager::Employee->current;

  $form->{taxincluded}    = ($form->{taxincluded}) ? "checked" : "";

  $form->{is_customer}    = $form->{db}     eq 'customer';

  $form->{shipto_label}   = \&_shipto_label;

  DO->retrieve('vc'  => $form->{vc},

               'ids' => $form->{id});

  $form->{shipto} = 1 if $form->{id} || $form->{convert_from_oe_ids};

  # get customer / vendor

    $form->{discount} = $form->{customer_discount};

  }

  $form->restore_vars(qw(currency)) if ($form->{id} || $form->{convert_from_oe_ids});

  $form->restore_vars(qw(taxincluded)) if $form->{id};

  $form->restore_vars(qw(salesman_id)) if $editing;

  my $form     = $main::form;

  $form->{PRINT_OPTIONS} = print_options('inline' => 1);

  print $form->parse_html_template('do/form_footer',

    {transfer_default         => ($::instance_conf->get_transfer_default)});

  my $language_saved = $form->{language_id};

  my $payment_id_saved = $form->{payment_id};

  my $salesman_id_saved = $form->{salesman_id};

  my $cp_id_saved = $form->{cp_id};

  my $taxzone_id_saved = $form->{taxzone_id};

  $form->{language_id} = $language_saved;

  $form->{payment_id} = $payment_id_saved;

  $form->{taxzone_id} = $taxzone_id_saved;

  $form->{currency} = $currency_saved;

    }

  }

  if ($form->{payment_id}) {

    $payment_id = $form->{payment_id};

  }

  if ($form->{currency}) {

    $currency = $form->{currency};

  }

  my $cp_id = $form->{cp_id};

  IR->get_vendor(\%myconfig, \%$form);

  if ($currency) {

    $form->{currency} = $currency;

  }

  my @curr = $form->get_all_currencies();

  map { $form->{selectcurrency} .= "<option>$_\n" } @curr;

    $totalpaid += $form->{"paid_$i"};

  }

  print $form->parse_html_template('ir/form_footer', {

    is_type_credit_note => ($form->{type} eq "credit_note"),

    totalpaid           => $totalpaid,

  my $editing = $form->{id};

  IS->get_customer(\%myconfig, \%$form);

  $form->restore_vars(qw(id));

  IS->retrieve_invoice(\%myconfig, \%$form);

  $form->restore_vars(qw(taxincluded)) if $form->{id};

  $form->restore_vars(qw(salesman_id)) if $editing;

  $form->{oldinvtotal} = $form->{invtotal};

  print $form->parse_html_template('is/form_footer', {

    is_type_credit_note => ($form->{type} eq "credit_note"),

    totalpaid           => $totalpaid,

  $form->{"$form->{vc}_id"} ||= $form->{"all_$form->{vc}"}->[0]->{id} if $form->{"all_$form->{vc}"};

  $form->{shipto} = 1 if $form->{id} || $form->{convert_from_oe_ids};

  # get customer / vendor

  IR->get_vendor(\%myconfig, \%$form)   if $form->{type} =~ /(purchase_order|request_quotation)/;

  IS->get_customer(\%myconfig, \%$form) if $form->{type} =~ /sales_(order|quotation)/;

  $form->restore_vars(qw(currency))    if $form->{id};

  $form->restore_vars(qw(taxincluded)) if $form->{id};

  $form->restore_vars(qw(salesman_id)) if $editing;

  $form->{oldinvtotal} = $form->{invtotal};

  print $form->parse_html_template("oe/form_footer", {

     %TMPL_VAR,

     webdav          => $::instance_conf->get_webdav,

  'Are you sure you want to delete Transaction' => 'Buchung wirklich löschen?',

  'Are you sure you want to delete this background job?' => 'Sind Sie sicher, dass Sie diesen Hintergrund-Job löschen möchten?',

  'Are you sure you want to delete this business?' => 'Sind Sie sicher, dass Sie diesen Kunden-/Lieferantentyp löschen wollen?',

  'Are you sure you want to delete this department?' => 'Sind Sie sicher, dass Sie diese Abteilung löschen wollen?',

  'Are you sure you want to delete this payment term?' => 'Wollen Sie diese Zahlungsbedingungen wirklich löschen?',

  'Are you sure you want to remove the marked entries from the queue?' => 'Sind Sie sicher, dass die markierten Einträge von der Warteschlange gelöscht werden sollen?',

  'Create a new background job' => 'Einen neuen Hintergrund-Job anlegen',

  'Create a new business'       => 'Einen neuen Kunden-/Lieferantentyp erfassen',

  'Create a new client'         => 'Einen neuen Mandanten anlegen',

  'Create a new department'     => 'Eine neue Abteilung erfassen',

  'Create a new group'          => 'Neue Benutzergruppe erfassen',

  'Create a new payment term'   => 'Neue Zahlungsbedingungen anlegen',

  'Create new background job'   => 'Neuen Hintergrund-Job anlegen',

  'Create new business'         => 'Kunden-/Lieferantentyp erfassen',

  'Create new client #1'        => 'Neuen Mandanten #1 anlegen',

  'Create new department'       => 'Neue Abteilung erfassen',

  'Create new payment term'     => 'Neue Zahlungsbedingung anlegen',

  'Create new templates from master templates' => 'Neue Druckvorlagen aus Vorlagensatz erstellen',

  'Delivery Orders'             => 'Lieferscheine',

  'Delivery Plan'               => 'Lieferplan',

  'Delivery Plan for currently outstanding sales orders' => 'Lieferplan für offene Verkaufsaufträge',

  'Department'                  => 'Abteilung',

  'Department (database ID)'    => 'Abeilung (Datenbank-ID)',

  'Department (description)'    => 'Abteilung (Beschreibung)',

  'Edit bank account'           => 'Bankkonto bearbeiten',

  'Edit business'               => 'Kunden-/Lieferantentyp bearbeiten',

  'Edit custom variable'        => 'Benutzerdefinierte Variable bearbeiten',

  'Edit department'             => 'Abteilung bearbeiten',

  'Edit file'                   => 'Datei bearbeiten',

  'Edit greetings'              => 'Anreden bearbeiten',

  'Error: Invalid business'     => 'Fehler: Kunden-/Lieferantentyp ungültig',

  'Error: Invalid contact'      => 'Fehler: Ansprechperson ungültig',

  'Error: Invalid currency'     => 'Fehler: ungültige Währung',

  'Error: Invalid department'   => 'Fehler: Abteilung ungültig',

  'Error: Invalid language'     => 'Fehler: Sprache ungültig',

  'Error: Invalid order for this order item' => 'Fehler: Auftrag für diese Position ungültig',

  'No customer has been selected yet.' => 'Es wurde noch kein Kunde ausgewählt.',

  'No data was found.'          => 'Es wurden keine Daten gefunden.',

  'No default currency'         => 'Keine Standardwährung',

  'No department has been created yet.' => 'Es wurde noch keine Abteilung erfasst.',

  'No dunnings have been selected for printing.' => 'Es wurden keine Mahnungen zum Drucken ausgewählt.',

  'No file has been uploaded yet.' => 'Es wurde noch keine Datei hochgeladen.',

  'Password'                    => 'Passwort',

  'Payables'                    => 'Verbindlichkeiten',

  'Payment'                     => 'Zahlungsausgang',

  'Payment Reminder'            => 'Zahlungserinnerung',

  'Payment Terms'               => 'Zahlungsbedingungen',

  'Payment Terms missing in row ' => 'Zahlungsfrist fehlt in Zeile ',

  'The deductible amount'       => 'Der abziehbare Skontobetrag',

  'The default value depends on the variable type:' => 'Die Bedeutung des Standardwertes hängt vom Variablentypen ab:',

  'The delivery order has not been marked as delivered. The warehouse contents have not changed.' => 'Der Lieferschein wurde nicht als geliefert markiert. Der Lagerinhalt wurde nicht verändert.',

  'The department has been created.' => 'Die Abteilung wurde angelegt.',

  'The department has been deleted.' => 'Die Abteiltung wurde gelöscht.',

  'The department has been saved.' => 'Die abteilung wurde gespeichert.',

  'Are you sure you want to delete Transaction' => '',

  'Are you sure you want to delete this background job?' => '',

  'Are you sure you want to delete this business?' => '',

  'Are you sure you want to delete this department?' => '',

  'Are you sure you want to delete this payment term?' => '',

  'Are you sure you want to remove the marked entries from the queue?' => '',

  'Create a new background job' => '',

  'Create a new business'       => '',

  'Create a new client'         => '',

  'Create a new department'     => '',

  'Create a new group'          => '',

  'Create a new payment term'   => '',

  'Delivery Orders'             => '',

  'Delivery Plan'               => '',

  'Delivery Plan for currently outstanding sales orders' => '',

  'Department'                  => '',

  'Department (database ID)'    => '',

  'Department (description)'    => '',

  'Edit bank account'           => '',

  'Edit business'               => '',

  'Edit custom variable'        => '',

  'Edit department'             => '',

  'Edit file'                   => '',

  'Edit greetings'              => '',

  'Error: Invalid business'     => '',

  'Error: Invalid contact'      => '',

  'Error: Invalid currency'     => '',

  'Error: Invalid department'   => '',

  'Error: Invalid language'     => '',

  'Error: Invalid order for this order item' => '',

  'No customer has been selected yet.' => '',

  'No data was found.'          => '',

  'No default currency'         => '',

  'No department has been created yet.' => '',

  'No dunnings have been selected for printing.' => '',

  'No file has been uploaded yet.' => '',

  'Password'                    => '',

  'Payables'                    => '',

  'Payment'                     => '',

  'Payment Reminder'            => '',

  'Payment Terms'               => '',

  'Payment Terms missing in row ' => '',

  'The deductible amount'       => '',

  'The default value depends on the variable type:' => '',

  'The delivery order has not been marked as delivered. The warehouse contents have not changed.' => '',

  'The department has been created.' => '',

  'The department has been deleted.' => '',

  'The department has been saved.' => '',

module=controller.pl

action=PaymentTerm/list

[System--Manage Custom Variables]

module=controller.pl

action=CustomVariableConfig/list

   <td>[% HTML.escape(payment_terms) %]</td>

  </tr>

  <tr>

   <td align="right">[% 'Tax Number' | $T8 %]</td>

   <td>[% HTML.escape(taxnumber) %]</td>

             label_key  = 'description',

       -%]

      </td>

      [%- IF is_customer %]

      <th align="right">[% 'Preisklasse' | $T8 %]</th>

      [%- END  %]

     </tr>

     <tr>

      <th align="right">[% 'Steuersatz' | $T8 %]</th>

      <td>

        [% L.select_tag('cv.language_id', SELF.all_languages, default = SELF.cv.language_id, value_key = 'id', title_key = 'description', with_empty = 1) %]

      </td>

    </tr>

    <tr>

      <td>

        [% L.checkbox_tag('cv.direct_debit', checked = SELF.cv.direct_debit, for_submit=1) %]

      </td>

    </tr>

    <tr>

        <td><textarea name="notes" rows="[% LxERP.numtextrows(notes, 25, 8, 2) %]" cols="25" wrap="soft"[% RO %]>[% HTML.escape(notes) %]</textarea></td>

        <td><textarea name="intnotes" rows="[% LxERP.numtextrows(intnotes, 35, 8, 2) %]" cols="35" wrap="soft"[% RO %]>[% HTML.escape(intnotes) %]</textarea></td>

       </tr>

      </table>

     </td>

        <tr>

         <th align="left">[% 'Notes' | $T8 %]</th>

         <th align="left">[% 'Internal Notes' | $T8 %]</th>

        </tr>

        <tr valign="top">

         <td>

          <textarea name="intnotes" rows="[% rows %]" cols="35" wrap="soft">[% intnotes %]</textarea>

         </td>

         <td>

         </td>

        </tr>

[%- IF id && follow_ups.size %]

        <tr>

         <th align="left">[% 'Notes (will appear on hard copy)' | $T8 %]</th>