CALL F.READ.HISTORY(FN.HIS.FILE,
Y.HIST.ID, R.HIST.REC, F.HIS.FILE, YERR )
OR
EB.READ.HISTORY.REC:
CALL EB.READ.HISTORY.REC(HIST.FILE, HIS.ID,
HIST.REC, YERROR)
Using
F.READ.HISTORY will be the better option, here HIS.ID is normal live file ID and it will get latest history ID by default.