Index: PRBS.mac.rou =================================================================== diff -u -r2394 -r2408 --- PRBS.mac.rou (.../PRBS.mac.rou) (revision 2394) +++ PRBS.mac.rou (.../PRBS.mac.rou) (revision 2408) @@ -487,7 +487,7 @@ .. Do SAVELNK(PRNr,$P(Rec,D,1),$P(Rec,D,12),NoSa) ; link opslaan (recursief) . Else Do . . Merge ^PRBS(BSNode,PRNr,BSCode)=^HULP(%J,"C",BSCode) ; bouwsteen opslaan, alsook de onderliggende dimensie - . . Set OldPrijs=$P($G(^PRBS(BSNode,PRNr,BSCode)),"\",23) ; bijgehouden detailprijs + . . 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