Trailing-Edge
-
PDP-10 Archives
-
bb-kl11f-bm_tops20_v7_0_atpch1_19
-
autopatch/cobver.c19
There are 9 other files named cobver.c19 in the archive. Click here to see a list.
REP 1/1 ;19C1
; UPD ID= 1635 on 6/26/84 at 4:39 PM by MCARLETON
WIT
; UPD ID= 1945 on 6/23/88 at 12:27 PM by KSTEVENS
REP 15/1 ;19C2
CBLEDT==1646 ;EDIT LEVEL
WIT
CBLEDT==1647 ;EDIT LEVEL
REP 26/1 ;19C3
LBLEDT==1201 ;EDIT LEVEL
WIT
LBLEDT==1204 ;EDIT LEVEL
REP 8/4 ;19C4
;.AUTOPATCH 18
;.EDIT 1646 Fixed group to elimentary editting
; KWS,9-DEC-87,SPR:20-21637
WIT
;.AUTOPATCH 19
;.EDIT 1647 Fixed code generation for COMPUTE statement so extraneous DMOVE
;; does not get generated.
; KWS,21-MAR-88,SPR:10-35598
; A:SRC EXPGEN,COBVER
;.ENDA
;.AUTOPATCH 18
;.EDIT 1646 Fixed group to elimentary editting
; KWS,9-DEV-87,SPR:20-21637
REP 17/4 ;19C5
;.ENDA
;.AUTOPATCH 17
;.EDIT 1644 Extended edit 1603 to include the case where the SD is not in
;; the file section.
; KWS,29-SEP-87,SPR:20-21619
; A:SRC SRTGEN
;
WIT
;.EDIT 1644 Extended edit 1603 to include the case where the SD is not in
;; the file section.
; KWS,29-SEP-87,SPR:20-21619
; A:SRC SRTGEN,COBVER
;
;.ENDA
;.AUTOPATCH 17
REP 40/4 ;19C6
;
WIT
;
REP 49/4 ;19C7
; the correct number of characters are displayed instead of
WIT
; the correct number of characters are displayed instead of
REP 75/4 ;19C8
;.EDIT 1631 Subscripting a non-uniquely defined name caused a
WIT
;.EDIT 1631 Subscripting a non-uniquely defined name caused a
REP 136/4 ;19C9
;.EDIT 1614 Fixed over-zealous edit so binary and ascii mixed mode
WIT
;.EDIT 1614 Fixed over-zealous edit so binary and ascii mixed mode
REP 241/4 ;19C10
;.EDIT 1563 Allow the no rewind bit as valid for report writer
WIT
;.EDIT 1563 Allow the no rewind bit as valid for report writer
REP 252/4 ;19C11
;.EDIT 1561 If reference modification is being done within the
WIT
;.EDIT 1561 If reference modification is being done within the
REP 290/4 ;19C12
;.EDIT 1551 Cause COBOL to generate IFIW's in its argument
WIT
;.EDIT 1551 Cause COBOL to generate IFIW's in its argument
REP 400/4 ;19C13
;
WIT
;
REP 419/4 ;19C14
Make handling of figurative constants more
WIT
Make handling of figurative constants more
REP 552/4 ;19C15
Fix 68274 not to cause PA1050 ill. inst. when in COMM. SEC.
WIT
Fix 68274 not to cause PA1050 ill. inst. when in COMM. SEC.
REP 271/6 ;19C16
NEEDS LIBOL EDIT 624.
WIT
NEEDS LIBOL EDIT 624.
REP 291/6 ;19C17
ALSO FIX SYNTAX TREE TO ALLOW CONSOLE AS TTY FOR "ACCEPT".
WIT
ALSO FIX SYNTAX TREE TO ALLOW CONSOLE AS TTY FOR "ACCEPT".
REP 343/6 ;19C18
756 28-DEC-79 DMN COBOLG
WIT
756 28-DEC-79 DMN COBOLG
REP 18/10 ;19C19
441 ADDED IF OP0 TEST FOR NON-NUMERIC DATA. NEEDS EDIT 455 TO
WIT
441 ADDED IF OP0 TEST FOR NON-NUMERIC DATA. NEEDS EDIT 455 TO
REP 101/10 ;19C20
402 ALLOW INDEX REGISTER AND INDIRECT ADDRESSING FOR ARGUMENT TO
LIBOL. ROUTINES CMNGEN, COBOLG
401 FIX HANDELING OF USE PROCEEDURE IN A DBMS PROGRAM.
WIT
402 ALLOW INDEX REGISTER AND INDIRECT ADDRESSING FOR ARGUMENT TO
LIBOL. ROUTINES CMNGEN, COBOLG
401 FIX HANDELING OF USE PROCEEDURE IN A DBMS PROGRAM.
REP 122/12 ;19C21
257 FIX RELEASE AND RETURN SO THAT PARMS ARE ONLY IN SORT FILE
WIT
257 FIX RELEASE AND RETURN SO THAT PARMS ARE ONLY IN SORT FILE
INS 7/14 ;19C22
;.AUTOPATCH 19
;.EDIT 1204 Edit to make sure that retained records are non-existant
;; when they should be.
; KWS,23-JUN-88,SPR:20-21895
; A:SRC LSU
;
;.EDIT 1203 Edit to fix 1157, forgot a path when correcting qt.
; KWS,22-JUN-88,SPR:20-21893
; A:SRC LSU
;
;.EDIT 1202 Edit to generate a more appropriate error message
;; if the byte count to an ISAM index file is set to zero while
;; a COBOL program is running.
; KWS,22-Jun-88,SPR:20-21884
; A:SRC CBLIO
;.ENDA
REP 11/14 ;19C23
; A:SRC CBLIO
WIT
; A:SRC COBVER,CBLIO
REP 41/14 ;19C24
;.EDIT 1174 Fix handling of RETAIN on a numeric key with assumed
WIT
;.EDIT 1174 Fix handling of RETAIN on a numeric key with assumed
REP 70/14 ;19C25
;.EDIT 1166 Size of PDL is off by 20.
WIT
;.EDIT 1166 Size of PDL is off by 20.
REP 75/14 ;19C26
; at OPEN time won't get error from COMPT. UUO
WIT
; at OPEN time won't get error from COMPT. UUO
REP 90/14 ;19C27
;.EDIT 1162 Change the Start verb so it works as it should in SMU. I.E
; Start is illegal within the scope of a RETAIN/FREE, but it
WIT
;.EDIT 1162 Change the Start verb so it works as it should in SMU. I.E
; Start is illegal within the scope of a RETAIN/FREE, but it
REP 106/14 ;19C28
;.EDIT 1157 Return the 12B/12C functionality of block locking rather than
WIT
;.EDIT 1157 Return the 12B/12C functionality of block locking rather than
REP 197/14 ;19C29
;.EDIT 1132 Pass an ASCIZ string to RMS rather than an ASCII
WIT
;.EDIT 1132 Pass an ASCIZ string to RMS rather than an ASCII
REP 291/14 ;19C30
1101 Not needed for V13
WIT
1101 Not needed for V13
REP 384/14 ;19C31
EOF through a Declaratives Use Procedure if the Use Procedure
exists. The SPR problem that it fixed was on Mag-Tapes and looks
like a User Error. There is no reason that EOF on Sequential
WIT
EOF through a Declaratives Use Procedure if the Use Procedure
exists. The SPR problem that it fixed was on Mag-Tapes and looks
like a User Error. There is no reason that EOF on Sequential
REP 422/14 ;19C32
Zero buffer address to force FAKE READ to get block number for a RETAIN
WIT
Zero buffer address to force FAKE READ to get block number for a RETAIN
REP 19/16 ;19C33
Fix problems with RELATIVE file READs and WRITEs
WIT
Fix problems with RELATIVE file READs and WRITEs
REP 37/17 ;19C34
THIS TAKES OUT 557 AND REPLACES IT WITH CODE TO FORCE
WIT
THIS TAKES OUT 557 AND REPLACES IT WITH CODE TO FORCE
REP 41/20 ;19C35
372 CORRECT BLOCK FACTOR CALC FOR ASCII NON-ISAM FILES
WIT
372 CORRECT BLOCK FACTOR CALC FOR ASCII NON-ISAM FILES
SUM 130339