Index: BLIMPOC.mac.rou
===================================================================
diff -u -r29059 -r69290
--- BLIMPOC.mac.rou	(.../BLIMPOC.mac.rou)	(revision 29059)
+++ BLIMPOC.mac.rou	(.../BLIMPOC.mac.rou)	(revision 69290)
@@ -18,6 +18,7 @@
  G C2a:RecType'=11
  Set PrijsLijst="" 
  Set RecNaam="DMS-OC-11" Do TF
+ Set PrijsLijst=$S(+PrijsLijst=43:"K",1:"E")_+PrijsLijst
 C2b Do NextRec Goto C6:RecNr=-1
 C2c G C2b:RecType'=21 
  Set RecNaam="DMS-OC-21",(SetNr,ComNr,LanNr)=1 Do TF