projekt kivitendo

  $sth->finish;

  # get taxkeys and description

              FROM tax|;

  $sth = $dbh->prepare($query);

  $sth->execute || $form->dberror($query);

		WHERE id = $form->{id}|;

  } else {

                (accno, description, charttype, gifi_accno, category, link, taxkey_id, pos_ustva, pos_bwa, pos_bilanz,pos_eur)

                VALUES ('$form->{accno}', '$form->{description}',

		'$form->{charttype}', '$form->{gifi_accno}',

  # set inventory_accno_id, income_accno_id, expense_accno_id to defaults

  $query = qq|UPDATE parts

	                 (SELECT inventory_accno_id FROM defaults)

	      WHERE inventory_accno_id = $form->{id}|;

  $dbh->do($query) || $form->dberror($query);

		description = '$form->{description}'

		WHERE accno = '$form->{id}'|;

  } else {

                (accno, description)

                VALUES ('$form->{accno}', '$form->{description}')|;

  }

		role = '$form->{role}'

		WHERE id = $form->{id}|;

  } else {

                (description, role)

                VALUES ('$form->{description}', '$form->{role}')|;

  }

                salesman = '$form->{salesman}'

		WHERE id = $form->{id}|;

  } else {

                (description, discount, customernumberinit, salesman)

                VALUES ('$form->{description}', $form->{discount}, '$form->{customernumberinit}', '$form->{salesman}')|;

  }

		description = '$form->{description}'

		WHERE code = '$form->{id}'|;

  } else {

                (code, sictype, description)

                VALUES ('$form->{code}', '$form->{sictype}', '$form->{description}')|;

  }

  # user specific variables are in myconfig

  # save defaults

  my $query = qq|UPDATE defaults SET

		     (SELECT c.id FROM chart c

		                WHERE c.accno = '$form->{inventory_accno}'),

                 income_accno_id =

}

1;