cdc:nos2.source:opl.opl871:deck:pfm.003
Deck PFM Part 003
95 Modifications
Listing Sections
- Deck PFM Start
- Deck PFM Part 1 (Line 1496)
- Deck PFM Part 2 (Line 2779)
- Deck PFM Part 3 (Line 4327)
- Deck PFM Part 4 (Line 5928)
- Deck PFM Part 5 (Line 7505)
- Deck PFM Part 6 (Line 8827)
- Deck PFM Part 7 (Line 10151)
- Deck PFM Part 8 (Line 11613)
- Deck PFM Part 9 (Line 13038)
- Deck PFM Part 10 (Line 14497)
- Deck PFM Part 11 (Line 15803)
- Deck PFM Part 12 (Line 17019)
- Deck PFM Part 13 (Line 18417)
- Deck PFM Part 14 (Line 19621)
- Deck PFM Part 15 (Line 20842)
- Deck PFM Part 16 (Line 22356)
Source
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
Proceed to Part 4
cdc/nos2.source/opl.opl871/deck/pfm.003.txt · Last modified: by 127.0.0.1