Index: HADETIK.mac.rou
===================================================================
diff -u -r57420 -r57557
--- HADETIK.mac.rou	(.../HADETIK.mac.rou)	(revision 57420)
+++ HADETIK.mac.rou	(.../HADETIK.mac.rou)	(revision 57557)
@@ -315,9 +315,10 @@
  Set C("KLREFOMS")=$E($G(KlRefOms),4,80) // Loopje zet ampersand telkens voor referentieomschrijving, ook voor de eerste, dus die moet er nu terug van.
  
  // DKG wil graag zijn pakketreferentie in barcode-vorm. Maar tot zolang er geen etiketlayout is gekozen/gemaakt voor dossiercode-barcode PLUS klantbarcode, heeft dossiercode voorrang.
- If ( ##class(TECH.Config.ConfigMgr).Instance().GetBoolean("APPS.Halux.Docs.impl.LadeKlantEtiketBuilder_IsActiefDkgPakketRefAlsBarcodeOpKlantEtiket")
- 	&& (KLNr=$$$KlantDKGDeKeukenfabriek) && $L($G(C("PAKKETREFERENTIE"))) && '($L($G(C("DOSNR"))))) {
- 	Set C("BARCODE")=$G(C("PAKKETREFERENTIE")) // DKG wil de eventuele pakketreferentie niet enkel tekstueel maar ook in barcodevorm.
+ If ##class(TECH.Config.ConfigMgr).Instance().GetBoolean("APPS.Halux.Docs.impl.LadeKlantEtiketBuilder_IsActiefDkgPakketRefAlsBarcodeOpKlantEtiket") {
+ 	If (KLNr=$$$KlantDKGDeKeukenfabriek) && $$$HasLength($G(C("PAKKETREFERENTIE"))) && ($G(C("DOSNR")) = "") {
+ 		Set C("BARCODE")=$G(C("PAKKETREFERENTIE")) // DKG wil de eventuele pakketreferentie niet enkel tekstueel maar ook in barcodevorm.
+ 	}
  }
  
  Quit