Index: ORGALUX.mac.rou =================================================================== diff -u -r1134 -r1287 --- ORGALUX.mac.rou (.../ORGALUX.mac.rou) (revision 1134) +++ ORGALUX.mac.rou (.../ORGALUX.mac.rou) (revision 1287) @@ -104,10 +104,11 @@ .For Set KPRNr=$O(^PRLINK("D",MPRNr,KPRNr)) Quit:KPRNr="" Do ..Quit:$$OPSLZONE^PRODUKT2(KPRNr)=9 ; Geen manuele producten zoals verpakking ..Set Faktor=$P(^PRLINK("D",MPRNr,KPRNr),D) - ..Set KFysSt=$$GETSTOCK^PRODUKT4(KPRNr,"F")/$S('Faktor:1,1:Faktor)\1 + ..Quit:'Faktor + ..Set KFysSt=$$GETSTOCK^PRODUKT4(KPRNr,"F")/Faktor\1 ..Set MFysSt=$G(MFysSt,KFysSt) ..Set:KFysSt