Trailing-Edge
-
PDP-10 Archives
-
bb-bt99e-bb
-
cobver.c07
There is 1 other file named cobver.c07 in the archive. Click here to see a list.
DEL 1/1 ;07C1
REP 13/1 ;07C2
CBLEDT==1457 ;EDIT LEVEL
WIT
CBLEDT==1507 ;EDIT LEVEL
REP 22/1 ;07C3
LBLEDT==1064 ;EDIT LEVEL
WIT
LBLEDT==1103 ;EDIT LEVEL
REP 21/3 ;07C4
GPS GIL STILE
HAM HOWARD MAYBERRY
ILG IRWIN GOVERNMAN
WIT
GPS GIL STEIL
HAM HOWARD MAYBERRY
ILG IRWIN GOVERNMAN
JBB JANET BLAU
INS 435/4 ;07C5
;.EDIT 1440 COPY REPLACING loses terminal period if replacing a numeric literal.
; DMN,07-DEC-82,SPR:10-33198
; A:SRC GETITM
;
INS 503/4 ;07C6
;.AUTOPATCH 7
;
;.EDIT 1460 Give error message if key is being subscripted
; RLF,20-APR-83,SPR:20-19102
; A:SRC COBOLD,DIAGS
;
;.EDIT 1461 COMPUTE w/ 2-wd floating point gives wrong results
; JEH,20-APR-83,SPR:10-33764
; A:SRC EXPGEN
;
;.EDIT 1462 SEGMENT in place of SECTION can cause compiler
;; failure
; DMN,21-APR-83,SPR:10-33756
; A:SRC P,COBOLA
;
;.EDIT 1463 Makes COPY REPLACING work if BY is not on same line.
; DMN,22-APR-83,SPR:20-19124
; A:SRC GETITM
;
;.EDIT 1464 Correction to edit 1450, flgas syntax error on FREE
; RLF,25-APR-83,SPR:10-33657
; A:SRC IOGEN
;
;.EDIT 1465 Declare word in phase D area of IMPURE for worker
;; in edit 1465
; DMN,28-APR-83,SPR:20-19127
; A:SRC COBOLD,IMPURE
;
;.EDIT 1466 Error on WRITE stmt w/ ADVANCING or POSITIONING clause
;; if in non ASCII file
; JEH,02-MAY-83,SPR:10-33738
; A:SRC CLEAND,COBOLD,DIAGS
;
;.EDIT 1467 Resolve symbol ALCPA., as called by SCHIO2
;; after DBMS-20 V.6 edit 473.
; WTK,02-MAY-83,SPR:NONE
; A:SRC DBGETF
;
;.EDIT 1470 Declare two fields as external for edit 1447 and 1451
; JEH,12-MAY-83,SPR:10-33837
; A:SRC IPCGEN,RPWGEN
;
;.EDIT 1471 First line of Page Head does not have <FF>.
; SMI,12-MAY-83,SPR:10-33821
; A:SRC RPWGEN
;
;.EDIT 1472 Fix DIVIDE literal INTO dn1, dn2, etc.
; JEH,09-JUN-83,SPR:20-19254
; A:SRC MATGEN
;
;.EDIT 1473 Eliminate truncation warnings on moves involving
;; compiler-generated line/page counters
; JEH,21-JUN-83,SPR:10-33835
; A:SRC MOVGEN
;
;.EDIT 1474 Correction to edit 1450 for the "FREE" verb
; RLF,30-JUN-83,SPR:10-33998
; A:SRC IOGEN
;
;.EDIT 1475 Correction to edit 1452 for the RESET code in
;; report writer
; JBB,08-SEP-83,SPR:20-19512
; A:SRC COBOLC
;
;.EDIT 1476 Bad table link with catastrophe in phase E
;; Correction to edit 1123
; JBB,22-SEP-83,SPR:20-19530
; A:SRC CMNGEN
;
;.EDIT 1477 Adjust calculation of EPSILON to consider
;; decimal places of source
; JEH,04-OCT-83,SPR:10-34214
; A:SRC CMNGEN
;
;.EDIT 1500 Put warnings out where HIGH or LOW VALUES
;; used with numeric fields
; JEH,10-OCT-83,SPR:10-34132
; A:SRC DIAGS,CLEANC,MOVGEN
;
;.EDIT 1501 Put syntax error on alternate key if
;; variable length
; JEH,11-OCT-83,SPR:20-19571
; A:SRC CLEANC
;
;.EDIT 1502 Put a warning out on any record which is
;; smaller than maximum record size
; JEH,24-OCT-83,SPR:10-34218
; A:SRC CLEANC,DIAGS
;
;.EDIT 1503 WRITE ADVANCING gets fatal error message
;; when no recording mode is specified
; JBB,16-NOV-83,SPR:20-19682
; A:SRC CLEAND,COBOLD
;
;.EDIT 1504 GETITM fails to compile in 68274 without
;; DBMS
; JBB,16-NOV-83,SPR:20-19715
; A:SRC GETITM
;.EDIT 1505 68274 halts if '** End of copy libary text **'
;; inserted before 'COPY'
; JEH,17-NOV-83,SPR:20-19590
; A:SRC GETITM
;
;.EDIT 1506 Have FIPS Flagger mark extensions in use of
;; figurative constants with numeric fields
; JEH,29-NOV-83,SPR:10-34229
; A:SRC MOVGEN
;
;.EDIT 1507 Make handling of figurative constants more
;; consistent
; JEH,29-NOV-83,SPR:10-34230
; A:SRC MOVGEN
;
;.ENDA
INS 873/4 ;07C7
INS 906/4 ;07C8
REP 176/12 ;07C9
;.ENDA
;.AUTOPATCH 6
;.EDIT 1047 Dequeue locked record before job is aborted
; RLF, 21-DEC-82,SPR:20-18620
; A:SRC LSU,COBVER
WIT
;
;.ENDA
;.AUTOPATCH 6
;
;.EDIT 1047 Dequeue locked record before job is aborted
; RLF, 21-DEC-82,SPR:20-18620
; A:SRC LSU
INS 242/12 ;07C10
;
;.AUTOPATCH 7
;
;.EDIT 1065 Make FREE RECORD KEY work for SMU after RETAIN NEXT
; RLF/JM, 21-APR-83,SPR:10-33657
; A:SRC CBLIO,LSU
;
;.EDIT 1066 Add GJ.BLK, and GJ.ATR for long form GTJFN
; SMI, 1-JUN-83,SPR:20-18985
; A:SRC COMUNI,CBLIO
;
;.EDIT 1067 Correction to edit 1065
; RLF, 6-JUN-83,SPR:10-33657
; A:SRC LSU
;
;.EDIT 1070 Chg NUMS.7 table for NUMSTD=0 OTS' so numeric
;; digits will be converted
; JEH, 16-JUN-83,SPR:10-33623
; A:SRC NUBSTB
;
;.EDIT 1071 Zero out FS.EN before assembling error nbr
;; for file status 2
; JSM, 16-JUN-83,SPR:20-19298
; A:SRC LBLERR
;
;.EDIT 1072 Don't turn on sign bit in word 2 if result
;; zero
; JEH, 28-JUN-83,SPR:20-19334
; A:SRC FIX
;
;.EDIT 1073 Add call to $ERASE if RMS file closed with delete
; JEH, 18-JUL-83,SPR:20-19385
;
; A:SRC RMSIO
;.EDIT 1074 Fix twos complement routine in ACEPT. routine
; JEH, 19-AUG-83,SPR:10-34087
; A:SRC ACCEPT
;
;.EDIT 1075 Prevent multi-level ISAM file from skipping records
;; when using START, READ NEXT sequence
; JBB, 22-AUG-83,SPR:10-34124
; A:SRC CBLIO
;
;.EDIT 1076 Add error handling routine in COBST for failure on
;; GET of OTS
; JEH, 22-AUG-83,SPR:20-19323
; A:SRC COBST
;
;.EDIT 1077 Update pointers for current record, next record
;; last record if DYNAMIC access and REWRITE
; JEH, 24-OCT-83,SPR:10-34218
; A:SRC CBLIO
;
;.EDIT 1100 Do checkpointing write for SMU records.(10-ONLY)
; JM/RF, 25-OCT-83,SPR:10-34216
; A:SRC CBLIO
;
;.EDIT 1101 Fix LIBOL.CTL to properly save LIBO12.
; JBB,08-NOV-83,SPR:20-19586
; A:MSC LIBOL.CTL
;
;.EDIT 1102 Make edit 1007 conditional on monitor level
; JEH,09-NOV-83,SPR:20-19696
; A:SRC CBLIO,COMUNI
;
;.EDIT 1103 On Fake Read for SMU Retain on TOPS-10, check for
;; EOF Return and don't cause program failure if so.
; JSM,09-NOV-83,SPR:NONE
; A:SRC CBLIO
;
;.ENDA
;
SUM 156713