cdc:nos2.source:opl.opl871:deck:profile.001
Deck PROFILE Part 001
21 Modifications
Listing Sections
- Deck PROFILE Start
- Deck PROFILE Part 1 (Line 1458)
- Deck PROFILE Part 2 (Line 3110)
- Deck PROFILE Part 3 (Line 4966)
- Deck PROFILE Part 4 (Line 6276)
Source
Seq # *Modification Id* Act ----------------------------+ 01458 M01S01243.profile +++| SB2 PLOB * PROFILE FILE LIST COMPLETE.* 01459 M01S01244.profile +++| 01460 M01S01245.profile +++| PLO SUBR ENTRY/EXIT 01461 M01S01246.profile +++| SX6 B1 01462 M01S01247.profile +++| SA6 RA0+1 01463 M01S01248.profile +++| PLO1 SA0 B0 01464 M01S01249.profile +++| SX0 N 01465 M01S01250.profile +++| FUNC PNAT PICK NEXT ADDRESS - LEVEL-0 01466 M01S01251.profile +++| ZR X6,PLO7 IF END OF TABLE 0 01467 M01S01252.profile +++| SX6 X3 01468 M01S01253.profile +++| ZR X6,ERD41 IF NO LEVEL-1 CHAIN 01469 M01S01254.profile +++| SA6 RA1+1 01470 M01S01255.profile +++| BX6 X6-X6 EMPTY TABLE 1 01471 M01S01256.profile +++| SA6 L.TAB1 01472 M01S01257.profile +++| 01473 M01S01258.profile +++| PLO2 SA0 B1 01474 M01S01259.profile +++| SX0 N 01475 M01S01260.profile +++| FUNC PNAT PICK NEXT ADDRESS - LEVEL-1 01476 M01S01261.profile +++| ZR X6,PLO1 IF END OF TABLE 1 01477 M01S01262.profile +++| SX6 X3 01478 M01S01263.profile +++| SA6 RA2+1 01479 M01S01264.profile +++| SA5 LO 01480 M01S01265.profile +++| SX1 X5-FMLO 01481 M01S01266.profile +++| NG X1,PLO3 IF NOT MASTER USER LIST 01482 M01S01267.profile +++| SA1 A3-C.TAB1+1+CMUW 01483 M01S01268.profile +++| MX2 42 01484 M01S01269.profile +++| BX1 X1*X2 01485 M01S01270.profile +++| SA2 UN 01486 M01S01271.profile +++| BX2 X1-X2 01487 M01S01272.profile +++| NZ X2,PLO2 IF USER NOT MASTER USER 01488 M01S01273.profile +++| PLO3 SA0 A3-C.TAB1+1 FWA OF ENTRY 01489 M01S01274.profile +++| SA1 A0 CHARGE NUMBER 01490 M01S01275.profile +++| BX6 X1 01491 M01S01276.profile +++| SA6 CN 01492 M01S01277.profile +++| RJ SFN SPACE FILL NAME 01493 M01S01278.profile +++| SA6 OUTB+1 01494 M01S01279.profile +++| SA1 PLOA CHARGE NUMBER COUNTER 01495 M01S01280.profile +++| SX6 X1+B1 INCREMENT COUNTER 01496 M01S01281.profile +++| SA6 A1 01497 M01S01282.profile +++| RJ CDD DECIMAL DISPLAY CODE CONVERSION 01498 M01S01283.profile +++| LX6 12 INSERT *.* 01499 M01S01284.profile +++| MX1 -12 01500 M01S01285.profile +++| BX6 X1*X6 01501 M01S01286.profile +++| SX2 2R. 01502 M01S01287.profile +++| BX6 X2+X6 01503 M01S01288.profile +++| SA6 OUTB 01504 M01S01289.profile +++| SB2 B1+B1 PRESET WORD COUNT TO WRITE 01505 M01S01290.profile +++| SX2 X5-FMLO 01506 M01S01291.profile +++| PL X2,PLO4 IF MASTER USER LIST 01507 M01S01292.profile +++| SX2 X5-FSLO 01508 M01S01293.profile +++| ZR X2,PLO4 IF FULL LIST 01509 M01S01294.profile +++| SA1 A0+CMUW 01510 M01S01295.profile +++| MX2 42 01511 M01S01296.profile +++| BX6 X1*X2 01512 M01S01297.profile +++| ZR X6,PLO4 IF NO MASTER USER PRESENT
| Line S01298 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01513 M02S01298.v23l617 ---| SA6 OUTB+3 DISPLAY MASTER USER NUMBER 01514 M01S00043.v23l617 +++| SA6 OUTB+3 DISPLAY MASTER USER NAME 01515 M01S01299.profile +++| SA1 =1H 01516 M01S01300.profile +++| BX6 X1 01517 M01S01301.profile +++| SA6 A6-B1 01518 M01S01302.profile +++| SB2 4 01519 M01S01303.profile +++| PLO4 WRITH O,OUTB,B2 01520 M01S01304.profile +++| SX2 X5-CSLO 01521 M01S01305.profile +++| ZR X2,PLO2 IF CHARGE NUMBER LIST 01522 M01S01306.profile +++| SX2 X5-CMLO 01523 M01S01307.profile +++| ZR X2,PLO2 IF MASTER USER CHARGE NUMBER LIST 01524 M01S01308.profile +++| SX2 X5-FSLO 01525 M01S01309.profile +++| ZR X2,PLO5 IF FULL LIST 01526 M01S01310.profile +++| SX2 X5-FMLO 01527 M01S01311.profile +++| ZR X2,PLO5 IF MASTER USER FULL LIST 01528 M01S01312.profile +++| RJ PNO PROJECT NUMBER LIST TO OUTPUT 01529 M01S01313.profile +++| EQ PLO2 LOOP 01530 M01S01314.profile +++| 01531 M01S01315.profile +++| PLO5 SX3 A0 01532 M01S01316.profile +++| RJ OCE OUTPUT CHARGE ENTRY 01533 M01S01317.profile +++| SA1 RA2+1 01534 M01S01318.profile +++| ZR X1,PLO2 IF NO LEVEL-2 CHAIN 01535 M01S01319.profile +++| BX6 X6-X6 EMPTY TABLE 2 01536 M01S01320.profile +++| SA6 L.TAB2 01537 M01S01321.profile +++| 01538 M01S01322.profile +++| PLO6 SA0 B1+B1 01539 M01S01323.profile +++| SX0 N 01540 M01S01324.profile +++| FUNC PNAT PICK NEXT ADDRESS - LEVEL-2 01541 M01S01325.profile +++| ZR X6,PLO2 IF END OF TABLE 2 01542 M01S01326.profile +++| SX7 X3 01543 M01S01327.profile +++| SA1 A3-C.TAB2+1 PROJECT NUMBER 01544 M01S01328.profile +++| BX6 X1 01545 M01S01329.profile +++| SA6 PN 01546 M01S01330.profile +++| SA1 A1+B1 01547 M01S01331.profile +++| BX6 X1 01548 M01S01332.profile +++| SA6 A6+B1 01549 M01S01333.profile +++| RJ OPE OUTPUT PROJECT ENTRY 01550 M01S01334.profile +++| EQ PLO6 LOOP 01551 M01S01335.profile +++| 01552 M01S01336.profile +++| PLOA CON 1 CHARGE NUMBER COUNTER 01553 M01S01337.profile +++| PLOB DATA L* PROFILE FILE LIST COMPLETE.* 01554 M01S01338.profile +++| PRF SPACE 4,10 01555 M01S01339.profile +++|** PRF - PROCESS REFORMAT OPTION. 01556 M01S01340.profile +++|* 01557 M01S01341.profile +++|* INACTIVE CHARGE/PROJECT NUMBERS ARE PURGED. 01558 M01S01342.profile +++|* 01559 M01S01343.profile +++|* EXIT (B2) = MESSAGE ADDRESS. 01560 M01S01344.profile +++|* 01561 M01S01345.profile +++|* CALLS ADB, FUH, MVE, NUE, PDE, PNA, PNE, RBA, STB, WDL, WTB. 01562 M01S01346.profile +++|* 01563 M01S01347.profile +++|* USES ALL REGISTERS. 01564 M01S01348.profile +++| 01565 M01S01349.profile +++| 01566 M01S01350.profile +++| PRF SUBR ENTRY/EXIT 01567 M01S01351.profile +++| SX6 B1 01568 M01S01352.profile +++| SA6 RA0+1 01569 M01S01353.profile +++| PRF1 SA0 B0 01570 M01S01354.profile +++| SX0 N 01571 M01S01355.profile +++| FUNC PNAT PICK NEXT ADDRESS - LEVEL-0 01572 M01S01356.profile +++| ZR X6,PRF11 IF END OF TABLE 0 01573 M01S01357.profile +++| SX6 X3 01574 M01S01358.profile +++| ZR X6,ERD30 IF NO LEVEL-1 CHAIN 01575 M01S01359.profile +++| SA6 RA1+1 01576 M01S01360.profile +++| 01577 M01S01361.profile +++| PRF2 SA0 B1 01578 M01S01362.profile +++| SX0 N 01579 M01S01363.profile +++| SX5 P 01580 M01S01364.profile +++| FUNC PNET PICK NEXT ENTRY - LEVEL-1 01581 M01S01365.profile +++| ZR X6,PRF1 IF END OF TABLE 1 01582 M01S01366.profile +++| SA1 A3-C.TAB1+1+CSRW 01583 M01S01367.profile +++| PL X1,PRF3 IF ACTIVE CHARGE NUMBER 01584 M01S01368.profile +++| BX6 X6-X6 CLEAR INACTIVE CHARGE NUMBER ENTRY 01585 M01S01369.profile +++| SA6 A3-C.TAB1+1 01586 M01S01370.profile +++| EQ PRF2 LOOP 01587 M01S01371.profile +++| 01588 M01S01372.profile +++| PRF3 SX6 X3 01589 M01S01373.profile +++| ZR X6,PRF2 IF NO LEVEL-2 CHAIN 01590 M01S01374.profile +++| SA6 RA2+1 01591 M01S01375.profile +++| SA1 F.TAB1 SAVE TABLE 1 INDEX OF ENTRY 01592 M01S01376.profile +++| SX2 A3-C.TAB1+1 01593 M01S01377.profile +++| IX6 X2-X1 01594 M01S01378.profile +++| SA6 T1IE 01595 M01S01379.profile +++| SA3 X2 CHARGE NUMBER 01596 M01S01380.profile +++| BX6 X3 01597 M01S01381.profile +++| SA6 CN 01598 M01S01382.profile +++| BX6 X6-X6 EMPTY TABLE 2 01599 M01S01383.profile +++| SA6 L.TAB2 01600 M01S01384.profile +++| 01601 M01S01385.profile +++| PRF4 SA0 B1+B1 01602 M01S01386.profile +++| SX0 N 01603 M01S01387.profile +++| SX5 P 01604 M01S01388.profile +++| FUNC PNET PICK NEXT ENTRY - LEVEL-2 01605 M01S01389.profile +++| ZR X6,PRF10 IF END OF TABLE 2 01606 M01S01390.profile +++| SX7 X3 01607 M01S01391.profile +++| SA1 F.TAB2 SAVE TABLE 2 INDEX OF ENTRY 01608 M01S01392.profile +++| SX2 A3-C.TAB2+1 01609 M01S01393.profile +++| IX6 X2-X1 01610 M01S01394.profile +++| SA6 T2IE 01611 M01S01395.profile +++| BX6 X6-X6 CLEAR LINK WORD OF ENTRY 01612 M01S01396.profile +++| SA6 A3 01613 M01S01397.profile +++| SA3 X2 PROJECT NUMBER 01614 M01S01398.profile +++| BX6 X3 01615 M01S01399.profile +++| SA6 PN 01616 M01S01400.profile +++| SA3 A3+B1 01617 M01S01401.profile +++| BX6 X3 01618 M01S01402.profile +++| SA6 A6+B1 01619 M01S01403.profile +++| SX0 N 01620 M01S01404.profile +++| RJ ADB ADD DATA LEVEL BLOCK 01621 M01S01405.profile +++| SA1 A5+PTMW 01622 M01S01406.profile +++| PL X1,PRF5 IF ACTIVE PROJECT NUMBER 01623 M01S01407.profile +++| SA1 F.TAB2 CLEAR INACTIVE PROJECT NUMBER ENTRY 01624 M01S01408.profile +++| SA2 T2IE 01625 M01S01409.profile +++| IX1 X1+X2 01626 M01S01410.profile +++| BX6 X6-X6 01627 M01S01411.profile +++| SA6 X1 01628 M01S01412.profile +++| EQ PRF4 LOOP 01629 M01S01413.profile +++| 01630 M01S01414.profile +++| PRF5 MOVE C.TAB3,A5,D3AA SAVE PROJECT ENTRY 01631 M01S01415.profile +++| SA1 D3AA CLEAR ENTRY,S WORD POINTER 01632 M01S01416.profile +++| MX2 12 01633 M01S01417.profile +++| LX2 -12 01634 M01S01418.profile +++| BX6 -X2*X1 01635 M01S01419.profile +++| SA6 A1 01636 M01S01420.profile +++| SA5 T2IE 01637 M01S01421.profile +++| SX0 P 01638 M01S01422.profile +++| RJ PDE PROCESS DATA LEVEL ENTRY 01639 M01S01423.profile +++| MOVE C.TAB3,D3AA,X0 01640 M01S01424.profile +++| SX1 B1 READ IN ALL OVERFLOW BLOCKS
| Line S01425 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01641 M02S01425.v23l617 ---| PRF6 RJ NUE NEXT USER NUMBER ENTRY 01642 M01S00044.v23l617 +++| PRF6 RJ NUE NEXT USER NAME ENTRY 01643 M01S01426.profile +++| NZ B2,PRF7 IF END OF LEVEL-3 CHAIN 01644 M01S01427.profile +++| SX1 X1 01645 M01S01428.profile +++| ZR X1,PRF6 IF NOT END OF LIST 01646 M01S01429.profile +++| PRF7 SA1 F.TAB3
| Line S01430 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01647 M02S01430.v23l617 ---| RJ FUH FILL USER NUMBER HOLES 01648 M01S00045.v23l617 +++| RJ FUH FILL USER NAME HOLES 01649 M01S01431.profile +++| SA2 T3IE CLEAR ALL LEVEL-3 LINKS 01650 M01S01432.profile +++| IX2 X1+X2 01651 M01S01433.profile +++| SA2 X2 01652 M01S01434.profile +++| MX3 42 FIRST LEVEL-3 BLOCK 01653 M01S01435.profile +++| BX6 X3*X2 01654 M01S01436.profile +++| SA6 A2 01655 M01S01437.profile +++| SB2 X1 OVERFLOW BLOCKS 01656 M01S01438.profile +++| SA4 L.TAB3 01657 M01S01439.profile +++| SB3 X4+B2 01658 M01S01440.profile +++| PRF8 SB2 B2+PRUS 01659 M01S01441.profile +++| EQ B2,B3,PRF9 IF THRU ALL OVERFLOW BLOCKS 01660 M01S01442.profile +++| GT B2,B3,ERD2 IF ERROR 01661 M01S01443.profile +++| SA4 B2 01662 M01S01444.profile +++| BX6 X4*X3 01663 M01S01445.profile +++| SA6 A4 01664 M01S01446.profile +++| EQ PRF8 LOOP 01665 M01S01447.profile +++| 01666 M01S01448.profile +++| PRF9 SX6 B1 FORCE WRITE OF TABLE 3 01667 M01S01449.profile +++| SA6 FUP3 01668 M01S01450.profile +++| RJ WDL WRITE DATA LEVEL 01669 M01S01451.profile +++| EQ PRF4 LOOP 01670 M01S01452.profile +++| 01671 M01S01453.profile +++| PRF10 SA0 B1+B1 01672 M01S01454.profile +++| FUNC STBT SORT TABLE 2 01673 M01S01455.profile +++| SX5 P 01674 M01S01456.profile +++| FUNC RBAT RESET BLOCK ADDRESSES - LEVEL-2 01675 M01S01457.profile +++| SA1 T1IE LEVEL-2 RANDOM ADDRESS 01676 M01S01458.profile +++| SA2 F.TAB1 01677 M01S01459.profile +++| IX1 X1+X2 01678 M01S01460.profile +++| SA3 X1+C.TAB1-1 01679 M01S01461.profile +++| MX4 42 01680 M01S01462.profile +++| BX4 X4*X3 01681 M01S01463.profile +++| BX6 X4+X6 01682 M01S01464.profile +++| SA6 A3 01683 M01S01465.profile +++| EQ PRF2 LOOP 01684 M01S01466.profile +++| 01685 M01S01467.profile +++| PRF11 SA6 RA0+1 CLEAR LINK 01686 M01S01468.profile +++| SA6 L.TAB0 EMPTY TABLE 0 01687 M01S01469.profile +++| SX6 B1 INDICATE LEVEL-1 BUILD 01688 M01S01470.profile +++| SA6 CZ 01689 M01S01471.profile +++| SA0 B1 01690 M01S01472.profile +++| FUNC STBT SORT TABLE 1 01691 M01S01473.profile +++| SX5 P 01692 M01S01474.profile +++| FUNC RBAT RESET BLOCK ADDRESSES - LEVEL-1 01693 M01S01475.profile +++| SA0 B0 01694 M01S01476.profile +++| FUNC STBT SORT TABLE 0 01695 M01S01477.profile +++| BX0 X0-X0 01696 M01S01478.profile +++| SX5 P 01697 M01S01479.profile +++| FUNC WTBT WRITE TABLE 0 01698 M01S01480.profile +++| PURGE N,,,,,IP 01699 M01S01481.profile +++| CHANGE P,,(N+CFPN),,,,,,,IP 01700 M01S01482.profile +++| SB2 PRFA 01701 M01S01483.profile +++| EQ PRFX 01702 M01S01484.profile +++| 01703 M01S01485.profile +++| PRFA DATA L* PROFILE FILE REFORMAT COMPLETE.* 01704 M01S01486.profile +++| PUD SPACE 4 01705 M01S01487.profile +++|** PUD - PROCESS UPDATE DATA. 01706 M01S01488.profile +++|* 01707 M01S01489.profile +++|* EXIT (B2) = MESSAGE ADDRESS. 01708 M01S01490.profile +++|* 01709 M01S01491.profile +++|* CALLS DIP, WOL. 01710 M01S01492.profile +++|* 01711 M01S01493.profile +++|* USES ALL REGISTERS. 01712 M01S01494.profile +++| 01713 M01S01495.profile +++| 01714 M01S01496.profile +++| PUD SUBR ENTRY/EXIT 01715 M01S01497.profile +++| SX6 B1 SET UPDATE INDICATOR 01716 M01S01498.profile +++| SA6 UF 01717 M01S01499.profile +++| SA2 OP 01718 M01S01500.profile +++| SX3 X2-KOPT 01719 M01S01501.profile +++| ZR X3,PUD2 IF K-DISPLAY 01720 M01S01502.profile +++| SX3 X2-COPT 01721 M01S01503.profile +++| ZR X3,PUD2 IF CREATE OVERFLOW 01722 M01S01504.profile +++| SX2 X2-TOPT 01723 M01S01505.profile +++| SX6 UOPT 01724 M01S01506.profile +++| SA6 A2 01725 M01S01507.profile +++| SA1 PI
| Line S01508 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01726 M02S01508.v23l617 ---| NZ X1,PUD2 IF NOT TIMESHARING/INPUT 01727 M01S00046.v23l617 +++| NZ X1,PUD2 IF NOT INTERACTIVE/INPUT 01728 M01S01509.profile +++| ZR X2,PUD2 IF *T* OPTION 01729 M01S01510.profile +++| SB2 PUDL1 PRESET 01730 M01S01511.profile +++| SA1 ACCC 01731 M01S01512.profile +++| SX1 X1-2 01732 M01S01513.profile +++| PL X1,PUD1 IF RESTRICTED DIRECTIVE LIST 01733 M01S01514.profile +++| SB2 PUDL2 01734 M01S01515.profile +++| PUD1 WRITH O,PUDB,B2 01735 M01S01516.profile +++| WRITH O,PUDC,PUDL3 01736 M01S01517.profile +++| PUD2 RJ DIP DIRECTIVE INPUT PROCESSOR 01737 M01S01518.profile +++| BX6 X6-X6 CLEAR DISPLAYS 01738 M01S01519.profile +++| SA6 DSA+1 01739 M01S01520.profile +++| SB2 PUDA 01740 M01S01521.profile +++| EQ PUDX 01741 M01S01522.profile +++| 01742 M01S01523.profile +++| PUDA DATA L* PROFILE FILE UPDATE COMPLETE. * 01743 M01S01524.profile +++| 01744 M01S01525.profile +++|* THE FOLLOWING IS OUTPUTTED FOR TERMINAL JOBS HAVING *OP=U*. 01745 M01S01526.profile +++| 01746 M01S01527.profile +++| PUDB BSS 0 01747 M01S01528.profile +++| DIS ,* THE FOLLOWING ARE VALID INPUT DIRECTIVES FOR* 01748 M01S01529.profile +++| DIS ,* UPDATE-* 01749 M01S01530.profile +++| DIS ,* CN OR / - CHARGE NUMBER.* 01750 M01S01531.profile +++| DIS ,* PN - PROJECT NUMBER.* 01751 M01S01532.profile +++| DIS ,* APN - ADD OR ACTIVATE PROJECT NUMBER.* 01752 M01S01533.profile +++| DIS ,* DPN - DEACTIVATE PROJECT NUMBER.* 01753 M01S01534.profile +++| DIS ,* PEX - PROJECT NUMBER EXPIRATION DATE.* 01754 M01S01535.profile +++| DIS ,* TI - TIME IN.* 01755 M01S01536.profile +++| DIS ,* TO - TIME OFF.* 01756 M01S00108.ns22000 +++| DIS ,* PFN - PROLOGUE FILE NAME.*
| Line S00109 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | profi13 |
Seq # *Modification Id* Act ----------------------------+ 01757 M02S00109.profi13 ---| DIS ,* PUN - PROLOGUE USERNAME.* 01758 M01S00041.profi13 +++| DIS ,* PUN - PROLOGUE USER NAME.* 01759 M01S00110.ns22000 +++| DIS ,* PPW - PROLOGUE PASSWORD.* 01760 M01S00111.ns22000 +++| DIS ,* PCR - PROLOGUE CHARGE REQUIRED OPTION.* 01761 M01S00112.ns22000 +++| DIS ,* NULL - CHARGE REQUIRED NOT SET.* 01762 M01S00113.ns22000 +++| DIS ,* U - UNCONDITIONAL.* 01763 M01S00114.ns22000 +++| DIS ,* A - ON ABORT.* 01764 M01S00115.ns22000 +++| DIS ,* EFN - EPILOGUE FILE NAME.*
| Line S00116 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | profi13 |
Seq # *Modification Id* Act ----------------------------+ 01765 M02S00116.profi13 ---| DIS ,* EUN - EPILOGUE USERNAME.* 01766 M01S00042.profi13 +++| DIS ,* EUN - EPILOGUE USER NAME.* 01767 M01S00117.ns22000 +++| DIS ,* EPW - EPILOGUE PASSWORD.* 01768 M01S01537.profile +++| DIS ,* ISV - SRU VALIDATION LIMIT INDEX.* 01769 M01S01538.profile +++| DIS ,* SML - SRU MASTER USER LIMIT.* 01770 M01S01539.profile +++| DIS ,* SMA - SRU MASTER USER ACCUMULATOR.*
| Line S01540 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01771 M02S01540.v23l617 ---| DIS ,* AUN - ADD USER NUMBER.*
| Line S01541 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01772 M02S01541.v23l617 ---| DIS ,* DUN - DELETE USER NUMBER.* 01773 M01S00047.v23l617 +++| DIS ,* AUN - ADD USER NAME.* 01774 M01S00048.v23l617 +++| DIS ,* DUN - DELETE USER NAME.* 01775 M01S01542.profile +++| PUDL1 EQU *-PUDB 01776 M01S01543.profile +++| DIS ,* ACN - ADD OR ACTIVATE CHARGE NUMBER.* 01777 M01S01544.profile +++| DIS ,* DCN - DEACTIVATE CHARGE NUMBER.*
| Line S01545 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01778 M02S01545.v23l617 ---| DIS ,* MU - MASTER USER NUMBER.* 01779 M01S00049.v23l617 +++| DIS ,* MU - MASTER USER NAME.* 01780 M01S01546.profile +++| DIS ,* PCL - PROJECT COUNT LIMIT.* 01781 M01S01547.profile +++| DIS ,* M1 - M4 - SRU MULTIPLIER INDICES.* 01782 M01S01548.profile +++| DIS ,* AD - SRU CONSTANT INDEX.* 01783 M01S01549.profile +++| DIS ,* CEX - CHARGE NUMBER EXPIRATION DATE.* 01784 M01S01550.profile +++| DIS ,* ISL - INSTALLATION SRU LIMIT INDEX.* 01785 M01S01551.profile +++| DIS ,* IR1 - IR8 - INSTALLATION LIMIT INDICES.* 01786 M01S01552.profile +++| DIS ,* SIL - SRU INSTALLATION LIMIT.* 01787 M01S01553.profile +++| DIS ,* SIA - SRU INSTALLATION ACCUMULATOR.* 01788 M01S01554.profile +++| DIS ,* LR1 - LR8 - INSTALLATION LIMIT REGISTERS.* 01789 M01S01555.profile +++| DIS ,* AR1 - AR8 - INSTALLATION ACCUMULATORS.* 01790 M01S01556.profile +++| PUDL2 EQU *-PUDB 01791 M01S01557.profile +++| 01792 M01S01558.profile +++| PUDC DATA L* A NULL LINE COMPLETES DIRECTIVE INPUT PROCESSING. * 01793 M01S01559.profile +++| CON 0 BLANK LINE 01794 M01S01560.profile +++| PUDL3 EQU *-PUDC 01795 M01S01561.profile +++| TITLE LIST/INQUIRE SUBROUTINES. 01796 M01S01562.profile +++| CEO SPACE 4,10 01797 M01S01563.profile +++| ABD SPACE 4,10 01798 M01S01564.profile +++|** ABD - ASSEMBLE DIRECTIVE OR DATA. 01799 M01S01565.profile +++|* 01800 M01S01566.profile +++|* ASSEMBLES AND VERIFIES DIRECTIVE IDENTIFIERS, OR ASSEMBLES 01801 M01S01567.profile +++|* AND VERIFIES DATA. 01802 M01S01568.profile +++|* 01803 M01S01569.profile +++|* ENTRY (B2) = DIRECTIVE TABLE ADDRESS, IF DIRECTIVE ASSEMBLY. 01804 M01S01570.profile +++|* (B2) = NEGATIVE OF MAXIMUM NUMBER OF CHARACTERS, 01805 M01S01571.profile +++|* IF DATA ASSEMBLY. 01806 M01S01572.profile +++|* 01807 M01S01573.profile +++|* EXIT (B5) .LT. 0, IF EOF ENCOUNTERED. 01808 M01S01574.profile +++|* (B5) = 0, IF ASSEMBLY COMPLETE. 01809 M01S01575.profile +++|* (B5) .GT. 0, IF */* ENCOUNTERED (DIRECTIVE ASSEMBLY). 01810 M01S01576.profile +++|* (B4) = INDEX OF ENTRY IN TABLE OF DIRECTIVES, 01811 M01S01577.profile +++|* IF DIRECTIVE ASSEMBLY. 01812 M01S01578.profile +++|* TO ABM, IF ERROR. 01813 M01S01579.profile +++|* (B3) = ERROR MESSAGE ADDRESS. 01814 M01S01580.profile +++|* 01815 M01S01581.profile +++|* USES A - 1, 2, 3, 4, 6. 01816 M01S01582.profile +++|* B - 2, 3, 4, 5. 01817 M01S01583.profile +++|* X - 1, 2, 3, 4, 6. 01818 M01S01584.profile +++|* 01819 M01S01585.profile +++|* CALLS ACI. 01820 M01S01586.profile +++| 01821 M01S01587.profile +++| 01822 M01S01588.profile +++| ABD4 SA4 CBUF 01823 M01S01589.profile +++| ZR B6,ABDX IF ENTRY TERMINATION 01824 M01S01590.profile +++| ZR X4,ABD1 IF NO CHARACTERS ASSEMBLED
| Line S01591 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01825 M02S01591.v23l617 ---| NZ B2,ABM IF ILLEGAL SEPARATOR 01826 M01S00050.v23l617 +++| NZ B2,ABM IF INCORRECT SEPARATOR 01827 M01S01592.profile +++| SB5 B0 01828 M01S01593.profile +++| SB4 -B1 01829 M01S01594.profile +++| ABD5 SB4 B4+B1 01830 M01S01595.profile +++| SA1 X3+B4 01831 M01S01596.profile +++| ZR X1,ABM IF DIRECTIVE NOT FOUND 01832 M01S01597.profile +++| BX1 X1-X4 01833 M01S01598.profile +++| NZ X1,ABD5 IF NO MATCH 01834 M01S01599.profile +++| 01835 M01S01600.profile +++| ABD SUBR ENTRY/EXIT 01836 M01S01601.profile +++| SX6 B2+ 01837 M01S01602.profile +++| SA6 ABDA
| Line S01603 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | profi2 |
Seq # *Modification Id* Act ----------------------------+ 01838 M02S01603.profi2 ---| ABD1 BX1 X1-X1 ALLOW NO SPECIAL CHARACTERS 01839 M01S00001.profi2 +++| ABD1 SA1 ABDB ALLOW ASTERISK SPECIAL CHARACTER 01840 M01S01604.profile +++| RJ ACI ASSEMBLE CHARACTERS INTERFACE
| Line S01605 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01841 M02S01605.v23l617 ---| SB3 ERUA **** ILLEGAL DIRECTIVE 01842 M01S00051.v23l617 +++| SB3 ERUA **** INCORRECT DIRECTIVE 01843 M01S01606.profile +++| SA3 ABDA 01844 M01S01607.profile +++| SA2 PI 01845 M01S01608.profile +++| SA1 ET 01846 M01S01609.profile +++| SB2 B5-1R= 01847 M01S01610.profile +++| SB5 X1+ 01848 M01S01611.profile +++| PL X3,ABD4 IF DIRECTIVE ASSEMBLY 01849 M01S01612.profile +++| NZ X2,ABD2 IF NOT TERMINAL INPUT 01850 M01S01613.profile +++| NZ B6,ABD3 IF NOT ENTRY TERMINATION 01851 M01S01614.profile +++| NG X1,ABDX IF EOF ENCOUNTERED 01852 M01S01615.profile +++| EQ ABM ERROR - */* ENCOUNTERED 01853 M01S01616.profile +++|
| Line S01617 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01854 M02S01617.v23l617 ---| ABD2 ZR B6,ABM IF ILLEGAL ENTRY TERMINATION 01855 M01S00052.v23l617 +++| ABD2 ZR B6,ABM IF INCORRECT ENTRY TERMINATION 01856 M01S01618.profile +++| ABD3 SX3 X3-1
| Line S01619 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01857 M02S01619.v23l617 ---| ZR B2,ABM IF ILLEGAL SEPARATOR 01858 M01S00053.v23l617 +++| ZR B2,ABM IF INCORRECT SEPARATOR 01859 M01S01620.profile +++| IX4 X4+X3 01860 M01S01621.profile +++| SB5 B0 01861 M01S01622.profile +++| SB3 ERUB **** TOO MANY CHARACTERS IN VALUE 01862 M01S01623.profile +++| PL X4,ABM IF DATA TOO LONG 01863 M01S01624.profile +++| EQ ABDX RETURN 01864 M01S01625.profile +++| 01865 M01S01626.profile +++| 01866 M01S01627.profile +++| ABDA CON 0 HOLD FOR ENTRY CONDITION 01867 M01S00002.profi2 +++| ABDB BITCON (*) 01868 M01S01628.profile +++| CEO SPACE 4,10 01869 M01S01629.profile +++|** CEO - CHARGE ENTRY TO OUTPUT ASSEMBLY AREA. 01870 M01S01630.profile +++|* ASSEMBLY AREA OUTPUTTED A LINE AT A TIME (7 WORDS PER LINE). 01871 M01S01631.profile +++| 01872 M01S01632.profile +++| 01873 M01S01633.profile +++| CEO BSS 0 01874 M01S01634.profile +++| DATA L* CONTROLS FOR CHARGE NUMBER * 01875 M01S01635.profile +++| CEOB BSS 1 01876 M01S01636.profile +++| CEOL1 EQU *-CEO 01877 M01S01637.profile +++| CEZP BSS 0 01878 M01S01638.profile +++| DATA 1H 01879 M01S01639.profile +++| DATA L* CREATION DATE * 01880 M01S01640.profile +++| CEOC BSS 1 01881 M01S01641.profile +++| DATA L* EXPIRATION DATE * 01882 M01S01642.profile +++| CEOD BSS 1 01883 M01S01643.profile +++| DATA 1H 01884 M01S01644.profile +++| DATA L* ENTRY * 01885 M01S01645.profile +++| CEOE BSS 1 *ACTIVE* OR *INACTIVE* 01886 M01S01646.profile +++| DATA 1H 01887 M01S01647.profile +++| DATA L* PROJECT COUNT = * 01888 M01S01648.profile +++| CEOF BSS 1 01889 M01S01649.profile +++| DATA 1H 01890 M01S01650.profile +++| DATA L* MU = * 01891 M01S01651.profile +++| CEOG BSS 1 01892 M01S01652.profile +++| DATA 1H 01893 M01S01653.profile +++| DATA L* PCL = * 01894 M01S01654.profile +++| CEOH DIS 2, 01895 M01S01655.profile +++| DATA 1H 01896 M01S01656.profile +++| DATA L* ISL = * 01897 M01S01657.profile +++| CEOS BSS 1 01898 M01S01658.profile +++| BSS 1 SIL DEFAULT VALUE 01899 M01S01659.profile +++| DATA L* IR1 = * 01900 M01S01660.profile +++| CEOU BSS 1 01901 M01S01661.profile +++| BSS 1 LR1 DEFAULT VALUE 01902 M01S01662.profile +++| DATA 1H 01903 M01S01663.profile +++| DATA L* IR2 = * 01904 M01S01664.profile +++| CEOW BSS 1 01905 M01S01665.profile +++| BSS 1 LR2 DEFAULT VALUE 01906 M01S01666.profile +++| DATA L* IR3 = * 01907 M01S01667.profile +++| CEOY BSS 1 01908 M01S01668.profile +++| BSS 1 LR3 DEFAULT VALUE 01909 M01S01669.profile +++| DATA 1H 01910 M01S01670.profile +++| DATA L* IR4 = * 01911 M01S01671.profile +++| CEZB BSS 1 01912 M01S01672.profile +++| BSS 1 LR4 DEFAULT VALUE 01913 M01S01673.profile +++| DATA L* IR5 = * 01914 M01S01674.profile +++| CEZD BSS 1 01915 M01S01675.profile +++| BSS 1 LR5 DEFAULT VALUE 01916 M01S01676.profile +++| DATA 1H 01917 M01S01677.profile +++| DATA L* IR6 = * 01918 M01S01678.profile +++| CEZF BSS 1 01919 M01S01679.profile +++| BSS 1 LR6 DEFAULT VALUE 01920 M01S01680.profile +++| DATA L* IR7 = * 01921 M01S01681.profile +++| CEZH BSS 1 01922 M01S01682.profile +++| BSS 1 LR7 DEFAULT VALUE 01923 M01S01683.profile +++| DATA 1H 01924 M01S01684.profile +++| DATA L* IR8 = * 01925 M01S01685.profile +++| CEZJ BSS 1 01926 M01S01686.profile +++| BSS 1 LR8 DEFAULT VALUE 01927 M01S01687.profile +++| DIS 3, 01928 M01S01688.profile +++| CEOL2 EQU * 01929 M01S01689.profile +++| DATA 1H 01930 M01S01690.profile +++| DATA L* M1 = * 01931 M01S01691.profile +++| CEZK BSS 1 01932 M01S01692.profile +++| BSS 1 SRU MULTIPLIER 1 01933 M01S01693.profile +++| DATA L* M2 = * 01934 M01S01694.profile +++| CEZL BSS 1 01935 M01S01695.profile +++| BSS 1 SRU MULTIPLIER 2 01936 M01S01696.profile +++| DATA 1H 01937 M01S01697.profile +++| DATA L* M3 = * 01938 M01S01698.profile +++| CEZM BSS 1 01939 M01S01699.profile +++| BSS 1 SRU MULTIPLIER 3 01940 M01S01700.profile +++| DATA L* M4 = * 01941 M01S01701.profile +++| CEZN BSS 1 01942 M01S01702.profile +++| BSS 1 SRU MULTIPLIER 4 01943 M01S01703.profile +++| DATA 1H 01944 M01S01704.profile +++| DATA L* AD = * 01945 M01S01705.profile +++| CEZO BSS 1 01946 M01S01706.profile +++| BSS 1 SRU CONSTANT 01947 M01S01707.profile +++| DIS 3, 01948 M01S01708.profile +++| CEOL3 EQU * 01949 M01S01709.profile +++| OCE SPACE 4,10 01950 M01S01710.profile +++|** OCE - OUTPUT CHARGE ENTRY. 01951 M01S01711.profile +++|* 01952 M01S01712.profile +++|* ENTRY (X3) = FWA OF CHARGE ENTRY. 01953 M01S01713.profile +++|* (CN) = CHARGE NUMBER. 01954 M01S01714.profile +++|* (ACCC) .LT. 2, IF NO DISPLAY OF VALUES *M1* THRU *AD*. 01955 M01S01715.profile +++|* 01956 M01S01716.profile +++|* CALLS CPV, SFC, SFN, WOL. 01957 M01S01717.profile +++|* 01958 M01S01718.profile +++|* USES ALL REGISTERS EXCEPT A0. 01959 M01S01719.profile +++| 01960 M01S01720.profile +++| 01961 M01S01721.profile +++| OCE1 WRITH O,X5,7 OUTPUT LINE 01962 M01S01722.profile +++| SX5 X5+7 01963 M01S01723.profile +++| BX1 X0-X5 01964 M01S01724.profile +++| NZ X1,OCE1 IF NOT THRU CHARGE ASSEMBLY AREA 01965 M01S01725.profile +++| WRITH O,=0,B1 BLANK LINE 01966 M01S01726.profile +++| 01967 M01S01727.profile +++| OCE SUBR ENTRY/EXIT 01968 M01S01728.profile +++| SA1 F.TAB1 TABLE 1 INDEX OF ENTRY 01969 M01S01729.profile +++| IX6 X3-X1 01970 M01S01730.profile +++| SA6 T1IE 01971 M01S01731.profile +++| RJ SFC CHARGE ENTRY SPECIAL FIELDS 01972 M01S01732.profile +++| SA1 CN CHARGE NUMBER 01973 M01S01733.profile +++| RJ SFN SPACE FILL NAME 01974 M01S01734.profile +++| SA6 CEOB 01975 M01S01735.profile +++| SA5 TOIA 01976 M01S01736.profile +++| RJ CPV CONVERT AND PLACE VALUES 01977 M01S01737.profile +++| WRITH O,CEO,CEOL1 01978 M01S01738.profile +++| WRITH O,=0,B1 BLANK LINE 01979 M01S01739.profile +++| SX5 CEZP FWA OF CHARGE ASSEMBLY AREA 01980 M01S01740.profile +++| SX0 CEOL2 PRESET 01981 M01S01741.profile +++| SA1 ACCC 01982 M01S01742.profile +++| SX1 X1-2 01983 M01S01743.profile +++| PL X1,OCE1 IF RESTRICTED DISPLAY 01984 M01S01744.profile +++| SX0 CEOL3 01985 M01S01745.profile +++| EQ OCE1 01986 M01S01746.profile +++| OPE SPACE 4,10 01987 M01S01747.profile +++|** OPE - OUTPUT PROJECT ENTRY. 01988 M01S01748.profile +++|* 01989 M01S01749.profile +++|* ENTRY (X7) = RANDOM ADDRESS OF FIRST LEVEL-3 BLOCK. 01990 M01S01750.profile +++|* (PN - PN+1) = PROJECT NUMBER. 01991 M01S01751.profile +++|* 01992 M01S01752.profile +++|* USES A - 1, 5, 6. 01993 M01S01753.profile +++|* X - 0, 1, 5, 6. 01994 M01S01754.profile +++|* 01995 M01S01755.profile +++|* CALLS ADB, CPV, OUN, SFN, SFP. 01996 M01S01756.profile +++|* 01997 M01S01757.profile +++|* MACROS WRITH. 01998 M01S01758.profile +++| 01999 M01S01759.profile +++| 02000 M01S01760.profile +++| OPE SUBR ENTRY/EXIT 02001 M01S01761.profile +++| SX0 N 02002 M01S01762.profile +++| RJ ADB ADD DATA LEVEL BLOCK 02003 M01S01763.profile +++| RJ SFP PROJECT ENTRY SPECIAL FIELDS 02004 M01S01764.profile +++| SA1 PN PROJECT NUMBER 02005 M01S01765.profile +++| RJ SFN SPACE FILL NAME 02006 M01S01766.profile +++| SA6 PEOA 02007 M01S01767.profile +++| SA1 A1+B1 02008 M01S01768.profile +++| RJ SFN SPACE FILL NAME 02009 M01S01769.profile +++| SA6 A6+B1 02010 M01S01770.profile +++| SA5 TOID 02011 M01S01771.profile +++| RJ CPV CONVERT AND PLACE VALUES 02012 M01S01772.profile +++| WRITH O,PEO,PEOL1 02013 M01S01773.profile +++| WRITH O,=0,B1 BLANK LINE 02014 M01S01774.profile +++| SX5 PEZG FWA OF PROJECT ASSEMBLY AREA 02015 M01S01775.profile +++| OPE1 WRITH O,X5,7 OUTPUT LINE 02016 M01S01776.profile +++| SX5 X5+7 02017 M01S01777.profile +++| SX1 X5-PEOL2 02018 M01S01778.profile +++| NZ X1,OPE1 IF NOT THRU PROJECT ASSEMBLY AREA 02019 M01S01779.profile +++| WRITH O,=0,B1 BLANK LINE
| Line S01780 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02020 M02S01780.v23l617 ---| RJ OUN OUTPUT USER NUMBERS 02021 M01S00054.v23l617 +++| RJ OUN OUTPUT USER NAMES 02022 M01S01781.profile +++| EQ OPEX 02023 M01S01782.profile +++| OUN SPACE 4,10
| Line S01783 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02024 M02S01783.v23l617 ---|** OUN - OUTPUT USER NUMBERS VALIDATED FOR PROJECT. 02025 M01S00055.v23l617 +++|** OUN - OUTPUT USER NAMES VALIDATED FOR PROJECT. 02026 M01S01784.profile +++|* 02027 M01S01785.profile +++|* USES A - 1, 2, 5, 6, 7. 02028 M01S01786.profile +++|* B - 3, 4. 02029 M01S01787.profile +++|* X - 1, 2, 5, 6, 7. 02030 M01S01788.profile +++|* 02031 M01S01789.profile +++|* CALLS SFN, SUN. 02032 M01S01790.profile +++|* 02033 M01S01791.profile +++|* MACROS WRITH. 02034 M01S01792.profile +++| 02035 M01S01793.profile +++| 02036 M01S01794.profile +++| OUN SUBR ENTRY/EXIT
| Line S01795 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02037 M02S01795.v23l617 ---| RJ SUN SORT USER NUMBERS
| Line S01796 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02038 M02S01796.v23l617 ---| ZR X6,OUN4 IF NO USER NUMBERS
| Line S01797 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02039 M02S01797.v23l617 ---| SA1 PEOA WRITE USER NUMBER HEADER LINE 02040 M01S00056.v23l617 +++| RJ SUN SORT USER NAMES 02041 M01S00057.v23l617 +++| ZR X6,OUN4 IF NO USER NAMES 02042 M01S00058.v23l617 +++| SA1 PEOA WRITE USER NAME HEADER LINE 02043 M01S01798.profile +++| SA2 A1+B1 02044 M01S01799.profile +++| BX6 X1 02045 M01S01800.profile +++| SA6 OUNC 02046 M01S01801.profile +++| LX7 X2 02047 M01S01802.profile +++| SA7 A6+B1 02048 M01S01803.profile +++| WRITH O,OUNB,OUNBL 02049 M01S01804.profile +++| SA1 =1H 02050 M01S01805.profile +++| SA5 F.TAB3 02051 M01S01806.profile +++| BX6 X1 02052 M01S01807.profile +++| SA6 OUTB 02053 M01S01808.profile +++| OUN1 SB3 B0+ 02054 M01S01809.profile +++| SB4 5
| Line S01810 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02055 M02S01810.v23l617 ---| OUN2 SA1 X5 GET NEXT USER NUMBER 02056 M01S00059.v23l617 +++| OUN2 SA1 X5 GET NEXT USER NAME 02057 M01S01811.profile +++| SX5 X5+B1
| Line S01812 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02058 M02S01812.v23l617 ---| RJ SFN SPACE FILL USER NUMBER 02059 M01S00060.v23l617 +++| RJ SFN SPACE FILL USER NAME 02060 M01S01813.profile +++| SA1 L.TAB3 02061 M01S01814.profile +++| SX7 X1-1 02062 M01S01815.profile +++| SB3 B3+B1 02063 M01S01816.profile +++| SA7 A1 02064 M01S01817.profile +++| SA6 OUTB+B3
| Line S01818 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02065 M02S01818.v23l617 ---| ZR X7,OUN3 IF END OF USER NUMBERS 02066 M01S00061.v23l617 +++| ZR X7,OUN3 IF END OF USER NAMES 02067 M01S01819.profile +++| LT B3,B4,OUN2 IF NOT FULL LINE
| Line S01820 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02068 M02S01820.v23l617 ---| OUN3 WRITH X2,OUTB,B3+B1 WRITE USER NUMBER LINE 02069 M01S00062.v23l617 +++| OUN3 WRITH X2,OUTB,B3+B1 WRITE USER NAME LINE 02070 M01S01821.profile +++| SA1 L.TAB3
| Line S01822 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02071 M02S01822.v23l617 ---| NZ X1,OUN1 IF MORE USER NUMBERS 02072 M01S00063.v23l617 +++| NZ X1,OUN1 IF MORE USER NAMES 02073 M01S01823.profile +++| OUN4 WRITH O,=0,B1 WRITE BLANK LINE 02074 M01S01824.profile +++| EQ OUNX RETURN 02075 M01S01825.profile +++| 02076 M01S01826.profile +++|
| Line S01827 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02077 M02S01827.v23l617 ---| OUNB DATA L* USER NUMBERS VALID TO USE *
| Line S00064 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Updated by) | profi8 |
Seq # *Modification Id* Act ----------------------------+ 02078 M02S00064.profi8 ---| OUNB DATA L* USER NAMES VALID TO USE * 02079 M01S00001.profi8 +++| OUNB DATA 40H USER NAMES VALID TO USE 02080 M01S01828.profile +++| OUNC BSS 2 02081 M01S01829.profile +++| OUNBL EQU *-OUNB 02082 M01S01830.profile +++| PEO SPACE 4,10 02083 M01S01831.profile +++|** PEO - PROJECT ENTRY TO OUTPUT ASSEMBLY AREA. 02084 M01S01832.profile +++|* ASSEMBLY AREA OUTPUTTED A LINE AT A TIME (7 WORDS PER LINE). 02085 M01S01833.profile +++| 02086 M01S01834.profile +++| 02087 M01S01835.profile +++| PEO BSS 0 02088 M01S01836.profile +++| DATA L* CONTROLS FOR PROJECT NUMBER * 02089 M01S01837.profile +++| PEOA BSS 2 02090 M01S01838.profile +++| PEOL1 EQU *-PEO 02091 M01S01839.profile +++| PEZG BSS 0 02092 M01S01840.profile +++| DATA 1H 02093 M01S01841.profile +++| DATA L* CREATION DATE * 02094 M01S01842.profile +++| PEOB BSS 1 02095 M01S01843.profile +++| DATA L* LAST CHANGE DATE* 02096 M01S01844.profile +++| PEOC BSS 1 02097 M01S01845.profile +++| DATA 1H 02098 M01S01846.profile +++| DATA L* LAST UPDATE DATE* 02099 M01S01847.profile +++| PEOD BSS 1 02100 M01S01848.profile +++| DATA L* LAST UPDATE TIME* 02101 M01S01849.profile +++| PEOE BSS 1 02102 M01S01850.profile +++| DATA 1H 02103 M01S01851.profile +++| DATA L* ENTRY * 02104 M01S01852.profile +++| PEOF BSS 1 *ACTIVE* OR *INACTIVE* 02105 M01S01853.profile +++| DATA 1H 02106 M01S01854.profile +++| DATA L* EXPIRATION DATE * 02107 M01S01855.profile +++| PEOG BSS 1 02108 M01S01856.profile +++| DATA 1H 02109 M01S01857.profile +++| DATA L* TI = * 02110 M01S01858.profile +++| PEOH BSS 1 02111 M01S01859.profile +++| DATA 1H 02112 M01S01860.profile +++| DATA L* TO = * 02113 M01S01861.profile +++| PEOI DIS 2, 02114 M01S00118.ns22000 +++| DATA 1H 02115 M01S00119.ns22000 +++| DATA L* PFN = * 02116 M01S00120.ns22000 +++| PEZH BSS 1 02117 M01S00121.ns22000 +++| DATA 1H 02118 M01S00122.ns22000 +++| DATA L* EFN = * 02119 M01S00123.ns22000 +++| PEZI DIS 2, 02120 M01S00124.ns22000 +++| DATA 1H 02121 M01S00125.ns22000 +++| DATA L* PUN = * 02122 M01S00126.ns22000 +++| PEZJ BSS 1 02123 M01S00127.ns22000 +++| DATA 1H 02124 M01S00128.ns22000 +++| DATA L* EUN = * 02125 M01S00129.ns22000 +++| PEZK DIS 2, 02126 M01S00130.ns22000 +++| DATA 1H 02127 M01S00131.ns22000 +++| DATA L* PPW = * 02128 M01S00132.ns22000 +++| PEZL BSS 1 02129 M01S00133.ns22000 +++| DATA 1H 02130 M01S00134.ns22000 +++| DATA L* EPW = * 02131 M01S00135.ns22000 +++| PEZM DIS 2, 02132 M01S00136.ns22000 +++| DATA 1H 02133 M01S00137.ns22000 +++| DATA L* PCR = * 02134 M01S00138.ns22000 +++| PEZN BSS 1 02135 M01S01862.profile +++| DATA 1H 02136 M01S01863.profile +++| DATA L* ISV = *
| Line S01864 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02137 M02S01864.ns22000 ---| PEOJ DIS 5, 02138 M01S00139.ns22000 +++| PEOJ DIS 2, 02139 M01S01865.profile +++| DATA 1H 02140 M01S01866.profile +++| DATA L* SML = * 02141 M01S01867.profile +++| PEOL BSS 1 02142 M01S01868.profile +++| DATA 1H 02143 M01S01869.profile +++| DATA L* SMA = * 02144 M01S01870.profile +++| PEOM DIS 2, 02145 M01S01871.profile +++| DATA 1H 02146 M01S01872.profile +++| DATA L* SIL = * 02147 M01S01873.profile +++| PEON BSS 1 02148 M01S01874.profile +++| DATA 1H 02149 M01S01875.profile +++| DATA L* SIA = * 02150 M01S01876.profile +++| PEOO DIS 2, 02151 M01S01877.profile +++| DATA 1H 02152 M01S01878.profile +++| DATA L* LR1 = * 02153 M01S01879.profile +++| PEOP BSS 1 02154 M01S01880.profile +++| DATA 1H 02155 M01S01881.profile +++| DATA L* AR1 = * 02156 M01S01882.profile +++| PEOQ DIS 2, 02157 M01S01883.profile +++| DATA 1H 02158 M01S01884.profile +++| DATA L* LR2 = * 02159 M01S01885.profile +++| PEOR BSS 1 02160 M01S01886.profile +++| DATA 1H 02161 M01S01887.profile +++| DATA L* AR2 = * 02162 M01S01888.profile +++| PEOS DIS 2, 02163 M01S01889.profile +++| DATA 1H 02164 M01S01890.profile +++| DATA L* LR3 = * 02165 M01S01891.profile +++| PEOT BSS 1 02166 M01S01892.profile +++| DATA 1H 02167 M01S01893.profile +++| DATA L* AR3 = * 02168 M01S01894.profile +++| PEOU DIS 2, 02169 M01S01895.profile +++| DATA 1H 02170 M01S01896.profile +++| DATA L* LR4 = * 02171 M01S01897.profile +++| PEOV BSS 1 02172 M01S01898.profile +++| DATA 1H 02173 M01S01899.profile +++| DATA L* AR4 = * 02174 M01S01900.profile +++| PEOW DIS 2, 02175 M01S01901.profile +++| DATA 1H 02176 M01S01902.profile +++| DATA L* LR5 = * 02177 M01S01903.profile +++| PEOX BSS 1 02178 M01S01904.profile +++| DATA 1H 02179 M01S01905.profile +++| DATA L* AR5 = * 02180 M01S01906.profile +++| PEOY DIS 2, 02181 M01S01907.profile +++| DATA 1H 02182 M01S01908.profile +++| DATA L* LR6 = * 02183 M01S01909.profile +++| PEZA BSS 1 02184 M01S01910.profile +++| DATA 1H 02185 M01S01911.profile +++| DATA L* AR6 = * 02186 M01S01912.profile +++| PEZB DIS 2, 02187 M01S01913.profile +++| DATA 1H 02188 M01S01914.profile +++| DATA L* LR7 = * 02189 M01S01915.profile +++| PEZC BSS 1 02190 M01S01916.profile +++| DATA 1H 02191 M01S01917.profile +++| DATA L* AR7 = * 02192 M01S01918.profile +++| PEZD DIS 2, 02193 M01S01919.profile +++| DATA 1H 02194 M01S01920.profile +++| DATA L* LR8 = * 02195 M01S01921.profile +++| PEZE BSS 1 02196 M01S01922.profile +++| DATA 1H 02197 M01S01923.profile +++| DATA L* AR8 = * 02198 M01S01924.profile +++| PEZF DIS 2, 02199 M01S01925.profile +++| PEOL2 EQU * 02200 M01S01926.profile +++| PNO SPACE 4,10 02201 M01S01927.profile +++|** PNO - PROJECT NUMBER LIST TO OUTPUT. 02202 M01S01928.profile +++|* 02203 M01S01929.profile +++|* ENTRY (RA2+1) = LEVEL-2 RANDOM ADDRESS. 02204 M01S01930.profile +++|* 02205 M01S01931.profile +++|* CALLS PNA, SFN, WOL. 02206 M01S01932.profile +++|* 02207 M01S01933.profile +++|* USES ALL REGISTERS. 02208 M01S01934.profile +++| 02209 M01S01935.profile +++| 02210 M01S01936.profile +++| PNO SUBR ENTRY/EXIT 02211 M01S01937.profile +++| SA1 RA2+1 02212 M01S01938.profile +++| ZR X1,PNO4 IF NO LEVEL-2 CHAIN 02213 M01S01939.profile +++| SA1 =1H 02214 M01S01940.profile +++| BX6 X1 02215 M01S01941.profile +++| SA0 B1+B1 02216 M01S01942.profile +++| SA6 OUTB 02217 M01S01943.profile +++| SA6 OUTB+3 02218 M01S01944.profile +++| BX7 X7-X7 02219 M01S01945.profile +++| SA7 PNOA CLEAR PROJECT NUMBERS PER LINE COUNT 02220 M01S01946.profile +++| SA7 A7+B1 CLEAR HEADER LINE FLAG 02221 M01S01947.profile +++| SX0 N 02222 M01S01948.profile +++| SA7 L.TAB2 EMPTY TABLE 2 02223 M01S01949.profile +++| PNO1 FUNC PNAT PICK NEXT ADDRESS - LEVEL 2 02224 M01S01950.profile +++| SA6 PNOC SAVE END OF TABLE INDICATOR 02225 M01S01951.profile +++| ZR X6,PNO2 IF END OF TABLE 2 02226 M01S01952.profile +++| SA5 PNOA 02227 M01S01953.profile +++| SA1 A3-C.TAB2+1 02228 M01S01954.profile +++| RJ SFN SPACE FILL NAME 02229 M01S01955.profile +++| SA6 X5+OUTB+1 02230 M01S01956.profile +++| SA1 A1+B1 02231 M01S01957.profile +++| RJ SFN SPACE FILL NAME 02232 M01S01958.profile +++| SA6 A6+B1 02233 M01S01959.profile +++| SX6 X5+3 02234 M01S01960.profile +++| SA6 A5 02235 M01S01961.profile +++| SX2 X6-6 02236 M01S01962.profile +++| NZ X2,PNO1 IF NOT FULL LINE 02237 M01S01963.profile +++| PNO2 SA5 PNOA 02238 M01S01964.profile +++| ZR X5,PNO4 IF NO ENTRIES IN LINE 02239 M01S01965.profile +++| BX6 X6-X6 02240 M01S01966.profile +++| SA1 PNOB CHECK HEADER LINE FLAG 02241 M01S01967.profile +++| SA6 A5 02242 M01S01968.profile +++| NZ X1,PNO3 IF HEADER ALREADY WRITTEN 02243 M01S01969.profile +++| SX7 B1 02244 M01S01970.profile +++| SA7 A1 02245 M01S01971.profile +++| WRITH O,PNOD,PNODL WRITE PROJECT NUMBER HEADER LINE 02246 M01S01972.profile +++| PNO3 WRITH O,OUTB,X5 WRITE PROJECT NUMBER LINE 02247 M01S01973.profile +++| SA1 PNOC 02248 M01S01974.profile +++| NZ X1,PNO1 IF MORE LEVEL-2 ENTRIES TO PROCESS 02249 M01S01975.profile +++| PNO4 WRITH O,=0,B1 WRITE BLANK LINE 02250 M01S01976.profile +++| EQ PNOX RETURN 02251 M01S01977.profile +++| 02252 M01S01978.profile +++| 02253 M01S01979.profile +++| PNOA BSS 1 PROJECT NUMBERS PER LINE COUNTER 02254 M01S01980.profile +++| PNOB BSS 1 HEADER LINE WRITTEN FLAG 02255 M01S01981.profile +++| PNOC BSS 1 END OF TABLE INDICATOR 02256 M01S01982.profile +++| PNOD DATA L* VALIDATED PROJECT NUMBERS ARE -* 02257 M01S01983.profile +++| PNODL EQU *-PNOD 02258 M01S01984.profile +++| TITLE REFORMAT SUBROUTINES. 02259 M01S01985.profile +++| FUH SPACE
| Line S01986 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02260 M02S01986.v23l617 ---|** FUH - FILL USER NUMBER HOLES. 02261 M01S00065.v23l617 +++|** FUH - FILL USER NAME HOLES. 02262 M01S01987.profile +++|* 02263 M01S01988.profile +++|* THIS ROUTINE DELETES UNNECESSARY LEVEL-3 OVERFLOW BLOCKS
| Line S01989 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02264 M02S01989.v23l617 ---|* FROM TABLE 3 BY FILLING USER NUMBER HOLES. 02265 M01S00066.v23l617 +++|* FROM TABLE 3 BY FILLING USER NAME HOLES. 02266 M01S01990.profile +++|* 02267 M01S01991.profile +++|* ENTRY (X1) = FWA OF TABLE 3. 02268 M01S01992.profile +++|* 02269 M01S01993.profile +++|* CALLS FHP. 02270 M01S01994.profile +++|* 02271 M01S01995.profile +++|* USES X - 2, 3, 7. 02272 M01S01996.profile +++|* A - 2, 3, 7. 02273 M01S01997.profile +++|* B - 2, 3, 4, 5. 02274 M01S01998.profile +++| 02275 M01S01999.profile +++| 02276 M01S02000.profile +++| FUH2 BX7 X2 STORE UPDATED TABLE 3 LENGTH 02277 M01S02001.profile +++| SA7 L.TAB3 02278 M01S02002.profile +++| 02279 M01S02003.profile +++| FUH SUBR ENTRY/EXIT 02280 M01S02004.profile +++| SA2 L.TAB3 02281 M01S02005.profile +++| SX3 X2-PRUS 02282 M01S02006.profile +++| ZR X3,FUHX IF ONLY 1 BLOCK IN TABLE 3 02283 M01S02007.profile +++| NG X3,ERD42 IF ERROR 02284 M01S02008.profile +++| IX3 X1+X2 02285 M01S02009.profile +++| SB2 X3-1 (B2) = BACKWARD POINTER 02286 M01S02010.profile +++| SB3 X3-PRUS (B3) = BACKWARD POINTER LIMIT - 1 02287 M01S02011.profile +++| SA3 T3IE 02288 M01S02012.profile +++| IX3 X1+X3 02289 M01S02013.profile +++| SB4 X3+PUNW (B4) = FORWARD POINTER 02290 M01S02014.profile +++| SB5 B4+NUNS (B5) = FORWARD POINTER LIMIT + 1 02291 M01S02015.profile +++| RJ FHP FILLING HOLES PROCESSOR 02292 M01S02016.profile +++| NZ B6,FUH2 IF HOLES FILLED 02293 M01S02017.profile +++| SB4 X1+PRUS+1 UPDATE FORWARD POINTER AND LIMIT 02294 M01S02018.profile +++| SB5 B4+PRUS-1 02295 M01S02019.profile +++| FUH1 RJ FHP FILLING HOLES PROCESSOR 02296 M01S02020.profile +++| NZ B6,FUH2 IF HOLES FILLED 02297 M01S02021.profile +++| SB4 B4+B1 UPDATE FORWARD POINTER AND LIMIT 02298 M01S02022.profile +++| SB5 B5+PRUS 02299 M01S02023.profile +++| EQ FUH1 LOOP 02300 M01S02024.profile +++| FHP SPACE 4,10 02301 M01S02025.profile +++|** FHP - FILLING HOLES PROCESSOR. 02302 M01S02026.profile +++|* 02303 M01S02027.profile +++|* THIS ROUTINE SEARCHES IN A FORWARD DIRECTION FOR HOLES TO BE
| Line S02028 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02304 M02S02028.v23l617 ---|* FILLED BY USER NUMBERS SEARCHED FOR IN A BACKWARD DIRECTION. 02305 M01S00067.v23l617 +++|* FILLED BY USER NAMES SEARCHED FOR IN A BACKWARD DIRECTION. 02306 M01S02029.profile +++|* 02307 M01S02030.profile +++|* ENTRY (B2) = BACKWARD POINTER. 02308 M01S02031.profile +++|* (B3) = BACKWARD POINTER LIMIT - 1. 02309 M01S02032.profile +++|* (B4) = FORWARD POINTER. 02310 M01S02033.profile +++|* (B5) = FORWARD POINTER LIMIT + 1. 02311 M01S02034.profile +++|* (X2) = TABLE 3 LENGTH. 02312 M01S02035.profile +++|* 02313 M01S02036.profile +++|* EXIT (B6) = 0, IF FORWARD POINTER LIMIT REACHED. 02314 M01S02037.profile +++|* (B6) .NE. 0, IF THRU ALL ENTRIES. 02315 M01S02038.profile +++|* (B2) - (B4), (X2) UPDATED. 02316 M01S02039.profile +++|* 02317 M01S02040.profile +++|* USES X - 3, 4, 5, 6, 7. 02318 M01S02041.profile +++|* A - 3, 4, 6, 7. 02319 M01S02042.profile +++| 02320 M01S02043.profile +++| 02321 M01S02044.profile +++| FHP4 SB6 1 SET THRU ALL ENTRIES 02322 M01S02045.profile +++| 02323 M01S02046.profile +++| FHP SUBR ENTRY/EXIT 02324 M01S02047.profile +++| SB6 B0 PRESET 02325 M01S02048.profile +++| MX5 42 02326 M01S02049.profile +++| SX6 B1 02327 M01S02050.profile +++| FHP1 EQ B2,B4,FHP4 IF THRU ENTRIES 02328 M01S02051.profile +++| EQ B4,B5,FHPX IF FORWARD LIMIT REACHED 02329 M01S02052.profile +++| SA3 B4 NEXT FORWARD ENTRY 02330 M01S02053.profile +++| SX7 X3
| Line S02054 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | profi3 |
Seq # *Modification Id* Act ----------------------------+ 02331 M02S02054.profi3 ---| NZ X7,FHP1 IF THRU LIST 02332 M01S00001.profi3 +++| NZ X7,FHP4 IF THRU LIST 02333 M01S02055.profile +++| SB4 B4+B1 INCREMENT FORWARD POINTER 02334 M01S02056.profile +++| NZ X3,FHP1 IF NOT HOLE 02335 M01S02057.profile +++| FHP2 EQ B2,B4,FHP4 IF THRU ENTRIES 02336 M01S02058.profile +++| EQ B2,B3,FHP3 IF BACKWARD LIMIT REACHED 02337 M01S02059.profile +++| SA4 B2 NEXT BACKWARD ENTRY 02338 M01S02060.profile +++| SA6 A4 FREE LOCATION (INITIALIZE TO 1) 02339 M01S02061.profile +++| BX7 X5*X4 02340 M01S02062.profile +++| SB2 B2-B1 DECREMENT BACKWARD POINTER 02341 M01S02063.profile +++| ZR X7,FHP2 IF HOLE
| Line S02064 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02342 M02S02064.v23l617 ---| SA7 A3 SET USER NUMBER IN HOLE 02343 M01S00068.v23l617 +++| SA7 A3 SET USER NAME IN HOLE 02344 M01S02065.profile +++| EQ FHP1 LOOP 02345 M01S02066.profile +++| 02346 M01S02067.profile +++| FHP3 SX2 X2-PRUS UPDATE TABLE 3 LENGTH 02347 M01S02068.profile +++| SX3 X2-PRUS 02348 M01S02069.profile +++| ZR X3,FHP4 IF THRU ENTRIES 02349 M01S02070.profile +++| NG X3,ERD43 IF ERROR 02350 M01S02071.profile +++| SB2 B2-B1 UPDATE BACKWARD POINTER AND LIMIT 02351 M01S02072.profile +++| SB3 B3-PRUS 02352 M01S02073.profile +++| EQ FHP2 LOOP 02353 M01S02074.profile +++| TITLE CHANGE TO SOURCE SUBROUTINES.
| Line S02075 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | profi14 |
Seq # *Modification Id* Act ----------------------------+ 02354 M02S02075.profi14 ---| CSC SPACE 4,10 02355 M01S00001.profi14 +++| CSC SPACE 4,15 02356 M01S02076.profile +++|** CSC - CHANGE TO SOURCE CHARGE ENTRY. 02357 M01S02077.profile +++|* 02358 M01S02078.profile +++|* ENTRY (A5) = FWA OF CHARGE ENTRY. 02359 M01S02079.profile +++|* (CN) = CHARGE NUMBER. 02360 M01S02080.profile +++|* (T1IE) = TABLE 1 INDEX OF ENTRY. 02361 M01S02081.profile +++|*
| Line S02082 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | profi14 |
Seq # *Modification Id* Act ----------------------------+ 02362 M02S02082.profi14 ---|* CALLS CTS, EDT, SFN, WOL. 02363 M01S00002.profi14 +++|* EXIT CHARGE NUMBER DIRECTIVES WRITTEN TO SOURCE FILE. 02364 M01S02083.profile +++|*
| Line S02084 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | profi14 |
Seq # *Modification Id* Act ----------------------------+ 02365 M02S02084.profi14 ---|* USES ALL REGISTERS EXCEPT A0. 02366 M01S00003.profi14 +++|* USES A - 1, 5, 6, 7. 02367 M01S00004.profi14 +++|* X - 1, 2, 5, 6, 7. 02368 M01S00005.profi14 +++|* 02369 M01S00006.profi14 +++|* CALLS CTS, EDD, SFN. 02370 M01S00007.profi14 +++|* 02371 M01S00008.profi14 +++|* MACROS WRITH. 02372 M01S02085.profile +++| 02373 M01S02086.profile +++| 02374 M01S02087.profile +++| CSC SUBR ENTRY/EXIT 02375 M01S02088.profile +++| SA1 CN
| Line S02089 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02376 M02S02089.ns22000 ---| SA2 CV
| Line S02090 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02377 M02S02090.ns22000 ---| ZR X2,CSC1 IF NO CONVERSION OPTION
| Line S02091 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02378 M02S02091.ns22000 ---| RJ SFN SPACE FILL NAME
| Line S02092 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02379 M02S02092.ns22000 ---| MX0 6 */* FORMAT
| Line S02093 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02380 M02S02093.ns22000 ---| LX6 -6
| Line S02094 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02381 M02S02094.ns22000 ---| BX7 X0*X6
| Line S02095 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02382 M02S02095.ns22000 ---| BX6 -X0*X6
| Line S02096 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02383 M02S02096.ns22000 ---| SA2 =1L/
| Line S02097 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02384 M02S02097.ns22000 ---| BX6 X2+X6
| Line S02098 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02385 M02S02098.ns22000 ---| EQ CSC2
| Line S02099 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02386 M02S02099.ns22000 ---|
| Line S02100 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | profi14 |
Seq # *Modification Id* Act ----------------------------+ 02387 M02S02100.profi14 ---| CSC1 BX7 X1 *ACN* FORMAT 02388 M01S00009.profi14 +++| RJ SFN SPACE FILL CHARGE NUMBER 02389 M01S00010.profi14 +++| BX7 X6 *ACN* FORMAT 02390 M01S02101.profile +++| SA1 =A*ACN = * 02391 M01S02102.profile +++| BX6 X1
| Line S02103 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | profi14 |
Seq # *Modification Id* Act ----------------------------+ 02392 M02S02103.profi14 ---| CSC2 SA6 OUTB 02393 M01S00011.profi14 +++| SA6 OUTB 02394 M01S02104.profile +++| SA7 A6+B1 02395 M01S02105.profile +++| WRITH S,A6,B1+B1 02396 M01S02106.profile +++| SA1 A5+CMUW *MU* 02397 M01S02107.profile +++| MX2 42 02398 M01S02108.profile +++| BX6 X2*X1 02399 M01S02109.profile +++| ZR X6,CSC3 IF NO MASTER USER 02400 M01S02110.profile +++| SA6 OUTB+1 02401 M01S02111.profile +++| SA1 =A*MU = * 02402 M01S02112.profile +++| BX6 X1 02403 M01S02113.profile +++| SA6 A6-B1 02404 M01S02114.profile +++| WRITH S,A6,B1+B1 02405 M01S02115.profile +++| CSC3 SA1 A5+CDTW *CEX*
| Line S02116 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02406 M02S02116.ns22000 ---| SA2 CV 02407 M01S02117.profile +++| LX1 36
| Line S02118 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02408 M02S02118.ns22000 ---| NZ X2,CSC4 IF CONVERSION OPTION SELECTED 02409 M01S02119.profile +++| SX1 X1 02410 M01S02120.profile +++| ZR X1,CSC4 IF NO CHARGE EXPIRATION DATE 02411 M01S02121.profile +++| RJ EDD EDIT DATE 02412 M01S02122.profile +++| SA6 OUTB+1 02413 M01S02123.profile +++| SA1 =A*CEX = * 02414 M01S02124.profile +++| BX6 X1 02415 M01S02125.profile +++| SA6 A6-B1 02416 M01S02126.profile +++| WRITH S,A6,B1+B1 02417 M01S02127.profile +++| CSC4 SA5 TOIB 02418 M01S02128.profile +++| RJ CTS CONVERT TO SOURCE 02419 M01S02129.profile +++| EQ CSCX 02420 M01S02130.profile +++| CSP SPACE 4,10 02421 M01S02131.profile +++|** CSP - CHANGE TO SOURCE PROJECT ENTRY. 02422 M01S02132.profile +++|* 02423 M01S02133.profile +++|* ENTRY (A5) = FWA OF PROJECT ENTRY. 02424 M01S02134.profile +++|* (PN - PN+1) = PROJECT NUMBER. 02425 M01S02135.profile +++|* (T3IE) = TABLE 3 INDEX OF ENTRY. 02426 M01S02136.profile +++|* 02427 M01S02137.profile +++|* USES A - 1, 2, 5, 6, 7. 02428 M01S02138.profile +++|* X - 1, 2, 5, 6, 7. 02429 M01S02139.profile +++|* 02430 M01S02140.profile +++|* CALLS CTS, EDD, ETM, SFN, SUN. 02431 M01S02141.profile +++|* 02432 M01S02142.profile +++|* MACROS WRITH. 02433 M01S02143.profile +++| 02434 M01S02144.profile +++| 02435 M01S02145.profile +++| CSP SUBR ENTRY/EXIT 02436 M01S02146.profile +++| SA1 =A*APN = * PRESET *APN* FORMAT
| Line S02147 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02437 M02S02147.ns22000 ---| SA2 CV
| Line S02148 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02438 M02S02148.ns22000 ---| ZR X2,CSP1 IF NO CONVERSION OPTION
| Line S02149 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02439 M02S02149.ns22000 ---| SA1 =A*PN = * *PN* FORMAT 02440 M01S02150.profile +++| CSP1 BX6 X1 02441 M01S02151.profile +++| SA6 OUTB 02442 M01S02152.profile +++| SA1 PN 02443 M01S02153.profile +++| RJ SFN SPACE FILL NAME 02444 M01S02154.profile +++| SA6 A6+B1 02445 M01S02155.profile +++| SA1 A1+B1 02446 M01S02156.profile +++| RJ SFN SPACE FILL NAME 02447 M01S02157.profile +++| SA6 A6+B1 02448 M01S02158.profile +++| WRITH S,OUTB,3 02449 M01S02159.profile +++| SA1 A5+PCDW *PEX*
| Line S02160 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02450 M02S02160.ns22000 ---| SA2 CV 02451 M01S02161.profile +++| LX1 36
| Line S02162 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02452 M02S02162.ns22000 ---| NZ X2,CSP2 IF CONVERSION OPTION SELECTED 02453 M01S02163.profile +++| SX1 X1 02454 M01S02164.profile +++| ZR X1,CSP2 IF NO PROJECT EXPIRATION DATE 02455 M01S02165.profile +++| RJ EDD EDIT DATE 02456 M01S02166.profile +++| SA6 OUTB+1 02457 M01S02167.profile +++| SA1 =A*PEX = * 02458 M01S02168.profile +++| BX6 X1 02459 M01S02169.profile +++| SA6 A6-B1 02460 M01S02170.profile +++| WRITH S,A6,B1+B1 02461 M01S02171.profile +++| CSP2 SA1 =1H0 *TO* 02462 M01S02172.profile +++| BX6 X1 02463 M01S02173.profile +++| SA5 A5+PTMW 02464 M01S02174.profile +++| SX1 X5 02465 M01S02175.profile +++| ZR X1,CSP3 IF ZERO VALUE 02466 M01S02176.profile +++| RJ ETM EDIT TIME 02467 M01S02177.profile +++| CSP3 SA6 OUTB+1 02468 M01S02178.profile +++| SA1 =A*TO = * 02469 M01S02179.profile +++| BX6 X1 02470 M01S02180.profile +++| SA6 A6-B1 02471 M01S02181.profile +++| WRITH S,A6,B1+B1 02472 M01S02182.profile +++| SA1 =1H0 *TI* 02473 M01S02183.profile +++| BX6 X1 02474 M01S02184.profile +++| LX5 -18 02475 M01S02185.profile +++| SX1 X5 02476 M01S02186.profile +++| ZR X1,CSP4 IF ZERO VALUE 02477 M01S02187.profile +++| RJ ETM EDIT TIME 02478 M01S02188.profile +++| CSP4 SA6 OUTB+1 02479 M01S02189.profile +++| SA1 =A*TI = * 02480 M01S02190.profile +++| BX6 X1 02481 M01S02191.profile +++| SA6 A6-B1 02482 M01S02192.profile +++| WRITH S,A6,B1+B1
| Line S02193 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02483 M02S02193.ns22000 ---| SA5 TOID
| Line S02194 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02484 M02S02194.ns22000 ---| RJ CTS CONVERT TO SOURCE 02485 M01S00140.ns22000 +++| SA1 CV 02486 M01S00141.ns22000 +++| NZ X1,CSP4.1 IF CONVERSION OPTION SELECTED 02487 M01S00142.ns22000 +++| SA1 =A*PCR = * CONVERT PROLOGUE CHARGE REQUIRED OPTION 02488 M01S00143.ns22000 +++| SA5 A5-PTMW+PPNW 02489 M01S00144.ns22000 +++| BX6 X1 02490 M01S00145.ns22000 +++| SA6 OUTB 02491 M01S00146.ns22000 +++| MX2 -2 02492 M01S00147.ns22000 +++| BX1 -X2*X5 02493 M01S00148.ns22000 +++| SA1 TPCO+X1 02494 M01S00149.ns22000 +++| RJ SFN SPACE FILL NAME 02495 M01S00150.ns22000 +++| SA6 A6+B1 02496 M01S00151.ns22000 +++| WRITH S,OUTB,2 02497 M01S00152.ns22000 +++| SA5 TOID 02498 M01S00153.ns22000 +++| RJ CTS CONVERT TO SOURCE 02499 M01S00154.ns22000 +++| SA5 TOIF 02500 M01S00155.ns22000 +++| EQ CSP4.2 CONVERT TO SOURCE 02501 M01S00156.ns22000 +++| 02502 M01S00157.ns22000 +++| CSP4.1 SA5 TOIE 02503 M01S00158.ns22000 +++| CSP4.2 RJ CTS CONVERT TO SOURCE 02504 M01S02195.profile +++|
| Line S02196 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02505 M02S02196.v23l617 ---|* USER NUMBERS. 02506 M01S00069.v23l617 +++|* USER NAMES. 02507 M01S02197.profile +++|
| Line S02198 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02508 M02S02198.v23l617 ---| RJ SUN SORT USER NUMBERS 02509 M01S00070.v23l617 +++| RJ SUN SORT USER NAMES 02510 M01S02199.profile +++| SA1 =A*AUN = * PRESET *AUN* FORMAT
| Line S02200 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02511 M02S02200.ns22000 ---| SA2 CV
| Line S02201 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02512 M02S02201.ns22000 ---| ZR X2,CSP5 IF NO CONVERSION OPTION
| Line S02202 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02513 M02S02202.ns22000 ---| SA1 =A*UN = * *UN* FORMAT 02514 M01S02203.profile +++| CSP5 SA2 F.TAB3 02515 M01S02204.profile +++| BX7 X1 02516 M01S02205.profile +++| SA5 X2-1 02517 M01S02206.profile +++| SA7 OUTB
| Line S02207 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02518 M02S02207.v23l617 ---| CSP6 ZR X6,CSPX IF END OF USER NUMBERS 02519 M01S00071.v23l617 +++| CSP6 ZR X6,CSPX IF END OF USER NAMES 02520 M01S02208.profile +++| SA5 A5+B1 02521 M01S02209.profile +++| BX7 X5 02522 M01S02210.profile +++| SA7 OUTB+1 02523 M01S02211.profile +++| WRITH S,A7-B1,B1+B1 02524 M01S02212.profile +++| SA1 L.TAB3 02525 M01S02213.profile +++| SX6 X1-1 02526 M01S02214.profile +++| SA6 A1 02527 M01S02215.profile +++| EQ CSP6 LOOP 02528 M01S02216.profile +++| CTS SPACE 4,10 02529 M01S02217.profile +++|** CTS - CONVERT TABLE OF INDICES (TOI) ENTRIES TO SOURCE. 02530 M01S02218.profile +++|* 02531 M01S02219.profile +++|* ENTRY (X5) = FIRST ENTRY OF PERTINENT TABLE OF *TOI*. 02532 M01S02220.profile +++|* (A5) = ADDRESS OF FIRST ENTRY. 02533 M01S02221.profile +++|* (T1IE) = TABLE 1 INDEX OF ENTRY, IF LEVEL-1 DIRECTIVE. 02534 M01S02222.profile +++|* (T3IE) = TABLE 3 INDEX OF ENTRY, IF LEVEL-3 DIRECTIVE. 02535 M01S02223.profile +++|* 02536 M01S02224.profile +++|* CALLS CED, DFS, GFV, SFN, WOL. 02537 M01S02225.profile +++|* 02538 M01S02226.profile +++|* USES ALL REGISTERS EXCEPT A0. 02539 M01S02227.profile +++| 02540 M01S02228.profile +++| 02541 M01S02229.profile +++| CTS SUBR ENTRY/EXIT 02542 M01S02230.profile +++| MX0 12 02543 M01S02231.profile +++| LX0 -12 02544 M01S02232.profile +++| CTS1 ZR X5,CTSX IF END OF TABLE 02545 M01S02233.profile +++| BX7 X0*X5 02546 M01S02234.profile +++| LX7 -36 02547 M01S02235.profile +++| RJ DFS (DF) - (DF+4) SET-UP 02548 M01S02236.profile +++| RJ GFV GET FIELD,S VALUE 02549 M01S02237.profile +++| RJ CED CONVERT ENTRY TO DISPLAY CODE 02550 M01S02238.profile +++| SA6 OUTB+1 02551 M01S02239.profile +++| SA1 DF+4 02552 M01S02240.profile +++| RJ SFN SPACE FILL NAME 02553 M01S02241.profile +++| LX6 -24 02554 M01S02242.profile +++| MX1 -12 02555 M01S02243.profile +++| BX6 X1*X6 02556 M01S02244.profile +++| SX1 2R= 02557 M01S02245.profile +++| BX6 X1+X6 02558 M01S02246.profile +++| SA6 A6-B1 02559 M01S02247.profile +++| WRITH S,A6,B1+B1 02560 M01S02248.profile +++| SA5 A5+B1 02561 M01S02249.profile +++| EQ CTS1 LOOP 02562 M01S02250.profile +++| TITLE UPDATE/CREATE SUBROUTINES - MAIN INPUT ROUTINE. 02563 M01S02251.profile +++| DIP SPACE 4,10 02564 M01S02252.profile +++|** DIP - DIRECTIVE INPUT PROCESSOR. 02565 M01S02253.profile +++|* 02566 M01S02254.profile +++|* READ DIRECTIVES FROM INPUT FILE- OR K-DISPLAY IF 02567 M01S02255.profile +++|* *K-DISPLAY* OPTION- AND CALL APPROPRIATE INPUT PROCESSOR. 02568 M01S02256.profile +++|* INPUT PROCESSING TERMINATES UPON ENCOUNTERING AN EOI, EOF, 02569 M01S02257.profile +++|* OR EOR- OR *STOP* IF K-DISPLAY. DIRECTIVES ARE QUEUED FOR 02570 M01S02258.profile +++|* PROCESSING BY ROUTINE *DQP* (NOT PERTINENT IF *CREATE* MODE). 02571 M01S02259.profile +++|* 02572 M01S02260.profile +++|* EXIT TO INPUT PROCESSORS- 02573 M01S02261.profile +++|* (X1) = (DTII) = TABLE INDEX. 02574 M01S02262.profile +++|* (X2) = TABLE ENTRY (TOPR). 02575 M01S02263.profile +++|* (X4) = NUMBER OF CHARACTERS IN VALUE. 02576 M01S02264.profile +++|*
| Line S02265 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02577 M02S02265.v23l617 ---|* CALLS ACI, AMQ, DQP, SCI, STB, WDL, WPL, INPUT PROCESSORS. 02578 M01S00072.v23l617 +++|* CALLS ACI, AMQ, DQP, PGD, SCI, SPT, STB, WDL, WPL, 02579 M01S00073.v23l617 +++|* INPUT PROCESSORS. 02580 M01S02266.profile +++|* 02581 M01S02267.profile +++|* USES ALL REGISTERS. 02582 M01S02268.profile +++| 02583 M01S02269.profile +++| 02584 M01S02270.profile +++| DIP9 SA1 UF 02585 M01S02271.profile +++| ZR X1,DIP10 IF *CREATE* MODE 02586 M01S02272.profile +++| RJ DQP DIRECTIVE QUEUE PROCESSOR 02587 M01S02273.profile +++| EQ DIPX 02588 M01S02274.profile +++| 02589 M01S02275.profile +++| DIP10 RJ WDL WRITE DATA LEVEL 02590 M01S02276.profile +++| SA0 B1+B1 02591 M01S02277.profile +++| FUNC STBT SORT TABLE 2 02592 M01S02278.profile +++| RJ WPL WRITE PROJECT LEVEL 02593 M01S02279.profile +++| 02594 M01S02280.profile +++| DIP SUBR ENTRY/EXIT 02595 M01S02281.profile +++| SA1 CBUF CHECK FOR OVERFLOW SUSPENDED PROCESSING 02596 M01S02282.profile +++| NZ X1,CND1 IF CHARGE NUMBER PRESENT 02597 M01S02283.profile +++| SA1 UF 02598 M01S02284.profile +++| ZR X1,DIP1 IF *CREATE* MODE 02599 M01S02285.profile +++| RJ AMQ ALLOCATE MEMORY TO QUEUE 02600 M01S02286.profile +++| SA1 PI 02601 M01S02287.profile +++| NZ X1,DIP1 IF NOT TERMINAL FILE 02602 M01S02288.profile +++| WRITEH O,DIPB,2 *ENTER DIRECTIVES* 02603 M01S02289.profile +++| READ I 02604 M01S02290.profile +++| 02605 M01S02291.profile +++|* *MAIN LOOP* 02606 M01S02292.profile +++| 02607 M01S02293.profile +++| DIP1 BSS 0 02608 M01S02294.profile +++| SX0 I
| Line S02295 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02609 M02S02295.v23l617 ---| BX1 X1-X1 02610 M01S00074.v23l617 +++| SA1 DIPC ALLOW K-DISPLAY PAGING CHARACTERS 02611 M01S02296.profile +++| SX6 TDIR TABLE OF DIRECTIVES 02612 M01S02297.profile +++| SX3 TSKD TABLE OF SPECIAL K-DISPLAY DIRECTIVES 02613 M01S02298.profile +++| FUNC SCIT SCAN FOR CODE IDENTIFIER 02614 M01S02299.profile +++| ZR X1,DIP6 IF ERROR 02615 M01S02300.profile +++| ZR B6,DIP4 IF ENTRY TERMINATION 02616 M01S02301.profile +++| PL B7,DIP5 IF NOT SPECIAL K-DISPLAY DIRECTIVE 02617 M01S00075.v23l617 +++| SB2 -5 02618 M01S00076.v23l617 +++| GT B2,B7,DIP1.1 IF PAGING COMMAND
| Line S02302 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02619 M02S02302.v23l617 ---| SB2 -B1 02620 M01S00077.v23l617 +++| SB2 -1 02621 M01S02303.profile +++| EQ B2,B7,DIP2 IF *END*
| Line S02304 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02622 M02S02304.v23l617 ---| BX6 X6-X6 PERFORM NO UPDATE 02623 M01S00078.v23l617 +++| SX6 B0+ PERFORM NO UPDATE 02624 M01S02305.profile +++| SA6 FUP1 02625 M01S02306.profile +++| SA6 A6+B1 02626 M01S02307.profile +++| SA6 A6+B1 02627 M01S02308.profile +++| SB2 -2 02628 M01S02309.profile +++| EQ B2,B7,DIP3 IF *DROP* 02629 M01S02310.profile +++| SX7 -B1 *STOP* - FORCE LEVEL-0 UPDATE 02630 M01S02311.profile +++| SA7 ET 02631 M01S02312.profile +++| RJ DQP DIRECTIVE QUEUE PROCESSOR 02632 M01S02313.profile +++| EQ DIPX 02633 M01S02314.profile +++| 02634 M01S00079.v23l617 +++| DIP1.1 SA2 KPAG SET ENTRY CONDITIONS FOR *PGD* 02635 M01S00080.v23l617 +++| BX4 X4-X4 02636 M01S00081.v23l617 +++| LX3 54 02637 M01S00082.v23l617 +++| SX1 KIA 02638 M01S00083.v23l617 +++| RJ PGD PAGE DISPLAY 02639 M01S00084.v23l617 +++| SA1 KPAG UPDATE MESSAGE LINE POINTERS 02640 M01S00085.v23l617 +++| SA1 X1 02641 M01S00086.v23l617 +++| AX1 30 02642 M01S00087.v23l617 +++| SB2 X1 02643 M01S00088.v23l617 +++| SA1 A1+B2 02644 M01S00089.v23l617 +++| AX1 18 02645 M01S00090.v23l617 +++| SX7 X1 02646 M01S00091.v23l617 +++| AX1 18 02647 M01S00092.v23l617 +++| SA7 M1 02648 M01S00093.v23l617 +++| SX6 X1 02649 M01S00094.v23l617 +++| SA6 IL 02650 M01S00095.v23l617 +++| EQ DIP1 CONTINUE 02651 M01S00096.v23l617 +++| 02652 M01S02315.profile +++| DIP2 RJ DQP DIRECTIVE QUEUE PROCESSOR 02653 M01S02316.profile +++| DIP3 BX6 X6-X6 CLEAR CHARGE AND PROJECT NUMBER FLAGS 02654 M01S02317.profile +++| SA6 FCNP 02655 M01S02318.profile +++| SA6 FPNP 02656 M01S02319.profile +++| SA6 DSCN DISABLE K-DISPLAY FOR CHARGE NUMBER 02657 M01S00097.v23l617 +++| SX1 B0+ 02658 M01S00098.v23l617 +++| RJ SPT SET PAGE TABLE 02659 M01S02320.profile +++| EQ DIP1 LOOP 02660 M01S02321.profile +++| 02661 M01S02322.profile +++| DIP4 SA1 ET 02662 M01S02323.profile +++| NG X1,DIP9 IF EOF 02663 M01S02324.profile +++| SB7 XCND EQIVALENCE */* TO *CN* 02664 M01S02325.profile +++| DIP5 SX6 B7 TABLE INDEX 02665 M01S00007.profi11 +++| MX0 1 02666 M01S02326.profile +++| SA6 DTII
| Line S02327 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | profi11 |
Seq # *Modification Id* Act ----------------------------+ 02667 M02S02327.profi11 ---| SA1 DIPA 02668 M01S00008.profi11 +++| SA1 TOPR+B7 SET SPECIAL CHARACTERS TO PERMIT 02669 M01S00009.profi11 +++| LX1 1 02670 M01S00010.profi11 +++| BX6 X0*X1 02671 M01S00011.profi11 +++| LX0 -1 02672 M01S00012.profi11 +++| AX6 1 02673 M01S00013.profi11 +++| BX1 X0*X1 02674 M01S00014.profi11 +++| LX6 -58 02675 M01S00015.profi11 +++| LX1 -56 02676 M01S00016.profi11 +++| BX1 X6+X1 02677 M01S02328.profile +++| RJ ACI ASSEMBLE CHARACTERS INTERFACE 02678 M01S02329.profile +++| ZR B6,DIP8 IF ENTRY TERMINATION 02679 M01S02330.profile +++| SB5 B5-1R=
| Line S02331 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02680 M02S02331.v23l617 ---| ZR B5,DIP7 IF ILLEGAL SEPARATOR 02681 M01S00099.v23l617 +++| ZR B5,DIP7 IF INCORRECT SEPARATOR 02682 M01S02332.profile +++| SA1 DTII 02683 M01S02333.profile +++| SX2 X1-XPAS 02684 M01S02334.profile +++| ZR X2,DIP1 IF *PASS* DIRECTIVE 02685 M01S02335.profile +++| SA2 X1+TOPR 02686 M01S02336.profile +++| BX3 X2 02687 M01S02337.profile +++| LX3 -18 02688 M01S02338.profile +++| SB2 X3 02689 M01S02339.profile +++| JP B2 INPUT PROCESSOR 02690 M01S02340.profile +++| 02691 M01S02341.profile +++| DIP6 NZ B5,DIP7 IF SEPARATOR NOT *=* 02692 M01S02342.profile +++| SA1 DIPA GET RID OF PARAMETER VALUE 02693 M01S02343.profile +++| RJ ACI ASSEMBLE CHARACTERS INTERFACE 02694 M01S02344.profile +++| ZR B6,DIP8 IF ENTRY TERMINATION 02695 M01S02345.profile +++| DIP7 SB3 ERUA 02696 M01S02346.profile +++| RJ ERU USER ERROR 02697 M01S02347.profile +++| EQ DIP1 LOOP 02698 M01S02348.profile +++| 02699 M01S02349.profile +++| DIP8 SB3 ERUQ 02700 M01S02350.profile +++| RJ ERU USER ERROR 02701 M01S02351.profile +++| EQ DIP9 02702 M01S02352.profile +++| 02703 M01S02353.profile +++| DIPA BITCON (-,+,*) BIT STRING OF CHARACTERS TO PERMIT 02704 M01S02354.profile +++| 02705 M01S02355.profile +++| DIPB DIS 2,ENTER DIRECTIVES 02706 M01S00100.v23l617 +++| DIPC BITCON (-,+) BIT STRING OF PAGING CHARACTERS TO PERMIT 02707 M01S00101.v23l617 +++| 02708 M01S00102.v23l617 +++| PGD HERE REMOTE BLOCK FROM *COMCDCP* 02709 M01S02356.profile +++| TITLE UPDATE/CREATE SUBROUTINES - INPUT PROCESSORS. 02710 M01S02357.profile +++| CND SPACE 4,10 02711 M01S02358.profile +++|** CND - CHARGE NUMBER DIRECTIVE. 02712 M01S02359.profile +++|* 02713 M01S02360.profile +++|* *ACN*, *CN*, *DCN* DIRECTIVES. 02714 M01S02361.profile +++|* 02715 M01S02362.profile +++|* ENTRY (X1) = (DTII) = TABLE INDEX. 02716 M01S02363.profile +++|* (X2) = TABLE ENTRY (TOPR). 02717 M01S02364.profile +++|* (X4) = NUMBER OF CHARACTERS IN VALUE. 02718 M01S02365.profile +++|* TO CND1, IF OVERFLOW SUSPENDED PROCESSING. 02719 M01S02366.profile +++|* 02720 M01S02367.profile +++|* EXIT TO DIPX, IF *CREATE* OVERFLOW DETECTED. 02721 M01S02368.profile +++|* TO DIP1, ELSE. 02722 M01S02369.profile +++|* (CN) = CHARGE NUMBER. 02723 M01S02370.profile +++|*
| Line S02371 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02724 M02S02371.v23l617 ---|* CALLS ATS, CDV, DQP, KOC, MQE, MVE, MWS, SPB, STB, VMU, 02725 M01S00103.v23l617 +++|* CALLS ATS, CDV, DQP, KOC, MQE, MVE, MWS, SPB, SPT, STB, VMU, 02726 M01S02372.profile +++|* WDL, WPL. 02727 M01S02373.profile +++|* 02728 M01S02374.profile +++|* USES ALL REGISTERS. 02729 M01S02375.profile +++| 02730 M01S02376.profile +++| 02731 M01S02377.profile +++| CND BSS 0 02732 M01S02378.profile +++| BX6 X6-X6 CLEAR CHARGE AND PROJECT NUMBER FLAGS 02733 M01S02379.profile +++| SA6 FCNP 02734 M01S02380.profile +++| SA6 FPNP 02735 M01S02381.profile +++| SA6 DSCN DISABLE K-DISPLAY FOR CHARGE NUMBER 02736 M01S00104.v23l617 +++| BX6 X1 SAVE REGISTER CONTENTS 02737 M01S00105.v23l617 +++| BX7 X2 02738 M01S00106.v23l617 +++| SA6 CNDA 02739 M01S00107.v23l617 +++| SA7 CNDB 02740 M01S00108.v23l617 +++| SX1 B0+ 02741 M01S00109.v23l617 +++| RJ SPT SET PAGE TABLE TO INITIAL DISPLAY 02742 M01S00110.v23l617 +++| SA1 CNDA RESTORE REGISTERS 02743 M01S00111.v23l617 +++| SA2 CNDB 02744 M01S02382.profile +++| RJ CDV CHECK DIRECTIVE AND VALUE 02745 M01S02383.profile +++| SA3 UF 02746 M01S02384.profile +++| NZ X3,CND1 IF *UPDATE* MODE 02747 M01S02385.profile +++| SX1 X1-XDCN 02748 M01S02386.profile +++| ZR X1,CND15 IF *DCN* 02749 M01S02387.profile +++| RJ WDL WRITE DATA LEVEL 02750 M01S02388.profile +++| SA0 B1+B1 02751 M01S02389.profile +++| FUNC STBT SORT TABLE 2 02752 M01S02390.profile +++| RJ WPL WRITE PROJECT LEVEL 02753 M01S02391.profile +++| BX6 X6-X6 02754 M01S02392.profile +++| SA6 L.TAB2 EMPTY TABLE 2 02755 M01S02393.profile +++| SA6 RA2 RESET LINKS 02756 M01S02394.profile +++| SA6 A6+B1 02757 M01S02395.profile +++| SA1 TV 02758 M01S02396.profile +++| NZ X1,DIPX IF OVERFLOW 02759 M01S02397.profile +++| SA0 B1 02760 M01S02398.profile +++| SB6 CBUF 02761 M01S02399.profile +++| FUNC MWST SEARCH TABLE 1 02762 M01S02400.profile +++| ZR X2,CND11 IF CHARGE NUMBER FOUND 02763 M01S02401.profile +++| SA5 L.TAB1 TABLE 1 INDEX OF ENTRY 02764 M01S02402.profile +++| BX6 X5 02765 M01S02403.profile +++| SA6 T1IE 02766 M01S02404.profile +++| ALLOC TAB1,C.TAB1 02767 M01S02405.profile +++| IX5 X2+X5 02768 M01S02406.profile +++| MOVE C.TAB1,D1AA,X5 INITIALIZE ENTRY TO DEFAULT 02769 M01S02407.profile +++| SX6 B1 INDICATE CHARGE NUMBER PRESENT 02770 M01S02408.profile +++| SA6 FCNP 02771 M01S02409.profile +++| SA1 CBUF CHARGE NUMBER 02772 M01S02410.profile +++| BX6 X1 02773 M01S02411.profile +++| SA6 X5 02774 M01S02412.profile +++| SA6 D3AA+PCHW 02775 M01S02413.profile +++| SA6 CN 02776 M01S02414.profile +++| EQ DIP1 *MAIN LOOP* RETURN 02777 M01S02415.profile +++| 02778 M01S02416.profile +++|* *UPDATE* MODE. 02779 M01S02417.profile +++| 02780 M01S02418.profile +++| CND1 RJ DQP DIRECTIVE QUEUE PROCESSOR 02781 M01S02419.profile +++| SA1 CBUF CHARGE NUMBER 02782 M01S02420.profile +++| BX6 X1 02783 M01S02421.profile +++| SA6 D1AA 02784 M01S02422.profile +++| SA6 D3AA+PCHW 02785 M01S02423.profile +++| SA6 CN 02786 M01S02424.profile +++| SX1 A6 02787 M01S02425.profile +++| SX0 N 02788 M01S02426.profile +++| FUNC SPBT SET PRIMARY BLOCK 02789 M01S02427.profile +++| NZ X6,ERD38 IF ERROR 02790 M01S02428.profile +++| SA1 OP 02791 M01S02429.profile +++| SB2 X1-COPT 02792 M01S02430.profile +++| SA1 DTII 02793 M01S02431.profile +++| NZ X4,CND6 IF CHARGE NUMBER NOT FOUND 02794 M01S02432.profile +++| ZR B2,CND11 IF *CREATE* OPTION 02795 M01S02433.profile +++| SA2 F.TAB1 TABLE 1 INDEX OF ENTRY 02796 M01S02434.profile +++| IX6 X3-X2 02797 M01S02435.profile +++| SA6 T1IE 02798 M01S02436.profile +++| MX0 1 02799 M01S02437.profile +++| SA2 X3+CSRW 02800 M01S02438.profile +++| SB3 X1-XCND 02801 M01S02439.profile +++| ZR B3,CND3 IF *CN* 02802 M01S02440.profile +++| SB3 X1-XACN 02803 M01S02441.profile +++| ZR B3,CND2 IF *ACN* 02804 M01S02442.profile +++| NG X2,CND12 IF CHARGE NUMBER INACTIVE 02805 M01S02443.profile +++| BX6 X0+X2 DEACTIVATE CHARGE NUMBER 02806 M01S02444.profile +++| SA6 A2 02807 M01S02445.profile +++| EQ CND10 02808 M01S02446.profile +++| 02809 M01S02447.profile +++| CND2 NG X2,CND5 IF CHARGE NUMBER INACTIVE 02810 M01S02448.profile +++| EQ CND14 ERROR 02811 M01S02449.profile +++|
| Line S02450 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02812 M02S02450.ns22000 ---| CND3 NG X2,CND4 IF CHARGE NUMBER INACTIVE 02813 M01S00159.ns22000 +++| CND3 NG X2,CND12 IF CHARGE NUMBER INACTIVE 02814 M01S02451.profile +++| RJ VMU VALIDATE FOR MASTER USER 02815 M01S02452.profile +++| ZR X1,CND9 IF VALIDATION OK 02816 M01S02453.profile +++| EQ CND13 ERROR 02817 M01S02454.profile +++|
| Line S02455 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02818 M02S02455.ns22000 ---| CND4 SA4 CV
| Line S02456 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02819 M02S02456.ns22000 ---| ZR X4,CND12 IF NOT *CV* OPTION
| Line S02457 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02820 M02S02457.ns22000 ---| SA4 ACCC
| Line S02458 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02821 M02S02458.ns22000 ---| SB3 X4-2
| Line S02459 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02822 M02S02459.ns22000 ---| PL B3,CND12 IF NOT AUTHORIZED
| Line S02460 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02823 M02S02460.ns22000 ---| SX6 XACN SET TO *ACN*
| Line S02461 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02824 M02S02461.ns22000 ---| SA6 DTII 02825 M01S02462.profile +++| CND5 BX6 -X0*X2 ACTIVATE CHARGE NUMBER 02826 M01S02463.profile +++| SA6 A2 02827 M01S02464.profile +++| EQ CND9 02828 M01S02465.profile +++| 02829 M01S02466.profile +++| CND6 SB3 X1-XACN 02830 M01S02467.profile +++| ZR B3,CND8 IF *ACN* 02831 M01S02468.profile +++| SB3 X1-XDCN 02832 M01S02469.profile +++| ZR B3,CND16 IF *DCN*
| Line S02470 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02833 M02S02470.ns22000 ---| ZR B2,CND7 IF *CREATE* OPTION
| Line S02471 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02834 M02S02471.ns22000 ---| SA1 CV
| Line S02472 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02835 M02S02472.ns22000 ---| ZR X1,CND16 IF NOT *CV* OPTION
| Line S02473 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02836 M02S02473.ns22000 ---| SA1 ACCC
| Line S02474 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02837 M02S02474.ns22000 ---| SB3 X1-2
| Line S02475 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02838 M02S02475.ns22000 ---| PL B3,CND16 IF NOT AUTHORIZED 02839 M01S00160.ns22000 +++| NZ B2,CND16 IF NOT *CREATE* OPTION 02840 M01S02476.profile +++| CND7 SX6 XACN SET TO *ACN* 02841 M01S02477.profile +++| SA6 DTII 02842 M01S02478.profile +++| CND8 SA5 L.TAB1 TABLE 1 INDEX OF ENTRY 02843 M01S02479.profile +++| BX6 X5 02844 M01S02480.profile +++| SA6 T1IE 02845 M01S02481.profile +++| ALLOC TAB1,C.TAB1 02846 M01S02482.profile +++| IX5 X2+X5 02847 M01S02483.profile +++| MOVE C.TAB1,D1AA,X5 INITIALIZE ENTRY TO DEFAULT 02848 M01S02484.profile +++| BX3 X5 02849 M01S02485.profile +++| 02850 M01S02486.profile +++| CND9 SX6 B1 INDICATE CHARGE NUMBER PRESENT 02851 M01S02487.profile +++| SA6 FCNP 02852 M01S02488.profile +++| CND10 RJ KOC K-DISPLAY OUTPUT FOR CHARGE NUMBER 02853 M01S02489.profile +++| BX6 X6-X6 RE-SET FIELD SIZE 02854 M01S02490.profile +++| SA6 DF+2 02855 M01S02491.profile +++| SA1 DTII 02856 M01S02492.profile +++| SA2 X1+TOPR 02857 M01S02493.profile +++| BX5 X5-X5 02858 M01S02494.profile +++| RJ MQE MAKE QUEUE ENTRY 02859 M01S02495.profile +++| JP DIP1 *MAIN LOOP* RETURN 02860 M01S02496.profile +++| 02861 M01S02497.profile +++| CND11 SB3 ERUR 02862 M01S02498.profile +++| EQ CND17 02863 M01S02499.profile +++| CND12 SB3 ERUF 02864 M01S02500.profile +++| EQ CND17 02865 M01S02501.profile +++| CND13 SB3 ERUG 02866 M01S02502.profile +++| EQ CND17 02867 M01S02503.profile +++| CND14 SB3 ERUD 02868 M01S02504.profile +++| EQ CND17 02869 M01S02505.profile +++| CND15 SB3 ERUA 02870 M01S02506.profile +++| EQ CND17 02871 M01S02507.profile +++| CND16 SB3 ERUE 02872 M01S02508.profile +++| CND17 RJ ERU USER ERROR 02873 M01S02509.profile +++| JP DIP1 *MAIN LOOP* RETURN 02874 M01S00112.v23l617 +++| 02875 M01S00113.v23l617 +++| 02876 M01S00114.v23l617 +++| CNDA BSS 1 HOLD REGISTER CONTENTS 02877 M01S00115.v23l617 +++| CNDB BSS 1 HOLD REGISTER CONTENTS 02878 M01S02510.profile +++| CVD SPACE 4,10 02879 M01S02511.profile +++|** CVD - CONVERSION-VALIDATION DIRECTIVE. 02880 M01S02512.profile +++|* 02881 M01S02513.profile +++|* *ISV*, *SML* DIRECTIVES. 02882 M01S02514.profile +++|* *ISV* IS VALIDATED AGAINST *ISL* VALUE. 02883 M01S02515.profile +++|* *SML* IS VALIDATED AGAINST *SIL* VALUE. 02884 M01S02516.profile +++|* 02885 M01S02517.profile +++|* ENTRY (X2) = TABLE ENTRY (TOPR). 02886 M01S02518.profile +++|* (X4) = NUMBER OF CHARACTERS IN VALUE. 02887 M01S02519.profile +++|* (DTII) = TABLE INDEX. 02888 M01S02520.profile +++|* 02889 M01S02521.profile +++|* EXIT TO DIP1. 02890 M01S02522.profile +++|* 02891 M01S02523.profile +++|* CALLS CCP, CDV, CNV, DFS, GFV, MQE. 02892 M01S02524.profile +++|* 02893 M01S02525.profile +++|* USES ALL REGISTERS. 02894 M01S02526.profile +++| 02895 M01S02527.profile +++| 02896 M01S02528.profile +++| CVD BSS 0 02897 M01S02529.profile +++| CVD1 SA0 XISL *ISV* DIRECTIVE 02898 M01S02530.profile +++| EQ CVD3 02899 M01S02531.profile +++| 02900 M01S02532.profile +++| CVD2 SA0 XSIL *SML* DIRECTIVE 02901 M01S02533.profile +++| 02902 M01S02534.profile +++| CVD3 RJ CDV CHECK DIRECTIVE AND VALUE 02903 M01S02535.profile +++| RJ CNV CONVERT NUMERIC VALUE 02904 M01S02536.profile +++| SA1 DTII 02905 M01S02537.profile +++| SA2 X1+TOPR 02906 M01S02538.profile +++| RJ CCP CHECK FOR CHARGE/PROJECT NUMBER REQUIRED 02907 M01S02539.profile +++| SX7 A0 02908 M01S02540.profile +++| RJ DFS (DF) - (DF+4) SET-UP 02909 M01S02541.profile +++| RJ GFV GET FIELD,S VALUE 02910 M01S02542.profile +++| SB2 A0-XISL 02911 M01S02543.profile +++| ZR B2,CVD4 IF *ISV* DIRECTIVE 02912 M01S02544.profile +++| ZR X1,CVD5 IF VALIDATION NOT NECESSARY 02913 M01S02545.profile +++| CVD4 IX3 X1-X5 02914 M01S02546.profile +++| NG X3,CVD6 IF VALIDATION FAILED 02915 M01S02547.profile +++| CVD5 SA1 DTII RESTORE DIRECTIVE,S (DF) - (DF+4) 02916 M01S02548.profile +++| SX7 X1 02917 M01S02549.profile +++| RJ DFS (DF) - (DF+4) SET-UP 02918 M01S02550.profile +++| SA2 X1+TOPR 02919 M01S02551.profile +++| RJ MQE MAKE QUEUE ENTRY 02920 M01S02552.profile +++| JP DIP1 *MAIN LOOP* RETURN 02921 M01S02553.profile +++| 02922 M01S02554.profile +++| CVD6 SB3 ERUK 02923 M01S02555.profile +++| RJ ERU USER ERROR 02924 M01S02556.profile +++| JP DIP1 *MAIN LOOP* RETURN 02925 M01S02557.profile +++| DTD SPACE 4,10 02926 M01S02558.profile +++|** DTD - DATE DIRECTIVES. 02927 M01S02559.profile +++|* 02928 M01S02560.profile +++|* *CEX*, *PEX* DIRECTIVES. 02929 M01S02561.profile +++|* CONVERT DATE TO PACKED FORMAT PRODUCED BY *PDATE*. 02930 M01S02562.profile +++|* 02931 M01S02563.profile +++|* ENTRY (X2) = TABLE ENTRY (TOPR). 02932 M01S02564.profile +++|* (X4) = NUMBER OF CHARACTERS IN VALUE. 02933 M01S02565.profile +++|* (DTII) = TABLE INDEX. 02934 M01S02566.profile +++|* 02935 M01S02567.profile +++|* EXIT TO DIP1. 02936 M01S02568.profile +++|*
| Line S02569 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02937 M02S02569.ns2786 ---|* CALLS CCP, CDV, CNV, MQE. 02938 M01S00004.ns2786 +++|* CALLS CCP, CDV, CNV, MQE, VDT. 02939 M01S02570.profile +++|* 02940 M01S02571.profile +++|* USES ALL REGISTERS. 02941 M01S02572.profile +++| 02942 M01S02573.profile +++| 02943 M01S02574.profile +++| DTD BSS 0 02944 M01S02575.profile +++| RJ CDV CHECK DIRECTIVE AND VALUE 02945 M01S02576.profile +++| RJ CNV CONVERT NUMERIC VALUE 02946 M01S02577.profile +++| SA1 DTII 02947 M01S02578.profile +++| SA2 X1+TOPR 02948 M01S02579.profile +++| RJ CCP CHECK FOR CHARGE/PROJECT NUMBER REQUIRED 02949 M01S02580.profile +++| ZR X5,DTD1 IF ZERO VALUE
| Line S02581 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02950 M02S02581.ns2786 ---| SX0 10000 CALCULATE YEAR
| Line S02582 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02951 M02S02582.ns2786 ---| BX3 X5
| Line S02583 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02952 M02S02583.ns2786 ---| IX3 X3/X0
| Line S02584 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02953 M02S02584.ns2786 ---| SX4 X3-70 BIASED BY 70
| Line S02585 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02954 M02S02585.ns2786 ---| NG X4,DTD2 IF TOO SMALL
| Line S02586 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02955 M02S02586.ns2786 ---| SX0 10000
| Line S02587 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02956 M02S02587.ns2786 ---| IX7 X0*X3 CALCULATE MONTH
| Line S02588 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02957 M02S02588.ns2786 ---| IX5 X5-X7
| Line S02589 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02958 M02S02589.ns2786 ---| SX0 100
| Line S02590 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02959 M02S02590.ns2786 ---| BX6 X5
| Line S02591 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02960 M02S02591.ns2786 ---| IX6 X6/X0
| Line S02592 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02961 M02S02592.ns2786 ---| ZR X6,DTD2 IF TOO SMALL
| Line S02593 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02962 M02S02593.ns2786 ---| SX7 X6-13
| Line S02594 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02963 M02S02594.ns2786 ---| PL X7,DTD2 IF TOO LARGE
| Line S02595 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02964 M02S02595.ns2786 ---| SX0 100
| Line S02596 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02965 M02S02596.ns2786 ---| IX7 X0*X6 CALCULATE DAY
| Line S02597 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02966 M02S02597.ns2786 ---| IX5 X5-X7
| Line S02598 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02967 M02S02598.ns2786 ---| ZR X5,DTD2 IF TOO SMALL
| Line S02599 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02968 M02S02599.ns2786 ---| SX7 X5-32
| Line S02600 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02969 M02S02600.ns2786 ---| PL X7,DTD2 IF TOO LARGE
| Line S02601 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02970 M02S02601.ns2786 ---| LX4 12 POSITION YEAR AND MONTH
| Line S02602 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02971 M02S02602.ns2786 ---| LX6 6
| Line S02603 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02972 M02S02603.ns2786 ---| BX5 X4+X5 MERGE YEAR-MONTH-DAY
| Line S02604 Modification History | |
|---|---|
M01 (Added by) | profile |
M02 (Updated by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02973 M02S02604.ns2786 ---| BX5 X5+X6 02974 M01S00005.ns2786 +++| SA1 CBUF 02975 M01S00006.ns2786 +++| MX2 0 02976 M01S00007.ns2786 +++| RJ VDT VALIDATE DATE 02977 M01S00008.ns2786 +++| NG X6,DTD2 IF INCORRECT DATE 02978 M01S00009.ns2786 +++| NG X1,DTD2 IF DATE PRIOR TO TODAY 02979 M01S00001.ns2786b +++| SA1 DTII 02980 M01S00002.ns2786b +++| SA2 X1+TOPR 02981 M01S00010.ns2786 +++| BX5 X6 02982 M01S02605.profile +++| DTD1 RJ MQE MAKE QUEUE ENTRY 02983 M01S02606.profile +++| JP DIP1 *MAIN LOOP* RETURN 02984 M01S02607.profile +++| 02985 M01S02608.profile +++| DTD2 SB3 ERUK 02986 M01S02609.profile +++| RJ ERU USER ERROR 02987 M01S02610.profile +++| JP DIP1 *MAIN LOOP* RETURN 02988 M01S02611.profile +++| NUD SPACE 4,10 02989 M01S02612.profile +++|** NUD - NUMERIC DIRECTIVE (NO VALIDATION REQUIRED). 02990 M01S02613.profile +++|* 02991 M01S02614.profile +++|* *M1*,..., *M4*, *AD*, *ISL*, *IR1*,..., *IR8*, *SMA*, 02992 M01S02615.profile +++|* *SIL*, *SIA*, *LR1*, *AR1*,..., *LR8*, *AR8* DIRECTIVES. 02993 M01S02616.profile +++|* 02994 M01S02617.profile +++|* ENTRY (X2) = TABLE ENTRY (TOPR). 02995 M01S02618.profile +++|* (X4) = NUMBER OF CHARACTERS IN VALUE. 02996 M01S02619.profile +++|* (DTII) = TABLE INDEX. 02997 M01S02620.profile +++|* 02998 M01S02621.profile +++|* EXIT TO DIP1. 02999 M01S02622.profile +++|* 03000 M01S02623.profile +++|* CALLS CCP, CDV, CNV, MQE. 03001 M01S02624.profile +++|* 03002 M01S02625.profile +++|* USES ALL REGISTERS. 03003 M01S02626.profile +++| 03004 M01S02627.profile +++| 03005 M01S02628.profile +++| NUD BSS 0 03006 M01S02629.profile +++| RJ CDV CHECK DIRECTIVE AND VALUE 03007 M01S02630.profile +++| RJ CNV CONVERT NUMERIC VALUE 03008 M01S02631.profile +++| SA1 DTII 03009 M01S02632.profile +++| SA2 X1+TOPR 03010 M01S02633.profile +++| RJ CCP CHECK FOR CHARGE/PROJECT NUMBER REQUIRED 03011 M01S02634.profile +++| RJ MQE MAKE QUEUE ENTRY 03012 M01S02635.profile +++| JP DIP1 *MAIN LOOP* RETURN 03013 M01S02636.profile +++| PCL SPACE 4,10 03014 M01S02637.profile +++|** PCL - *PCL* DIRECTIVE. 03015 M01S02638.profile +++|* 03016 M01S02639.profile +++|* VALIDATE AGAINST CURRENT PROJECT COUNT. 03017 M01S02640.profile +++|* 03018 M01S02641.profile +++|* ENTRY (X2) = TABLE ENTRY (TOPR). 03019 M01S02642.profile +++|* (X4) = NUMBER OF CHARACTERS IN VALUE. 03020 M01S02643.profile +++|* (DTII) = TABLE INDEX. 03021 M01S02644.profile +++|* 03022 M01S02645.profile +++|* EXIT TO DIP1. 03023 M01S02646.profile +++|* 03024 M01S02647.profile +++|* CALLS CCP, CDV, CNV, MQE. 03025 M01S02648.profile +++|* 03026 M01S02649.profile +++|* USES ALL REGISTERS. 03027 M01S02650.profile +++| 03028 M01S02651.profile +++| 03029 M01S02652.profile +++| PCL BSS 0 03030 M01S02653.profile +++| RJ CDV CHECK DIRECTIVE AND VALUE 03031 M01S02654.profile +++| RJ CNV CONVERT NUMERIC VALUE 03032 M01S02655.profile +++| SA1 DTII 03033 M01S02656.profile +++| SA2 X1+TOPR 03034 M01S02657.profile +++| RJ CCP CHECK FOR CHARGE/PROJECT NUMBER REQUIRED 03035 M01S02658.profile +++| ZR X5,PCL1 IF VALIDATION NOT NECESSARY 03036 M01S02659.profile +++| SA3 F.TAB1 PROJECT COUNT 03037 M01S02660.profile +++| SA4 T1IE 03038 M01S02661.profile +++| IX3 X3+X4 03039 M01S02662.profile +++| SA3 X3+CSRW 03040 M01S02663.profile +++| MX4 -12 03041 M01S02664.profile +++| LX3 30 03042 M01S02665.profile +++| BX3 -X4*X3 03043 M01S02666.profile +++| IX3 X5-X3 03044 M01S02667.profile +++| NG X3,PCL2 IF LESS THAN PROJECT COUNT 03045 M01S02668.profile +++| PCL1 RJ MQE MAKE QUEUE ENTRY 03046 M01S02669.profile +++| JP DIP1 *MAIN LOOP* RETURN 03047 M01S02670.profile +++| 03048 M01S02671.profile +++| PCL2 SB3 ERUK 03049 M01S02672.profile +++| RJ ERU USER ERROR 03050 M01S02673.profile +++| JP DIP1 *MAIN LOOP* RETURN 03051 M01S00161.ns22000 +++| PED SPACE 4,15 03052 M01S00162.ns22000 +++|** PED - PROLOGUE/EPILOGUE DIRECTIVES. 03053 M01S00163.ns22000 +++|* 03054 M01S00164.ns22000 +++|* *PFN*, *PUN*, *PPW*, *PCR*, *EFN*, *EUN*, *EPW* DIRECTIVES. 03055 M01S00165.ns22000 +++|* 03056 M01S00166.ns22000 +++|* ENTRY (X2) = TABLE ENTRY (TOPR). 03057 M01S00167.ns22000 +++|* (X4) = NUMBER OF CHARACTERS IN VALUE. 03058 M01S00168.ns22000 +++|* (DTII) = DIRECTIVE TABLE INDEX. 03059 M01S00169.ns22000 +++|* 03060 M01S00170.ns22000 +++|* EXIT TO DIP1. 03061 M01S00171.ns22000 +++|* 03062 M01S00172.ns22000 +++|* USES A - 1, 2, 3, 5. 03063 M01S00173.ns22000 +++|* X - 1, 2, 3, 4, 5, 6, 7. 03064 M01S00174.ns22000 +++|* B - 2, 3. 03065 M01S00175.ns22000 +++|* 03066 M01S00176.ns22000 +++|* CALLS CCP, CDV, DFS, MQE. 03067 M01S00177.ns22000 +++| 03068 M01S00178.ns22000 +++| 03069 M01S00179.ns22000 +++| PED BSS 0 03070 M01S00180.ns22000 +++| NZ X4,PED1 IF NOT EMPTY DIRECTIVE 03071 M01S00181.ns22000 +++| BX6 X4 03072 M01S00182.ns22000 +++| SX4 B1 03073 M01S00183.ns22000 +++| PED1 RJ CDV CHECK DIRECTIVE AND VALUE 03074 M01S00184.ns22000 +++| SA1 DTII 03075 M01S00185.ns22000 +++| SA2 X1+TOPR 03076 M01S00186.ns22000 +++| RJ CCP CHECK FOR CHARGE/PROJECT NUMBER REQUIRED 03077 M01S00187.ns22000 +++| SA5 CBUF 03078 M01S00188.ns22000 +++| SX3 X1-XPCR 03079 M01S00189.ns22000 +++| ZR X3,PED2 IF PROLOGUE CHARGE REQUIRED DIRECTIVE 03080 M01S00190.ns22000 +++| LX5 -18 RIGHT JUSTIFY NAME 03081 M01S00191.ns22000 +++| EQ PED4 PROCESS DIRECTIVE 03082 M01S00192.ns22000 +++| 03083 M01S00193.ns22000 +++| PED2 SB2 -B1 SCAN OPTION TABLE 03084 M01S00194.ns22000 +++| SB3 TPCOL 03085 M01S00195.ns22000 +++| PED3 SB2 B2+B1 03086 M01S00196.ns22000 +++| GE B2,B3,PED5 IF END OF TABLE 03087 M01S00197.ns22000 +++| SA3 B2+TPCO 03088 M01S00198.ns22000 +++| BX3 X5-X3 03089 M01S00199.ns22000 +++| NZ X3,PED3 IF OPTION NOT FOUND 03090 M01S00200.ns22000 +++| SX5 B2 03091 M01S00201.ns22000 +++| PED4 BX7 X1 03092 M01S00202.ns22000 +++| RJ DFS (DF) - (DF+4) SET UP 03093 M01S00203.ns22000 +++| RJ MQE MAKE QUEUE ENTRY 03094 M01S00204.ns22000 +++| EQ DIP1 *MAIN LOOP* RETURN 03095 M01S00205.ns22000 +++| 03096 M01S00206.ns22000 +++| PED5 SB3 ERUK 03097 M01S00207.ns22000 +++| RJ ERU USER ERROR 03098 M01S00208.ns22000 +++| EQ DIP1 *MAIN LOOP* RETURN 03099 M01S02674.profile +++| PND SPACE 4,10 03100 M01S02675.profile +++|** PND - PROJECT NUMBER DIRECTIVE. 03101 M01S02676.profile +++|* 03102 M01S02677.profile +++|* *APN*, *DPN*, AND *PN* DIRECTIVES. 03103 M01S02678.profile +++|* 03104 M01S02679.profile +++|* ENTRY (X1) = (DTII) = TABLE INDEX. 03105 M01S02680.profile +++|* (X2) = TABLE ENTRY (TOPR). 03106 M01S02681.profile +++|* (X4) = NUMBER OF CHARACTERS IN VALUE. 03107 M01S02682.profile +++|* 03108 M01S02683.profile +++|* EXIT TO DIP1. 03109 M01S02684.profile +++|* (PN - PN+1) = PROJECT NUMBER.
Proceed to Part 2
cdc/nos2.source/opl.opl871/deck/profile.001.txt · Last modified: by 127.0.0.1