Index: DCXBONG.mac.rou =================================================================== diff -u -r29059 -r49992 --- DCXBONG.mac.rou (.../DCXBONG.mac.rou) (revision 29059) +++ DCXBONG.mac.rou (.../DCXBONG.mac.rou) (revision 49992) @@ -327,7 +327,7 @@ ..Set R=^KUL(KLNr,"G",BONNr,BLNr),PRNr=$P(R,D,2) ..Do:$P(R,D,17)="KF5" ...Set OLRef=$P(R,D,20),EDIBONNr=$P($P($P(R,D,5)," EDI ",2),".") - ...If KLNr=11708 Set OLRef=$P($P(R,D,5)," - ",3) + ...If KLNr=11708 Set OLRef=$P($P(R,D,5)," - ",3,99) ..Quit:'PRNr ..Set Aantal=$P(R,D,3),AantalBO=$P(R,D,23) ..Set SortKey=$$SORTKEY^PRODUKT(PRNr),SortKey=OLRef_BONNr_SortKey,R=$G(^HULP(%J,"D",SortKey))