Seq # *Modification Id* Act
----------------------------+
| Line S00089 Modification History |
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
04327 M01S00089.253l688 +++|* EXIT (SSJS) = 1 IF *SSJ=* JOB.
04328 M00S03066.pfm +++|*
04329 M00S03067.pfm +++|* USES CM - CM+4.
| Line S03068 Modification History |
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
04330 M01S03068.253l688 ---|*
04331 M01S03069.253l688 ---|* MACROS ERROR.
04332 M00S03070.pfm +++|
04333 M00S03071.pfm +++|
04334 M00S03072.pfm +++| VUA SUBR ENTRY/EXIT
04335 M00S03073.pfm +++| LDD CP CHECK FOR SSJ= JOB
04336 M00S03074.pfm +++| ADC SEPW
04337 M00S03075.pfm +++| CRD CM
04338 M00S03076.pfm +++| LDD CM
04339 M00S03077.pfm +++| SHN 0-2
04340 M00S03078.pfm +++| LPN 1
04341 M00S03079.pfm +++| STM SSJS SAVE *SSJ=* STATUS
| Line S03080 Modification History |
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
04342 M01S03080.253l688 ---| NJN VUAX IF *SSJ=* JOB
| Line S00018 Modification History |
M01 (Added by) | ns2414 |
M02 (Removed by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
04343 M02S00018.253l688 ---| LDD CC
04344 M02S00019.253l688 ---| LMN CCDD
04345 M02S00020.253l688 ---| ZJN VUAX IF DROPDS REQUEST
04346 M02S00021.253l688 ---| LMN CCDI&CCDD
04347 M02S00022.253l688 ---| ZJN VUAX IF DROPIDS REQUEST
| Line S03081 Modification History |
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
04348 M01S03081.253l688 ---| LDM TCTL,CC
04349 M01S03082.253l688 ---| SHN 21-12
04350 M01S03083.253l688 ---| PJN VUAX IF NOT PRIVILEGED COMMAND
04351 M01S03084.253l688 ---| ERROR ILR,CH,IW * PFM INCORRECT REQUEST.*
| Line S00090 Modification History |
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
04352 M01S00090.253l688 +++| UJN VUAX RETURN
04353 M00S03085.pfm +++| SPACE 4,10
04354 M00S03086.pfm +++|* COMMON DECKS.
04355 M00S03087.pfm +++|
04356 M00S03088.pfm +++|
04357 M00S03089.pfm +++|*CALL COMPCRS
04358 M00S03090.pfm +++|*CALL COMPVFN
04359 M00S03091.pfm +++| SPACE 4,10
04360 M00S03092.pfm +++|* CHECK FOR OVERFLOW.
04361 M00S03093.pfm +++|
04362 M00S03094.pfm +++|
| Line S03095 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04363 M01S03095.242l642 ---| ERRNG EPFW-* OVERFLOW INTO DISK ERROR PROCESSING AREA
| Line S00339 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04364 M01S00339.242l642 +++| OVERFLOW PPFW,EPFW OVERFLOW INTO DISK ERROR PROCESSING AREA
04365 M00S03096.pfm +++| OVERLAY (LOCAL FILE PROCESSING.),OVLD
04366 M00S03097.pfm +++| SPACE 4,15
04367 M00S03098.pfm +++|** THIS OVERLAY PERFORMS INITIAL LOCAL FILE PROCESSING FOR
04368 M00S03099.pfm +++|* REQUESTS WHICH ARE SENSITIVE TO THE EXISTENCE OF LOCAL FILES.
04369 M00S03100.pfm +++|
04370 M00S03101.pfm +++|
04371 M00S03102.pfm +++| OVL BSS 0 ENTRY
04372 M00S03103.pfm +++|* LJM PLF PROCESS LOCAL FILE
04373 M00S03104.pfm +++| PLF SPACE 4,15
04374 M00S03105.pfm +++|** PLF - PROCESS LOCAL FILE.
04375 M00S03106.pfm +++|*
04376 M00S03107.pfm +++|* ENTRY (CC) = COMMAND CODE.
04377 M00S03108.pfm +++|*
04378 M00S03109.pfm +++|* EXIT (FN - FN+4) = PERMANENT FILE NAME.
04379 M00S03110.pfm +++|
04380 M00S03111.pfm +++|
04381 M00S03112.pfm +++| PLF BSS 0 ENTRY
04382 M00S03113.pfm +++| LDM PLFT,CC
04383 M00S03114.pfm +++| STM PLFA
04384 M00S03115.pfm +++| PLFT LJM PLF7 *SAVE*
04385 M00S03116.pfm +++| PLFA EQU *-1 (LOCAL FILE PROCESSOR ADDRESS)
04386 M00S03117.pfm +++| CON PLF4 *GET*
04387 M00S03118.pfm +++| CON 0 *PURGE* (NO LOCAL FILE PROCESSING)
04388 M00S03119.pfm +++| CON 0 *CATLIST* (NO LOCAL FILE PROCESSING)
04389 M00S03120.pfm +++| CON 0 *PERMIT* (NO LOCAL FILE PROCESSING)
04390 M00S03121.pfm +++| CON PLF7 *REPLACE*
04391 M00S03122.pfm +++| CON PLF8 *APPEND*
04392 M00S03123.pfm +++| CON PLF1 *DEFINE*
04393 M00S03124.pfm +++| CON PLF5 *ATTACH*
04394 M00S03125.pfm +++| CON 0 *CHANGE* (NO LOCAL FILE PROCESSING)
04395 M00S03126.pfm +++| CON PLF11 *UATTACH*
04396 M00S03127.pfm +++| CON PLF12 *SETASA*
04397 M00S03128.pfm +++| CON 0 *SETAF* (NO LOCAL FILE PROCESSING)
04398 M00S03129.pfm +++| CON PLF3 *SETDA*
04399 M00S03130.pfm +++| CON 0 *DROPDS* (NO LOCAL FILE PROCESSING)
04400 M00S03131.pfm +++| CON PLF1 *ASSIGNPF*
04401 M00S03132.pfm +++| CON PLF4 *OLD*
04402 M00S03133.pfm +++| CON 0 *SETPFAC* (NO LOCAL FILE PROCESSING)
04403 M00S03134.pfm +++| CON 0 *SETPFAL* (NO LOCAL FILE PROCESSING)
04404 M00S03135.pfm +++| CON PLF4 *UGET*
04405 M00S03136.pfm +++| CON PLF7 *UREPLACE*
04406 M00S03137.pfm +++| CON 0 *DROPIDS* (NO LOCAL FILE PROCESSING)
04407 M00S03138.pfm +++| CON PLF13 *DELPFC*
04408 M00S03139.pfm +++| CON 0 *RPFSTAT* (NO LOCAL FILE PROCESSING)
| Line S00091 Modification History |
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
04409 M01S00091.253l688 +++| CON 0 *STAGEPF* (NO LOCAL FILE PROCESSING)
04410 M00S03140.pfm +++|
04411 M00S03141.pfm +++|* *ASSIGNPF*/*DEFINE* PROCESSING.
04412 M00S03142.pfm +++|
04413 M00S03143.pfm +++| PLF1 RJM PEF PROCESS EXISTING FILE
04414 M00S03144.pfm +++| LDM MXNF
04415 M00S03145.pfm +++| ZJN PLF2 IF NO FILE LIMIT SPECIFIED
04416 M00S03146.pfm +++| LDK STAC TURN ON STATISTICAL ACCUMULATION
04417 M00S03147.pfm +++| RAM STAT
04418 M00S03148.pfm +++| PLF2 EXECUTE 3PB FILE RESIDENCE PROCESSOR
04419 M00S03149.pfm +++|
04420 M00S03150.pfm +++|* *SETDA* PROCESSING.
04421 M00S03151.pfm +++|
04422 M00S03152.pfm +++| PLF3 RJM SSF SEARCH FOR SYSTEM FILE
04423 M00S03153.pfm +++| UJN PLF2 PROCESS FILE RESIDENCE
04424 M00S03154.pfm +++|
04425 M00S03155.pfm +++|* *GET*/*OLD*/*UGET* PROCESSING.
04426 M00S03156.pfm +++|
04427 M00S03157.pfm +++| PLF4 RJM PEF PROCESS EXISTING FILE
04428 M00S03158.pfm +++|
04429 M00S03159.pfm +++|* EXIT TO COMMAND PREPROCESSING OVERLAY.
04430 M00S03160.pfm +++|
04431 M00S03161.pfm +++| PLFX RJM SPN SET PERMANENT FILE NAME
04432 M00S03162.pfm +++| EXECUTE 3PC EXIT TO COMMAND PROCESSING OVERLAY
04433 M00S03163.pfm +++|
04434 M00S03164.pfm +++|* *ATTACH* PROCESSING.
04435 M00S03165.pfm +++|
04436 M00S03166.pfm +++| PLF5 RJM PEF PROCESS EXISTING FILE
04437 M00S03167.pfm +++| LDM MODE SET UP FNT STATUS MODE EQUIVALENCE
04438 M00S03168.pfm +++| LPN 37
04439 M00S03169.pfm +++| STD T1
04440 M00S03170.pfm +++| LDM TFNS,T1
04441 M00S03171.pfm +++| STM FNMD
04442 M00S03172.pfm +++| RJM CFA CHECK FAST ATTACH FILE
04443 M00S03173.pfm +++| PJN PLF6 IF NOT FAST ATTACH FILE
04444 M00S03174.pfm +++| RJM EFN ESTABLISH *FNT/FST* FOR *FA* FILE
| Line S03175 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04445 M01S03175.242l642 ---| LJM TRP TERMINATE PROGRAM
| Line S00340 Modification History |
M01 (Added by) | 242l642 |
M02 (Removed by) | ns2414 |
Seq # *Modification Id* Act
----------------------------+
04446 M02S00340.ns2414 ---| EXECUTE 3PT TERMINATE PROGRAM
| Line S00023 Modification History |
M01 (Added by) | ns2414 |
Seq # *Modification Id* Act
----------------------------+
04447 M01S00023.ns2414 +++| EXECUTE 3PU TERMINATE PROGRAM
04448 M00S03176.pfm +++|
04449 M00S03177.pfm +++| PLF6 RJM CAA CHECK FOR APPLICATION ACCOUNTING
04450 M00S03178.pfm +++| UJN PLF10 EXIT
04451 M00S03179.pfm +++|
04452 M00S03180.pfm +++|* *SAVE*/*REPLACE*/*APPEND*/*UREPLAC* PROCESSING.
04453 M00S03181.pfm +++|
04454 M00S03182.pfm +++| PLF7 LDM MXNF
04455 M00S03183.pfm +++| NJN PLF8 IF FILE LIMIT SPECIFIED
04456 M00S03184.pfm +++| LDM MXCS
04457 M00S03185.pfm +++| NJN PLF8 IF SIZE LIMIT SPECIFIED
04458 M00S03186.pfm +++| LDM MXCS+1
04459 M00S03187.pfm +++| ZJN PLF9 IF NO SIZE LIMIT SPECIFIED
04460 M00S03188.pfm +++| PLF8 LDK STAC TURN ON STATISTICAL ACCUMULATION
04461 M00S03189.pfm +++| RAM STAT
04462 M00S03190.pfm +++| PLF9 RJM SSF SEARCH FOR SYSTEM FILE
04463 M00S03191.pfm +++| RJM CFS CHECK FILE SIZE
04464 M00S03192.pfm +++| PLF10 LJM PLFX COMPLETE
04465 M00S03193.pfm +++|
04466 M00S03194.pfm +++|* *UATTACH* PROCESSING.
04467 M00S03195.pfm +++|
04468 M00S03196.pfm +++| PLF11 RJM PEF
04469 M00S03197.pfm +++| LDM MODE SET UP FNT STATUS MODE EQUIVALENCE
04470 M00S03198.pfm +++| LPN 37
04471 M00S03199.pfm +++| STD T1
04472 M00S03200.pfm +++| LDM TFNS,T1
04473 M00S03201.pfm +++| STM FNMD
04474 M00S03202.pfm +++| UJN PLF10 EXIT
04475 M00S03203.pfm +++|
04476 M00S03204.pfm +++|* *SETASA* PROCESSING.
04477 M00S03205.pfm +++|
| Line S03206 Modification History |
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
04478 M01S03206.253l688 ---| PLF12 RJM SSF SEARCH FOR SYSTEM FILE
| Line S00092 Modification History |
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
04479 M01S00092.253l688 +++| PLF12 LDM STAT
04480 M01S00093.253l688 +++| LPK STTA
04481 M01S00094.253l688 +++| NJN PLF10 IF SETTING TAPE ASA
| Line S00002 Modification History |
M01 (Added by) | 274l797 |
Seq # *Modification Id* Act
----------------------------+
04482 M01S00002.274l797 +++| LDM PFAT
04483 M01S00003.274l797 +++| LPN 77
04484 M01S00004.274l797 +++| LMN ATOD
04485 M01S00005.274l797 +++| ZJN PLF10 IF SETTING OPTICAL DISK ASA
| Line S00095 Modification History |
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
04486 M01S00095.253l688 +++| RJM SSF SEARCH FOR SYSTEM FILE
04487 M00S03207.pfm +++| UJN PLF10 EXIT
04488 M00S03208.pfm +++|
04489 M00S03209.pfm +++|* *DELPFC* PROCESSING.
04490 M00S03210.pfm +++|
04491 M00S03211.pfm +++| PLF13 RJM PIF PROCESS INTERLOCK FILES
04492 M00S03212.pfm +++| UJN PLF10 EXIT
04493 M00S03213.pfm +++| TFNS SPACE 4,15
04494 M00S03214.pfm +++|** FNT STATUS VALUES FOR SPECIFIED ACCESS MODE.
04495 M00S03215.pfm +++|
04496 M00S03216.pfm +++|
04497 M00S03217.pfm +++| TFNS BSS 0
04498 M00S03218.pfm +++| LOC 0
04499 M00S03219.pfm +++| CON 2 WRITE
04500 M00S03220.pfm +++| CON 1 READ
04501 M00S03221.pfm +++| CON 22 APPEND/EXTEND
04502 M00S03222.pfm +++| CON 5 EXECUTE
04503 M00S03223.pfm +++| CON 0 NULL
04504 M00S03224.pfm +++| CON 32 MODIFY
04505 M00S03225.pfm +++| CON 31 READ AND ALLOW MODIFY
04506 M00S03226.pfm +++| CON 21 READ AND ALLOW APPEND
04507 M00S03227.pfm +++| CON 12 UPDATE
04508 M00S03228.pfm +++| CON 11 READ AND ALLOW UPDATE
04509 M00S03229.pfm +++| LOC *O
04510 M00S03230.pfm +++| TFNSL EQU *-TFNS
04511 M00S03231.pfm +++| TITLE SUBROUTINES.
04512 M00S03232.pfm +++| CAA SPACE 4,15
04513 M00S03233.pfm +++|** CAA - CHECK FOR APPLICATION ACCOUNTING.
04514 M00S03234.pfm +++|*
04515 M00S03235.pfm +++|* ENTRY (FNTA) = *FST* ADDRESS OF FILE.
04516 M00S03236.pfm +++|*
04517 M00S03237.pfm +++|* EXIT IF THE FILE IS FROM THE APPLICATION LIBRARY
04518 M00S03238.pfm +++|* AND THE MODE OF ACCESS IS EXECUTE, THE
04519 M00S03239.pfm +++|* APPLICATION ACCOUNTING FILE STATUS IS SET.
04520 M00S03240.pfm +++|
04521 M00S03241.pfm +++|
04522 M00S03242.pfm +++| CAA SUBR ENTRY/EXIT
04523 M00S03243.pfm +++| LDD UI CHECK FOR APPLICATION LIBRARY
04524 M00S03244.pfm +++| SHN 14
04525 M00S03245.pfm +++| ADD UI+1
04526 M00S03246.pfm +++| LMC AAUI
04527 M00S03247.pfm +++| NJN CAAX IF NOT FROM APPLICATION LIBRARY
04528 M00S03248.pfm +++| LDM FNMD CHECK FOR MODE OF ATTACH FUNCTION
04529 M00S03249.pfm +++| LMN 5
04530 M00S03250.pfm +++| NJN CAAX IF NOT EXECUTE-ONLY FILE
04531 M00S03251.pfm +++| LDM SFNB SET APPLICATION ACCOUNTING FILE STATUS
04532 M00S03252.pfm +++| SCN 77
04533 M00S03253.pfm +++| LMN AAST
04534 M00S03254.pfm +++| STM SFNB
04535 M00S03255.pfm +++| UJN CAAX EXIT
| Line S03256 Modification History |
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act
----------------------------+
04536 M01S03256.ns2729 ---| CFA SPACE 4,10
| Line S00022 Modification History |
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act
----------------------------+
04537 M01S00022.ns2729 +++| CFA SPACE 4,25
04538 M00S03257.pfm +++|** CFA - CHECK FOR FAST ATTACH FILE.
04539 M00S03258.pfm +++|*
| Line S00023 Modification History |
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act
----------------------------+
04540 M01S00023.ns2729 +++|* IF THE *FA* OR *MA* SPECIAL REQUEST WAS SPECIFIED AND THE
04541 M01S00024.ns2729 +++|* CALLER IS *SSJ=*, CHECK THE SYSTEM FNT FOR THE SPECIFIED
04542 M01S00025.ns2729 +++|* FAST ATTACH FILE, AND ATTACH THE FILE IF IT EXISTS AND IS
04543 M01S00026.ns2729 +++|* NOT BUSY. IF THE FILE DOES NOT EXIST AND THE *FA* (FORCED
04544 M01S00027.ns2729 +++|* FAST ATTACH) SPECIAL REQUEST WAS SPECIFIED, RETURN AN
04545 M01S00028.ns2729 +++|* ERROR. IF THE FILE DOES NOT EXIST AND THE *MA* (MIXED
04546 M01S00029.ns2729 +++|* FAST ATTACH) SPECIAL REQUEST WAS SPECIFIED, EXIT AND ALLOW
04547 M01S00030.ns2729 +++|* NORMAL ATTACH PROCESSING TO PROCEED.
04548 M01S00031.ns2729 +++|*
04549 M01S00032.ns2729 +++|* ENTRY (PFSR) = SPECIAL REQUEST SUBFUNCTION.
04550 M01S00033.ns2729 +++|* (SSJS) = SPECIAL SYSTEM JOB STATUS.
04551 M01S00034.ns2729 +++|*
04552 M00S03259.pfm +++|* EXIT (A) .LT. 0 IF FAST ATTACH FILE FOUND.
04553 M00S03260.pfm +++|*
| Line S03261 Modification History |
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act
----------------------------+
04554 M01S03261.ns2729 ---|* USES P0, T0 - T7, CM - CM+4, CN - CN+4, FN - FN+4,
04555 M01S03262.ns2729 ---|* FS - FS+4.
| Line S00035 Modification History |
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act
----------------------------+
04556 M01S00035.ns2729 +++|* USES T5, T6, CM - CM+4, CN - CN+4, FN - FN+4, FS - FS+4.
04557 M00S03263.pfm +++|*
04558 M00S03264.pfm +++|* CALLS FAT, SFN, SPN.
04559 M00S03265.pfm +++|*
04560 M00S03266.pfm +++|* MACROS ERROR, MONITOR, SFA.
04561 M00S03267.pfm +++|
04562 M00S03268.pfm +++|
04563 M00S03269.pfm +++| CFA6 LDM PFSR CHECK FOR SPECIAL REQUEST
04564 M00S03270.pfm +++| LPN 77
| Line S00036 Modification History |
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act
----------------------------+
04565 M01S00036.ns2729 +++| LMN SRMA
04566 M01S00037.ns2729 +++| ZJN CFAX IF MIXED FAST ATTACH SPECIAL REQUEST
04567 M01S00038.ns2729 +++| ERROR FNF,CH,IW * (FILE NAME) NOT FOUND.*
04568 M01S00039.ns2729 +++|
04569 M01S00040.ns2729 +++| CFA7 ERROR IUA,CH,IW * USER ACCESS NOT VALID.*
04570 M01S00041.ns2729 +++|
04571 M01S00042.ns2729 +++|
04572 M01S00043.ns2729 +++| CFA SUBR ENTRY/EXIT
04573 M01S00044.ns2729 +++| LDM PFSR CHECK FOR SPECIAL REQUEST
04574 M01S00045.ns2729 +++| LPN 77
04575 M00S03271.pfm +++| LMN SRFA
| Line S03272 Modification History |
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act
----------------------------+
04576 M01S03272.ns2729 ---| NJN CFAX IF NOT *FA* REQUEST
04577 M01S03273.ns2729 ---| ERROR FNF,CH,IW * (FILE NAME) NOT FOUND.*
04578 M01S03274.ns2729 ---|
04579 M01S03275.ns2729 ---| CFA SUBR ENTRY/EXIT
| Line S00046 Modification History |
M01 (Added by) | ns2729 |
Seq # *Modification Id* Act
----------------------------+
04580 M01S00046.ns2729 +++| ZJN CFA0 IF FORCED FAST ATTACH SPECIAL REQUEST
04581 M01S00047.ns2729 +++| LMN SRMA&SRFA
04582 M01S00048.ns2729 +++| NJN CFAX IF NOT MIXED FAST ATTACH SPECIAL REQUEST
04583 M01S00049.ns2729 +++| CFA0 LDM SSJS
04584 M01S00050.ns2729 +++| ZJN CFA7 IF CALLER IS NOT *SSJ=*
04585 M00S03276.pfm +++| RJM SPN SET FILE NAME
| Line S03277 Modification History |
M01 (Removed by) | ns2729 |
Seq # *Modification Id* Act
----------------------------+
04586 M01S03277.ns2729 ---| LDM SSJS
04587 M01S03278.ns2729 ---| ZJN CFA6 IF NOT *SSJ=* JOB
04588 M01S03279.ns2729 ---| LDM PFSR CHECK FOR SPECIAL REQUEST
04589 M01S03280.ns2729 ---| LPN 77
04590 M01S03281.ns2729 ---| LMN SRNF
04591 M01S03282.ns2729 ---| ZJN CFAX IF FORCE NON FAST ATTACH
04592 M00S03283.pfm +++| SFA EST,PFPN+4 SET FAMILY EST ORDINAL
04593 M00S03284.pfm +++| ADK EQDE
04594 M00S03285.pfm +++| CRD CN READ EST ENTRY
04595 M00S03286.pfm +++| LDD CN+4
04596 M00S03287.pfm +++| SHN 3
04597 M00S03288.pfm +++| ADN PFGL READ FAMILY NAME
04598 M00S03289.pfm +++| CRD CN
04599 M00S03290.pfm +++| LDD MA
04600 M00S03291.pfm +++| CWD FN
04601 M00S03292.pfm +++| CRD CM SET FILE NAME
04602 M00S03293.pfm +++| RJM FAT CHECK IF FAST ATTACH
04603 M00S03294.pfm +++| ZJN CFA1 IF FAST ATTACH FILE FOUND
04604 M00S03295.pfm +++| LJM CFA6 PROCESS FILE NOT FOUND
04605 M00S03296.pfm +++|
04606 M00S03297.pfm +++|* FAST ATTACH FILE FOUND.
04607 M00S03298.pfm +++|
04608 M00S03299.pfm +++| CFA1 SFA FNT,T1 READ FNT/FST ENTRY
04609 M00S03300.pfm +++| CRD FN
04610 M00S03301.pfm +++| ADN FSTL
04611 M00S03302.pfm +++| CRD FS
04612 M00S03303.pfm +++| LDD FS SET FILE TRACK AND EST ORDINAL
04613 M00S03304.pfm +++| STD T5
04614 M00S03305.pfm +++| STM PFEQ
04615 M00S03306.pfm +++| STM ERRE SET EST ORDINAL FOR EVENT
04616 M00S03307.pfm +++| LDD FS+1
04617 M00S03308.pfm +++| STD T6
04618 M00S03309.pfm +++| STM ERRC SET TRACK FOR EVENT
04619 M00S03310.pfm +++| STM PFFT
04620 M00S03311.pfm +++| LDM MODE CHECK FOR LEGAL MODE
04621 M00S03312.pfm +++| LPN 37
04622 M00S03313.pfm +++| STD CM+2 SET MODE IN MONITOR REQUEST
04623 M00S03314.pfm +++| LDM TFNS,CM+2
04624 M00S03315.pfm +++| STM CFAA
04625 M00S03316.pfm +++| NJN CFA2 IF LEGAL MODE
04626 M00S03317.pfm +++| ERROR ILR,CH,IW,FS *PFM INCORRECT REQUEST.*
04627 M00S03318.pfm +++|
04628 M00S03319.pfm +++| CFA2 LDN AFAS SET REQUEST FOR FAFT FILE
04629 M00S03320.pfm +++| STD CM+3
04630 M00S03321.pfm +++| LDD T1
04631 M00S03322.pfm +++| STD CM+4
04632 M00S03323.pfm +++| LDD FN+3
04633 M00S03324.pfm +++| LPN 77
04634 M00S03325.pfm +++| ZJN CFA3 IF LOCAL FAST ATTACH FILE
04635 M00S03326.pfm +++| LDD T5 SET EST ORDINAL IF GLOBAL FILE
04636 M00S03327.pfm +++| CFA3 STD CM+1
04637 M00S03328.pfm +++| MONITOR AFAM
04638 M00S03329.pfm +++| LDD CM+1 CHECK RETURN STATUS
04639 M00S03330.pfm +++| ZJN CFA4 IF NO ERROR
04640 M00S03331.pfm +++| LDN FRT SET TIME FOR EVENT
04641 M00S03332.pfm +++| STM ERRD
04642 M00S03333.pfm +++| ERROR FBS,CH,IW,FS *(FILE NAME) BUSY.*
04643 M00S03334.pfm +++|
04644 M00S03335.pfm +++| CFA4 LDC *
04645 M00S03336.pfm +++| CFAA EQU *-1 (*TFNS* TABLE ENTRY FOR SPECIFIED MODE)
04646 M00S03337.pfm +++| SHN 21-4
04647 M00S03338.pfm +++| MJN CFA5 IF M, RM, A OR RA MODE
04648 M00S03339.pfm +++| LDD T5 REQUEST TRT UPDATE
04649 M00S03340.pfm +++| STD CM+1
04650 M00S03341.pfm +++| LDN UTRS
04651 M00S03342.pfm +++| STD CM+3
04652 M00S03343.pfm +++| MONITOR STBM
04653 M00S03344.pfm +++| CFA5 LDC PFSN SET FILE NAME
04654 M00S03345.pfm +++| RJM SFN
04655 M00S03346.pfm +++| LCN 1 SET FAST ATTACH FILE FOUND
04656 M00S03347.pfm +++| LJM CFAX EXIT
04657 M00S03348.pfm +++| CSA SPACE 4,10
04658 M00S03349.pfm +++|** CSA - CHECK SPECIFIED ACCESS LEVEL.
04659 M00S03350.pfm +++|*
04660 M00S03351.pfm +++|* ENTRY (FA) = FNT ADDRESS IN NFL.
04661 M00S03352.pfm +++|* (LFAL) = REQESTED ACCESS LEVEL, IF *PFSP* NONZERO.
04662 M00S03353.pfm +++|*
04663 M00S03354.pfm +++|* EXIT ACCESS LEVEL SET IN FNT ENTRY BY *CPUMTR*, IF VALID.
04664 M00S03355.pfm +++|* *MFFI* ACCOUNT MESSAGE ISSUED.
04665 M00S03356.pfm +++|*
04666 M00S03357.pfm +++|* CALLS IAM.
04667 M00S03358.pfm +++|*
04668 M00S03359.pfm +++|* USES CM - CM+4.
04669 M00S03360.pfm +++|*
04670 M00S03361.pfm +++|* MACROS ERROR, MONITOR.
04671 M00S03362.pfm +++|
04672 M00S03363.pfm +++|
04673 M00S03364.pfm +++| CSA SUBR ENTRY/EXIT
04674 M00S03365.pfm +++| LDM PFSP
04675 M00S03366.pfm +++| ZJN CSAX IF SECURITY PROCESSING BIT NOT SET IN FET
04676 M00S03367.pfm +++| LDN VSFS VALIDATE AND SET ACCESS LEVEL FOR FILE
04677 M00S03368.pfm +++| STD CM+1
04678 M00S03369.pfm +++| LDD FA
04679 M00S03370.pfm +++| STD CM+3
04680 M00S03371.pfm +++| LDM LFAL
04681 M00S03372.pfm +++| STD CM+4
04682 M00S03373.pfm +++| MONITOR VSAM
04683 M00S03374.pfm +++| LDD CM+1
04684 M00S03375.pfm +++| ZJN CSAX IF ACCESS LEVEL VALID
04685 M00S03376.pfm +++| RJM IAM ISSUE ACCOUNT FILE MESSAGE
04686 M00S03377.pfm +++| ERROR LNF,CH,IW,,SVE * ACCESS LEVEL NOT VALID FOR FILE.*
04687 M00S03378.pfm +++| CFS SPACE 4,10
04688 M00S03379.pfm +++|** CFS - CHECK FILE SIZE FOR THE CATALOG SEARCH.
04689 M00S03380.pfm +++|*
04690 M00S03381.pfm +++|* ENTRY (MXFS) = MAXIMUM FILE SIZE ALLOWED FOR INDIRECT
04691 M00S03382.pfm +++|* ACCESS FILES/ 10B.
04692 M00S03383.pfm +++|* (LF - LF+1) = LENGTH OF LOCAL FILE.
04693 M00S03384.pfm +++|*
04694 M00S03385.pfm +++|* EXIT (LF - LF+1) CHECKED FOR SIZE LIMITS.
04695 M00S03386.pfm +++|*
04696 M00S03387.pfm +++|* MACROS ERROR.
04697 M00S03388.pfm +++|
04698 M00S03389.pfm +++|
04699 M00S03390.pfm +++| CFS3 ERROR EFL,CH,IW *(FILE NAME) EMPTY.*
04700 M00S03391.pfm +++|
04701 M00S03392.pfm +++| CFS SUBR ENTRY/EXIT
04702 M00S03393.pfm +++| LDD LF
04703 M00S03394.pfm +++| SHN -5
04704 M00S03395.pfm +++| ZJN CFS2 IF FILE LENGTH .LT. 131072D SECTORS
04705 M00S03396.pfm +++| CFS1 ERROR FTL,CH,IW *FILE TOO LONG.*
04706 M00S03397.pfm +++|
04707 M00S03398.pfm +++| CFS2 LDD LF CHECK FOR EMPTY FILE
04708 M00S03399.pfm +++| SHN 14
04709 M00S03400.pfm +++| ADD LF+1
04710 M00S03401.pfm +++| ZJN CFS3 IF FILE EMPTY
04711 M00S03402.pfm +++| ADN 2 ADD SYSTEM AND EOI SECTORS
04712 M00S03403.pfm +++| MJN CFS1 IF FILE .GT. 131069D SECTORS
04713 M00S03404.pfm +++| LDM MXFS
04714 M00S03405.pfm +++| ZJN CFSX IF NO FILE SIZE LIMITS
04715 M00S03406.pfm +++| LDD LF
04716 M00S03407.pfm +++| SHN -3
04717 M00S03408.pfm +++| NJN CFS1 IF FILE SIZE .GT. MAXIMUM FILE SIZE LIMIT
04718 M00S03409.pfm +++| LDD LF
04719 M00S03410.pfm +++| SHN 14
04720 M00S03411.pfm +++| ADD LF+1
04721 M00S03412.pfm +++| ADN 7
04722 M00S03413.pfm +++| SHN -3
04723 M00S03414.pfm +++| SBM MXFS
04724 M00S03415.pfm +++| MJN CFSX IF LIMIT NOT EXCEEDED
04725 M00S03416.pfm +++| NJN CFS1 IF FILE LIMIT EXCEEDED
04726 M00S03417.pfm +++| UJN CFSX RETURN
04727 M00S03418.pfm +++| EFN SPACE 4,20
04728 M00S03419.pfm +++|** EFN - ESTABLISH FNT ENTRY FOR FAST ATTACH FILE.
04729 M00S03420.pfm +++|*
04730 M00S03421.pfm +++|* ENTRY (FN - FN+4) = LOCAL FILE NAME.
04731 M00S03422.pfm +++|* (FNTA) = FNT ADDRESS OF LOCAL FILE.
04732 M00S03423.pfm +++|* (PFEQ) = EST ORDINAL FOR FILE.
04733 M00S03424.pfm +++|* (PFFT) = FIRST TRACK FOR FILE.
04734 M00S03425.pfm +++|* (PFSN) = LOCAL FILE NAME.
04735 M00S03426.pfm +++|* (FNMD) = FNT STATUS MODE EQUIVALENCE.
04736 M00S03427.pfm +++|*
04737 M00S03428.pfm +++|* EXIT FNT ENTRY ESTABLISHED IN CENTRAL MEMORY.
04738 M00S03429.pfm +++|* (FA) = FNT ADDRESS.
04739 M00S03430.pfm +++|* (FN - FN+4) = FNT.
04740 M00S03431.pfm +++|* (FS - FS+4) = FST.
04741 M00S03432.pfm +++|* PERMANENT FILE USER COUNT INCREMENTED.
04742 M00S03433.pfm +++|*
04743 M00S03434.pfm +++|* USES T1, CM - CM+4.
04744 M00S03435.pfm +++|*
04745 M00S03436.pfm +++|* MACROS MONITOR.
04746 M00S03437.pfm +++|
04747 M00S03438.pfm +++|
04748 M00S03439.pfm +++| EFN SUBR ENTRY/EXIT
04749 M00S03440.pfm +++| LDM FNTA SET FNT/FST
04750 M00S03441.pfm +++| STD FA
04751 M00S03442.pfm +++| LDM PFEQ SET EST ORDINAL
04752 M00S03443.pfm +++| STD FS
04753 M00S03444.pfm +++| LDM PFFT SET FIRST TRACK
04754 M00S03445.pfm +++| STD FS+1
04755 M00S03446.pfm +++| STD FS+2
04756 M00S03447.pfm +++| LDN FSMS SET SECTOR
04757 M00S03448.pfm +++| STD FS+3
04758 M00S03449.pfm +++| LDC 2004 SET FST STATUS
04759 M00S03450.pfm +++| STD FS+4
04760 M00S03451.pfm +++| LDC PMFT*100 SET FILE TYPE
04761 M00S03452.pfm +++| RAD FN+4
04762 M00S03453.pfm +++| STM PFSN+4
04763 M00S03454.pfm +++| LDM FNMD SET FNT STATUS MODE
04764 M00S03455.pfm +++| SCN 2 CLEAR WRITEABLE MODE BIT
04765 M00S03456.pfm +++| RAM PFSN+3
04766 M00S03457.pfm +++| STD FN+3
04767 M00S03458.pfm +++| LDN ZERL SET FILE SIZE LIMIT TO INFINITE
04768 M00S03459.pfm +++| CRD CM
04769 M00S03460.pfm +++| LDC 700
04770 M00S03461.pfm +++| STD CM+2
04771 M00S03462.pfm +++| NFA FA,R RESTORE FNT ENTRY
04772 M00S03463.pfm +++| ADK FNTL
04773 M00S03464.pfm +++| CWD FN
04774 M00S03465.pfm +++| ADN FSTL-FNTL
04775 M00S03466.pfm +++| CWD FS
04776 M00S03467.pfm +++| ADN FUTL-FSTL
04777 M00S03468.pfm +++| CWD CM
04778 M00S03469.pfm +++| LDM PFEQ INCREMENT PF USER COUNT
04779 M00S03470.pfm +++| STD CM+1
04780 M00S03471.pfm +++| LDN IUCS
04781 M00S03472.pfm +++| STD CM+3
| Line S03473 Modification History |
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
04782 M01S03473.253l688 ---| MONITOR STBM
| Line S00096 Modification History |
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
04783 M01S00096.253l688 +++| MONITOR SMDM
04784 M00S03474.pfm +++| LJM EFNX RETURN
04785 M00S03475.pfm +++| IAM SPACE 4,10
04786 M00S03476.pfm +++|** IAM - ISSUE ACCOUNT FILE MESSAGE.
04787 M00S03477.pfm +++|*
04788 M00S03478.pfm +++|* ISSUES AN *MFFI* ACCOUNT FILE MESSAGE TO INDICATE THAT THE
04789 M00S03479.pfm +++|* LOCAL FILE ACCESS LEVEL CHANGE ATTEMPT WAS INVALID.
04790 M00S03480.pfm +++|*
04791 M00S03481.pfm +++|* ENTRY (LFAL) = LOCAL FILES NEW ACCESS LEVEL.
04792 M00S03482.pfm +++|*
04793 M00S03483.pfm +++|* EXIT ACCOUNT FILE MESSAGE ISSUED.
04794 M00S03484.pfm +++|*
04795 M00S03485.pfm +++|* USES T1.
04796 M00S03486.pfm +++|*
04797 M00S03487.pfm +++|* CALLS ACS, DFM.
04798 M00S03488.pfm +++|
04799 M00S03489.pfm +++|
04800 M00S03490.pfm +++| IAM SUBR ENTRY/EXIT
04801 M00S03491.pfm +++| LDC IAMB+3 INITIALIZE POINTER FOR *ACS* CALLS
04802 M00S03492.pfm +++| STD T1
04803 M00S03493.pfm +++| LDN FN INSERT FILE NAME IN BUFFER
04804 M00S03494.pfm +++| RJM ACS
04805 M00S03495.pfm +++| LDC IAMC APPEND COMMA
04806 M00S03496.pfm +++| RJM ACS
04807 M00S03497.pfm +++| LDM LFAL DETERMINE MNEMONIC OF ACCESS LEVEL
04808 M00S03498.pfm +++| SHN 2
04809 M00S03499.pfm +++| ADC TALV APPEND NEW ACCESS LEVEL
04810 M00S03500.pfm +++| RJM ACS
04811 M00S03501.pfm +++| LDC IAMD APPEND TERMINATOR
04812 M00S03502.pfm +++| RJM ACS
04813 M00S03503.pfm +++| LDC IAMB+ACFN ISSUE DAYFILE MESSAGE
04814 M00S03504.pfm +++| RJM DFM
04815 M00S03505.pfm +++| UJN IAMX RETURN
04816 M00S03506.pfm +++|
04817 M00S03507.pfm +++|* ACCOUNT FILE MESSAGE BUFFER.
04818 M00S03508.pfm +++|
04819 M00S03509.pfm +++| IAMB DATA C*MFFI, *
04820 M00S03510.pfm +++| BSSZ 12
04821 M00S03511.pfm +++| IAMC DATA 2H, MESSAGE SEPARATOR
04822 M00S03512.pfm +++| CON 0 END OF STRING
04823 M00S03513.pfm +++| IAMD DATA 2H. MESSAGE TERMINATOR
04824 M00S03514.pfm +++| CON 0
| Line S00341 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04825 M01S00341.242l642 +++| PDS SPACE 4,15
04826 M01S00342.242l642 +++|** PDS - PROCESS DEVICE STATUS.
04827 M01S00343.242l642 +++|*
04828 M01S00344.242l642 +++|* ENTRY (A) = 0 IF DEVICE AVAILABLE.
04829 M01S00345.242l642 +++|* (A) .NE. 0 IF DEVICE INACCESSIBLE.
04830 M01S00346.242l642 +++|* (T5) = EST ORDINAL OF DEVICE.
04831 M01S00347.242l642 +++|* (FERT) = REAL-TIME PROCESSING FLAG.
04832 M01S00348.242l642 +++|* (SSYS) = SUBSYSTEM FLAG.
04833 M01S00349.242l642 +++|*
04834 M01S00350.242l642 +++|* EXIT RETURN IF PROCESSING IS TO CONTINUE.
04835 M01S00351.242l642 +++|*
04836 M01S00352.242l642 +++|* TO *ERR* IF DEVICE IS INACCESSIBLE AND CALLER HAS
04837 M01S00353.242l642 +++|* REAL-TIME PROCESSING SET IN FET OR IS NOT A SUBSYSTEM.
04838 M01S00354.242l642 +++|*
04839 M01S00355.242l642 +++|* MACROS ERROR.
04840 M01S00356.242l642 +++|
04841 M01S00357.242l642 +++|
04842 M01S00358.242l642 +++| PDS SUBR ENTRY/EXIT
04843 M01S00359.242l642 +++| ZJN PDSX IF DEVICE AVAILABLE, RETURN
04844 M01S00360.242l642 +++| LDM SSYS
04845 M01S00361.242l642 +++| ZJN PDS1 IF NOT A SUBSYSTEM
04846 M01S00362.242l642 +++| LDM FERT
04847 M01S00363.242l642 +++| ZJN PDSX IF NO REAL-TIME PROCESSING, RETURN
04848 M01S00364.242l642 +++| PDS1 ERROR WID,CH,IW,T5,EC6 * WAITING - INACCESSIBLE DEVICE.*
04849 M00S03515.pfm +++| PEF SPACE 4,25
04850 M00S03516.pfm +++|** PEF - PROCESS EXISTING FILE.
04851 M00S03517.pfm +++|*
04852 M00S03518.pfm +++|* DETERMINE IF A LOCAL FILE WITH THE SPECIFIED NAME IS ALREADY
04853 M00S03519.pfm +++|* ASSIGNED TO THE JOB. FOR ALL REQUESTS EXCEPT *DEFINE*,
04854 M00S03520.pfm +++|* RETURN THE EXISTING LOCAL FILE. FOR *DEFINE*, RETURN THE
04855 M00S03521.pfm +++|* RESERVED FNT ENTRY AND KEEP THE EXISTING LOCAL FILE.
04856 M00S03522.pfm +++|*
04857 M00S03523.pfm +++|* ENTRY (CC) = COMMAND CODE.
04858 M00S03524.pfm +++|* (PFSN) = LOCAL FILE NAME.
04859 M00S03525.pfm +++|*
04860 M00S03526.pfm +++|* EXIT (FA) = (FNTA) = FNT ADDRESS OF THE LOCAL FILE.
04861 M00S03527.pfm +++|* (FA) = 0 IF THE FILE WAS RETURNED OR DID NOT EXIST.
04862 M00S03528.pfm +++|* (FN - FN+4) = FNT ENTRY FOR FILE (*DEFINE*).
04863 M00S03529.pfm +++|* (FS - FS+4) = FST ENTRY FOR FILE (ZERO IF NOT FOUND).
04864 M00S03530.pfm +++|* (ERRB) = NONZERO IF LOCAL FILE EXISTS.
04865 M00S03531.pfm +++|* (LFAL) = LOCAL FILE ACCESS LEVEL.
04866 M00S03532.pfm +++|*
04867 M00S03533.pfm +++|* USES FA, T1, CM - CM+4, FN - FN+4.
04868 M00S03534.pfm +++|*
| Line S03535 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04869 M01S03535.242l642 ---|* CALLS CSA, SAF, SFB, SPN, *0DF*.
| Line S00365 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04870 M01S00365.242l642 +++|* CALLS CSA, PDS, SAF, SFB, SFN, *0DF*.
04871 M00S03536.pfm +++|*
| Line S03537 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04872 M01S03537.242l642 ---|* MACROS ERROR, EXECUTE, NFA, SFA.
| Line S00366 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04873 M01S00366.242l642 +++|* MACROS ERROR, EXECUTE, NFA, SETMS, SFA.
04874 M00S03538.pfm +++|
04875 M00S03539.pfm +++|
| Line S00367 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04876 M01S00367.242l642 +++| PEF10 LDC ** RESTORE DIRECT CELL
04877 M01S00368.242l642 +++| PEFA EQU *-1
04878 M01S00369.242l642 +++| STD UI+1
04879 M01S00370.242l642 +++| PEF11 LDN ZERL CLEAR FS - FS+4
04880 M01S00371.242l642 +++| CRD FS
| Line S00372 Modification History |
M01 (Added by) | 242l642 |
M02 (Removed by) | ns2358 |
Seq # *Modification Id* Act
----------------------------+
04881 M02S00372.ns2358 ---| LDN 0
04882 M02S00373.ns2358 ---| STD FA CLEAR FNT ADDRESS
| Line S00374 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04883 M01S00374.242l642 +++|
04884 M00S03540.pfm +++| PEF SUBR ENTRY/EXIT
04885 M00S03541.pfm +++| LDC PFSN SET SYSTEM FILE NAME
04886 M00S03542.pfm +++| RJM SFN
04887 M00S03543.pfm +++| RJM SAF SEARCH FOR ASSIGNED FILE
| Line S03544 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04888 M01S03544.242l642 ---| ZJN PEF4 IF FILE NOT FOUND
| Line S00375 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04889 M01S00375.242l642 +++| ZJN PEF11 IF FILE NOT FOUND
04890 M00S03545.pfm +++| RJM SFB SET FILE BUSY
04891 M00S03546.pfm +++| ZJN PEF1 IF NO REJECT ON FILE INTERLOCK
04892 M00S03547.pfm +++| ERROR IOE,CH,IW *I/O SEQUENCE ERROR.*
04893 M00S03548.pfm +++|
04894 M00S03549.pfm +++| PEF1 LDD CC
04895 M00S03550.pfm +++| LMN CCDF
| Line S03551 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04896 M01S03551.242l642 ---| ZJN PEF6 IF *DEFINE* REQUEST
| Line S00376 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04897 M01S00376.242l642 +++| ZJN PEF6 IF A *DEFINE* REQUEST
04898 M00S03552.pfm +++|
04899 M00S03553.pfm +++|* *UNLOAD* OR *RETURN* THE EXISTING FILE.
04900 M00S03554.pfm +++|
04901 M00S03555.pfm +++| PEF2 LDN 1 *UNLOAD* PREVIOUS FILE
04902 M00S03556.pfm +++| PEF3 STM LOCF-1
04903 M00S03557.pfm +++| LDD UI+1 SAVE DIRECT CELL USED BY *0DQ*
04904 M00S03558.pfm +++| STM PEFA
04905 M00S03559.pfm +++| EXECUTE 0DF,LOCF
| Line S03560 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04906 M01S03560.242l642 ---| LDC ** RESTORE DIRECT CELL
04907 M01S03561.242l642 ---| PEFA EQU *-1
04908 M01S03562.242l642 ---| STD UI+1
04909 M01S03563.242l642 ---| PEF4 LDN ZERL CLEAR FS - FS+4
04910 M01S03564.242l642 ---| CRD FS
04911 M01S03565.242l642 ---| LDN 0 CLEAR FNT ADDRESS
04912 M01S03566.242l642 ---| STD FA
04913 M01S03567.242l642 ---| LJM PEFX RETURN
| Line S00377 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
04914 M01S00377.242l642 +++| PJP PEF10 IF FILE PROCESSED
04915 M01S00378.242l642 +++| LDD FS SET EST ORDINAL OF INACCESSIBLE DEVICE
04916 M01S00379.242l642 +++| STD T5
04917 M01S00380.242l642 +++| LDD FA SET FNT ADDRESS
04918 M01S00381.242l642 +++| STM FNTA
04919 M01S00382.242l642 +++| AOM ERRB SET FILE NOT CREATED BY *PFM*
04920 M01S00383.242l642 +++| RJM PDS PROCESS DEVICE STATUS
04921 M01S00384.242l642 +++| ERROR PFN,CH,IW * DEVICE UNAVAILABLE.*
04922 M00S03568.pfm +++|
04923 M00S03569.pfm +++|* PROCESS *DEFINE* REQUEST (USE EXISTING FILE IF POSSIBLE).
04924 M00S03570.pfm +++|
04925 M00S03571.pfm +++| PEF6 LDD FS
04926 M00S03572.pfm +++| ZJN PEF3 IF EQUIPMENT NOT ASSIGNED
04927 M00S03573.pfm +++| LDD FS+1
04928 M00S03574.pfm +++| ZJN PEF2 IF FILE EMPTY
| Line S03575 Modification History |
M01 (Removed by) | pfm64 |
Seq # *Modification Id* Act
----------------------------+
04929 M01S03575.pfm64 ---| RJM CSA CHECK SPECIFIED ACCESS LEVEL
| Line S03576 Modification History |
M01 (Removed by) | pfm48 |
Seq # *Modification Id* Act
----------------------------+
04930 M01S03576.pfm48 ---| NFA FA,R READ FNT ENTRY
04931 M01S03577.pfm48 ---| ADK FNTL
04932 M01S03578.pfm48 ---| CRD FN
04933 M01S03579.pfm48 ---| ADN FUTL-FNTL GET LOCAL FILE ACCESS LEVEL
04934 M01S03580.pfm48 ---| CRD CM
| Line S00001 Modification History |
M01 (Added by) | pfm48 |
Seq # *Modification Id* Act
----------------------------+
04935 M01S00001.pfm48 +++|
04936 M01S00002.pfm48 +++|* *DEFINE* - RETURN RESERVED FNT ENTRY (NOT NEEDED).
04937 M01S00003.pfm48 +++|
04938 M01S00004.pfm48 +++| LDM FNTA SWITCH FNT ADDRESSES
04939 M01S00005.pfm48 +++| STD T1
04940 M01S00006.pfm48 +++| LDD FA
04941 M01S00007.pfm48 +++| STM FNTA
04942 M01S00008.pfm48 +++| LDD T1
04943 M01S00009.pfm48 +++| STD FA
04944 M01S00010.pfm48 +++| LDN 1 *UNLOAD FILE*
04945 M01S00011.pfm48 +++| STM LOCF-1
04946 M01S00012.pfm48 +++| EXECUTE 0DF,LOCF
04947 M01S00013.pfm48 +++| LDM FNTA RESET FNT ADDRESS
04948 M01S00014.pfm48 +++| STD FA
| Line S00001 Modification History |
M01 (Added by) | pfm64 |
Seq # *Modification Id* Act
----------------------------+
04949 M01S00001.pfm64 +++| AOM ERRB SET FILE NOT CREATED BY *PFM*
04950 M01S00002.pfm64 +++|
04951 M01S00003.pfm64 +++|* CHECK IF EXISTING LOCAL FILE CAN BE USED.
04952 M01S00004.pfm64 +++|
04953 M01S00005.pfm64 +++| RJM CSA CHECK SPECIFIED ACCESS LEVEL
| Line S00015 Modification History |
M01 (Added by) | pfm48 |
Seq # *Modification Id* Act
----------------------------+
04954 M01S00015.pfm48 +++| NFA FA,R
04955 M01S00016.pfm48 +++| ADK FNTL
04956 M01S00017.pfm48 +++| CRD FN
04957 M01S00018.pfm48 +++| ADK FSTL-FNTL
04958 M01S00019.pfm48 +++| CRD FS
04959 M01S00020.pfm48 +++| ADK FUTL-FSTL GET LOCAL FILE ACCESS LEVEL
04960 M01S00021.pfm48 +++| CRD CM
| Line S00022 Modification History |
M01 (Added by) | pfm48 |
M02 (Removed by) | pfm64 |
Seq # *Modification Id* Act
----------------------------+
04961 M02S00022.pfm64 ---| AOM ERRB SET FILE NOT CREATED BY *PFM*
04962 M02S00023.pfm64 ---| LDD FS
04963 M02S00024.pfm64 ---| STD T5
04964 M02S00025.pfm64 ---|
04965 M02S00026.pfm64 ---|* CHECK IF FILE CAN BE USED.
04966 M02S00027.pfm64 ---|
04967 M00S03581.pfm +++| LDD CM+2 SAVE LOCAL FILE ACCESS LEVEL
04968 M00S03582.pfm +++| LPN 7
04969 M00S03583.pfm +++| STM LFAL
| Line S03584 Modification History |
M01 (Removed by) | pfm64 |
Seq # *Modification Id* Act
----------------------------+
04970 M01S03584.pfm64 ---| LDD FS READ EST ENTRY
04971 M01S03585.pfm64 ---| SFA EST
04972 M01S03586.pfm64 ---| ADK EQDE
04973 M01S03587.pfm64 ---| CRD CM
04974 M01S03588.pfm64 ---| LDM LFAL
04975 M00S03589.pfm +++| SBM PFAL
| Line S03590 Modification History |
M01 (Removed by) | pfm64 |
Seq # *Modification Id* Act
----------------------------+
04976 M01S03590.pfm64 ---| PJN PEF7 IF LOCAL FILE HAS VALID ACCESS
| Line S00006 Modification History |
M01 (Added by) | pfm64 |
Seq # *Modification Id* Act
----------------------------+
04977 M01S00006.pfm64 +++| PJN PEF7 IF LOCAL FILE HAS VALID ACCESS LEVEL
04978 M00S03591.pfm +++| LDM SVAL CHECK FOR WRITE DOWN VALIDATION
04979 M00S03592.pfm +++| SHN 21-5
04980 M00S03593.pfm +++| MJN PEF7 IF WRITE DOWN ALLOWED
04981 M00S03594.pfm +++| LDM SSID CHECK SUBSYSTEM ID
04982 M00S03595.pfm +++| SBK LSSI+1
04983 M00S03596.pfm +++| PJN PEF7 IF SUBSYSTEM
04984 M00S03597.pfm +++| ERROR WDP,CH,IW,,SVE * WRITE-DOWN OF DATA PROHIBITED.*
04985 M00S03598.pfm +++|
04986 M00S03599.pfm +++| PEF7 LDD FN+3
04987 M00S03600.pfm +++| LPN 4
04988 M00S03601.pfm +++| ZJN PEF8 IF NOT EXECUTE ONLY FILE
04989 M00S03602.pfm +++| ERROR FEO,CH,IW * FILE IS EXECUTE ONLY.*
04990 M00S03603.pfm +++|
| Line S03604 Modification History |
M01 (Removed by) | pfm64 |
Seq # *Modification Id* Act
----------------------------+
04991 M01S03604.pfm64 ---| PEF8 LDD CM
| Line S00007 Modification History |
M01 (Added by) | pfm64 |
Seq # *Modification Id* Act
----------------------------+
04992 M01S00007.pfm64 +++| PEF8 SFA EST,FS READ EST ENTRY
04993 M01S00008.pfm64 +++| ADK EQDE
04994 M01S00009.pfm64 +++| CRD CM
04995 M01S00010.pfm64 +++| LDD CM
04996 M00S03605.pfm +++| SHN 21-13
04997 M00S03606.pfm +++| MJN PEF9 IF MASS STORAGE EQUIPMENT
04998 M00S03607.pfm +++| ERROR NMS,CH,IW *(FILE NAME) NOT MASS STORAGE.*
04999 M00S03608.pfm +++|
| Line S03609 Modification History |
M01 (Removed by) | pfm48 |
Seq # *Modification Id* Act
----------------------------+
05000 M01S03609.pfm48 ---|* *DEFINE* - RETURN RESERVED FNT ENTRY (NOT NEEDED).
05001 M01S03610.pfm48 ---|
05002 M01S03611.pfm48 ---| PEF9 LDM FNTA SWITCH FNT ADDRESSES
05003 M01S03612.pfm48 ---| STD T1
05004 M01S03613.pfm48 ---| LDD FA
05005 M01S03614.pfm48 ---| STM FNTA
05006 M01S03615.pfm48 ---| LDD T1
05007 M01S03616.pfm48 ---| STD FA
05008 M01S03617.pfm48 ---| LDN 1 *UNLOAD* FILE
05009 M01S03618.pfm48 ---| STM LOCF-1
05010 M01S03619.pfm48 ---| EXECUTE 0DF,LOCF
05011 M01S03620.pfm48 ---| LDM FNTA RESET FNT ADDRESS
05012 M01S03621.pfm48 ---| STD FA
05013 M01S03622.pfm48 ---| NFA FA,R
05014 M01S03623.pfm48 ---| ADK FNTL
05015 M01S03624.pfm48 ---| CRD FN
05016 M01S03625.pfm48 ---| ADK FSTL-FNTL
05017 M01S03626.pfm48 ---| CRD FS
05018 M01S03627.pfm48 ---| AOM ERRB SET FILE NOT CREATED BY *PFM*
| Line S00385 Modification History |
M01 (Added by) | 242l642 |
M02 (Removed by) | pfm48 |
Seq # *Modification Id* Act
----------------------------+
05019 M02S00385.pfm48 ---| LDD FS
05020 M02S00386.pfm48 ---| STD T5
05021 M02S00387.pfm48 ---| SETMS STATUS
| Line S00028 Modification History |
M01 (Added by) | pfm48 |
M02 (Removed by) | pfm64 |
Seq # *Modification Id* Act
----------------------------+
05022 M02S00028.pfm64 ---| PEF9 SETMS STATUS
| Line S00011 Modification History |
M01 (Added by) | pfm64 |
Seq # *Modification Id* Act
----------------------------+
05023 M01S00011.pfm64 +++| PEF9 LDD FS
05024 M01S00012.pfm64 +++| STD T5
05025 M01S00013.pfm64 +++| SETMS STATUS
| Line S00068 Modification History |
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
05026 M01S00068.ns2776 +++| LDM MSD
05027 M01S00069.ns2776 +++| LPC 100
| Line S00388 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05028 M01S00388.242l642 +++| RJM PDS PROCESS DEVICE STATUS
05029 M00S03628.pfm +++| LJM PEFX RETURN
05030 M00S03629.pfm +++| PIF SPACE 4,15
05031 M00S03630.pfm +++|** PIF - PROCESS INTERLOCK FILES.
05032 M00S03631.pfm +++|*
| Line S03632 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05033 M01S03632.242l642 ---|* EXIT (FNTA) = 0.
| Line S00389 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05034 M01S00389.242l642 +++|* EXIT (FNTA) = 0.
| Line S00001 Modification History |
M01 (Added by) | pfm31 |
Seq # *Modification Id* Act
----------------------------+
05035 M01S00001.pfm31 +++|* (CCIB) UPDATED IF /PFM*ILK/ INTERLOCK BIT WAS SET.
05036 M00S03633.pfm +++|* (IAIF) = NONZERO IF /PFM*PFN/ INTERLOCK BIT WAS SET.
| Line S03634 Modification History |
M01 (Removed by) | pfm31 |
Seq # *Modification Id* Act
----------------------------+
05037 M01S03634.pfm31 ---|* INTERLOCK BITS CLEARED IN /PFM*PFN/ AND /PFM*ILK/.
| Line S00002 Modification History |
M01 (Added by) | pfm31 |
Seq # *Modification Id* Act
----------------------------+
05038 M01S00002.pfm31 +++|* INTERLOCK BITS CLEARED IN /PFM*ILK/ AND /PFM*PFN/.
05039 M00S03635.pfm +++|* TO *ERR* IF FILES DO NOT MATCH FAMILY/USER INDEX.
05040 M00S03636.pfm +++|*
05041 M00S03637.pfm +++|* USES FS+4.
05042 M00S03638.pfm +++|*
05043 M00S03639.pfm +++|* CALLS SSF.
05044 M00S03640.pfm +++|*
05045 M00S03641.pfm +++|* MACROS ERROR.
05046 M00S03642.pfm +++|
05047 M00S03643.pfm +++|
05048 M00S03644.pfm +++| PIF SUBR ENTRY/EXIT
05049 M00S03645.pfm +++|
05050 M00S03646.pfm +++|* PROCESS CATALOG TRACK INTERLOCK (FILE /PFM*ILK/).
05051 M00S03647.pfm +++|
05052 M00S03648.pfm +++| LDC =C/"ILK"/
05053 M00S03649.pfm +++| STM SSFA+1
05054 M00S03650.pfm +++| RJM SSF SEARCH FOR LOCAL FILE /PFM*ILK/
05055 M00S03651.pfm +++| LDD FS
05056 M00S03652.pfm +++| LMD EQ
05057 M00S03653.pfm +++| NJN PIF1 IF INCORRECT EST ORDINAL
05058 M00S03654.pfm +++| LDD FS+1
05059 M00S03655.pfm +++| LMM CCIA
05060 M00S03656.pfm +++| ZJN PIF2 IF CORRECT CATALOG TRACK
05061 M00S03657.pfm +++| PIF1 ERROR FNF,CH,IW * FILE NOT FOUND.*
05062 M00S03658.pfm +++|
| Line S03659 Modification History |
M01 (Removed by) | pfm31 |
Seq # *Modification Id* Act
----------------------------+
05063 M01S03659.pfm31 ---| PIF2 LDD FS+4 CLEAR CATALOG TRACK INTERLOCK BIT
| Line S00003 Modification History |
M01 (Added by) | pfm31 |
Seq # *Modification Id* Act
----------------------------+
05064 M01S00003.pfm31 +++| PIF2 LDD FS+4 CHECK CATALOG TRACK INTERLOCK BIT
05065 M01S00004.pfm31 +++| SHN 21-11
05066 M01S00005.pfm31 +++| PJN PIF2.1 IF INTERLOCK BIT NOT SET
05067 M01S00006.pfm31 +++| AOM CCIB SET CATALOG TRACK INTERLOCK FLAG
05068 M01S00007.pfm31 +++| PIF2.1 LDD FS+4 CLEAR CATALOG TRACK INTERLOCK BIT
05069 M00S03660.pfm +++| LPC 6776
05070 M00S03661.pfm +++| LMN 1 SET COMPLETE BIT
05071 M00S03662.pfm +++| STD FS+4
05072 M00S03663.pfm +++| NFA FA,R REWRITE FST
05073 M00S03664.pfm +++| ADK FSTL
05074 M00S03665.pfm +++| CWD FS
| Line S03666 Modification History |
M01 (Removed by) | pfm31 |
Seq # *Modification Id* Act
----------------------------+
05075 M01S03666.pfm31 ---| AOM CCIB SET CATALOG TRACK INTERLOCK FLAG
05076 M00S03667.pfm +++|
05077 M00S03668.pfm +++|* CHECK FOR ALLOCATION INTERLOCK (FILE /PFM*PFN/).
05078 M00S03669.pfm +++|
05079 M00S03670.pfm +++| LDC =C/"PFN"/
05080 M00S03671.pfm +++| STM SSFA+1
05081 M00S03672.pfm +++| RJM SSF SEARCH FOR LOCAL FILE /PFM*PFN/
05082 M00S03673.pfm +++| LDD FS
05083 M00S03674.pfm +++| LMD EQ
05084 M00S03675.pfm +++| ZJN PIF3 IF CORRECT EST ORDINAL
05085 M00S03676.pfm +++| ERROR FNF,CH * FILE NOT FOUND.*
05086 M00S03677.pfm +++|
05087 M00S03678.pfm +++| PIF3 LDD FS+4
05088 M00S03679.pfm +++| SHN 21-11
05089 M00S03680.pfm +++| PJN PIF4 IF ALLOCATION INTERLOCK NOT SET
05090 M00S03681.pfm +++| AOM IAIF SET *INDIRECT ALLOCATION INTERLOCK* FLAG
05091 M00S03682.pfm +++| PIF4 LDD FS+4 CLEAR ALLOCATION INTERLOCK BIT
05092 M00S03683.pfm +++| LPC 6776
05093 M00S03684.pfm +++| LMN 1 SET COMPLETE BIT
05094 M00S03685.pfm +++| STD FS+4
05095 M00S03686.pfm +++| NFA FA,R REWRITE FST
05096 M00S03687.pfm +++| ADK FSTL
05097 M00S03688.pfm +++| CWD FS
05098 M00S03689.pfm +++| LDN 0 CLEAR LOCAL FILE FNT ADDRESS
05099 M00S03690.pfm +++| STM FNTA
05100 M00S03691.pfm +++| UJP PIFX RETURN
05101 M00S03692.pfm +++| SSF SPACE 4,20
05102 M00S03693.pfm +++|** SSF - SEARCH FOR SYSTEM FILE.
05103 M00S03694.pfm +++|*
05104 M00S03695.pfm +++|* ENTRY (PFSN) = LOCAL FILE NAME.
05105 M00S03696.pfm +++|*
05106 M00S03697.pfm +++|* EXIT (LF - LF+1) = LENGTH OF LOCAL FILE.
05107 M00S03698.pfm +++|* (FS - FS+4) = FST ENTRY FOR FILE (REWOUND).
05108 M00S03699.pfm +++|* (ERRB) = NON ZERO IF FILE PRESENT AND SET BUSY.
05109 M00S03700.pfm +++|* (FNTA) = FNT ADDRESS OF LOCAL FILE.
05110 M00S03701.pfm +++|* (FNTB) = FNT ADDRESS OF /PFM*PFN/ FILE (*DELPFC*).
05111 M00S03702.pfm +++|* (FNTC) = FNT ADDRESS OF /PFM*ILK/ FILE (*DELPFC*).
05112 M00S03703.pfm +++|* (LFAL) = LOCAL FILE ACCESS LEVEL.
05113 M00S03704.pfm +++|* FST REWRITTEN.
05114 M00S03705.pfm +++|*
05115 M00S03706.pfm +++|* USES FA, T5, T6, CM - CM+4, FN - FN+4, FS - FS+4,
05116 M00S03707.pfm +++|* LF - LF+1.
05117 M00S03708.pfm +++|*
| Line S03709 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05118 M01S03709.242l642 ---|* CALLS CSA, CTA, SAF, SEI, SFB, SFN.
| Line S00390 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05119 M01S00390.242l642 +++|* CALLS CSA, CTA, PDS, SAF, SEI, SFB, SFN.
05120 M00S03710.pfm +++|*
05121 M00S03711.pfm +++|* MACROS ERROR, NFA, SETMS, SFA.
05122 M00S03712.pfm +++|
05123 M00S03713.pfm +++|
05124 M00S03714.pfm +++| SSF SUBR ENTRY/EXIT
05125 M00S03715.pfm +++| SSFA LDC PFSN SET FILE NAME
05126 M00S03716.pfm +++|* LDC =C/"ILK"/ (*DELPFC* REQUEST)
05127 M00S03717.pfm +++|* LDC =C/"PFN"/ (*DELPFC* REQUEST)
05128 M00S03718.pfm +++| RJM SFN
05129 M00S03719.pfm +++| RJM SAF SEARCH FOR ASSIGNED FILE
05130 M00S03720.pfm +++| ZJN SSF1 IF NOT FOUND
05131 M00S03721.pfm +++| RJM SFB SET FILE BUSY
05132 M00S03722.pfm +++| ZJN SSF3 IF NO REJECT ON FILE INTERLOCK
05133 M00S03723.pfm +++| ERROR IOE,CH,IW *I/O SEQUENCE ERROR.*
05134 M00S03724.pfm +++|
05135 M00S03725.pfm +++| SSF1 ERROR FNF,CH,IW * FILE NOT FOUND.*
05136 M00S03726.pfm +++|
05137 M00S03727.pfm +++| SSF2 ERROR FEO,CH,IW * FILE IS EXECUTE ONLY.*
05138 M00S03728.pfm +++|
| Line S00001 Modification History |
M01 (Added by) | pfm27 |
Seq # *Modification Id* Act
----------------------------+
05139 M01S00001.pfm27 +++| SSF2.1 ERROR IFT,CH,IW * INCORRECT FILE TYPE.*
05140 M01S00002.pfm27 +++|
05141 M00S03729.pfm +++| SSF3 AOM ERRB INDICATE FILE NOT CREATED BY *PFM*
05142 M00S03730.pfm +++| LDD FA SAVE FNT ADDRESS
05143 M00S03731.pfm +++| STM FNTA
05144 M00S03732.pfm +++| LDD CC
05145 M00S03733.pfm +++| LMN CCSV
05146 M00S03734.pfm +++| NJN SSF4 IF NOT *SAVE* REQUEST
05147 M00S03735.pfm +++| RJM CSA CHECK SPECIFIED ACCESS LEVEL
05148 M00S03736.pfm +++| SSF4 NFA FA,R
05149 M00S03737.pfm +++| ADK FNTL
05150 M00S03738.pfm +++| CRD FN
05151 M00S03739.pfm +++| ADN FSTL-FNTL
05152 M00S03740.pfm +++| CRD FS
05153 M00S03741.pfm +++| ADN FUTL-FSTL READ LOCAL FILE ACCESS LEVEL
05154 M00S03742.pfm +++| CRD CN
05155 M00S03743.pfm +++| LDD CN+2 SAVE LOCAL FILE ACCESS LEVEL
05156 M00S03744.pfm +++| LPN 7
05157 M00S03745.pfm +++| STM LFAL
05158 M00S03746.pfm +++| LDD FN+3 CHECK FILE MODE
05159 M00S03747.pfm +++| LPN 4
05160 M00S03748.pfm +++| NJP SSF2 IF EXECUTE ONLY FILE
| Line S00003 Modification History |
M01 (Added by) | pfm27 |
Seq # *Modification Id* Act
----------------------------+
05161 M01S00003.pfm27 +++| LDD FN+3 CHECK FILE MODE
05162 M01S00004.pfm27 +++| LPN 21 EXTEND-ONLY AND WRITE LOCKOUT
05163 M01S00005.pfm27 +++| LMN 21
05164 M01S00006.pfm27 +++| ZJP SSF2.1 IF READ/ALLOW MODIFY OR READ/ALLOW APPEND
05165 M00S03749.pfm +++| LDD FS CHECK IF EQUIPMENT IS MASS STORAGE
05166 M00S03750.pfm +++| ZJN SSF5 IF NO EQUIPMENT ASSIGNED TO FILE
05167 M00S03751.pfm +++| STD T5
05168 M00S03752.pfm +++| SFA EST
05169 M00S03753.pfm +++| ADK EQDE
05170 M00S03754.pfm +++| CRD CM READ EST ENTRY
05171 M00S03755.pfm +++| LDD CM
05172 M00S03756.pfm +++| SHN 21-13 MASS STORAGE BIT
05173 M00S03757.pfm +++| MJN SSF6 IF MASS STORAGE
05174 M00S03758.pfm +++| ERROR NMS,CH,IW *(FILENAME) NOT ON MASS STORAGE.*
05175 M00S03759.pfm +++|
05176 M00S03760.pfm +++| SSF5 ERROR EFL,CH,IW *(FILE NAME) EMPTY.*
05177 M00S03761.pfm +++|
05178 M00S03762.pfm +++| SSF6 LDD CC
05179 M00S03763.pfm +++| LMN CCDP
05180 M00S03764.pfm +++| ZJP SSFX IF *DELPFC* REQUEST
| Line S03765 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05181 M01S03765.242l642 ---| SETMS SET MASS STORAGE PARAMETERS
| Line S00391 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05182 M01S00391.242l642 +++| SETMS STATUS
| Line S00392 Modification History |
M01 (Added by) | 242l642 |
M02 (Removed by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
05183 M02S00392.ns2776 ---| RJM PDS PROCESS DEVICE STATUS
| Line S00070 Modification History |
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
05184 M01S00070.ns2776 +++| LDM MSD
05185 M01S00071.ns2776 +++| LPC 100
05186 M01S00072.ns2776 +++| RJM PDS PROCESS DEVICE STATUS
05187 M00S03766.pfm +++| LDD CM+4 SET FWA OF TRT - TRACK BIT
05188 M00S03767.pfm +++| SHN 3
05189 M00S03768.pfm +++| ADN TRLL
05190 M00S03769.pfm +++| RJM CTA CALCULATE FWA OF TRT
05191 M00S03770.pfm +++| SBD TH
05192 M00S03771.pfm +++| STM SEIA+1
05193 M00S03772.pfm +++| SHN -14
05194 M00S03773.pfm +++| LMC ADCI
05195 M00S03774.pfm +++| STM SEIA
05196 M00S03775.pfm +++| LDD FS+2
| Line S03776 Modification History |
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
05197 M01S03776.253l688 ---| ZJN SSF5 IF FILE NEVER WRITTEN
| Line S00097 Modification History |
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
05198 M01S00097.253l688 +++| ZJN SSF7 IF FILE NEVER WRITTEN
05199 M00S03777.pfm +++| LDD FS+1 DETERMINE FILE LENGTH
05200 M00S03778.pfm +++| STD T6
05201 M00S03779.pfm +++| RJM SEI
05202 M00S03780.pfm +++| LDD T2
05203 M00S03781.pfm +++| STD LF
05204 M00S03782.pfm +++| LDD T3
05205 M00S03783.pfm +++| SBN 1 DISCOUNT EOI
05206 M00S03784.pfm +++| STD LF+1
| Line S03785 Modification History |
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
05207 M01S03785.253l688 ---| PJN SSF7 IF NO 12 BIT OVERFLOW
| Line S00098 Modification History |
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
05208 M01S00098.253l688 +++| PJN SSF8 IF NO 12 BIT OVERFLOW
05209 M00S03786.pfm +++| AOD LF+1
05210 M00S03787.pfm +++| SOD LF
| Line S03788 Modification History |
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
05211 M01S03788.253l688 ---|
05212 M01S03789.253l688 ---| SSF7 LDD FS+1 REWIND LOCAL FILE
05213 M01S03790.253l688 ---| STD FS+2
05214 M01S03791.253l688 ---| LDN FSMS
| Line S00099 Modification History |
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
05215 M01S00099.253l688 +++| UJN SSF8 UPDATE FST
05216 M01S00100.253l688 +++|
05217 M01S00101.253l688 +++| SSF7 LDN 0 SET FILE LENGTH FOR EMPTY FILE
05218 M01S00102.253l688 +++| STD LF
05219 M01S00103.253l688 +++| STD LF+1
05220 M01S00104.253l688 +++| LDD CC
05221 M01S00105.253l688 +++| LMN CCSD
05222 M01S00106.253l688 +++| ZJN SSF9 IF *SETDA*
05223 M01S00107.253l688 +++| LJM SSF5 * (FILE NAME) EMPTY.*
05224 M01S00108.253l688 +++|
05225 M01S00109.253l688 +++|* UPDATE FST.
05226 M01S00110.253l688 +++|
05227 M01S00111.253l688 +++| SSF8 LDD FS+1 SET CURRENT TRACK = FIRST TRACK
05228 M01S00112.253l688 +++| STD FS+2
05229 M01S00113.253l688 +++| LDN FSMS SET CURRENT SECTOR = FIRST SECTOR
05230 M00S03792.pfm +++| STD FS+3
| Line S03793 Modification History |
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
05231 M01S03793.253l688 ---| LDD FS+4 SET STATUS
| Line S00114 Modification History |
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
05232 M01S00114.253l688 +++| SSF9 LDD FS+4 SET STATUS
05233 M00S03794.pfm +++| SCN 77
05234 M00S03795.pfm +++| LMN 4
05235 M00S03796.pfm +++| STD FS+4
05236 M00S03797.pfm +++| NFA FA,R UPDATE FST
05237 M00S03798.pfm +++| ADK FSTL
05238 M00S03799.pfm +++| CWD FS
05239 M00S03800.pfm +++| LJM SSFX RETURN
05240 M00S03801.pfm +++| SPACE 4,10
05241 M00S03802.pfm +++|* COMMON DECKS.
05242 M00S03803.pfm +++|
05243 M00S03804.pfm +++|
05244 M00S03805.pfm +++|*CALL COMPACS
05245 M00S03806.pfm +++| VAL$ SET 0
05246 M00S03807.pfm +++|*CALL COMPVLC
05247 M00S03808.pfm +++|*CALL COMPFAT
05248 M00S03809.pfm +++| QUAL GFP
05249 M00S03810.pfm +++| FNT$ EQU 0 DEFINE *COMPGFP* ACCESS TO FNT
05250 M00S03811.pfm +++|*CALL COMPGFP
05251 M00S03812.pfm +++| QUAL *
05252 M00S03813.pfm +++| .FNT EQU /GFP/.FNT
05253 M00S03814.pfm +++|*CALL COMPSAF
| Line S03815 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05254 M01S03815.242l642 ---|*CALL COMPSDN
05255 M00S03816.pfm +++|*CALL COMPSFB
05256 M00S03817.pfm +++| SPACE 4,15
05257 M00S03818.pfm +++| LOCF EQU *+5 ZERO LEVEL OVERLAY LOAD ADDRESS
05258 M00S03819.pfm +++| SPACE 4,10
05259 M00S03820.pfm +++|* CHECK FOR OVERFLOW.
05260 M00S03821.pfm +++|
05261 M00S03822.pfm +++|
05262 M00S03823.pfm +++| ERRNG BFMS-LOCF-ZDFL *0DF* OVERFLOW
05263 M00S03824.pfm +++|
05264 M00S03825.pfm +++|
05265 M00S03826.pfm +++| OVERFLOW OVLD,EPFW OVERFLOW INTO ERROR PROCESSING AREA
05266 M00S03827.pfm +++| OVERLAY (ASSIGNPF/FILE RESIDENCE PROCESSING.),OVLD
05267 M00S03828.pfm +++| FRP SPACE 4,30
05268 M00S03829.pfm +++|** THIS OVERLAY DETERMINES THE PROPER RESIDENCE FOR
05269 M00S03830.pfm +++|* DIRECT ACCESS FILES, ACCORDING TO THE FOLLOWING RULES -
05270 M00S03831.pfm +++|*
05271 M00S03832.pfm +++|* LOCAL FILE IN EXISTENCE
05272 M00S03833.pfm +++|* FILE MADE PERMANENT IF LOCAL FILE ON LEGAL PF DEVICE.
05273 M00S03834.pfm +++|* ABORTED IF FILE NOT ON PF DEVICE.
05274 M00S03835.pfm +++|* *DT* IS IGNORED.
05275 M00S03836.pfm +++|* IF REMOVABLE DEVICE REQUEST FILE MUST RESIDE ON THAT
05276 M00S03837.pfm +++|* REMOVABLE DEVICE.
05277 M00S03838.pfm +++|*
05278 M00S03839.pfm +++|* NO LOCAL FILE.
05279 M00S03840.pfm +++|* *DT* = 0.
05280 M00S03841.pfm +++|* PLACE FILE ON DEVICE WITH MOST AVAILABLE SPACE, AND
05281 M00S03842.pfm +++|* SUFFICIENT ACCESS LEVEL.
05282 M00S03843.pfm +++|* *DT* .NE. 0.
05283 M00S03844.pfm +++|* FILE IS PLACED ON MATCHING DEVICE TYPE WITH SUFFICIENT
05284 M00S03845.pfm +++|* ACCESS LEVEL AND MOST AVAILABLE SPACE IN FAMILY,
05285 M00S03846.pfm +++|* OTHERWISE REQUEST IS ABORTED.
05286 M00S03847.pfm +++|* *PRU* .NE. 0.
05287 M00S03848.pfm +++|* PLACE FILE ON DEVICE (TYPE *DT* IF SPECIFIED) WITH
05288 M00S03849.pfm +++|* MOST AVAILABLE SPACE PROVIDED *PRU* SECTORS
05289 M00S03850.pfm +++|* ARE AVAILABLE. IF THEY ARE NOT REQUEST IS ABORTED.
05290 M00S03851.pfm +++|*
05291 M00S03852.pfm +++|* IF THE SPECIAL REQUEST *SRMR* IS SPECIFIED, THE FILE MUST
05292 M00S03853.pfm +++|* RESIDE ON THE MASTER DEVICE (AS DETERMINED BY THE PRIMARY
05293 M00S03854.pfm +++|* DEVICE MASK), RATHER THAN ON THE DEVICE(S) SPECIFIED IN THE
05294 M00S03855.pfm +++|* SECONDARY DEVICE MASK(S).
05295 M00S03856.pfm +++|
05296 M00S03857.pfm +++|
05297 M00S03858.pfm +++| FRP BSS 0 ENTRY
05298 M00S03859.pfm +++| LDD CC
05299 M00S03860.pfm +++| LMN CCAN
05300 M00S03861.pfm +++| ZJN APF IF *ASSIGNPF* REQUEST
05301 M00S03862.pfm +++| LDM LFAL
05302 M00S03863.pfm +++| STD CM+4
05303 M00S03864.pfm +++| LDD EQ CHECK *LFAL* WITH MASTER DEVICE *AL*
05304 M00S03865.pfm +++| STD CM+2
05305 M00S03866.pfm +++| LDN VAES
05306 M00S03867.pfm +++| STD CM+1
05307 M00S03868.pfm +++| MONITOR VSAM
05308 M00S03869.pfm +++| LDD CM+1
05309 M00S03870.pfm +++| NJN FRP2 IF FILE ACCESS NOT VALID FOR DEVICE
05310 M00S03871.pfm +++|
05311 M00S03872.pfm +++|* PROCESS *DEFINE*, *SETDA*.
05312 M00S03873.pfm +++|
05313 M00S03874.pfm +++| RJM DFR DETERMINE FILE RESIDENCE
05314 M00S03875.pfm +++| RJM SPN SET PERMANENT FILE NAME
05315 M00S03876.pfm +++| EXECUTE 3PC PROCESS REQUEST
05316 M00S03877.pfm +++|
05317 M00S03878.pfm +++| FRP2 ERROR LNP,CH,IW,,SVE * ACCESS LEVEL NOT VALID ON PF DEVICE*
05318 M00S03879.pfm +++| APF SPACE 4,10
05319 M00S03880.pfm +++|*** PROCESS *ASSIGNPF* REQUEST.
05320 M00S03881.pfm +++|*
05321 M00S03882.pfm +++|* ASSIGN LOCAL FILE TO PROPER PERMANENT FILE DEVICE.
05322 M00S03883.pfm +++|*
05323 M00S03884.pfm +++|* IF THE SPECIAL REQUEST *SRSY* IS SPECIFIED, WRITE
05324 M00S03885.pfm +++|* A SYSTEM SECTOR ON THE FILE.
05325 M00S03886.pfm +++|
05326 M00S03887.pfm +++|
05327 M00S03888.pfm +++| APF BSS 0 ENTRY
05328 M00S03889.pfm +++| LDM PFSR CHECK SPECIAL REQUEST
05329 M00S03890.pfm +++| LPN 77
05330 M00S03891.pfm +++| LMN SRSY
05331 M00S03892.pfm +++| ZJN APF2 IF SYSTEM SECTOR IS TO BE PREWRITTEN
05332 M00S03893.pfm +++| RJM DFR DETERMINE FILE RESIDENCE
05333 M00S03894.pfm +++| LDN 0 SET UP FST FOR SYSTEM SECTOR ACCESS
05334 M00S03895.pfm +++| STD FS+2
05335 M00S03896.pfm +++| STD FS+3
05336 M00S03897.pfm +++| LDC 4004 SET FILE STATUS
05337 M00S03898.pfm +++| STD FS+4
05338 M00S03899.pfm +++| NFA FA,R
05339 M00S03900.pfm +++| ADN FSTL
05340 M00S03901.pfm +++| CWD FS
| Line S03902 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05341 M01S03902.242l642 ---| LJM TRP TERMINATE PROGRAM
| Line S00393 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05342 M01S00393.242l642 +++| LJM APF5 TERMINATE PROGRAM
05343 M00S03903.pfm +++|
05344 M00S03904.pfm +++|* CLEAR SYSTEM SECTOR.
05345 M00S03905.pfm +++|
05346 M00S03906.pfm +++| APF2 LDC PMFT*100-LOFT*100 FORCE *PMFT* FILE TYPE
05347 M00S03907.pfm +++| RAM SFTA
05348 M00S03908.pfm +++| RJM DFR DETERMINE FILE RESIDENCE
05349 M00S03909.pfm +++| LDC 77*5-1 SET WORD COUNT TO CLEAR
05350 M00S03910.pfm +++| STD T1
05351 M00S03911.pfm +++| APF3 LDN 0
05352 M00S03912.pfm +++| STM BFMS+2,T1 CLEAR NEXT WORD
05353 M00S03913.pfm +++| SOD T1
05354 M00S03914.pfm +++| PJN APF3 IF MORE TO CLEAR
05355 M00S03915.pfm +++| LDN 72 CURRENT ACCESS MODE (WRITE MODE/PURGED)
05356 M00S03916.pfm +++| STM CASS
05357 M00S03917.pfm +++|
05358 M00S03918.pfm +++|* WRITE SYSTEM AND EOI SECTORS.
05359 M00S03919.pfm +++|
05360 M00S03920.pfm +++| LDD FS+1 SET TRACK AND SECTOR
05361 M00S03921.pfm +++| STD T6
05362 M00S03922.pfm +++| STD FS+2
05363 M00S03923.pfm +++| LDN FSMS
05364 M00S03924.pfm +++| STD FS+3
05365 M00S03925.pfm +++| LDN 4 SET FILE STATUS
05366 M00S03926.pfm +++| STD FS+4
05367 M00S03927.pfm +++| NFA FA,R PREWRITE FST FOR *COMPWEI*
05368 M00S03928.pfm +++| ADN FSTL
05369 M00S03929.pfm +++| CWD FS
| Line S03930 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05370 M01S03930.242l642 ---| SETMS WRITE,,BFMS
| Line S00394 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05371 M01S00394.242l642 +++| SETMS IO,,BFMS
05372 M01S00395.242l642 +++| RJM PDV PROCESS DEVICE STATUS
05373 M00S03931.pfm +++| RJM WSS WRITE SYSTEM SECTOR
| Line S00396 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05374 M01S00396.242l642 +++| MJN APF3.1 IF WRITE ERROR
05375 M00S03932.pfm +++| RJM WEI WRITE EOI SECTOR
05376 M00S03933.pfm +++| PJN APF4 IF NO MASS STORAGE ERROR
| Line S03934 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05377 M01S03934.242l642 ---| LJM WSE ISSUE MASS STORAGE ERROR MESSAGE
| Line S00397 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05378 M01S00397.242l642 +++| APF3.1 ERROR MSE,CH,IW,FS *EQXXX,DNYY, MASS STORAGE ERROR.*
05379 M00S03935.pfm +++|
05380 M00S03936.pfm +++| APF4 ENDMS
05381 M00S03937.pfm +++| LDD FS INCREMENT USER COUNT FOR DEVICE
05382 M00S03938.pfm +++| STD CM+1
05383 M00S03939.pfm +++| LDN IUCS INCREMENT USER COUNT
05384 M00S03940.pfm +++| STD CM+3
| Line S03941 Modification History |
M01 (Removed by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
05385 M01S03941.253l688 ---| MONITOR STBM
| Line S00115 Modification History |
M01 (Added by) | 253l688 |
Seq # *Modification Id* Act
----------------------------+
05386 M01S00115.253l688 +++| MONITOR SMDM
05387 M00S03942.pfm +++| LDN FSMS SET EOI IN TRT
05388 M00S03943.pfm +++| STD CM+3
05389 M00S03944.pfm +++| LDD T6
05390 M00S03945.pfm +++| LPC 3777
05391 M00S03946.pfm +++| STD CM+2
05392 M00S03947.pfm +++| LDD FS
05393 M00S03948.pfm +++| STD CM+1
05394 M00S03949.pfm +++| MONITOR DTKM
| Line S03950 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05395 M01S03950.242l642 ---| LJM TRP TERMINATE PROGRAM
| Line S00398 Modification History |
M01 (Added by) | 242l642 |
M02 (Removed by) | ns2414 |
Seq # *Modification Id* Act
----------------------------+
05396 M02S00398.ns2414 ---| APF5 EXECUTE 3PT TERMINATE PROGRAM
| Line S00024 Modification History |
M01 (Added by) | ns2414 |
Seq # *Modification Id* Act
----------------------------+
05397 M01S00024.ns2414 +++| APF5 EXECUTE 3PU TERMINATE PROGRAM
05398 M00S03951.pfm +++| TITLE SUBROUTINES.
| Line S00399 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05399 M01S00399.242l642 +++| CDA SPACE 4,15
05400 M01S00400.242l642 +++|** CDA - CHECK DEVICE ACCESSIBILITY.
05401 M01S00401.242l642 +++|*
05402 M01S00402.242l642 +++|* ENTRY (T2) = EST ORDINAL FOR DEVICE.
05403 M01S00403.242l642 +++|* (T3 - T3+4) = EST ENTRY FOR DEVICE.
05404 M01S00404.242l642 +++|*
05405 M01S00405.242l642 +++|* EXIT (A) = 0 IF DEVICE CAN BE ACCESSED.
05406 M01S00406.242l642 +++|* (A) = 1 IF NEW ACTIVITY RESTRICTED ON DEVICE.
05407 M01S00407.242l642 +++|* (A) = 2 IF PF UTILITY ACTIVE.
05408 M01S00408.242l642 +++|* (A) = 3 IF ACCESS DENIED BY *SETMS*.
05409 M01S00409.242l642 +++|* (A) = 4 IF *ERROR IDLE* SET FOR DEVICE.
05410 M01S00410.242l642 +++|*
05411 M01S00411.242l642 +++|* USES T5, CM - CM+4.
05412 M01S00412.242l642 +++|*
05413 M01S00413.242l642 +++|* MACROS SETMS.
05414 M01S00414.242l642 +++|
05415 M01S00415.242l642 +++|
05416 M01S00416.242l642 +++| CDA SUBR ENTRY/EXIT
05417 M01S00417.242l642 +++|
05418 M01S00418.242l642 +++|* CHECK IF *ERROR IDLE* SET FOR DEVICE.
05419 M01S00419.242l642 +++|
05420 M01S00420.242l642 +++| LDD T3+4 MST ADDRESS/10B
05421 M01S00421.242l642 +++| SHN 3
05422 M01S00422.242l642 +++| ADN ACGL
05423 M01S00423.242l642 +++| CRD CM
05424 M01S00424.242l642 +++| LDD CM+4
05425 M01S00425.242l642 +++| LPN 20
05426 M01S00426.242l642 +++| ZJN CDA2 IF NOT *ERROR IDLE*
05427 M01S00427.242l642 +++| LDM SSJS
05428 M01S00428.242l642 +++| ZJN CDA1 IF NOT *SSJ=* JOB
05429 M01S00429.242l642 +++| LDM PFSR
05430 M01S00430.242l642 +++| LPN 77
05431 M01S00431.242l642 +++| LMN SRIE
05432 M01S00432.242l642 +++| ZJN CDA2 IF *IGNORE ERROR IDLE* SPECIAL REQUEST
05433 M01S00433.242l642 +++| CDA1 LDN 4 RETURN WITH (A) = 4
05434 M01S00434.242l642 +++| UJN CDAX RETURN
05435 M01S00435.242l642 +++|
05436 M01S00436.242l642 +++|* CHECK *SUSPECT*, *OFF*, AND *DOWN* STATUS.
05437 M01S00437.242l642 +++|
05438 M01S00438.242l642 +++| CDA2 LDD T2 EST ORDINAL
05439 M01S00439.242l642 +++| STD T5
05440 M01S00440.242l642 +++| SETMS STATUS
| Line S00073 Modification History |
M01 (Added by) | ns2776 |
Seq # *Modification Id* Act
----------------------------+
05441 M01S00073.ns2776 +++| LDM MSD
05442 M01S00074.ns2776 +++| SHN 21-6
| Line S00441 Modification History |
M01 (Added by) | 242l642 |
M02 (Removed by) | 251l670 |
Seq # *Modification Id* Act
----------------------------+
05443 M02S00441.251l670 ---| ZJN CDA4 IF DEVICE CAN BE ACCESSED
| Line S00001 Modification History |
M01 (Added by) | 251l670 |
Seq # *Modification Id* Act
----------------------------+
05444 M01S00001.251l670 +++| PJN CDA4 IF DEVICE CAN BE ACCESSED
| Line S00442 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05445 M01S00442.242l642 +++| LDN 3 RETURN WITH (A) = 3
05446 M01S00443.242l642 +++| CDA3 UJN CDAX RETURN
05447 M01S00444.242l642 +++|
05448 M01S00445.242l642 +++|* CHECK IF PF UTILITY ACTIVE.
05449 M01S00446.242l642 +++|
05450 M01S00447.242l642 +++| CDA4 LDD T3+4 MST ADDRESS/10B
05451 M01S00448.242l642 +++| SHN 3
05452 M01S00449.242l642 +++| ADK TDGL
05453 M01S00450.242l642 +++| CRD CM
05454 M01S00451.242l642 +++| LDD CM+1
05455 M01S00452.242l642 +++| SHN 21-6
05456 M01S00453.242l642 +++| PJN CDA5 IF DEVICE NOT INTERLOCKED
05457 M01S00454.242l642 +++| LDN 2 RETURN WITH (A) = 2
05458 M01S00455.242l642 +++| UJN CDA3 RETURN
05459 M01S00456.242l642 +++|
05460 M01S00457.242l642 +++|* CHECK NEW ACTIVITY RESTRICTIONS.
05461 M01S00458.242l642 +++|
05462 M01S00459.242l642 +++| CDA5 LDD T3+4 MST ADDRESS/10B
05463 M01S00460.242l642 +++| SHN 3
05464 M01S00461.242l642 +++| ADN DALL
05465 M01S00462.242l642 +++| CRD CM
05466 M01S00463.242l642 +++| LDD CM
05467 M01S00464.242l642 +++| SHN 21-6
05468 M01S00465.242l642 +++| MJN CDA6 IF *RESTRICT NEW ACTIVITY* FLAG SET
05469 M01S00466.242l642 +++| SHN 0-10-21+6+22
05470 M01S00467.242l642 +++| LPN 3
05471 M01S00468.242l642 +++| SBN 1
05472 M01S00469.242l642 +++| NJN CDA7 IF *IDLE* FLAG NOT SET
05473 M01S00470.242l642 +++| CDA6 LDN 1 RETURN WITH (A) = 1
05474 M01S00471.242l642 +++| UJN CDA3 RETURN
05475 M01S00472.242l642 +++|
05476 M01S00473.242l642 +++| CDA7 LDN 0 RETURN WITH (A) = 0
05477 M01S00474.242l642 +++| UJN CDA3 RETURN
05478 M00S03952.pfm +++| CML SPACE 4,15
05479 M00S03953.pfm +++|** CML - CHECK MASS STORAGE LIMIT.
05480 M00S03954.pfm +++|*
05481 M00S03955.pfm +++|* ENTRY (CMLA - CMLA+1) = VALUE OF DECREMENT.
05482 M00S03956.pfm +++|*
05483 M00S03957.pfm +++|* EXIT TO ERR IF ERROR IN PRU LIMITS.
05484 M00S03958.pfm +++|*
05485 M00S03959.pfm +++|* USES CM - CM+4.
05486 M00S03960.pfm +++|
05487 M00S03961.pfm +++|
05488 M00S03962.pfm +++| CML SUBR
05489 M00S03963.pfm +++| LDD CP READ PRU VALUE FOR CONTROL POINT
05490 M00S03964.pfm +++| ADK ACLW
05491 M00S03965.pfm +++| CRD CM
05492 M00S03966.pfm +++| LDD CM+3 CHECK FOR LIMIT EXCEEDED
05493 M00S03967.pfm +++| LPN 77
05494 M00S03968.pfm +++| SBM CMLA
05495 M00S03969.pfm +++| MJN CML1 IF LIMIT EXCEEDED
05496 M00S03970.pfm +++| NJN CMLX IF LIMIT NOT EXCEEDED
05497 M00S03971.pfm +++| LDD CM+4
05498 M00S03972.pfm +++| SBM CMLA+1
05499 M00S03973.pfm +++| PJN CMLX IF LIMIT NOT EXCEEDED
05500 M00S03974.pfm +++| CML1 ERROR PRL,CH,IW *PRU LIMIT.*
05501 M00S03975.pfm +++|
05502 M00S03976.pfm +++| CMLA CON 0,0 VALUE OF PRU DECREMENT
05503 M00S03977.pfm +++| CPF SPACE 4,10
05504 M00S03978.pfm +++|** CPF - CHECK FOR PRESERVED FILE.
05505 M00S03979.pfm +++|*
05506 M00S03980.pfm +++|* ENTRY (P3) = MST ADDRESS.
05507 M00S03981.pfm +++|*
05508 M00S03982.pfm +++|* EXIT (A) .LT. 0 IF PRESERVED FILE BIT SET.
05509 M00S03983.pfm +++|*
05510 M00S03984.pfm +++|* USES T1, CM - CM+4.
05511 M00S03985.pfm +++|*
05512 M00S03986.pfm +++|* CALLS CTA.
05513 M00S03987.pfm +++|
05514 M00S03988.pfm +++|
05515 M00S03989.pfm +++| CPF SUBR ENTRY/EXIT
05516 M00S03990.pfm +++| LDD P3 SET *TRT* ADDRESS
05517 M00S03991.pfm +++| SHN 3
05518 M00S03992.pfm +++| ADN TRLL
05519 M00S03993.pfm +++| RJM CTA CALCULATE FWA OF TRT
05520 M00S03994.pfm +++| SBD TH
05521 M00S03995.pfm +++| SHN 2
05522 M00S03996.pfm +++| ADD FS+1
05523 M00S03997.pfm +++| STD T1 SAVE REMAINDER FOR POSITION IN WORD
05524 M00S03998.pfm +++| SHN -2 4 TRACK ASSIGNMENTS FOR EACH WORD
05525 M00S03999.pfm +++| CRD CM READ *TRT* WORD FOR TRACK
05526 M00S04000.pfm +++| LDD T1 SET PRESERVED BIT POSITION
05527 M00S04001.pfm +++| LPN 3
05528 M00S04002.pfm +++| ADC SHNI+6
05529 M00S04003.pfm +++| STM CPFA SET SHIFT INSTRUCTION
05530 M00S04004.pfm +++| LDD CM+4 CHECK FOR PRESERVED STATUS
05531 M00S04005.pfm +++| CPFA SHN ** (21-13+TRACK INDEX)
05532 M00S04006.pfm +++| UJN CPFX RETURN
| Line S04007 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05533 M01S04007.242l642 ---| CPR SPACE 4,15
| Line S00475 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05534 M01S00475.242l642 +++| CPR SPACE 4,20
05535 M00S04008.pfm +++|** CPR - CHECK PROPER PERMANENT FILE RESIDENCE.
05536 M00S04009.pfm +++|*
05537 M00S04010.pfm +++|* ENTRY (T2) = EST ORDINAL FOR DEVICE.
05538 M00S04011.pfm +++|* (T3 - T7) = EST ENTRY FOR DEVICE.
05539 M00S04012.pfm +++|* (FN - FN+4) = USERS FAMILY OR PACK NAME.
05540 M00S04013.pfm +++|* (FRSM) = MASK BITS FOR DIRECT ACCESS FILE.
05541 M00S04014.pfm +++|* RESIDENCE ALLOWED.
05542 M00S04015.pfm +++|*
05543 M00S04016.pfm +++|* EXIT (A) = 0 IF PROPER DEVICE.
| Line S00476 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05544 M01S00476.242l642 +++|* (A) .GT. 0 IF INCORRECT DEVICE.
05545 M00S04017.pfm +++|* (A) = -1 IF DEVICE UNAVAILABLE.
05546 M00S04018.pfm +++|* (A) = -2 IF DEVICE ACCESS ERROR.
| Line S04019 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05547 M01S04019.242l642 ---|* (A) = -3 IF PF UTILITY ACTIVE.
05548 M00S04020.pfm +++|*
05549 M00S04021.pfm +++|* USES T4, CM - CM+4.
05550 M00S04022.pfm +++|*
05551 M00S04023.pfm +++|* MACROS MONITOR.
05552 M00S04024.pfm +++|
05553 M00S04025.pfm +++|
05554 M00S04026.pfm +++| CPR9 LDN 1
05555 M00S04027.pfm +++|
05556 M00S04028.pfm +++| CPR SUBR ENTRY/EXIT
05557 M00S04029.pfm +++| LDD T3
05558 M00S04030.pfm +++| SHN -6
05559 M00S04031.pfm +++| LPN 41
05560 M00S04032.pfm +++| LMN 40
05561 M00S04033.pfm +++| NJN CPRX IF NOT AVAILABLE MASS STORAGE
| Line S04034 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05562 M01S04034.242l642 ---| LDD T3+3 CHECK ON/OFF STATUS
05563 M01S04035.242l642 ---| SHN 6
05564 M01S04036.242l642 ---| MJN CPR9 IF DEVICE IN *OFF* STATUS
05565 M00S04037.pfm +++| LDD T3+4 READ *MDGL*
05566 M00S04038.pfm +++| SHN 3
05567 M00S04039.pfm +++| ADN MDGL
05568 M00S04040.pfm +++| CRD CM
05569 M00S04041.pfm +++| LDM PFPN
05570 M00S04042.pfm +++| ZJN CPR1 IF NOT AUXILIARY DEVICE REQUEST
05571 M00S04043.pfm +++| LDD CM
05572 M00S04044.pfm +++| SHN 21-12
05573 M00S04045.pfm +++| PJN CPR9 IF NOT AUXILIARY DEVICE
| Line S04046 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05574 M01S04046.242l642 ---| CPR1 LDD T3+4 CHECK FOR UTILITY ACTIVE
05575 M01S04047.242l642 ---| SHN 3
05576 M01S04048.242l642 ---| ADK TDGL
05577 M01S04049.242l642 ---| CRD CM
05578 M01S04050.242l642 ---| LDD CM+1
05579 M01S04051.242l642 ---| SHN 21-6
05580 M01S04052.242l642 ---| PJN CPR1.1 IF DEVICE NOT INTERLOCKED
05581 M01S04053.242l642 ---| LCN 3 FLAG *PF UTILITY ACTIVE*
05582 M01S04054.242l642 ---| UJP CPRX RETURN
05583 M01S04055.242l642 ---|
05584 M01S04056.242l642 ---| CPR1.1 LDD T3+4 CHECK ERROR IDLE
05585 M01S04057.242l642 ---| SHN 3
05586 M01S04058.242l642 ---| ADN ACGL
05587 M01S04059.242l642 ---| CRD CM
05588 M01S04060.242l642 ---| LDD CM+4
05589 M01S04061.242l642 ---| LPN 20
05590 M01S04062.242l642 ---| ZJN CPR3 IF NOT ERROR IDLE
05591 M01S04063.242l642 ---| LDM SSJS
05592 M01S04064.242l642 ---| ZJN CPR2 IF NOT *SSJ=* JOB
05593 M01S04065.242l642 ---| LDM PFSR
05594 M01S04066.242l642 ---| LPN 77
05595 M01S04067.242l642 ---| LMN SRIE
05596 M01S04068.242l642 ---| ZJN CPR3 IF *IGNORE ERROR IDLE* SPECIAL REQUEST
05597 M01S04069.242l642 ---| CPR2 LCN 1 FLAG *DEVICE UNAVAILABLE*
05598 M01S04070.242l642 ---| LJM CPRX RETURN
05599 M01S04071.242l642 ---|
05600 M01S04072.242l642 ---| CPR3 LDD T3+4 SET MST ADDRESS
| Line S00477 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05601 M01S00477.242l642 +++| CPR1 LDD T3+4 SET MST ADDRESS
05602 M00S04073.pfm +++| SHN 3
05603 M00S04074.pfm +++| ADN STLL
05604 M00S04075.pfm +++| CRD CM
05605 M00S04076.pfm +++| LDD CM
05606 M00S04077.pfm +++| LPC MLFPR+MLIAL+MLIHD+MLIFD+MLIPF
| Line S04078 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05607 M01S04078.242l642 ---| NJN CPR2 IF INITIALIZATION PENDING
05608 M01S04079.242l642 ---| LDD T3+4 READ PF DESCRIPTION
| Line S00478 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05609 M01S00478.242l642 +++| ZJN CPR2 IF NO INITIALIZATION PENDING
05610 M01S00479.242l642 +++| LCN 1 FLAG *DEVICE UNAVAILABLE*
05611 M01S00480.242l642 +++| UJP CPRX RETURN
05612 M01S00481.242l642 +++|
05613 M01S00482.242l642 +++| CPR2 LDD T3+4 READ PF DESCRIPTION
05614 M00S04080.pfm +++| SHN 3
05615 M00S04081.pfm +++| ADN PFGL
05616 M00S04082.pfm +++| CRD CM
05617 M00S04083.pfm +++| LDM RQDT CHECK FOR USER REQUESTED DEVICE TYPE
05618 M00S04084.pfm +++| SHN -6
05619 M00S04085.pfm +++| ZJN CPR5 IF NOT USER REQUESTED DEVICE TYPE
05620 M00S04086.pfm +++| LDM RQDT+1 CHECK UNIT COUNT
05621 M00S04087.pfm +++| LPN 77
05622 M00S04088.pfm +++| SBN 1R0+1 CONVERT FROM DISPLAY CODE
05623 M00S04089.pfm +++| LMD CM+4
05624 M00S04090.pfm +++| LPN 77
05625 M00S04091.pfm +++| ZJN CPR5 IF RIGHT UNIT COUNT AND FIRST UNIT
05626 M00S04092.pfm +++| CPR4 LJM CPRX RETURN
05627 M00S04093.pfm +++|
05628 M00S04094.pfm +++| CPR5 LDD CM COMPARE DEVICE NAMES
05629 M00S04095.pfm +++| LMD FN
05630 M00S04096.pfm +++| NJN CPR4 IF NO MATCH
05631 M00S04097.pfm +++| LDD CM+1
05632 M00S04098.pfm +++| LMD FN+1
05633 M00S04099.pfm +++| NJN CPR4 IF NO MATCH
05634 M00S04100.pfm +++| LDD CM+2
05635 M00S04101.pfm +++| LMD FN+2
05636 M00S04102.pfm +++| NJN CPR4 IF NO MATCH
05637 M00S04103.pfm +++| LDD CM+3
05638 M00S04104.pfm +++| LMD FN+3
05639 M00S04105.pfm +++| SCN 77
05640 M00S04106.pfm +++| NJN CPR4 IF NO MATCH
05641 M00S04107.pfm +++| LDD T3+4 READ DEVICE MASKS
05642 M00S04108.pfm +++| SHN 3
05643 M00S04109.pfm +++| ADN PUGL
05644 M00S04110.pfm +++| CRD CM
05645 M00S04111.pfm +++| LDM SSJS
05646 M00S04112.pfm +++| ZJN CPR6 IF NOT *SSJ=* JOB
05647 M00S04113.pfm +++| LDM PFSR CHECK SPECIAL REQUEST
05648 M00S04114.pfm +++| LPN 77
05649 M00S04115.pfm +++| LMN SRMR
05650 M00S04116.pfm +++| NJN CPR6 IF MASTER DEVICE RESIDENCE NOT REQUIRED
05651 M00S04117.pfm +++| LDD CM+4 CHECK PRIMARY MASK
05652 M00S04118.pfm +++| UJN CPR7 CHECK MASK
05653 M00S04119.pfm +++|
05654 M00S04120.pfm +++| CPR6 LDD CM+3 CHECK SECONDARY MASK
05655 M00S04121.pfm +++| SHN 14
05656 M00S04122.pfm +++| LMD CM+4
05657 M00S04123.pfm +++| SHN -10
05658 M00S04124.pfm +++| CPR7 STM CPRB
05659 M00S04125.pfm +++| LDM FRSM
05660 M00S04126.pfm +++| LPC * (DEVICE MASK)
05661 M00S04127.pfm +++| CPRB EQU *-1
05662 M00S04128.pfm +++| LMM FRSM
05663 M00S04129.pfm +++| LPC 377
05664 M00S04130.pfm +++| NJN CPR8 IF NOT CORRECT DEVICE
05665 M00S04131.pfm +++| LDM LFAL CHECK DEVICE ACCESS LEVEL
05666 M00S04132.pfm +++| STD CM+4
05667 M00S04133.pfm +++| LDD T2
05668 M00S04134.pfm +++| STD CM+2
05669 M00S04135.pfm +++| LDN VAES
05670 M00S04136.pfm +++| STD CM+1
05671 M00S04137.pfm +++| MONITOR VSAM
05672 M00S04138.pfm +++| LDD CM+1
05673 M00S04139.pfm +++| ZJN CPR8 IF FILE ACCESS VALID FOR DEVICE
05674 M00S04140.pfm +++| LCN 2
05675 M00S04141.pfm +++| CPR8 LJM CPRX RETURN
05676 M00S04142.pfm +++| DDN SPACE 4,10
05677 M00S04143.pfm +++|** DDN - DETERMINE DEVICE NAME.
05678 M00S04144.pfm +++|*
05679 M00S04145.pfm +++|* ENTRY (PFPN - PFPN+3) = PACK NAME.
05680 M00S04146.pfm +++|* (PFPN+4) = FAMILY EST ORDINAL.
05681 M00S04147.pfm +++|*
05682 M00S04148.pfm +++|* EXIT (FN - FN+3) = PACK OR FAMILY NAME FOR REQUEST.
05683 M00S04149.pfm +++|*
05684 M00S04150.pfm +++|* USES CM - CM+4, FN - FN+4.
05685 M00S04151.pfm +++|*
05686 M00S04152.pfm +++|* MACROS SFA.
05687 M00S04153.pfm +++|
05688 M00S04154.pfm +++|
05689 M00S04155.pfm +++| DDN1 LDD MA SET PACK NAME
05690 M00S04156.pfm +++| CWM PFPN,ON
05691 M00S04157.pfm +++| SBN 1
05692 M00S04158.pfm +++| CRD FN
05693 M00S04159.pfm +++|
05694 M00S04160.pfm +++| DDN SUBR ENTRY/EXIT
05695 M00S04161.pfm +++| LDM PFPN
05696 M00S04162.pfm +++| NJN DDN1 IF REMOVABLE DEVICE REQUEST
05697 M00S04163.pfm +++|
05698 M00S04164.pfm +++|* SET FAMILY NAME.
05699 M00S04165.pfm +++|
05700 M00S04166.pfm +++| SFA EST,PFPN+4 READ FAMILY EST ENTRY
05701 M00S04167.pfm +++| ADK EQDE
05702 M00S04168.pfm +++| CRD CM
05703 M00S04169.pfm +++| LDD CM+4 READ FAMILY NAME
05704 M00S04170.pfm +++| SHN 3
05705 M00S04171.pfm +++| ADN PFGL
05706 M00S04172.pfm +++| CRD FN
05707 M00S04173.pfm +++| UJN DDNX RETURN
05708 M00S04174.pfm +++| DFR SPACE 4,20
05709 M00S04175.pfm +++|** DFR - DETERMINE FILE RESIDENCY.
05710 M00S04176.pfm +++|*
05711 M00S04177.pfm +++|* ENTRY (FN - FN+4) = FILE NAME SET AS LOCAL FILE.
05712 M00S04178.pfm +++|* (FS - FS+4) = FST ENTRY FOR EXISTING FILE.
05713 M00S04179.pfm +++|*
05714 M00S04180.pfm +++|* EXIT (FS - FS+4) = FST ENTRY (STATUS SET BUSY).
05715 M00S04181.pfm +++|* (ERRB) .NE. 0 IF FILE PREVIOUSLY EXISTED.
05716 M00S04182.pfm +++|* (LFEF) = 0 IF FILE IS NOT EMPTY.
05717 M00S04183.pfm +++|* (PFDN) = DEVICE NUMBER OF DEVICE LOCAL FILE IS ON.
05718 M00S04184.pfm +++|* (SDAB) = FIRST TRACK OF FILE.
05719 M00S04185.pfm +++|* (SDAC) = 4XXX WHERE XXX IS *DT* IF REQUESTED
05720 M00S04186.pfm +++|* OTHERWISE XXX = 000.
05721 M00S04187.pfm +++|*
| Line S04188 Modification History |
M01 (Removed by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05722 M01S04188.pfm39 ---|* USES T1 - T7, P0 - P3.
| Line S00002 Modification History |
M01 (Added by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05723 M01S00002.pfm39 +++|* USES LF - LF+1, P0 - P3, SA - SA+1, T1 - T7.
05724 M00S04189.pfm +++|*
| Line S04190 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05725 M01S04190.242l642 ---|* CALLS CPR, CML, DDN, SAF, SFA, SFB, SFN, SFT, SMS, *0DF*.
| Line S00483 Modification History |
M01 (Added by) | 242l642 |
M02 (Removed by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05726 M02S00483.pfm39 ---|* CALLS CDA, CML, CPF, CPR, DDN, PDS, SFA, SFN, SFT.
| Line S00003 Modification History |
M01 (Added by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05727 M01S00003.pfm39 +++|* CALLS CDA, CML, CPF, CPR, DDN, DSA, PDS, SFA, SFN, SFT.
05728 M00S04191.pfm +++|*
05729 M00S04192.pfm +++|* MACROS ERROR, SETMS, SFA.
05730 M00S04193.pfm +++|
05731 M00S04194.pfm +++|
05732 M00S04195.pfm +++|* FILE EXISTS OR HAS BEEN CREATED - PROCEED WITH REQUEST.
05733 M00S04196.pfm +++|
05734 M00S04197.pfm +++| DFR20 LDC 4000 SET DA FILE INDICATION + *DT* IF REQUESTED
05735 M00S04198.pfm +++| DFRA EQU *-1
05736 M00S04199.pfm +++| STM SDAC
05737 M00S04200.pfm +++| LDD FS+1 SET FIRST TRACK
05738 M00S04201.pfm +++| STM SDAB
05739 M00S04202.pfm +++| LDD P3 SAVE FILE MST ADDRESS
05740 M00S04203.pfm +++| SHN 3 SET DEVICE NUMBER
05741 M00S04204.pfm +++| ADN PFGL
05742 M00S04205.pfm +++| CRD CM
05743 M00S04206.pfm +++| LDD CM+3
05744 M00S04207.pfm +++| LPN 77
05745 M00S04208.pfm +++| STM PFDN
05746 M00S04209.pfm +++| LDD FS
05747 M00S04210.pfm +++| LMM SDAA
05748 M00S04211.pfm +++| NJN DFRX IF FILE NOT ON MASTER DEVICE
05749 M00S04212.pfm +++| STM PFDN SET DEVICE NUMBER TO ZERO
05750 M00S04213.pfm +++|
05751 M00S04214.pfm +++| DFR SUBR ENTRY/EXIT
05752 M00S04215.pfm +++| LDD FS+1 CHECK TRACK ASSIGNMENT
05753 M00S04216.pfm +++| NJN DFR1 IF NOT NULL FILE
05754 M00S04217.pfm +++| LJM DFR10 DETERMINE CORRECT DEVICE
05755 M00S04218.pfm +++|
05756 M00S04219.pfm +++|* PROCESS EXISTING FILE.
05757 M00S04220.pfm +++|
05758 M00S04221.pfm +++| DFR1 LDM FRSM CHECK FOR SPECIAL USER INDEX
05759 M00S04222.pfm +++| SHN 21-13
05760 M00S04223.pfm +++| PJN DFR2 IF NOT SPECIAL USER INDEX
05761 M00S04224.pfm +++| SHN 13+21-20 RESTORE ORIGINAL VALUE
05762 M00S04225.pfm +++| LPC -377 CLEAR DEVICE ACCESS MASK
05763 M00S04226.pfm +++| STM FRSM
05764 M00S04227.pfm +++| DFR2 LDD FS+2
05765 M00S04228.pfm +++| NJN DFR3 IF NOT EMPTY FILE
05766 M00S04229.pfm +++| AOM LFEF
05767 M00S04230.pfm +++| DFR3 LDD FN+4 CHECK FILE TYPE
05768 M00S04231.pfm +++| SHN -6
05769 M00S04232.pfm +++| LMN PMFT
05770 M00S04233.pfm +++| STM DFRB SAVE *PMFT* TEST
05771 M00S04234.pfm +++| ZJN DFR6 IF *PMFT* FILE TYPE
05772 M00S04235.pfm +++| LMN LIFT&PMFT
05773 M00S04236.pfm +++| ZJN DFR5 IF *LIFT* FILE TYPE
05774 M00S04237.pfm +++| LMN LOFT&LIFT
05775 M00S04238.pfm +++| ZJN DFR6 IF *LOFT* FILE TYPE
05776 M00S04239.pfm +++| DFR4 ERROR IFT,CH,IW *(FILE NAME) INCORRECT FILE TYPE*
05777 M00S04240.pfm +++|
05778 M00S04241.pfm +++| DFR5 LDM FRSM CHECK IF *LIFT* FILES LEGAL
05779 M00S04242.pfm +++| SHN 21-12
05780 M00S04243.pfm +++| PJN DFR4 IF *LIFT* FILES INVALID
05781 M00S04244.pfm +++| DFR6 LDD FN+3
05782 M00S04245.pfm +++| LPN 4
05783 M00S04246.pfm +++| NJN DFR4 IF EXECUTE ONLY FILE
05784 M00S04247.pfm +++|
05785 M00S04248.pfm +++|* DETERMINE IF FILE IS ON PROPER DEVICE.
05786 M00S04249.pfm +++|
05787 M00S04250.pfm +++| LDD FS READ EST ENTRY
05788 M00S04251.pfm +++| STD T2
05789 M00S04252.pfm +++| SFA EST
05790 M00S04253.pfm +++| ADK EQDE
05791 M00S04254.pfm +++| CRD T3
05792 M00S04255.pfm +++| RJM DDN DETERMINE DEVICE NAME
05793 M00S04256.pfm +++| RJM CPR CHECK FOR PROPER RESIDENCE
05794 M00S04257.pfm +++| NJN DFR8 IF RESIDENCE CHECK FAILED
| Line S00484 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05795 M01S00484.242l642 +++| RJM CDA CHECK DEVICE ACCESSIBILITY
05796 M01S00485.242l642 +++| RJM PDS PROCESS DEVICE STATUS
05797 M00S04258.pfm +++| LDD T3+4 SAVE MST ADDRESS
05798 M00S04259.pfm +++| STD P3
05799 M00S04260.pfm +++| LDC * CHECK IF *PMFT* FILE
05800 M00S04261.pfm +++| DFRB EQU *-1
05801 M00S04262.pfm +++| NJN DFR7 IF NOT *PMFT* FILE
05802 M00S04263.pfm +++| RJM CPF CHECK FOR PRESERVED FILE
05803 M00S04264.pfm +++| PJN DFR7 IF FILE NOT PRESERVED
05804 M00S04265.pfm +++| NFA FA,R READ FILE NAME FOR MESSAGE
05805 M00S04266.pfm +++| ADK FNTL
05806 M00S04267.pfm +++| CRD FN
05807 M00S04268.pfm +++| LJM DFR4 RETURN FILE TYPE ERROR
05808 M00S04269.pfm +++|
05809 M00S04270.pfm +++| DFR7 LJM DFR20 COMPLETE PROCESSING
05810 M00S04271.pfm +++|
05811 M00S04272.pfm +++|
05812 M00S04273.pfm +++| DFR8 MJN DFR8.1 IF NOT DIRECT ACCESS DEVICE ERROR
05813 M00S04274.pfm +++| ERROR DAD,CH,IW * DIRECT ACCESS DEVICE ERROR.*
05814 M00S04275.pfm +++|
05815 M00S04276.pfm +++| DFR8.1 ADN 1
05816 M00S04277.pfm +++| ZJN DFR9 IF DEVICE UNAVAILABLE
| Line S04278 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05817 M01S04278.242l642 ---| ADN 2
05818 M01S04279.242l642 ---| ZJN DFR8.2 IF *PF UTILITY ACTIVE*
05819 M00S04280.pfm +++| ERROR LNP,CH,IW,,SVE * ACCESS LEVEL NOT VALID ON PF DEVICE*
05820 M00S04281.pfm +++|
| Line S04282 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05821 M01S04282.242l642 ---| DFR8.2 ERROR PFA,CH,IW,,EC2 *PF UTILITY ACTIVE.*
05822 M01S04283.242l642 ---|
05823 M00S04284.pfm +++| DFR9 ERROR PFN,CH,IW * DEVICE UNAVAILABLE.*
| Line S00004 Modification History |
M01 (Added by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05824 M01S00004.pfm39 +++|
05825 M01S00005.pfm39 +++|* IF NO ACCESSIBLE DEVICE WITH SUFFICIENT SPACE IS FOUND,
05826 M01S00006.pfm39 +++|* *DFRC* WILL BE THE STATUS FOR THE MOST ACCESSIBLE DEVICE
05827 M01S00007.pfm39 +++|* WHICH WAS ALMOST (BUT NOT QUITE) SELECTED.
05828 M01S00008.pfm39 +++|
05829 M01S00009.pfm39 +++| DFR9.1 LDC 77 DEVICE STATUS FOR NO DEVICE FOUND
05830 M01S00010.pfm39 +++|* LDC (STATUS) (STATUS FOR DEVICE WITH NO SPACE)
05831 M01S00011.pfm39 +++| DFRC EQU *-1
05832 M01S00012.pfm39 +++| SBN 3
05833 M01S00013.pfm39 +++| PJN DFR9 IF DEVICE INACCESSIBLE OR NO DEVICE FOUND
05834 M01S00014.pfm39 +++| ERROR SPN,CH,IW *REQUESTED SPACE UNAVAILABLE.*
05835 M00S04285.pfm +++|
05836 M00S04286.pfm +++|* FILE DOES NOT EXIST - DETERMINE PROPER DEVICE FOR FILE.
05837 M00S04287.pfm +++|
05838 M00S04288.pfm +++| DFR10 AOM LFEF SET EMPTY FILE
05839 M00S04289.pfm +++| RJM SFA
05840 M00S04290.pfm +++| ADN 1
05841 M00S04291.pfm +++| CRD CM
05842 M00S04292.pfm +++| LDD CM SET DEVICE TYPE REQUESTED
05843 M00S04293.pfm +++| STD P0
05844 M00S04294.pfm +++| LPC 3777 SET TYPE REQUESTED IN CATALOG
05845 M00S04295.pfm +++| RAM DFRA
| Line S04296 Modification History |
M01 (Removed by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05846 M01S04296.pfm39 ---| LDN 0
| Line S00015 Modification History |
M01 (Added by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05847 M01S00015.pfm39 +++| LDM FETL CHECK FET LENGTH
05848 M01S00016.pfm39 +++| SBN CFOU+1
05849 M01S00017.pfm39 +++| MJN DFR10.1 IF NOT LONG ENOUGH TO REQUEST SPACE
05850 M01S00018.pfm39 +++| RJM SFA
05851 M01S00019.pfm39 +++| ADN CFOU
05852 M01S00020.pfm39 +++| CRD CM
05853 M01S00021.pfm39 +++| LDD CM+3
05854 M01S00022.pfm39 +++| STD LF
05855 M01S00023.pfm39 +++| ADD CM+4
05856 M01S00024.pfm39 +++| ZJN DFR10.1 IF SPACE NOT SPECIFIED
05857 M01S00025.pfm39 +++| AOM DFRD SET SPACE REQUIRED CHECK
05858 M01S00026.pfm39 +++| LDD CM+4
05859 M01S00027.pfm39 +++| STD LF+1
05860 M01S00028.pfm39 +++| DFR10.1 LDN 0
05861 M01S00029.pfm39 +++| STD SA
05862 M01S00030.pfm39 +++| STD SA+1
05863 M00S04297.pfm +++| STD FS
| Line S04298 Modification History |
M01 (Removed by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05864 M01S04298.pfm39 ---| STD P1
| Line S00486 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05865 M01S00486.242l642 +++| LDN 77 INITIALIZE DEVICE STATUS
05866 M01S00487.242l642 +++| STD P2
05867 M00S04299.pfm +++| RJM DDN DETERMINE DEVICE NAME
05868 M00S04300.pfm +++| LDN ESTP READ EST POINTER
05869 M00S04301.pfm +++| CRD T1
05870 M00S04302.pfm +++| LDD T1+3 SET LAST MASS STORAGE ORDINAL + 1
05871 M00S04303.pfm +++| STD T1
05872 M00S04304.pfm +++| LDN NOPE-1 INITIALIZE EST ORDINAL FOR SEARCH
05873 M00S04305.pfm +++| STD T2
| Line S04306 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05874 M01S04306.242l642 ---| STD T2
05875 M00S04307.pfm +++|
05876 M00S04308.pfm +++|* CHECK NEXT DEVICE.
05877 M00S04309.pfm +++|
05878 M00S04310.pfm +++| DFR11 AOD T2 ADVANCE EST ORDINAL
05879 M00S04311.pfm +++| LMD T1
05880 M00S04312.pfm +++| NJN DFR12 IF MORE DEVICES TO CHECK
05881 M00S04313.pfm +++| LDD FS
| Line S04314 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05882 M01S04314.242l642 ---| ZJN DFR9 IF NO EQUIPMENT FOUND
| Line S00488 Modification History |
M01 (Added by) | 242l642 |
M02 (Removed by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05883 M02S00488.pfm39 ---| ZJP DFR9 IF NO EQUIPMENT FOUND
| Line S00031 Modification History |
M01 (Added by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05884 M01S00031.pfm39 +++| ZJP DFR9.1 IF NO DEVICE FOUND
| Line S00489 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05885 M01S00489.242l642 +++| LDD P2
05886 M01S00490.242l642 +++| RJM PDS PROCESS DEVICE STATUS
| Line S04315 Modification History |
M01 (Removed by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05887 M01S04315.pfm39 ---| LJM DFR14 CHECK DEVICE SPACE
| Line S00032 Modification History |
M01 (Added by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05888 M01S00032.pfm39 +++| LJM DFR14 SET UP FNT AND EXIT
05889 M00S04316.pfm +++|
05890 M00S04317.pfm +++| DFR12 SFA EST,T2 READ EST ENTRY
05891 M00S04318.pfm +++| ADK EQDE
05892 M00S04319.pfm +++| CRD T3
05893 M00S04320.pfm +++| LDD P0
05894 M00S04321.pfm +++| ZJN DFR13 IF DEVICE TYPE NOT REQUESTED
05895 M00S04322.pfm +++| LMD T3+3
| Line S04323 Modification History |
M01 (Removed by) | 252l678 |
Seq # *Modification Id* Act
----------------------------+
05896 M01S04323.252l678 ---| LPC 3777
05897 M00S04324.pfm +++| NJN DFR11 IF NOT PROPER DEVICE TYPE
05898 M00S04325.pfm +++| DFR13 RJM CPR CHECK FOR PROPER RESIDENCE
05899 M00S04326.pfm +++| NJN DFR11 IF NOT PROPER DEVICE
| Line S00491 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05900 M01S00491.242l642 +++| RJM CDA CHECK DEVICE ACCESSIBILITY
| Line S00492 Modification History |
M01 (Added by) | 242l642 |
M02 (Removed by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05901 M02S00492.pfm39 ---| STD T0 STATUS OF CURRENT DEVICE
| Line S00033 Modification History |
M01 (Added by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05902 M01S00033.pfm39 +++| STD P1 SAVE STATUS OF CURRENT DEVICE
05903 M00S04327.pfm +++|
| Line S04328 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05904 M01S04328.242l642 ---|* DETERMINE IF THIS DEVICE HAS MAXIMUM SPACE AVAILABLE.
| Line S00493 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05905 M01S00493.242l642 +++|* SELECT MOST ACCESSIBLE DEVICE WITH MOST AVAILABLE SPACE.
05906 M00S04329.pfm +++|
| Line S04330 Modification History |
M01 (Removed by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05907 M01S04330.pfm39 ---| LDD T3+4 READ TDGL WORD OF MST
05908 M01S04331.pfm39 ---| SHN 3
05909 M01S04332.pfm39 ---| ADK TDGL
05910 M01S04333.pfm39 ---| CRD CM
| Line S00034 Modification History |
M01 (Added by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05911 M01S00034.pfm39 +++| RJM DSA DETERMINE SPACE AVAILABLE
| Line S04334 Modification History |
M01 (Removed by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05912 M01S04334.242l642 ---| LDD CM+4 CHECK AVAILABLE TRACKS
| Line S00494 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05913 M01S00494.242l642 +++| LDD P2 COMPARE STATUS OF DEVICES
| Line S00495 Modification History |
M01 (Added by) | 242l642 |
M02 (Removed by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05914 M02S00495.pfm39 ---| SBD T0
| Line S00035 Modification History |
M01 (Added by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05915 M01S00035.pfm39 +++| SBD P1
| Line S00496 Modification History |
M01 (Added by) | 242l642 |
Seq # *Modification Id* Act
----------------------------+
05916 M01S00496.242l642 +++| ZJN DFR13.2 IF STATUS THE SAME
05917 M01S00497.242l642 +++| PJN DFR13.3 IF CURRENT DEVICE MORE ACCESSIBLE
05918 M01S00498.242l642 +++| DFR13.1 UJP DFR11 CHECK NEXT DEVICE
05919 M01S00499.242l642 +++|
| Line S00500 Modification History |
M01 (Added by) | 242l642 |
M02 (Removed by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05920 M02S00500.pfm39 ---| DFR13.2 LDD CM+4 CHECK AVAILABLE TRACKS
| Line S04335 Modification History |
M01 (Removed by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05921 M01S04335.pfm39 ---| SBD P1
| Line S04336 Modification History |
M01 (Removed by) | 242l642 |
M02 (Removed by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05922 M02S04336.pfm39 ---| MJN DFR11 IF NOT MAXIMUM AVAILABLE SPACE
05923 M02S04337.pfm39 ---| LDD CM+4 SET THIS DEVICE AS MAXIMUM
| Line S00501 Modification History |
M01 (Added by) | 242l642 |
M02 (Removed by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05924 M02S00501.pfm39 ---| MJN DFR13.1 IF NOT MAXIMUM AVAILABLE SPACE
05925 M02S00502.pfm39 ---| DFR13.3 LDD CM+4 SELECT THIS DEVICE
| Line S04338 Modification History |
M01 (Removed by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05926 M01S04338.pfm39 ---| STD P1
| Line S00036 Modification History |
M01 (Added by) | pfm39 |
Seq # *Modification Id* Act
----------------------------+
05927 M01S00036.pfm39 +++| DFR13.2 LDD CM COMPARE SECTORS AVAILABLE