From 398a270cbff6d72033f0ae217d380b8ad85d19f6 Mon Sep 17 00:00:00 2001
From: Philip Reetz <p.reetz@linet-services.de>
Date: Tue, 11 Oct 2005 09:26:15 +0000
Subject: [PATCH 1/1] Fixed Bug #198

---
 bin/mozilla/io.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index 9d7597120..d0e813f57 100644
--- a/bin/mozilla/io.pl
+++ b/bin/mozilla/io.pl
@@ -1552,9 +1552,10 @@ sub ship_to {
 
   map { $form->{$_} = $form->parse_amount(\%myconfig, $form->{$_}) }
     qw(exchangerate creditlimit creditremaining);
-
+  $form_id = $form->{id};
   # get details for name
   &{"$form->{vc}_details"};
+  $form->{id} = $form_id;
 
   $number =
     ($form->{vc} eq 'customer')
-- 
2.20.1