Index: TRANSP.mac.rou =================================================================== diff -u -r57626 -r57645 --- TRANSP.mac.rou (.../TRANSP.mac.rou) (revision 57626) +++ TRANSP.mac.rou (.../TRANSP.mac.rou) (revision 57645) @@ -102,7 +102,7 @@ Quit ; INITGRP - New R,Rembours,Rembours,Gewicht,ColTyp,Omschr,Count,BONNr,Node,BarCode,OphVoorz,RemboursVoorBon, LegacyTRANSP + New R,Rembours,Gewicht,ColTyp,Omschr,Count,BONNr,Node,BarCode,OphVoorz,RemboursVoorBon, LegacyTRANSP Set R=^KU1(GroepNr,"F"),KLNr=$P(R,D),Node=$$NODE(GroepNr) Set R=$G(^KUL(KLNr,Node,GroepNr,3)) If $$IsBonMetEnkelVerwijzingNaarLeveradres(R) Set R = ^KKL(^KK1(KLNr),"L"_##class(TECH.StringUtils).AlignRight($P(R,D)," ",3))