Index: BLPROD.mac.rou
===================================================================
diff -u -r69652 -r69786
--- BLPROD.mac.rou	(.../BLPROD.mac.rou)	(revision 69652)
+++ BLPROD.mac.rou	(.../BLPROD.mac.rou)	(revision 69786)
@@ -368,6 +368,8 @@
  If (Opties["BG") Do
  . Quit:'$P(BLRec,D,9)
  . Quit:'($$IsVerschilInBrutoGewichtSignificant(+$J($P(BLRec,D,9),0,2), +$J($$$PRGet($$$Gewicht),0,2)))
+ . Set Verschil=$J($P(BLRec,D,9),0,2)-$J($$$PRGet($$$Gewicht),0,2)
+ . Set:Verschil<0 Verschil=-Verschil
  . Set ^PVDiffBlum($H,PRNr)=$P(BLRec,D,9)_"/"_$$$PRGet($$$Gewicht)_"/"_Verschil
  . Set Diff=Diff_$LB("BG",$LB(+$J($P(BLRec,D,9),0,2),$$$PRGet($$$Gewicht)))