--- dao/DelphiScanner/Main.pas	2016/08/23 14:08:44	3107
+++ dao/DelphiScanner/Main.pas	2016/08/29 14:03:14	3108
@@ -1443,13 +1443,24 @@
     if (chkUdenforSpecifikation.Checked = True) then
     begin
       URLStr := Format(Config.URLUdenforSpecifikation,[Sted,Stregkode]);
-      //ShowMessage( URLStr);
+      //InputBox( '1', '1', URLStr);
 
-      WebSvar := IdHTTP1.Get(Config.URLUdenforSpecifikation);
-      //ShowMessage( WebSvar );
+      WebSvar := IdHTTP1.Get(URLStr);
+      //InputBox( '2', '2', WebSvar );
 
       chkUdenforSpecifikation.Checked := False;
       LabelPrint.PrintLabel(Stregkode);
+
+      StregkodeST.Caption := '';
+      Stregkode := '';
+
+      RuteNummerST.Caption := '';
+      BoghandlerNavnST.Caption := '';
+      KommentarST.Caption := 'Retur til leverandør';
+
+
+
+
       exit;   //leave procedure
     end;