projekt kivitendo

    $form->{salesman_id} = $form->{old_salesman_id};

  }

  map { $form->{$_} =~ s/\"/"/g }

    qw(ordnumber quonumber shippingpoint shipvia notes intnotes shiptoname

       shiptostreet shiptozipcode shiptocity shiptocountry shiptocontact

  $form->{exchangerate} =

    $form->format_amount(\%myconfig, $form->{exchangerate});

  if (($form->{creditlimit} != 0) && ($form->{creditremaining} < 0) && !$form->{update}) {

    $creditwarning = 1;

  } else {

sub save_and_close {

  $lxdebug->enter_sub();

  if ($form->{type} =~ /_order$/) {

    $form->isblank("transdate", $locale->text('Order Date missing!'));

  } else {

sub save {

  $lxdebug->enter_sub();

  if ($form->{type} =~ /_order$/) {

    $form->isblank("transdate", $locale->text('Order Date missing!'));

  } else {

  $form->{rowcount}--;

  $form->{shipto} = 1;

  if ($form->{type} =~ /_order$/) {

    $form->{exchangerate} = $exchangerate;

    &create_backorder;