Index: BLVWIMP.mac.rou =================================================================== diff -u -r38776 -r48736 --- BLVWIMP.mac.rou (.../BLVWIMP.mac.rou) (revision 38776) +++ BLVWIMP.mac.rou (.../BLVWIMP.mac.rou) (revision 48736) @@ -58,8 +58,8 @@ S LVW=Lijst(6),$P(^HULP($J,LVW),D,12)="*",$P(^BLImp(MsgId),D,12)=1 ;Do STORE^vhTERMINA() If LevNr=5005 Do ; BLUM - .I $P(R,D,3)="COA" D ^BLKALC1($P(R,D,4)) - .I $P(R,D,3)="CSB" D ^BLCSBC1($P(R,D,4)) + .I (($P(R,D,3)="COA") && ##class(TECH.Config.ConfigMgr).Instance().GetString("BLUMInterfacesActief")) D ^BLKALC1($P(R,D,4)) + .I (($P(R,D,3)="CSB") && ##class(TECH.Config.ConfigMgr).Instance().GetString("BLUMInterfacesActief")) D ^BLCSBC1($P(R,D,4)) .I $P(R,D,3,4)="DMS\PR" D ^BLIMPPR ; Product .I $P(R,D,3,4)="DMS\OC" D ^BLIMPOC ; Product wijzigingen .I $P(R,D,3,4)="DMS\EP" D ^BLIMPEP ; Extended product (omschrijving) @@ -231,4 +231,3 @@ -