Index: PRHF.mac.rou =================================================================== diff -u -r29059 -r67309 --- PRHF.mac.rou (.../PRHF.mac.rou) (revision 29059) +++ PRHF.mac.rou (.../PRHF.mac.rou) (revision 67309) @@ -71,6 +71,8 @@ Quit ; LogMoeder(Key,MPRNr,Rec) + Quit ; PV 7/3/20 + New VolgNr,PRNr Set PRNr=919146 Quit:MPRNr'?4.9N @@ -81,6 +83,8 @@ Quit Log(Key,PRNr,Rec) + Quit ; PV 7/3/20 + New VolgNr Quit:PRNr'=919146 Set VolgNr=$O(^KSPWLog(PRNr,""),-1)+1