Index: vhTest/Utils/DOM/PM/Product.cls.xml =================================================================== diff -u -r36730 -r52840 --- vhTest/Utils/DOM/PM/Product.cls.xml (.../Product.cls.xml) (revision 36730) +++ vhTest/Utils/DOM/PM/Product.cls.xml (.../Product.cls.xml) (revision 52840) @@ -40,8 +40,9 @@ set $piece(^KPR(PRNr,"J"_LeverancierNr),"\",17)= "EUR" ; muntcode set $piece(^KPR(PRNr,"J"_LeverancierNr),"\",19)= $$$ProductPrijs set $piece(^KPR(PRNr,"J"_LeverancierNr),"\",20)= 1 + set $piece(^KPR(PRNr,"J"_LeverancierNr),"\",21)= 10 set $piece(^KPR(PRNr,"J"_LeverancierNr),"\",22)= $$$ProductPrijs - set $piece(^KPR(PRNr,"J"_LeverancierNr),"\",23)= $$$ProductPrijs-1 + set $piece(^KPR(PRNr,"J"_LeverancierNr),"\",23)= $$$ProductPrijs+1 set $piece(^KPR(PRNr,"J"_LeverancierNr),"\",25)= $$$ProductPrijs do BLDIND^PRODUKT2(PRNr)