HSRP-IOL, F$R2

* 0071-001-H001 (HSRP-IOL) DRAWING NO. 41286165-001-01 PAGE 8

0351 * 0352 * BL BLOCK LENGTH ERROR 0353 * CK CHECKSUM ERROR 0354 * PE PARITY ERROR 0355 * 0356 * THESE ERRORS ARE REPORTED THROUGH C$ER (CONTROL ERROR 0357 * ROUTINE). 0358 * 0359 * EF END OF FILE ERROR 0360 * ID ILLEGAL DEVICE 0361 * 0362 * THESE ERRORS ARE REPORTED THROUGH F$ER (FORTRAN ERROR 0363 * ROUTINE). 0364 * 0365 * IF CONTINUATION IS ATTEMPTED AFTER ERRORS BL, CK, PE OR EF, 0366 * THE NEXT RECORD WILL BE PROCESSED. CONTINUATION AFTER ERROR 0367 * ID CAUSES A RETURN TO THE CALLING PROGRAM. 0368 * 0369 * 0370 * METHOD 0371 * 0372 * THE MODULES ARE ORDERED SO THAT HIGHER LEVEL MODULES PRECEDE LOWER 0373 * LEVEL MODULES. HOWEVER, THE HEADING BUFFER-(IN O$GHAP) PRECEDES 0374 * THE PAGE EJECTION MODULE. AND IF THE USER WISHES TO EJECT PAGES 0375 * WITHOUT INITIALISING A HEADING, A DEFAULT HEADING BUFFER, SET TO 0376 * SPACES, WILL BE LOADED. LIKEWISE, THE PAGE EJECTION MODULE 0377 * PRECEDES THE LISTING MODULE. AND IF THE USER WISHES TO LIST LINES 0378 * WITHOUT EVER INITIALISING A HEADING OR EJECTING A PAGE. A DUMMY 0379 * PAGE EJECTION MODULE WILL BE LOADED. AND LISTING WILL APPEAR ON 0380 * CONSECUTIVE LINES WITH NO PAGINATION. 0381 * 0382 * IF LISTINGS ARE TO BE OUTPUT SIMULTANEOUSLY TO ASR AND HSP. 0383 * THE ROUTINE O$PH MUST NOT BE CALLED TO INITIALISE THE LISTING. 0384 * AS THIS WILL CAUSE THE O$GHAP MODULE, COMMON TO BOTH ASR AND 0385 * PUNCH, TO BE LOADED. INSTEAD, IF PAGINATION AND HEADING ARE 0386 * REQUIRED, THE USER MUST TRANSFER THE HEADING INTO THE DEFAULT 0387 * HEADING BUFFER AND SET THE LINE AND PAGE NUMBER TO ZERO BEFORE- 0388 * HAND. THESE LOCATIONS SHOULD BE ADDRESSED BY THEIR DEFAULT 0389 * NAMES (O$PDHB, O$PDLN, O$PDPN RESPECTIVELY) TO AVOID LOADING THE 0390 * O$GHAP ROUTINE. THE USER'S PROGRAM SHOULD CONTAIN A CALL ON 0391 * O$PE TO ENSURE THAT THE 'LIVE' PAGE EJECTION ROUTINE IS LOADED. 0392 * 0393 * THE LIST LINE COUNT/PAGE IS SET INITIALLY TO 72. BUT MAY BE 0394 * EXTERNALLY REFERENCED FOR MODIFICATION. 15 OF THESE LINES ARE 0395 * USED FOR THE HEADING AND INTER-PAGE GAP. SO THE STANDARD NUMBER OF 0396 * LINES PER PAGE AVAILABLE FOR LISTING IS 57. 0397 * 0398 * UNDER FORTRAN CONTROL. PAGE LENGTH IS ALSO 72 LINES. SUBJECT TO 0399 * MODIFICATION UNDER PROGRAM CONTROL. 0400 *