Im Inventurbuchungsblatt Mengenabweichungen hervorheben

28. August 2007 12:37

Da im Inventurbuchungsblatt die Differenzen als Absolutwerte angezeigt werden und nur in Verbindung mit der Postenart Zugang oder Abgang etwas aussagen, ist diese Form leider ziemlich unübersichtlich.
Wenn dieser Code im OnFormat-Trigger der Form 392 in dem Feld "Quantity" eingefügt wird, werden die Minusmengen rot und die Plusmengen blau als Fettdruck angezeigt. Damit sieht man beim durchscrollen erheblich schneller wo etwas nicht stimmt.
Code:
IF "Qty. (Calculated)" > "Qty. (Phys. Inventory)" THEN BEGIN
  CurrForm.Quantity.UPDATEFORECOLOR(255);
  CurrForm.Quantity.UPDATEFONTBOLD(TRUE);
END ELSE IF "Qty. (Calculated)" < "Qty. (Phys. Inventory)" THEN BEGIN
  CurrForm.Quantity.UPDATEFORECOLOR(16711680);
  CurrForm.Quantity.UPDATEFONTBOLD(TRUE);
END;