Index: ULTOER2.mac.rou
===================================================================
diff -u -r31334 -r31450
--- ULTOER2.mac.rou	(.../ULTOER2.mac.rou)	(revision 31334)
+++ ULTOER2.mac.rou	(.../ULTOER2.mac.rou)	(revision 31450)
@@ -134,7 +134,7 @@
  .Set:$P(R,D,25)="M"!($P(R,D,25)="P") Proforma=$P(R,D,25)_$S($P(R,D,29)["P":"m",1:"z")
  .Set KlantInd=^KK1(KLNr),R=$G(^KOD(KLNr,"F",ORDNr,3))
  .If '$$IsBonMetEigenLeveradres^TRANSP(R) Set R=^KKL(KlantInd,0)
- .If $$IsBonMetEnkelVerwijzingNaarLeveradres^TRANSP(R) Set R = ^KKL(KlantInd,"L"_$Select($L($P(R,D))>2:"",1:" ")_$P(R,D))
+ .If $$IsBonMetEnkelVerwijzingNaarLeveradres^TRANSP(R) Set R = $get(^KKL(KlantInd,"L"_$Select($L($P(R,D))>2:"",1:" ")_$P(R,D)))
  .Set KlantNm=$P(R,D,2),PostKode=$P(R,D,6),Gemeente=$P(R,D,7)
  .Set Land=$$LAND^vhRtn1($P(R,D,8)),IsTerugN=$$ISTERUGN^EWORDS3(ULNr)
  .Set R=ULNr_D_Type_D_KLNr_D_KlantNm_D_$S(Land'="BE":Land_"-",1:"")_Gemeente