--- dao/DelphiScanner/Main.pas	2016/07/26 06:30:11	3072
+++ dao/DelphiScanner/Main.pas	2016/07/27 15:25:24	3073
@@ -107,6 +107,7 @@
     chkForstorTilDirekte: TCheckBox;
     chkEmballageRepareret: TCheckBox;
     KommentarST: TLabel;
+    chkUdenforSpecifikation: TCheckBox;
 
 
 
@@ -2207,11 +2208,11 @@
     begin
       if (Leveringssted <> BladhusStedKode[BladhusSted]) and (BladhusStedKode[BladhusSted] <> 'DBK') then
       begin
-          Kommentar := Kommentar + ' Pakke burde være hos DAO Distribution';
+          Kommentar := Kommentar + 'Pakke burde være hos ' + Leveringssted;
           PrintNyLabel := False;
       end;
     end
-    else if (menuDaoDirekte1.Checked) and (Leveringssted <> Sted) then
+    else if (menuDaoDirekte1.Checked) and (Leveringssted <> Sted) And (Leveringssted <> '') then
     begin
        if (Leveringssted = 'E') and (Sted = 'DBK') then
        begin
@@ -2219,7 +2220,7 @@
        end
        else
        begin
-          Kommentar := Kommentar + ' Pakke burde være hos DAO Distribution';
+          Kommentar := Kommentar + 'Pakke burde være hos ' + Leveringssted;
           PrintNyLabel := False;
        end;
     end;