Index: ZBCHKFLO.mac.rou =================================================================== diff -u -r33105 -r33107 --- ZBCHKFLO.mac.rou (.../ZBCHKFLO.mac.rou) (revision 33105) +++ ZBCHKFLO.mac.rou (.../ZBCHKFLO.mac.rou) (revision 33107) @@ -100,6 +100,9 @@ ......If (OrderLijnIsSpaceTower) && ($P(R,D,27)=TOENr) Do ...... . Set Check=1 ...... . Set ExtraMelding=", maar mag genegeerd worden want is SPACETOWER." + ......Else If (OrderLijnIsSpaceTower) && ($P(R,D,27)="KOM") Do + ...... . Set Check=0 + ...... . Set ExtraMelding=", vermoedelijk is dit een niet-volledig ingeboekte toelevering voor SPACETOWER." ......Do wLEVERANCIER^zbcheck ......Write !!,"Kom link ",ZR," foutief"_ExtraMelding,!,?8,"Toelev = ",TOENr,?29,"Order = ",ORDNr,?50,"Lijn = ",OLNr,!,?8,"Order = ",ORDNr,?29,"Toelev = ",$P(R,D,27),?50,"Lijn = ",$P(R,D,28) If $G(Check)'=0 Do