Control Data Corporation 3300 Reference Manual page 224

>
00359
000266
02
FILLER PIC X(34).
I
~
00360
000267
02
R-SAKT PIC 9(12) OCCURS 3 TIMES.
0
00161 Dn026R
02 FILLER PIC X(12).
OQ362
000269 01 SE~ONOARY-RECCRDT.
00363
000270
02
FORWARO-LKT
pIC 9(12).
00364 0;;0271
02
BACKWARO-LKT pIC 9(12).
00365
000272
02 PSH-NUMRERT PIC XeS).
00366
066273
02
PSR-SAKT PIC 9(12).
00367
006274
02
PRCD.NAMET
PIC X (10) •
00368
0002715
02
FILLER pIC XX.
00369
060276
02
OP-SYS-NAMET PIC X (6) •
00370
OQQ277 02 FILLER pIC XX.
00371
000278
02
LIST-LITERALT PIC X(9) VALUE
- PSR-LINK;6.
00372
060279
02
HEADER-ST pIC
9(12).
00373
D00280 01 PSR-FILE-RECT.
00374
OQ0281
02
PSR-FILEI-MOVET.
00375
OQQ282 03 PSR-NCT pIC
9 (5) •
00376
000283 03 DATE-INT pIC
X(8).
00377
000284
03 PROO.NMT pIC
X(10).
00378
000285
03 vERSION-NCT pIC 9V9.
00379
000286
03 PROO-NCT pIC X(4).
00380
OQ0287 03 CP-svS-IT pIC
x.
00381 000288
03 VER-IT
pIC 9V9.
00382
060289 03 OP-svS-2T
pIC
x.
00383
000290 03 VER-2T
pIC 9V9.
00384
060291 03 OP-SvS-3T
pIC
x.
00385
D60292
03 VER-3T pIC 9V9.
00386
000293 03 REPORT-CRGT
pIC X(14).
00387 000294
03 EQUAL-PSRT pIC
9 (S) •
00388 000295
02 PSR-FILE2-MOVET.
00389
060296 03 OUT-DTOT
pIC X (8) •
00390 006297
03 SCHED-IMPLT.
00391 060298 04 syS-AT
pIC 9V9.
00392 060299
04 VEI'<-AT
PIC 9V9.
00393 066300
04 SVS-BT
PIC 9V9.
00394
000301 04 VER-BT pIC 9V9.
00395
000302 04 SyS-CT
pIC 9V9.
00396 000303
04 VEH-CT pIC 9V9.
00397 000304
03 TESTED-T
PIC X.
00398
060305
03 SUM-NCT pIC
999.
en
00399
000306
02
OESCRIPTICNT.
0
00400
000307 03 OESCT
pIC X(73) OCCURS 5 TIMES.
t-:>
t-:> 00401
D00308 02 PSR-FIL3-MCVET.
co
~ 00402 000309
03 AS-OTT pIC
9 (4) •
0
0
00403
000310
03 PSR-AK-FORWT
pIC 9(12).