Trailing-Edge
-
PDP-10 Archives
-
bb-bt99e-bb
-
lsu.c05
There is 1 other file named lsu.c05 in the archive. Click here to see a list.
REP 2/1 ;05C1
TITLE LSU FOR LIBOL
WIT
TITLE LSU FOROp LIBOL
REP 14/1 ;05C2
;V12 *****
; WTK 01-Nov-80 ;[654] Supplement ENQ/DEQ error return message.
; HAM 03-Oct-80 ;[650] Make CNTRY external.
WIT
;
;V12B ****
; DMN/JM 15-Sep-81 ;[1000] Fix SMU RETAIN of relative files in COBOL-74
;V12A ****
; WTK 01-Nov-80 ;[654] Supplement ENQ/DEQ error return message.
; HAM 03-Oct-80 ;[650] Make CNTRY external.
; HAM 29-Jul-80 ;[643] Set proper long term ENQ lock bit
;V12 *****
INS 40/36 ;05C3
IFN ANS74, <
DPB AT1,CRRBLK ;[1000] PUT BLOCK NO IN CUR REC RET BLK
POPJ PP, ;[1000] AND RETURN
>; [1000] AND IFN ANS74
SUM 5809