Index: PRBS.mac.rou
===================================================================
diff -u -r2408 -r2430
--- PRBS.mac.rou	(.../PRBS.mac.rou)	(revision 2408)
+++ PRBS.mac.rou	(.../PRBS.mac.rou)	(revision 2430)
@@ -490,7 +490,7 @@
  . . Set OldPrijs=$P($G(^PRBS(BSNode,PRNr,BSCode)),"\",25) ; bijgehouden detailprijs
  . . Set NewPrijs=$P($G(^HULP(%J,"V",BSCode)),D,1)
  . . If NewPrijs Do
- . . . Set $P(^PRBS(BSNode,PRNr,BSCode),D,23)=NewPrijs ; detailprijs bijhouden
+ . . . Set $P(^PRBS(BSNode,PRNr,BSCode),D,25)=NewPrijs ; detailprijs bijhouden
  . . . Do:(OldPrijs'="")&&(NewPrijs'="")&&(+OldPrijs'=+NewPrijs) DLOGMOD^LOG("PR",PRNr,,OldPrijs,NewPrijs,"BS:"_$P(BSCode,"."))
  ; opslaan hoofdnode
  Set:$D(^PRBS(BSNode,PRNr)) ^PRBS(BSNode,PRNr)=^HULP(%J,"C")