Index: DCXBON.mac.rou =================================================================== diff -u -r29059 -r49991 --- DCXBON.mac.rou (.../DCXBON.mac.rou) (revision 29059) +++ DCXBON.mac.rou (.../DCXBON.mac.rou) (revision 49991) @@ -327,7 +327,7 @@ ..Set R=^KUL(KLNr,"F",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))