cdc:nos2.source:opl.opl871:deck:profile.001
Deck PROFILE Part 001
21 Modifications
Listing Sections
- Deck PROFILE Start
- Deck PROFILE Part 1 (Line 1451)
- Deck PROFILE Part 2 (Line 3159)
- Deck PROFILE Part 3 (Line 4957)
- Deck PROFILE Part 4 (Line 6706)
Source
Seq # *Modification Id* Act ----------------------------+ 01451 M00S01237.profile +++| 01452 M00S01238.profile +++| 01453 M00S01239.profile +++| PLO7 SA1 PLOA CHECK NUMBER OF CHARGE ENTRIES LISTED
| Line S01240 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01454 M01S01240.v23l617 ---| SX2 =C* MASTER USER NUMBER REQUIRED.*
| Line S00042 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01455 M01S00042.v23l617 +++| SX2 =C* MASTER USER NAME REQUIRED.* 01456 M00S01241.profile +++| SB4 X1 01457 M00S01242.profile +++| LE B4,B1,ABT IF NO CHARGE ENTRIES PROCESSED 01458 M00S01243.profile +++| SB2 PLOB * PROFILE FILE LIST COMPLETE.* 01459 M00S01244.profile +++| 01460 M00S01245.profile +++| PLO SUBR ENTRY/EXIT 01461 M00S01246.profile +++| SX6 B1 01462 M00S01247.profile +++| SA6 RA0+1 01463 M00S01248.profile +++| PLO1 SA0 B0 01464 M00S01249.profile +++| SX0 N 01465 M00S01250.profile +++| FUNC PNAT PICK NEXT ADDRESS - LEVEL-0 01466 M00S01251.profile +++| ZR X6,PLO7 IF END OF TABLE 0 01467 M00S01252.profile +++| SX6 X3 01468 M00S01253.profile +++| ZR X6,ERD41 IF NO LEVEL-1 CHAIN 01469 M00S01254.profile +++| SA6 RA1+1 01470 M00S01255.profile +++| BX6 X6-X6 EMPTY TABLE 1 01471 M00S01256.profile +++| SA6 L.TAB1 01472 M00S01257.profile +++| 01473 M00S01258.profile +++| PLO2 SA0 B1 01474 M00S01259.profile +++| SX0 N 01475 M00S01260.profile +++| FUNC PNAT PICK NEXT ADDRESS - LEVEL-1 01476 M00S01261.profile +++| ZR X6,PLO1 IF END OF TABLE 1 01477 M00S01262.profile +++| SX6 X3 01478 M00S01263.profile +++| SA6 RA2+1 01479 M00S01264.profile +++| SA5 LO 01480 M00S01265.profile +++| SX1 X5-FMLO 01481 M00S01266.profile +++| NG X1,PLO3 IF NOT MASTER USER LIST 01482 M00S01267.profile +++| SA1 A3-C.TAB1+1+CMUW 01483 M00S01268.profile +++| MX2 42 01484 M00S01269.profile +++| BX1 X1*X2 01485 M00S01270.profile +++| SA2 UN 01486 M00S01271.profile +++| BX2 X1-X2 01487 M00S01272.profile +++| NZ X2,PLO2 IF USER NOT MASTER USER 01488 M00S01273.profile +++| PLO3 SA0 A3-C.TAB1+1 FWA OF ENTRY 01489 M00S01274.profile +++| SA1 A0 CHARGE NUMBER 01490 M00S01275.profile +++| BX6 X1 01491 M00S01276.profile +++| SA6 CN 01492 M00S01277.profile +++| RJ SFN SPACE FILL NAME 01493 M00S01278.profile +++| SA6 OUTB+1 01494 M00S01279.profile +++| SA1 PLOA CHARGE NUMBER COUNTER 01495 M00S01280.profile +++| SX6 X1+B1 INCREMENT COUNTER 01496 M00S01281.profile +++| SA6 A1 01497 M00S01282.profile +++| RJ CDD DECIMAL DISPLAY CODE CONVERSION 01498 M00S01283.profile +++| LX6 12 INSERT *.* 01499 M00S01284.profile +++| MX1 -12 01500 M00S01285.profile +++| BX6 X1*X6 01501 M00S01286.profile +++| SX2 2R. 01502 M00S01287.profile +++| BX6 X2+X6 01503 M00S01288.profile +++| SA6 OUTB 01504 M00S01289.profile +++| SB2 B1+B1 PRESET WORD COUNT TO WRITE 01505 M00S01290.profile +++| SX2 X5-FMLO 01506 M00S01291.profile +++| PL X2,PLO4 IF MASTER USER LIST 01507 M00S01292.profile +++| SX2 X5-FSLO 01508 M00S01293.profile +++| ZR X2,PLO4 IF FULL LIST 01509 M00S01294.profile +++| SA1 A0+CMUW 01510 M00S01295.profile +++| MX2 42 01511 M00S01296.profile +++| BX6 X1*X2 01512 M00S01297.profile +++| ZR X6,PLO4 IF NO MASTER USER PRESENT
| Line S01298 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01513 M01S01298.v23l617 ---| SA6 OUTB+3 DISPLAY MASTER USER NUMBER
| Line S00043 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01514 M01S00043.v23l617 +++| SA6 OUTB+3 DISPLAY MASTER USER NAME 01515 M00S01299.profile +++| SA1 =1H 01516 M00S01300.profile +++| BX6 X1 01517 M00S01301.profile +++| SA6 A6-B1 01518 M00S01302.profile +++| SB2 4 01519 M00S01303.profile +++| PLO4 WRITH O,OUTB,B2 01520 M00S01304.profile +++| SX2 X5-CSLO 01521 M00S01305.profile +++| ZR X2,PLO2 IF CHARGE NUMBER LIST 01522 M00S01306.profile +++| SX2 X5-CMLO 01523 M00S01307.profile +++| ZR X2,PLO2 IF MASTER USER CHARGE NUMBER LIST 01524 M00S01308.profile +++| SX2 X5-FSLO 01525 M00S01309.profile +++| ZR X2,PLO5 IF FULL LIST 01526 M00S01310.profile +++| SX2 X5-FMLO 01527 M00S01311.profile +++| ZR X2,PLO5 IF MASTER USER FULL LIST 01528 M00S01312.profile +++| RJ PNO PROJECT NUMBER LIST TO OUTPUT 01529 M00S01313.profile +++| EQ PLO2 LOOP 01530 M00S01314.profile +++| 01531 M00S01315.profile +++| PLO5 SX3 A0 01532 M00S01316.profile +++| RJ OCE OUTPUT CHARGE ENTRY 01533 M00S01317.profile +++| SA1 RA2+1 01534 M00S01318.profile +++| ZR X1,PLO2 IF NO LEVEL-2 CHAIN 01535 M00S01319.profile +++| BX6 X6-X6 EMPTY TABLE 2 01536 M00S01320.profile +++| SA6 L.TAB2 01537 M00S01321.profile +++| 01538 M00S01322.profile +++| PLO6 SA0 B1+B1 01539 M00S01323.profile +++| SX0 N 01540 M00S01324.profile +++| FUNC PNAT PICK NEXT ADDRESS - LEVEL-2 01541 M00S01325.profile +++| ZR X6,PLO2 IF END OF TABLE 2 01542 M00S01326.profile +++| SX7 X3 01543 M00S01327.profile +++| SA1 A3-C.TAB2+1 PROJECT NUMBER 01544 M00S01328.profile +++| BX6 X1 01545 M00S01329.profile +++| SA6 PN 01546 M00S01330.profile +++| SA1 A1+B1 01547 M00S01331.profile +++| BX6 X1 01548 M00S01332.profile +++| SA6 A6+B1 01549 M00S01333.profile +++| RJ OPE OUTPUT PROJECT ENTRY 01550 M00S01334.profile +++| EQ PLO6 LOOP 01551 M00S01335.profile +++| 01552 M00S01336.profile +++| PLOA CON 1 CHARGE NUMBER COUNTER 01553 M00S01337.profile +++| PLOB DATA L* PROFILE FILE LIST COMPLETE.* 01554 M00S01338.profile +++| PRF SPACE 4,10 01555 M00S01339.profile +++|** PRF - PROCESS REFORMAT OPTION. 01556 M00S01340.profile +++|* 01557 M00S01341.profile +++|* INACTIVE CHARGE/PROJECT NUMBERS ARE PURGED. 01558 M00S01342.profile +++|* 01559 M00S01343.profile +++|* EXIT (B2) = MESSAGE ADDRESS. 01560 M00S01344.profile +++|* 01561 M00S01345.profile +++|* CALLS ADB, FUH, MVE, NUE, PDE, PNA, PNE, RBA, STB, WDL, WTB. 01562 M00S01346.profile +++|* 01563 M00S01347.profile +++|* USES ALL REGISTERS. 01564 M00S01348.profile +++| 01565 M00S01349.profile +++| 01566 M00S01350.profile +++| PRF SUBR ENTRY/EXIT 01567 M00S01351.profile +++| SX6 B1 01568 M00S01352.profile +++| SA6 RA0+1 01569 M00S01353.profile +++| PRF1 SA0 B0 01570 M00S01354.profile +++| SX0 N 01571 M00S01355.profile +++| FUNC PNAT PICK NEXT ADDRESS - LEVEL-0 01572 M00S01356.profile +++| ZR X6,PRF11 IF END OF TABLE 0 01573 M00S01357.profile +++| SX6 X3 01574 M00S01358.profile +++| ZR X6,ERD30 IF NO LEVEL-1 CHAIN 01575 M00S01359.profile +++| SA6 RA1+1 01576 M00S01360.profile +++| 01577 M00S01361.profile +++| PRF2 SA0 B1 01578 M00S01362.profile +++| SX0 N 01579 M00S01363.profile +++| SX5 P 01580 M00S01364.profile +++| FUNC PNET PICK NEXT ENTRY - LEVEL-1 01581 M00S01365.profile +++| ZR X6,PRF1 IF END OF TABLE 1 01582 M00S01366.profile +++| SA1 A3-C.TAB1+1+CSRW 01583 M00S01367.profile +++| PL X1,PRF3 IF ACTIVE CHARGE NUMBER 01584 M00S01368.profile +++| BX6 X6-X6 CLEAR INACTIVE CHARGE NUMBER ENTRY 01585 M00S01369.profile +++| SA6 A3-C.TAB1+1 01586 M00S01370.profile +++| EQ PRF2 LOOP 01587 M00S01371.profile +++| 01588 M00S01372.profile +++| PRF3 SX6 X3 01589 M00S01373.profile +++| ZR X6,PRF2 IF NO LEVEL-2 CHAIN 01590 M00S01374.profile +++| SA6 RA2+1 01591 M00S01375.profile +++| SA1 F.TAB1 SAVE TABLE 1 INDEX OF ENTRY 01592 M00S01376.profile +++| SX2 A3-C.TAB1+1 01593 M00S01377.profile +++| IX6 X2-X1 01594 M00S01378.profile +++| SA6 T1IE 01595 M00S01379.profile +++| SA3 X2 CHARGE NUMBER 01596 M00S01380.profile +++| BX6 X3 01597 M00S01381.profile +++| SA6 CN 01598 M00S01382.profile +++| BX6 X6-X6 EMPTY TABLE 2 01599 M00S01383.profile +++| SA6 L.TAB2 01600 M00S01384.profile +++| 01601 M00S01385.profile +++| PRF4 SA0 B1+B1 01602 M00S01386.profile +++| SX0 N 01603 M00S01387.profile +++| SX5 P 01604 M00S01388.profile +++| FUNC PNET PICK NEXT ENTRY - LEVEL-2 01605 M00S01389.profile +++| ZR X6,PRF10 IF END OF TABLE 2 01606 M00S01390.profile +++| SX7 X3 01607 M00S01391.profile +++| SA1 F.TAB2 SAVE TABLE 2 INDEX OF ENTRY 01608 M00S01392.profile +++| SX2 A3-C.TAB2+1 01609 M00S01393.profile +++| IX6 X2-X1 01610 M00S01394.profile +++| SA6 T2IE 01611 M00S01395.profile +++| BX6 X6-X6 CLEAR LINK WORD OF ENTRY 01612 M00S01396.profile +++| SA6 A3 01613 M00S01397.profile +++| SA3 X2 PROJECT NUMBER 01614 M00S01398.profile +++| BX6 X3 01615 M00S01399.profile +++| SA6 PN 01616 M00S01400.profile +++| SA3 A3+B1 01617 M00S01401.profile +++| BX6 X3 01618 M00S01402.profile +++| SA6 A6+B1 01619 M00S01403.profile +++| SX0 N 01620 M00S01404.profile +++| RJ ADB ADD DATA LEVEL BLOCK 01621 M00S01405.profile +++| SA1 A5+PTMW 01622 M00S01406.profile +++| PL X1,PRF5 IF ACTIVE PROJECT NUMBER 01623 M00S01407.profile +++| SA1 F.TAB2 CLEAR INACTIVE PROJECT NUMBER ENTRY 01624 M00S01408.profile +++| SA2 T2IE 01625 M00S01409.profile +++| IX1 X1+X2 01626 M00S01410.profile +++| BX6 X6-X6 01627 M00S01411.profile +++| SA6 X1 01628 M00S01412.profile +++| EQ PRF4 LOOP 01629 M00S01413.profile +++| 01630 M00S01414.profile +++| PRF5 MOVE C.TAB3,A5,D3AA SAVE PROJECT ENTRY 01631 M00S01415.profile +++| SA1 D3AA CLEAR ENTRY,S WORD POINTER 01632 M00S01416.profile +++| MX2 12 01633 M00S01417.profile +++| LX2 -12 01634 M00S01418.profile +++| BX6 -X2*X1 01635 M00S01419.profile +++| SA6 A1 01636 M00S01420.profile +++| SA5 T2IE 01637 M00S01421.profile +++| SX0 P 01638 M00S01422.profile +++| RJ PDE PROCESS DATA LEVEL ENTRY 01639 M00S01423.profile +++| MOVE C.TAB3,D3AA,X0 01640 M00S01424.profile +++| SX1 B1 READ IN ALL OVERFLOW BLOCKS
| Line S01425 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01641 M01S01425.v23l617 ---| PRF6 RJ NUE NEXT USER NUMBER ENTRY
| Line S00044 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01642 M01S00044.v23l617 +++| PRF6 RJ NUE NEXT USER NAME ENTRY 01643 M00S01426.profile +++| NZ B2,PRF7 IF END OF LEVEL-3 CHAIN 01644 M00S01427.profile +++| SX1 X1 01645 M00S01428.profile +++| ZR X1,PRF6 IF NOT END OF LIST 01646 M00S01429.profile +++| PRF7 SA1 F.TAB3
| Line S01430 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01647 M01S01430.v23l617 ---| RJ FUH FILL USER NUMBER HOLES
| Line S00045 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01648 M01S00045.v23l617 +++| RJ FUH FILL USER NAME HOLES 01649 M00S01431.profile +++| SA2 T3IE CLEAR ALL LEVEL-3 LINKS 01650 M00S01432.profile +++| IX2 X1+X2 01651 M00S01433.profile +++| SA2 X2 01652 M00S01434.profile +++| MX3 42 FIRST LEVEL-3 BLOCK 01653 M00S01435.profile +++| BX6 X3*X2 01654 M00S01436.profile +++| SA6 A2 01655 M00S01437.profile +++| SB2 X1 OVERFLOW BLOCKS 01656 M00S01438.profile +++| SA4 L.TAB3 01657 M00S01439.profile +++| SB3 X4+B2 01658 M00S01440.profile +++| PRF8 SB2 B2+PRUS 01659 M00S01441.profile +++| EQ B2,B3,PRF9 IF THRU ALL OVERFLOW BLOCKS 01660 M00S01442.profile +++| GT B2,B3,ERD2 IF ERROR 01661 M00S01443.profile +++| SA4 B2 01662 M00S01444.profile +++| BX6 X4*X3 01663 M00S01445.profile +++| SA6 A4 01664 M00S01446.profile +++| EQ PRF8 LOOP 01665 M00S01447.profile +++| 01666 M00S01448.profile +++| PRF9 SX6 B1 FORCE WRITE OF TABLE 3 01667 M00S01449.profile +++| SA6 FUP3 01668 M00S01450.profile +++| RJ WDL WRITE DATA LEVEL 01669 M00S01451.profile +++| EQ PRF4 LOOP 01670 M00S01452.profile +++| 01671 M00S01453.profile +++| PRF10 SA0 B1+B1 01672 M00S01454.profile +++| FUNC STBT SORT TABLE 2 01673 M00S01455.profile +++| SX5 P 01674 M00S01456.profile +++| FUNC RBAT RESET BLOCK ADDRESSES - LEVEL-2 01675 M00S01457.profile +++| SA1 T1IE LEVEL-2 RANDOM ADDRESS 01676 M00S01458.profile +++| SA2 F.TAB1 01677 M00S01459.profile +++| IX1 X1+X2 01678 M00S01460.profile +++| SA3 X1+C.TAB1-1 01679 M00S01461.profile +++| MX4 42 01680 M00S01462.profile +++| BX4 X4*X3 01681 M00S01463.profile +++| BX6 X4+X6 01682 M00S01464.profile +++| SA6 A3 01683 M00S01465.profile +++| EQ PRF2 LOOP 01684 M00S01466.profile +++| 01685 M00S01467.profile +++| PRF11 SA6 RA0+1 CLEAR LINK 01686 M00S01468.profile +++| SA6 L.TAB0 EMPTY TABLE 0 01687 M00S01469.profile +++| SX6 B1 INDICATE LEVEL-1 BUILD 01688 M00S01470.profile +++| SA6 CZ 01689 M00S01471.profile +++| SA0 B1 01690 M00S01472.profile +++| FUNC STBT SORT TABLE 1 01691 M00S01473.profile +++| SX5 P 01692 M00S01474.profile +++| FUNC RBAT RESET BLOCK ADDRESSES - LEVEL-1 01693 M00S01475.profile +++| SA0 B0 01694 M00S01476.profile +++| FUNC STBT SORT TABLE 0 01695 M00S01477.profile +++| BX0 X0-X0 01696 M00S01478.profile +++| SX5 P 01697 M00S01479.profile +++| FUNC WTBT WRITE TABLE 0 01698 M00S01480.profile +++| PURGE N,,,,,IP 01699 M00S01481.profile +++| CHANGE P,,(N+CFPN),,,,,,,IP 01700 M00S01482.profile +++| SB2 PRFA 01701 M00S01483.profile +++| EQ PRFX 01702 M00S01484.profile +++| 01703 M00S01485.profile +++| PRFA DATA L* PROFILE FILE REFORMAT COMPLETE.* 01704 M00S01486.profile +++| PUD SPACE 4 01705 M00S01487.profile +++|** PUD - PROCESS UPDATE DATA. 01706 M00S01488.profile +++|* 01707 M00S01489.profile +++|* EXIT (B2) = MESSAGE ADDRESS. 01708 M00S01490.profile +++|* 01709 M00S01491.profile +++|* CALLS DIP, WOL. 01710 M00S01492.profile +++|* 01711 M00S01493.profile +++|* USES ALL REGISTERS. 01712 M00S01494.profile +++| 01713 M00S01495.profile +++| 01714 M00S01496.profile +++| PUD SUBR ENTRY/EXIT 01715 M00S01497.profile +++| SX6 B1 SET UPDATE INDICATOR 01716 M00S01498.profile +++| SA6 UF 01717 M00S01499.profile +++| SA2 OP 01718 M00S01500.profile +++| SX3 X2-KOPT 01719 M00S01501.profile +++| ZR X3,PUD2 IF K-DISPLAY 01720 M00S01502.profile +++| SX3 X2-COPT 01721 M00S01503.profile +++| ZR X3,PUD2 IF CREATE OVERFLOW 01722 M00S01504.profile +++| SX2 X2-TOPT 01723 M00S01505.profile +++| SX6 UOPT 01724 M00S01506.profile +++| SA6 A2 01725 M00S01507.profile +++| SA1 PI
| Line S01508 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01726 M01S01508.v23l617 ---| NZ X1,PUD2 IF NOT TIMESHARING/INPUT
| Line S00046 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01727 M01S00046.v23l617 +++| NZ X1,PUD2 IF NOT INTERACTIVE/INPUT 01728 M00S01509.profile +++| ZR X2,PUD2 IF *T* OPTION 01729 M00S01510.profile +++| SB2 PUDL1 PRESET 01730 M00S01511.profile +++| SA1 ACCC 01731 M00S01512.profile +++| SX1 X1-2 01732 M00S01513.profile +++| PL X1,PUD1 IF RESTRICTED DIRECTIVE LIST 01733 M00S01514.profile +++| SB2 PUDL2 01734 M00S01515.profile +++| PUD1 WRITH O,PUDB,B2 01735 M00S01516.profile +++| WRITH O,PUDC,PUDL3 01736 M00S01517.profile +++| PUD2 RJ DIP DIRECTIVE INPUT PROCESSOR 01737 M00S01518.profile +++| BX6 X6-X6 CLEAR DISPLAYS 01738 M00S01519.profile +++| SA6 DSA+1 01739 M00S01520.profile +++| SB2 PUDA 01740 M00S01521.profile +++| EQ PUDX 01741 M00S01522.profile +++| 01742 M00S01523.profile +++| PUDA DATA L* PROFILE FILE UPDATE COMPLETE. * 01743 M00S01524.profile +++| 01744 M00S01525.profile +++|* THE FOLLOWING IS OUTPUTTED FOR TERMINAL JOBS HAVING *OP=U*. 01745 M00S01526.profile +++| 01746 M00S01527.profile +++| PUDB BSS 0 01747 M00S01528.profile +++| DIS ,* THE FOLLOWING ARE VALID INPUT DIRECTIVES FOR* 01748 M00S01529.profile +++| DIS ,* UPDATE-* 01749 M00S01530.profile +++| DIS ,* CN OR / - CHARGE NUMBER.* 01750 M00S01531.profile +++| DIS ,* PN - PROJECT NUMBER.* 01751 M00S01532.profile +++| DIS ,* APN - ADD OR ACTIVATE PROJECT NUMBER.* 01752 M00S01533.profile +++| DIS ,* DPN - DEACTIVATE PROJECT NUMBER.* 01753 M00S01534.profile +++| DIS ,* PEX - PROJECT NUMBER EXPIRATION DATE.* 01754 M00S01535.profile +++| DIS ,* TI - TIME IN.* 01755 M00S01536.profile +++| DIS ,* TO - TIME OFF.*
| Line S00108 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01756 M01S00108.ns22000 +++| DIS ,* PFN - PROLOGUE FILE NAME.*
| Line S00109 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Removed by) | profi13 |
Seq # *Modification Id* Act ----------------------------+ 01757 M02S00109.profi13 ---| DIS ,* PUN - PROLOGUE USERNAME.*
| Line S00041 Modification History | |
|---|---|
M01 (Added by) | profi13 |
Seq # *Modification Id* Act ----------------------------+ 01758 M01S00041.profi13 +++| DIS ,* PUN - PROLOGUE USER NAME.*
| Line S00110 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 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 (Removed by) | profi13 |
Seq # *Modification Id* Act ----------------------------+ 01765 M02S00116.profi13 ---| DIS ,* EUN - EPILOGUE USERNAME.*
| Line S00042 Modification History | |
|---|---|
M01 (Added by) | profi13 |
Seq # *Modification Id* Act ----------------------------+ 01766 M01S00042.profi13 +++| DIS ,* EUN - EPILOGUE USER NAME.*
| Line S00117 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01767 M01S00117.ns22000 +++| DIS ,* EPW - EPILOGUE PASSWORD.* 01768 M00S01537.profile +++| DIS ,* ISV - SRU VALIDATION LIMIT INDEX.* 01769 M00S01538.profile +++| DIS ,* SML - SRU MASTER USER LIMIT.* 01770 M00S01539.profile +++| DIS ,* SMA - SRU MASTER USER ACCUMULATOR.*
| Line S01540 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01771 M01S01540.v23l617 ---| DIS ,* AUN - ADD USER NUMBER.* 01772 M01S01541.v23l617 ---| DIS ,* DUN - DELETE USER NUMBER.*
| Line S00047 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01773 M01S00047.v23l617 +++| DIS ,* AUN - ADD USER NAME.* 01774 M01S00048.v23l617 +++| DIS ,* DUN - DELETE USER NAME.* 01775 M00S01542.profile +++| PUDL1 EQU *-PUDB 01776 M00S01543.profile +++| DIS ,* ACN - ADD OR ACTIVATE CHARGE NUMBER.* 01777 M00S01544.profile +++| DIS ,* DCN - DEACTIVATE CHARGE NUMBER.*
| Line S01545 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01778 M01S01545.v23l617 ---| DIS ,* MU - MASTER USER NUMBER.*
| Line S00049 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01779 M01S00049.v23l617 +++| DIS ,* MU - MASTER USER NAME.* 01780 M00S01546.profile +++| DIS ,* PCL - PROJECT COUNT LIMIT.* 01781 M00S01547.profile +++| DIS ,* M1 - M4 - SRU MULTIPLIER INDICES.* 01782 M00S01548.profile +++| DIS ,* AD - SRU CONSTANT INDEX.* 01783 M00S01549.profile +++| DIS ,* CEX - CHARGE NUMBER EXPIRATION DATE.* 01784 M00S01550.profile +++| DIS ,* ISL - INSTALLATION SRU LIMIT INDEX.* 01785 M00S01551.profile +++| DIS ,* IR1 - IR8 - INSTALLATION LIMIT INDICES.* 01786 M00S01552.profile +++| DIS ,* SIL - SRU INSTALLATION LIMIT.* 01787 M00S01553.profile +++| DIS ,* SIA - SRU INSTALLATION ACCUMULATOR.* 01788 M00S01554.profile +++| DIS ,* LR1 - LR8 - INSTALLATION LIMIT REGISTERS.* 01789 M00S01555.profile +++| DIS ,* AR1 - AR8 - INSTALLATION ACCUMULATORS.* 01790 M00S01556.profile +++| PUDL2 EQU *-PUDB 01791 M00S01557.profile +++| 01792 M00S01558.profile +++| PUDC DATA L* A NULL LINE COMPLETES DIRECTIVE INPUT PROCESSING. * 01793 M00S01559.profile +++| CON 0 BLANK LINE 01794 M00S01560.profile +++| PUDL3 EQU *-PUDC 01795 M00S01561.profile +++| TITLE LIST/INQUIRE SUBROUTINES. 01796 M00S01562.profile +++| CEO SPACE 4,10 01797 M00S01563.profile +++| ABD SPACE 4,10 01798 M00S01564.profile +++|** ABD - ASSEMBLE DIRECTIVE OR DATA. 01799 M00S01565.profile +++|* 01800 M00S01566.profile +++|* ASSEMBLES AND VERIFIES DIRECTIVE IDENTIFIERS, OR ASSEMBLES 01801 M00S01567.profile +++|* AND VERIFIES DATA. 01802 M00S01568.profile +++|* 01803 M00S01569.profile +++|* ENTRY (B2) = DIRECTIVE TABLE ADDRESS, IF DIRECTIVE ASSEMBLY. 01804 M00S01570.profile +++|* (B2) = NEGATIVE OF MAXIMUM NUMBER OF CHARACTERS, 01805 M00S01571.profile +++|* IF DATA ASSEMBLY. 01806 M00S01572.profile +++|* 01807 M00S01573.profile +++|* EXIT (B5) .LT. 0, IF EOF ENCOUNTERED. 01808 M00S01574.profile +++|* (B5) = 0, IF ASSEMBLY COMPLETE. 01809 M00S01575.profile +++|* (B5) .GT. 0, IF */* ENCOUNTERED (DIRECTIVE ASSEMBLY). 01810 M00S01576.profile +++|* (B4) = INDEX OF ENTRY IN TABLE OF DIRECTIVES, 01811 M00S01577.profile +++|* IF DIRECTIVE ASSEMBLY. 01812 M00S01578.profile +++|* TO ABM, IF ERROR. 01813 M00S01579.profile +++|* (B3) = ERROR MESSAGE ADDRESS. 01814 M00S01580.profile +++|* 01815 M00S01581.profile +++|* USES A - 1, 2, 3, 4, 6. 01816 M00S01582.profile +++|* B - 2, 3, 4, 5. 01817 M00S01583.profile +++|* X - 1, 2, 3, 4, 6. 01818 M00S01584.profile +++|* 01819 M00S01585.profile +++|* CALLS ACI. 01820 M00S01586.profile +++| 01821 M00S01587.profile +++| 01822 M00S01588.profile +++| ABD4 SA4 CBUF 01823 M00S01589.profile +++| ZR B6,ABDX IF ENTRY TERMINATION 01824 M00S01590.profile +++| ZR X4,ABD1 IF NO CHARACTERS ASSEMBLED
| Line S01591 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01825 M01S01591.v23l617 ---| NZ B2,ABM IF ILLEGAL SEPARATOR
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01826 M01S00050.v23l617 +++| NZ B2,ABM IF INCORRECT SEPARATOR 01827 M00S01592.profile +++| SB5 B0 01828 M00S01593.profile +++| SB4 -B1 01829 M00S01594.profile +++| ABD5 SB4 B4+B1 01830 M00S01595.profile +++| SA1 X3+B4 01831 M00S01596.profile +++| ZR X1,ABM IF DIRECTIVE NOT FOUND 01832 M00S01597.profile +++| BX1 X1-X4 01833 M00S01598.profile +++| NZ X1,ABD5 IF NO MATCH 01834 M00S01599.profile +++| 01835 M00S01600.profile +++| ABD SUBR ENTRY/EXIT 01836 M00S01601.profile +++| SX6 B2+ 01837 M00S01602.profile +++| SA6 ABDA
| Line S01603 Modification History | |
|---|---|
M01 (Removed by) | profi2 |
Seq # *Modification Id* Act ----------------------------+ 01838 M01S01603.profi2 ---| ABD1 BX1 X1-X1 ALLOW NO SPECIAL CHARACTERS
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | profi2 |
Seq # *Modification Id* Act ----------------------------+ 01839 M01S00001.profi2 +++| ABD1 SA1 ABDB ALLOW ASTERISK SPECIAL CHARACTER 01840 M00S01604.profile +++| RJ ACI ASSEMBLE CHARACTERS INTERFACE
| Line S01605 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01841 M01S01605.v23l617 ---| SB3 ERUA **** ILLEGAL DIRECTIVE
| Line S00051 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01842 M01S00051.v23l617 +++| SB3 ERUA **** INCORRECT DIRECTIVE 01843 M00S01606.profile +++| SA3 ABDA 01844 M00S01607.profile +++| SA2 PI 01845 M00S01608.profile +++| SA1 ET 01846 M00S01609.profile +++| SB2 B5-1R= 01847 M00S01610.profile +++| SB5 X1+ 01848 M00S01611.profile +++| PL X3,ABD4 IF DIRECTIVE ASSEMBLY 01849 M00S01612.profile +++| NZ X2,ABD2 IF NOT TERMINAL INPUT 01850 M00S01613.profile +++| NZ B6,ABD3 IF NOT ENTRY TERMINATION 01851 M00S01614.profile +++| NG X1,ABDX IF EOF ENCOUNTERED 01852 M00S01615.profile +++| EQ ABM ERROR - */* ENCOUNTERED 01853 M00S01616.profile +++|
| Line S01617 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01854 M01S01617.v23l617 ---| ABD2 ZR B6,ABM IF ILLEGAL ENTRY TERMINATION
| Line S00052 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01855 M01S00052.v23l617 +++| ABD2 ZR B6,ABM IF INCORRECT ENTRY TERMINATION 01856 M00S01618.profile +++| ABD3 SX3 X3-1
| Line S01619 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01857 M01S01619.v23l617 ---| ZR B2,ABM IF ILLEGAL SEPARATOR
| Line S00053 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01858 M01S00053.v23l617 +++| ZR B2,ABM IF INCORRECT SEPARATOR 01859 M00S01620.profile +++| IX4 X4+X3 01860 M00S01621.profile +++| SB5 B0 01861 M00S01622.profile +++| SB3 ERUB **** TOO MANY CHARACTERS IN VALUE 01862 M00S01623.profile +++| PL X4,ABM IF DATA TOO LONG 01863 M00S01624.profile +++| EQ ABDX RETURN 01864 M00S01625.profile +++| 01865 M00S01626.profile +++| 01866 M00S01627.profile +++| ABDA CON 0 HOLD FOR ENTRY CONDITION
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | profi2 |
Seq # *Modification Id* Act ----------------------------+ 01867 M01S00002.profi2 +++| ABDB BITCON (*) 01868 M00S01628.profile +++| CEO SPACE 4,10 01869 M00S01629.profile +++|** CEO - CHARGE ENTRY TO OUTPUT ASSEMBLY AREA. 01870 M00S01630.profile +++|* ASSEMBLY AREA OUTPUTTED A LINE AT A TIME (7 WORDS PER LINE). 01871 M00S01631.profile +++| 01872 M00S01632.profile +++| 01873 M00S01633.profile +++| CEO BSS 0 01874 M00S01634.profile +++| DATA L* CONTROLS FOR CHARGE NUMBER * 01875 M00S01635.profile +++| CEOB BSS 1 01876 M00S01636.profile +++| CEOL1 EQU *-CEO 01877 M00S01637.profile +++| CEZP BSS 0 01878 M00S01638.profile +++| DATA 1H 01879 M00S01639.profile +++| DATA L* CREATION DATE * 01880 M00S01640.profile +++| CEOC BSS 1 01881 M00S01641.profile +++| DATA L* EXPIRATION DATE * 01882 M00S01642.profile +++| CEOD BSS 1 01883 M00S01643.profile +++| DATA 1H 01884 M00S01644.profile +++| DATA L* ENTRY * 01885 M00S01645.profile +++| CEOE BSS 1 *ACTIVE* OR *INACTIVE* 01886 M00S01646.profile +++| DATA 1H 01887 M00S01647.profile +++| DATA L* PROJECT COUNT = * 01888 M00S01648.profile +++| CEOF BSS 1 01889 M00S01649.profile +++| DATA 1H 01890 M00S01650.profile +++| DATA L* MU = * 01891 M00S01651.profile +++| CEOG BSS 1 01892 M00S01652.profile +++| DATA 1H 01893 M00S01653.profile +++| DATA L* PCL = * 01894 M00S01654.profile +++| CEOH DIS 2, 01895 M00S01655.profile +++| DATA 1H 01896 M00S01656.profile +++| DATA L* ISL = * 01897 M00S01657.profile +++| CEOS BSS 1 01898 M00S01658.profile +++| BSS 1 SIL DEFAULT VALUE 01899 M00S01659.profile +++| DATA L* IR1 = * 01900 M00S01660.profile +++| CEOU BSS 1 01901 M00S01661.profile +++| BSS 1 LR1 DEFAULT VALUE 01902 M00S01662.profile +++| DATA 1H 01903 M00S01663.profile +++| DATA L* IR2 = * 01904 M00S01664.profile +++| CEOW BSS 1 01905 M00S01665.profile +++| BSS 1 LR2 DEFAULT VALUE 01906 M00S01666.profile +++| DATA L* IR3 = * 01907 M00S01667.profile +++| CEOY BSS 1 01908 M00S01668.profile +++| BSS 1 LR3 DEFAULT VALUE 01909 M00S01669.profile +++| DATA 1H 01910 M00S01670.profile +++| DATA L* IR4 = * 01911 M00S01671.profile +++| CEZB BSS 1 01912 M00S01672.profile +++| BSS 1 LR4 DEFAULT VALUE 01913 M00S01673.profile +++| DATA L* IR5 = * 01914 M00S01674.profile +++| CEZD BSS 1 01915 M00S01675.profile +++| BSS 1 LR5 DEFAULT VALUE 01916 M00S01676.profile +++| DATA 1H 01917 M00S01677.profile +++| DATA L* IR6 = * 01918 M00S01678.profile +++| CEZF BSS 1 01919 M00S01679.profile +++| BSS 1 LR6 DEFAULT VALUE 01920 M00S01680.profile +++| DATA L* IR7 = * 01921 M00S01681.profile +++| CEZH BSS 1 01922 M00S01682.profile +++| BSS 1 LR7 DEFAULT VALUE 01923 M00S01683.profile +++| DATA 1H 01924 M00S01684.profile +++| DATA L* IR8 = * 01925 M00S01685.profile +++| CEZJ BSS 1 01926 M00S01686.profile +++| BSS 1 LR8 DEFAULT VALUE 01927 M00S01687.profile +++| DIS 3, 01928 M00S01688.profile +++| CEOL2 EQU * 01929 M00S01689.profile +++| DATA 1H 01930 M00S01690.profile +++| DATA L* M1 = * 01931 M00S01691.profile +++| CEZK BSS 1 01932 M00S01692.profile +++| BSS 1 SRU MULTIPLIER 1 01933 M00S01693.profile +++| DATA L* M2 = * 01934 M00S01694.profile +++| CEZL BSS 1 01935 M00S01695.profile +++| BSS 1 SRU MULTIPLIER 2 01936 M00S01696.profile +++| DATA 1H 01937 M00S01697.profile +++| DATA L* M3 = * 01938 M00S01698.profile +++| CEZM BSS 1 01939 M00S01699.profile +++| BSS 1 SRU MULTIPLIER 3 01940 M00S01700.profile +++| DATA L* M4 = * 01941 M00S01701.profile +++| CEZN BSS 1 01942 M00S01702.profile +++| BSS 1 SRU MULTIPLIER 4 01943 M00S01703.profile +++| DATA 1H 01944 M00S01704.profile +++| DATA L* AD = * 01945 M00S01705.profile +++| CEZO BSS 1 01946 M00S01706.profile +++| BSS 1 SRU CONSTANT 01947 M00S01707.profile +++| DIS 3, 01948 M00S01708.profile +++| CEOL3 EQU * 01949 M00S01709.profile +++| OCE SPACE 4,10 01950 M00S01710.profile +++|** OCE - OUTPUT CHARGE ENTRY. 01951 M00S01711.profile +++|* 01952 M00S01712.profile +++|* ENTRY (X3) = FWA OF CHARGE ENTRY. 01953 M00S01713.profile +++|* (CN) = CHARGE NUMBER. 01954 M00S01714.profile +++|* (ACCC) .LT. 2, IF NO DISPLAY OF VALUES *M1* THRU *AD*. 01955 M00S01715.profile +++|* 01956 M00S01716.profile +++|* CALLS CPV, SFC, SFN, WOL. 01957 M00S01717.profile +++|* 01958 M00S01718.profile +++|* USES ALL REGISTERS EXCEPT A0. 01959 M00S01719.profile +++| 01960 M00S01720.profile +++| 01961 M00S01721.profile +++| OCE1 WRITH O,X5,7 OUTPUT LINE 01962 M00S01722.profile +++| SX5 X5+7 01963 M00S01723.profile +++| BX1 X0-X5 01964 M00S01724.profile +++| NZ X1,OCE1 IF NOT THRU CHARGE ASSEMBLY AREA 01965 M00S01725.profile +++| WRITH O,=0,B1 BLANK LINE 01966 M00S01726.profile +++| 01967 M00S01727.profile +++| OCE SUBR ENTRY/EXIT 01968 M00S01728.profile +++| SA1 F.TAB1 TABLE 1 INDEX OF ENTRY 01969 M00S01729.profile +++| IX6 X3-X1 01970 M00S01730.profile +++| SA6 T1IE 01971 M00S01731.profile +++| RJ SFC CHARGE ENTRY SPECIAL FIELDS 01972 M00S01732.profile +++| SA1 CN CHARGE NUMBER 01973 M00S01733.profile +++| RJ SFN SPACE FILL NAME 01974 M00S01734.profile +++| SA6 CEOB 01975 M00S01735.profile +++| SA5 TOIA 01976 M00S01736.profile +++| RJ CPV CONVERT AND PLACE VALUES 01977 M00S01737.profile +++| WRITH O,CEO,CEOL1 01978 M00S01738.profile +++| WRITH O,=0,B1 BLANK LINE 01979 M00S01739.profile +++| SX5 CEZP FWA OF CHARGE ASSEMBLY AREA 01980 M00S01740.profile +++| SX0 CEOL2 PRESET 01981 M00S01741.profile +++| SA1 ACCC 01982 M00S01742.profile +++| SX1 X1-2 01983 M00S01743.profile +++| PL X1,OCE1 IF RESTRICTED DISPLAY 01984 M00S01744.profile +++| SX0 CEOL3 01985 M00S01745.profile +++| EQ OCE1 01986 M00S01746.profile +++| OPE SPACE 4,10 01987 M00S01747.profile +++|** OPE - OUTPUT PROJECT ENTRY. 01988 M00S01748.profile +++|* 01989 M00S01749.profile +++|* ENTRY (X7) = RANDOM ADDRESS OF FIRST LEVEL-3 BLOCK. 01990 M00S01750.profile +++|* (PN - PN+1) = PROJECT NUMBER. 01991 M00S01751.profile +++|* 01992 M00S01752.profile +++|* USES A - 1, 5, 6. 01993 M00S01753.profile +++|* X - 0, 1, 5, 6. 01994 M00S01754.profile +++|* 01995 M00S01755.profile +++|* CALLS ADB, CPV, OUN, SFN, SFP. 01996 M00S01756.profile +++|* 01997 M00S01757.profile +++|* MACROS WRITH. 01998 M00S01758.profile +++| 01999 M00S01759.profile +++| 02000 M00S01760.profile +++| OPE SUBR ENTRY/EXIT 02001 M00S01761.profile +++| SX0 N 02002 M00S01762.profile +++| RJ ADB ADD DATA LEVEL BLOCK 02003 M00S01763.profile +++| RJ SFP PROJECT ENTRY SPECIAL FIELDS 02004 M00S01764.profile +++| SA1 PN PROJECT NUMBER 02005 M00S01765.profile +++| RJ SFN SPACE FILL NAME 02006 M00S01766.profile +++| SA6 PEOA 02007 M00S01767.profile +++| SA1 A1+B1 02008 M00S01768.profile +++| RJ SFN SPACE FILL NAME 02009 M00S01769.profile +++| SA6 A6+B1 02010 M00S01770.profile +++| SA5 TOID 02011 M00S01771.profile +++| RJ CPV CONVERT AND PLACE VALUES 02012 M00S01772.profile +++| WRITH O,PEO,PEOL1 02013 M00S01773.profile +++| WRITH O,=0,B1 BLANK LINE 02014 M00S01774.profile +++| SX5 PEZG FWA OF PROJECT ASSEMBLY AREA 02015 M00S01775.profile +++| OPE1 WRITH O,X5,7 OUTPUT LINE 02016 M00S01776.profile +++| SX5 X5+7 02017 M00S01777.profile +++| SX1 X5-PEOL2 02018 M00S01778.profile +++| NZ X1,OPE1 IF NOT THRU PROJECT ASSEMBLY AREA 02019 M00S01779.profile +++| WRITH O,=0,B1 BLANK LINE
| Line S01780 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02020 M01S01780.v23l617 ---| RJ OUN OUTPUT USER NUMBERS
| Line S00054 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02021 M01S00054.v23l617 +++| RJ OUN OUTPUT USER NAMES 02022 M00S01781.profile +++| EQ OPEX 02023 M00S01782.profile +++| OUN SPACE 4,10
| Line S01783 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02024 M01S01783.v23l617 ---|** OUN - OUTPUT USER NUMBERS VALIDATED FOR PROJECT.
| Line S00055 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02025 M01S00055.v23l617 +++|** OUN - OUTPUT USER NAMES VALIDATED FOR PROJECT. 02026 M00S01784.profile +++|* 02027 M00S01785.profile +++|* USES A - 1, 2, 5, 6, 7. 02028 M00S01786.profile +++|* B - 3, 4. 02029 M00S01787.profile +++|* X - 1, 2, 5, 6, 7. 02030 M00S01788.profile +++|* 02031 M00S01789.profile +++|* CALLS SFN, SUN. 02032 M00S01790.profile +++|* 02033 M00S01791.profile +++|* MACROS WRITH. 02034 M00S01792.profile +++| 02035 M00S01793.profile +++| 02036 M00S01794.profile +++| OUN SUBR ENTRY/EXIT
| Line S01795 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02037 M01S01795.v23l617 ---| RJ SUN SORT USER NUMBERS 02038 M01S01796.v23l617 ---| ZR X6,OUN4 IF NO USER NUMBERS 02039 M01S01797.v23l617 ---| SA1 PEOA WRITE USER NUMBER HEADER LINE
| Line S00056 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S01798.profile +++| SA2 A1+B1 02044 M00S01799.profile +++| BX6 X1 02045 M00S01800.profile +++| SA6 OUNC 02046 M00S01801.profile +++| LX7 X2 02047 M00S01802.profile +++| SA7 A6+B1 02048 M00S01803.profile +++| WRITH O,OUNB,OUNBL 02049 M00S01804.profile +++| SA1 =1H 02050 M00S01805.profile +++| SA5 F.TAB3 02051 M00S01806.profile +++| BX6 X1 02052 M00S01807.profile +++| SA6 OUTB 02053 M00S01808.profile +++| OUN1 SB3 B0+ 02054 M00S01809.profile +++| SB4 5
| Line S01810 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02055 M01S01810.v23l617 ---| OUN2 SA1 X5 GET NEXT USER NUMBER
| Line S00059 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02056 M01S00059.v23l617 +++| OUN2 SA1 X5 GET NEXT USER NAME 02057 M00S01811.profile +++| SX5 X5+B1
| Line S01812 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02058 M01S01812.v23l617 ---| RJ SFN SPACE FILL USER NUMBER
| Line S00060 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02059 M01S00060.v23l617 +++| RJ SFN SPACE FILL USER NAME 02060 M00S01813.profile +++| SA1 L.TAB3 02061 M00S01814.profile +++| SX7 X1-1 02062 M00S01815.profile +++| SB3 B3+B1 02063 M00S01816.profile +++| SA7 A1 02064 M00S01817.profile +++| SA6 OUTB+B3
| Line S01818 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02065 M01S01818.v23l617 ---| ZR X7,OUN3 IF END OF USER NUMBERS
| Line S00061 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02066 M01S00061.v23l617 +++| ZR X7,OUN3 IF END OF USER NAMES 02067 M00S01819.profile +++| LT B3,B4,OUN2 IF NOT FULL LINE
| Line S01820 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02068 M01S01820.v23l617 ---| OUN3 WRITH X2,OUTB,B3+B1 WRITE USER NUMBER LINE
| Line S00062 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02069 M01S00062.v23l617 +++| OUN3 WRITH X2,OUTB,B3+B1 WRITE USER NAME LINE 02070 M00S01821.profile +++| SA1 L.TAB3
| Line S01822 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02071 M01S01822.v23l617 ---| NZ X1,OUN1 IF MORE USER NUMBERS
| Line S00063 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02072 M01S00063.v23l617 +++| NZ X1,OUN1 IF MORE USER NAMES 02073 M00S01823.profile +++| OUN4 WRITH O,=0,B1 WRITE BLANK LINE 02074 M00S01824.profile +++| EQ OUNX RETURN 02075 M00S01825.profile +++| 02076 M00S01826.profile +++|
| Line S01827 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02077 M01S01827.v23l617 ---| OUNB DATA L* USER NUMBERS VALID TO USE *
| Line S00064 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
M02 (Removed by) | profi8 |
Seq # *Modification Id* Act ----------------------------+ 02078 M02S00064.profi8 ---| OUNB DATA L* USER NAMES VALID TO USE *
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | profi8 |
Seq # *Modification Id* Act ----------------------------+ 02079 M01S00001.profi8 +++| OUNB DATA 40H USER NAMES VALID TO USE 02080 M00S01828.profile +++| OUNC BSS 2 02081 M00S01829.profile +++| OUNBL EQU *-OUNB 02082 M00S01830.profile +++| PEO SPACE 4,10 02083 M00S01831.profile +++|** PEO - PROJECT ENTRY TO OUTPUT ASSEMBLY AREA. 02084 M00S01832.profile +++|* ASSEMBLY AREA OUTPUTTED A LINE AT A TIME (7 WORDS PER LINE). 02085 M00S01833.profile +++| 02086 M00S01834.profile +++| 02087 M00S01835.profile +++| PEO BSS 0 02088 M00S01836.profile +++| DATA L* CONTROLS FOR PROJECT NUMBER * 02089 M00S01837.profile +++| PEOA BSS 2 02090 M00S01838.profile +++| PEOL1 EQU *-PEO 02091 M00S01839.profile +++| PEZG BSS 0 02092 M00S01840.profile +++| DATA 1H 02093 M00S01841.profile +++| DATA L* CREATION DATE * 02094 M00S01842.profile +++| PEOB BSS 1 02095 M00S01843.profile +++| DATA L* LAST CHANGE DATE* 02096 M00S01844.profile +++| PEOC BSS 1 02097 M00S01845.profile +++| DATA 1H 02098 M00S01846.profile +++| DATA L* LAST UPDATE DATE* 02099 M00S01847.profile +++| PEOD BSS 1 02100 M00S01848.profile +++| DATA L* LAST UPDATE TIME* 02101 M00S01849.profile +++| PEOE BSS 1 02102 M00S01850.profile +++| DATA 1H 02103 M00S01851.profile +++| DATA L* ENTRY * 02104 M00S01852.profile +++| PEOF BSS 1 *ACTIVE* OR *INACTIVE* 02105 M00S01853.profile +++| DATA 1H 02106 M00S01854.profile +++| DATA L* EXPIRATION DATE * 02107 M00S01855.profile +++| PEOG BSS 1 02108 M00S01856.profile +++| DATA 1H 02109 M00S01857.profile +++| DATA L* TI = * 02110 M00S01858.profile +++| PEOH BSS 1 02111 M00S01859.profile +++| DATA 1H 02112 M00S01860.profile +++| DATA L* TO = * 02113 M00S01861.profile +++| PEOI DIS 2,
| Line S00118 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S01862.profile +++| DATA 1H 02136 M00S01863.profile +++| DATA L* ISV = *
| Line S01864 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02137 M01S01864.ns22000 ---| PEOJ DIS 5,
| Line S00139 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02138 M01S00139.ns22000 +++| PEOJ DIS 2, 02139 M00S01865.profile +++| DATA 1H 02140 M00S01866.profile +++| DATA L* SML = * 02141 M00S01867.profile +++| PEOL BSS 1 02142 M00S01868.profile +++| DATA 1H 02143 M00S01869.profile +++| DATA L* SMA = * 02144 M00S01870.profile +++| PEOM DIS 2, 02145 M00S01871.profile +++| DATA 1H 02146 M00S01872.profile +++| DATA L* SIL = * 02147 M00S01873.profile +++| PEON BSS 1 02148 M00S01874.profile +++| DATA 1H 02149 M00S01875.profile +++| DATA L* SIA = * 02150 M00S01876.profile +++| PEOO DIS 2, 02151 M00S01877.profile +++| DATA 1H 02152 M00S01878.profile +++| DATA L* LR1 = * 02153 M00S01879.profile +++| PEOP BSS 1 02154 M00S01880.profile +++| DATA 1H 02155 M00S01881.profile +++| DATA L* AR1 = * 02156 M00S01882.profile +++| PEOQ DIS 2, 02157 M00S01883.profile +++| DATA 1H 02158 M00S01884.profile +++| DATA L* LR2 = * 02159 M00S01885.profile +++| PEOR BSS 1 02160 M00S01886.profile +++| DATA 1H 02161 M00S01887.profile +++| DATA L* AR2 = * 02162 M00S01888.profile +++| PEOS DIS 2, 02163 M00S01889.profile +++| DATA 1H 02164 M00S01890.profile +++| DATA L* LR3 = * 02165 M00S01891.profile +++| PEOT BSS 1 02166 M00S01892.profile +++| DATA 1H 02167 M00S01893.profile +++| DATA L* AR3 = * 02168 M00S01894.profile +++| PEOU DIS 2, 02169 M00S01895.profile +++| DATA 1H 02170 M00S01896.profile +++| DATA L* LR4 = * 02171 M00S01897.profile +++| PEOV BSS 1 02172 M00S01898.profile +++| DATA 1H 02173 M00S01899.profile +++| DATA L* AR4 = * 02174 M00S01900.profile +++| PEOW DIS 2, 02175 M00S01901.profile +++| DATA 1H 02176 M00S01902.profile +++| DATA L* LR5 = * 02177 M00S01903.profile +++| PEOX BSS 1 02178 M00S01904.profile +++| DATA 1H 02179 M00S01905.profile +++| DATA L* AR5 = * 02180 M00S01906.profile +++| PEOY DIS 2, 02181 M00S01907.profile +++| DATA 1H 02182 M00S01908.profile +++| DATA L* LR6 = * 02183 M00S01909.profile +++| PEZA BSS 1 02184 M00S01910.profile +++| DATA 1H 02185 M00S01911.profile +++| DATA L* AR6 = * 02186 M00S01912.profile +++| PEZB DIS 2, 02187 M00S01913.profile +++| DATA 1H 02188 M00S01914.profile +++| DATA L* LR7 = * 02189 M00S01915.profile +++| PEZC BSS 1 02190 M00S01916.profile +++| DATA 1H 02191 M00S01917.profile +++| DATA L* AR7 = * 02192 M00S01918.profile +++| PEZD DIS 2, 02193 M00S01919.profile +++| DATA 1H 02194 M00S01920.profile +++| DATA L* LR8 = * 02195 M00S01921.profile +++| PEZE BSS 1 02196 M00S01922.profile +++| DATA 1H 02197 M00S01923.profile +++| DATA L* AR8 = * 02198 M00S01924.profile +++| PEZF DIS 2, 02199 M00S01925.profile +++| PEOL2 EQU * 02200 M00S01926.profile +++| PNO SPACE 4,10 02201 M00S01927.profile +++|** PNO - PROJECT NUMBER LIST TO OUTPUT. 02202 M00S01928.profile +++|* 02203 M00S01929.profile +++|* ENTRY (RA2+1) = LEVEL-2 RANDOM ADDRESS. 02204 M00S01930.profile +++|* 02205 M00S01931.profile +++|* CALLS PNA, SFN, WOL. 02206 M00S01932.profile +++|* 02207 M00S01933.profile +++|* USES ALL REGISTERS. 02208 M00S01934.profile +++| 02209 M00S01935.profile +++| 02210 M00S01936.profile +++| PNO SUBR ENTRY/EXIT 02211 M00S01937.profile +++| SA1 RA2+1 02212 M00S01938.profile +++| ZR X1,PNO4 IF NO LEVEL-2 CHAIN 02213 M00S01939.profile +++| SA1 =1H 02214 M00S01940.profile +++| BX6 X1 02215 M00S01941.profile +++| SA0 B1+B1 02216 M00S01942.profile +++| SA6 OUTB 02217 M00S01943.profile +++| SA6 OUTB+3 02218 M00S01944.profile +++| BX7 X7-X7 02219 M00S01945.profile +++| SA7 PNOA CLEAR PROJECT NUMBERS PER LINE COUNT 02220 M00S01946.profile +++| SA7 A7+B1 CLEAR HEADER LINE FLAG 02221 M00S01947.profile +++| SX0 N 02222 M00S01948.profile +++| SA7 L.TAB2 EMPTY TABLE 2 02223 M00S01949.profile +++| PNO1 FUNC PNAT PICK NEXT ADDRESS - LEVEL 2 02224 M00S01950.profile +++| SA6 PNOC SAVE END OF TABLE INDICATOR 02225 M00S01951.profile +++| ZR X6,PNO2 IF END OF TABLE 2 02226 M00S01952.profile +++| SA5 PNOA 02227 M00S01953.profile +++| SA1 A3-C.TAB2+1 02228 M00S01954.profile +++| RJ SFN SPACE FILL NAME 02229 M00S01955.profile +++| SA6 X5+OUTB+1 02230 M00S01956.profile +++| SA1 A1+B1 02231 M00S01957.profile +++| RJ SFN SPACE FILL NAME 02232 M00S01958.profile +++| SA6 A6+B1 02233 M00S01959.profile +++| SX6 X5+3 02234 M00S01960.profile +++| SA6 A5 02235 M00S01961.profile +++| SX2 X6-6 02236 M00S01962.profile +++| NZ X2,PNO1 IF NOT FULL LINE 02237 M00S01963.profile +++| PNO2 SA5 PNOA 02238 M00S01964.profile +++| ZR X5,PNO4 IF NO ENTRIES IN LINE 02239 M00S01965.profile +++| BX6 X6-X6 02240 M00S01966.profile +++| SA1 PNOB CHECK HEADER LINE FLAG 02241 M00S01967.profile +++| SA6 A5 02242 M00S01968.profile +++| NZ X1,PNO3 IF HEADER ALREADY WRITTEN 02243 M00S01969.profile +++| SX7 B1 02244 M00S01970.profile +++| SA7 A1 02245 M00S01971.profile +++| WRITH O,PNOD,PNODL WRITE PROJECT NUMBER HEADER LINE 02246 M00S01972.profile +++| PNO3 WRITH O,OUTB,X5 WRITE PROJECT NUMBER LINE 02247 M00S01973.profile +++| SA1 PNOC 02248 M00S01974.profile +++| NZ X1,PNO1 IF MORE LEVEL-2 ENTRIES TO PROCESS 02249 M00S01975.profile +++| PNO4 WRITH O,=0,B1 WRITE BLANK LINE 02250 M00S01976.profile +++| EQ PNOX RETURN 02251 M00S01977.profile +++| 02252 M00S01978.profile +++| 02253 M00S01979.profile +++| PNOA BSS 1 PROJECT NUMBERS PER LINE COUNTER 02254 M00S01980.profile +++| PNOB BSS 1 HEADER LINE WRITTEN FLAG 02255 M00S01981.profile +++| PNOC BSS 1 END OF TABLE INDICATOR 02256 M00S01982.profile +++| PNOD DATA L* VALIDATED PROJECT NUMBERS ARE -* 02257 M00S01983.profile +++| PNODL EQU *-PNOD 02258 M00S01984.profile +++| TITLE REFORMAT SUBROUTINES. 02259 M00S01985.profile +++| FUH SPACE
| Line S01986 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02260 M01S01986.v23l617 ---|** FUH - FILL USER NUMBER HOLES.
| Line S00065 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02261 M01S00065.v23l617 +++|** FUH - FILL USER NAME HOLES. 02262 M00S01987.profile +++|* 02263 M00S01988.profile +++|* THIS ROUTINE DELETES UNNECESSARY LEVEL-3 OVERFLOW BLOCKS
| Line S01989 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02264 M01S01989.v23l617 ---|* FROM TABLE 3 BY FILLING USER NUMBER HOLES.
| Line S00066 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02265 M01S00066.v23l617 +++|* FROM TABLE 3 BY FILLING USER NAME HOLES. 02266 M00S01990.profile +++|* 02267 M00S01991.profile +++|* ENTRY (X1) = FWA OF TABLE 3. 02268 M00S01992.profile +++|* 02269 M00S01993.profile +++|* CALLS FHP. 02270 M00S01994.profile +++|* 02271 M00S01995.profile +++|* USES X - 2, 3, 7. 02272 M00S01996.profile +++|* A - 2, 3, 7. 02273 M00S01997.profile +++|* B - 2, 3, 4, 5. 02274 M00S01998.profile +++| 02275 M00S01999.profile +++| 02276 M00S02000.profile +++| FUH2 BX7 X2 STORE UPDATED TABLE 3 LENGTH 02277 M00S02001.profile +++| SA7 L.TAB3 02278 M00S02002.profile +++| 02279 M00S02003.profile +++| FUH SUBR ENTRY/EXIT 02280 M00S02004.profile +++| SA2 L.TAB3 02281 M00S02005.profile +++| SX3 X2-PRUS 02282 M00S02006.profile +++| ZR X3,FUHX IF ONLY 1 BLOCK IN TABLE 3 02283 M00S02007.profile +++| NG X3,ERD42 IF ERROR 02284 M00S02008.profile +++| IX3 X1+X2 02285 M00S02009.profile +++| SB2 X3-1 (B2) = BACKWARD POINTER 02286 M00S02010.profile +++| SB3 X3-PRUS (B3) = BACKWARD POINTER LIMIT - 1 02287 M00S02011.profile +++| SA3 T3IE 02288 M00S02012.profile +++| IX3 X1+X3 02289 M00S02013.profile +++| SB4 X3+PUNW (B4) = FORWARD POINTER 02290 M00S02014.profile +++| SB5 B4+NUNS (B5) = FORWARD POINTER LIMIT + 1 02291 M00S02015.profile +++| RJ FHP FILLING HOLES PROCESSOR 02292 M00S02016.profile +++| NZ B6,FUH2 IF HOLES FILLED 02293 M00S02017.profile +++| SB4 X1+PRUS+1 UPDATE FORWARD POINTER AND LIMIT 02294 M00S02018.profile +++| SB5 B4+PRUS-1 02295 M00S02019.profile +++| FUH1 RJ FHP FILLING HOLES PROCESSOR 02296 M00S02020.profile +++| NZ B6,FUH2 IF HOLES FILLED 02297 M00S02021.profile +++| SB4 B4+B1 UPDATE FORWARD POINTER AND LIMIT 02298 M00S02022.profile +++| SB5 B5+PRUS 02299 M00S02023.profile +++| EQ FUH1 LOOP 02300 M00S02024.profile +++| FHP SPACE 4,10 02301 M00S02025.profile +++|** FHP - FILLING HOLES PROCESSOR. 02302 M00S02026.profile +++|* 02303 M00S02027.profile +++|* THIS ROUTINE SEARCHES IN A FORWARD DIRECTION FOR HOLES TO BE
| Line S02028 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02304 M01S02028.v23l617 ---|* FILLED BY USER NUMBERS SEARCHED FOR IN A BACKWARD DIRECTION.
| Line S00067 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02305 M01S00067.v23l617 +++|* FILLED BY USER NAMES SEARCHED FOR IN A BACKWARD DIRECTION. 02306 M00S02029.profile +++|* 02307 M00S02030.profile +++|* ENTRY (B2) = BACKWARD POINTER. 02308 M00S02031.profile +++|* (B3) = BACKWARD POINTER LIMIT - 1. 02309 M00S02032.profile +++|* (B4) = FORWARD POINTER. 02310 M00S02033.profile +++|* (B5) = FORWARD POINTER LIMIT + 1. 02311 M00S02034.profile +++|* (X2) = TABLE 3 LENGTH. 02312 M00S02035.profile +++|* 02313 M00S02036.profile +++|* EXIT (B6) = 0, IF FORWARD POINTER LIMIT REACHED. 02314 M00S02037.profile +++|* (B6) .NE. 0, IF THRU ALL ENTRIES. 02315 M00S02038.profile +++|* (B2) - (B4), (X2) UPDATED. 02316 M00S02039.profile +++|* 02317 M00S02040.profile +++|* USES X - 3, 4, 5, 6, 7. 02318 M00S02041.profile +++|* A - 3, 4, 6, 7. 02319 M00S02042.profile +++| 02320 M00S02043.profile +++| 02321 M00S02044.profile +++| FHP4 SB6 1 SET THRU ALL ENTRIES 02322 M00S02045.profile +++| 02323 M00S02046.profile +++| FHP SUBR ENTRY/EXIT 02324 M00S02047.profile +++| SB6 B0 PRESET 02325 M00S02048.profile +++| MX5 42 02326 M00S02049.profile +++| SX6 B1 02327 M00S02050.profile +++| FHP1 EQ B2,B4,FHP4 IF THRU ENTRIES 02328 M00S02051.profile +++| EQ B4,B5,FHPX IF FORWARD LIMIT REACHED 02329 M00S02052.profile +++| SA3 B4 NEXT FORWARD ENTRY 02330 M00S02053.profile +++| SX7 X3
| Line S02054 Modification History | |
|---|---|
M01 (Removed by) | profi3 |
Seq # *Modification Id* Act ----------------------------+ 02331 M01S02054.profi3 ---| NZ X7,FHP1 IF THRU LIST
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | profi3 |
Seq # *Modification Id* Act ----------------------------+ 02332 M01S00001.profi3 +++| NZ X7,FHP4 IF THRU LIST 02333 M00S02055.profile +++| SB4 B4+B1 INCREMENT FORWARD POINTER 02334 M00S02056.profile +++| NZ X3,FHP1 IF NOT HOLE 02335 M00S02057.profile +++| FHP2 EQ B2,B4,FHP4 IF THRU ENTRIES 02336 M00S02058.profile +++| EQ B2,B3,FHP3 IF BACKWARD LIMIT REACHED 02337 M00S02059.profile +++| SA4 B2 NEXT BACKWARD ENTRY 02338 M00S02060.profile +++| SA6 A4 FREE LOCATION (INITIALIZE TO 1) 02339 M00S02061.profile +++| BX7 X5*X4 02340 M00S02062.profile +++| SB2 B2-B1 DECREMENT BACKWARD POINTER 02341 M00S02063.profile +++| ZR X7,FHP2 IF HOLE
| Line S02064 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02342 M01S02064.v23l617 ---| SA7 A3 SET USER NUMBER IN HOLE
| Line S00068 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02343 M01S00068.v23l617 +++| SA7 A3 SET USER NAME IN HOLE 02344 M00S02065.profile +++| EQ FHP1 LOOP 02345 M00S02066.profile +++| 02346 M00S02067.profile +++| FHP3 SX2 X2-PRUS UPDATE TABLE 3 LENGTH 02347 M00S02068.profile +++| SX3 X2-PRUS 02348 M00S02069.profile +++| ZR X3,FHP4 IF THRU ENTRIES 02349 M00S02070.profile +++| NG X3,ERD43 IF ERROR 02350 M00S02071.profile +++| SB2 B2-B1 UPDATE BACKWARD POINTER AND LIMIT 02351 M00S02072.profile +++| SB3 B3-PRUS 02352 M00S02073.profile +++| EQ FHP2 LOOP 02353 M00S02074.profile +++| TITLE CHANGE TO SOURCE SUBROUTINES.
| Line S02075 Modification History | |
|---|---|
M01 (Removed by) | profi14 |
Seq # *Modification Id* Act ----------------------------+ 02354 M01S02075.profi14 ---| CSC SPACE 4,10
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | profi14 |
Seq # *Modification Id* Act ----------------------------+ 02355 M01S00001.profi14 +++| CSC SPACE 4,15 02356 M00S02076.profile +++|** CSC - CHANGE TO SOURCE CHARGE ENTRY. 02357 M00S02077.profile +++|* 02358 M00S02078.profile +++|* ENTRY (A5) = FWA OF CHARGE ENTRY. 02359 M00S02079.profile +++|* (CN) = CHARGE NUMBER. 02360 M00S02080.profile +++|* (T1IE) = TABLE 1 INDEX OF ENTRY. 02361 M00S02081.profile +++|*
| Line S02082 Modification History | |
|---|---|
M01 (Removed by) | profi14 |
Seq # *Modification Id* Act ----------------------------+ 02362 M01S02082.profi14 ---|* CALLS CTS, EDT, SFN, WOL.
| Line S00002 Modification History | |
|---|---|
M01 (Added by) | profi14 |
Seq # *Modification Id* Act ----------------------------+ 02363 M01S00002.profi14 +++|* EXIT CHARGE NUMBER DIRECTIVES WRITTEN TO SOURCE FILE. 02364 M00S02083.profile +++|*
| Line S02084 Modification History | |
|---|---|
M01 (Removed by) | profi14 |
Seq # *Modification Id* Act ----------------------------+ 02365 M01S02084.profi14 ---|* USES ALL REGISTERS EXCEPT A0.
| Line S00003 Modification History | |
|---|---|
M01 (Added by) | profi14 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S02085.profile +++| 02373 M00S02086.profile +++| 02374 M00S02087.profile +++| CSC SUBR ENTRY/EXIT 02375 M00S02088.profile +++| SA1 CN
| Line S02089 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02376 M01S02089.ns22000 ---| SA2 CV 02377 M01S02090.ns22000 ---| ZR X2,CSC1 IF NO CONVERSION OPTION 02378 M01S02091.ns22000 ---| RJ SFN SPACE FILL NAME 02379 M01S02092.ns22000 ---| MX0 6 */* FORMAT 02380 M01S02093.ns22000 ---| LX6 -6 02381 M01S02094.ns22000 ---| BX7 X0*X6 02382 M01S02095.ns22000 ---| BX6 -X0*X6 02383 M01S02096.ns22000 ---| SA2 =1L/ 02384 M01S02097.ns22000 ---| BX6 X2+X6 02385 M01S02098.ns22000 ---| EQ CSC2 02386 M01S02099.ns22000 ---|
| Line S02100 Modification History | |
|---|---|
M01 (Removed by) | profi14 |
Seq # *Modification Id* Act ----------------------------+ 02387 M01S02100.profi14 ---| CSC1 BX7 X1 *ACN* FORMAT
| Line S00009 Modification History | |
|---|---|
M01 (Added by) | profi14 |
Seq # *Modification Id* Act ----------------------------+ 02388 M01S00009.profi14 +++| RJ SFN SPACE FILL CHARGE NUMBER 02389 M01S00010.profi14 +++| BX7 X6 *ACN* FORMAT 02390 M00S02101.profile +++| SA1 =A*ACN = * 02391 M00S02102.profile +++| BX6 X1
| Line S02103 Modification History | |
|---|---|
M01 (Removed by) | profi14 |
Seq # *Modification Id* Act ----------------------------+ 02392 M01S02103.profi14 ---| CSC2 SA6 OUTB
| Line S00011 Modification History | |
|---|---|
M01 (Added by) | profi14 |
Seq # *Modification Id* Act ----------------------------+ 02393 M01S00011.profi14 +++| SA6 OUTB 02394 M00S02104.profile +++| SA7 A6+B1 02395 M00S02105.profile +++| WRITH S,A6,B1+B1 02396 M00S02106.profile +++| SA1 A5+CMUW *MU* 02397 M00S02107.profile +++| MX2 42 02398 M00S02108.profile +++| BX6 X2*X1 02399 M00S02109.profile +++| ZR X6,CSC3 IF NO MASTER USER 02400 M00S02110.profile +++| SA6 OUTB+1 02401 M00S02111.profile +++| SA1 =A*MU = * 02402 M00S02112.profile +++| BX6 X1 02403 M00S02113.profile +++| SA6 A6-B1 02404 M00S02114.profile +++| WRITH S,A6,B1+B1 02405 M00S02115.profile +++| CSC3 SA1 A5+CDTW *CEX*
| Line S02116 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02406 M01S02116.ns22000 ---| SA2 CV 02407 M00S02117.profile +++| LX1 36
| Line S02118 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02408 M01S02118.ns22000 ---| NZ X2,CSC4 IF CONVERSION OPTION SELECTED 02409 M00S02119.profile +++| SX1 X1 02410 M00S02120.profile +++| ZR X1,CSC4 IF NO CHARGE EXPIRATION DATE 02411 M00S02121.profile +++| RJ EDD EDIT DATE 02412 M00S02122.profile +++| SA6 OUTB+1 02413 M00S02123.profile +++| SA1 =A*CEX = * 02414 M00S02124.profile +++| BX6 X1 02415 M00S02125.profile +++| SA6 A6-B1 02416 M00S02126.profile +++| WRITH S,A6,B1+B1 02417 M00S02127.profile +++| CSC4 SA5 TOIB 02418 M00S02128.profile +++| RJ CTS CONVERT TO SOURCE 02419 M00S02129.profile +++| EQ CSCX 02420 M00S02130.profile +++| CSP SPACE 4,10 02421 M00S02131.profile +++|** CSP - CHANGE TO SOURCE PROJECT ENTRY. 02422 M00S02132.profile +++|* 02423 M00S02133.profile +++|* ENTRY (A5) = FWA OF PROJECT ENTRY. 02424 M00S02134.profile +++|* (PN - PN+1) = PROJECT NUMBER. 02425 M00S02135.profile +++|* (T3IE) = TABLE 3 INDEX OF ENTRY. 02426 M00S02136.profile +++|* 02427 M00S02137.profile +++|* USES A - 1, 2, 5, 6, 7. 02428 M00S02138.profile +++|* X - 1, 2, 5, 6, 7. 02429 M00S02139.profile +++|* 02430 M00S02140.profile +++|* CALLS CTS, EDD, ETM, SFN, SUN. 02431 M00S02141.profile +++|* 02432 M00S02142.profile +++|* MACROS WRITH. 02433 M00S02143.profile +++| 02434 M00S02144.profile +++| 02435 M00S02145.profile +++| CSP SUBR ENTRY/EXIT 02436 M00S02146.profile +++| SA1 =A*APN = * PRESET *APN* FORMAT
| Line S02147 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02437 M01S02147.ns22000 ---| SA2 CV 02438 M01S02148.ns22000 ---| ZR X2,CSP1 IF NO CONVERSION OPTION 02439 M01S02149.ns22000 ---| SA1 =A*PN = * *PN* FORMAT 02440 M00S02150.profile +++| CSP1 BX6 X1 02441 M00S02151.profile +++| SA6 OUTB 02442 M00S02152.profile +++| SA1 PN 02443 M00S02153.profile +++| RJ SFN SPACE FILL NAME 02444 M00S02154.profile +++| SA6 A6+B1 02445 M00S02155.profile +++| SA1 A1+B1 02446 M00S02156.profile +++| RJ SFN SPACE FILL NAME 02447 M00S02157.profile +++| SA6 A6+B1 02448 M00S02158.profile +++| WRITH S,OUTB,3 02449 M00S02159.profile +++| SA1 A5+PCDW *PEX*
| Line S02160 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02450 M01S02160.ns22000 ---| SA2 CV 02451 M00S02161.profile +++| LX1 36
| Line S02162 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02452 M01S02162.ns22000 ---| NZ X2,CSP2 IF CONVERSION OPTION SELECTED 02453 M00S02163.profile +++| SX1 X1 02454 M00S02164.profile +++| ZR X1,CSP2 IF NO PROJECT EXPIRATION DATE 02455 M00S02165.profile +++| RJ EDD EDIT DATE 02456 M00S02166.profile +++| SA6 OUTB+1 02457 M00S02167.profile +++| SA1 =A*PEX = * 02458 M00S02168.profile +++| BX6 X1 02459 M00S02169.profile +++| SA6 A6-B1 02460 M00S02170.profile +++| WRITH S,A6,B1+B1 02461 M00S02171.profile +++| CSP2 SA1 =1H0 *TO* 02462 M00S02172.profile +++| BX6 X1 02463 M00S02173.profile +++| SA5 A5+PTMW 02464 M00S02174.profile +++| SX1 X5 02465 M00S02175.profile +++| ZR X1,CSP3 IF ZERO VALUE 02466 M00S02176.profile +++| RJ ETM EDIT TIME 02467 M00S02177.profile +++| CSP3 SA6 OUTB+1 02468 M00S02178.profile +++| SA1 =A*TO = * 02469 M00S02179.profile +++| BX6 X1 02470 M00S02180.profile +++| SA6 A6-B1 02471 M00S02181.profile +++| WRITH S,A6,B1+B1 02472 M00S02182.profile +++| SA1 =1H0 *TI* 02473 M00S02183.profile +++| BX6 X1 02474 M00S02184.profile +++| LX5 -18 02475 M00S02185.profile +++| SX1 X5 02476 M00S02186.profile +++| ZR X1,CSP4 IF ZERO VALUE 02477 M00S02187.profile +++| RJ ETM EDIT TIME 02478 M00S02188.profile +++| CSP4 SA6 OUTB+1 02479 M00S02189.profile +++| SA1 =A*TI = * 02480 M00S02190.profile +++| BX6 X1 02481 M00S02191.profile +++| SA6 A6-B1 02482 M00S02192.profile +++| WRITH S,A6,B1+B1
| Line S02193 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02483 M01S02193.ns22000 ---| SA5 TOID 02484 M01S02194.ns22000 ---| RJ CTS CONVERT TO SOURCE
| Line S00140 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S02195.profile +++|
| Line S02196 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02505 M01S02196.v23l617 ---|* USER NUMBERS.
| Line S00069 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02506 M01S00069.v23l617 +++|* USER NAMES. 02507 M00S02197.profile +++|
| Line S02198 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02508 M01S02198.v23l617 ---| RJ SUN SORT USER NUMBERS
| Line S00070 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02509 M01S00070.v23l617 +++| RJ SUN SORT USER NAMES 02510 M00S02199.profile +++| SA1 =A*AUN = * PRESET *AUN* FORMAT
| Line S02200 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02511 M01S02200.ns22000 ---| SA2 CV 02512 M01S02201.ns22000 ---| ZR X2,CSP5 IF NO CONVERSION OPTION 02513 M01S02202.ns22000 ---| SA1 =A*UN = * *UN* FORMAT 02514 M00S02203.profile +++| CSP5 SA2 F.TAB3 02515 M00S02204.profile +++| BX7 X1 02516 M00S02205.profile +++| SA5 X2-1 02517 M00S02206.profile +++| SA7 OUTB
| Line S02207 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02518 M01S02207.v23l617 ---| CSP6 ZR X6,CSPX IF END OF USER NUMBERS
| Line S00071 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02519 M01S00071.v23l617 +++| CSP6 ZR X6,CSPX IF END OF USER NAMES 02520 M00S02208.profile +++| SA5 A5+B1 02521 M00S02209.profile +++| BX7 X5 02522 M00S02210.profile +++| SA7 OUTB+1 02523 M00S02211.profile +++| WRITH S,A7-B1,B1+B1 02524 M00S02212.profile +++| SA1 L.TAB3 02525 M00S02213.profile +++| SX6 X1-1 02526 M00S02214.profile +++| SA6 A1 02527 M00S02215.profile +++| EQ CSP6 LOOP 02528 M00S02216.profile +++| CTS SPACE 4,10 02529 M00S02217.profile +++|** CTS - CONVERT TABLE OF INDICES (TOI) ENTRIES TO SOURCE. 02530 M00S02218.profile +++|* 02531 M00S02219.profile +++|* ENTRY (X5) = FIRST ENTRY OF PERTINENT TABLE OF *TOI*. 02532 M00S02220.profile +++|* (A5) = ADDRESS OF FIRST ENTRY. 02533 M00S02221.profile +++|* (T1IE) = TABLE 1 INDEX OF ENTRY, IF LEVEL-1 DIRECTIVE. 02534 M00S02222.profile +++|* (T3IE) = TABLE 3 INDEX OF ENTRY, IF LEVEL-3 DIRECTIVE. 02535 M00S02223.profile +++|* 02536 M00S02224.profile +++|* CALLS CED, DFS, GFV, SFN, WOL. 02537 M00S02225.profile +++|* 02538 M00S02226.profile +++|* USES ALL REGISTERS EXCEPT A0. 02539 M00S02227.profile +++| 02540 M00S02228.profile +++| 02541 M00S02229.profile +++| CTS SUBR ENTRY/EXIT 02542 M00S02230.profile +++| MX0 12 02543 M00S02231.profile +++| LX0 -12 02544 M00S02232.profile +++| CTS1 ZR X5,CTSX IF END OF TABLE 02545 M00S02233.profile +++| BX7 X0*X5 02546 M00S02234.profile +++| LX7 -36 02547 M00S02235.profile +++| RJ DFS (DF) - (DF+4) SET-UP 02548 M00S02236.profile +++| RJ GFV GET FIELD,S VALUE 02549 M00S02237.profile +++| RJ CED CONVERT ENTRY TO DISPLAY CODE 02550 M00S02238.profile +++| SA6 OUTB+1 02551 M00S02239.profile +++| SA1 DF+4 02552 M00S02240.profile +++| RJ SFN SPACE FILL NAME 02553 M00S02241.profile +++| LX6 -24 02554 M00S02242.profile +++| MX1 -12 02555 M00S02243.profile +++| BX6 X1*X6 02556 M00S02244.profile +++| SX1 2R= 02557 M00S02245.profile +++| BX6 X1+X6 02558 M00S02246.profile +++| SA6 A6-B1 02559 M00S02247.profile +++| WRITH S,A6,B1+B1 02560 M00S02248.profile +++| SA5 A5+B1 02561 M00S02249.profile +++| EQ CTS1 LOOP 02562 M00S02250.profile +++| TITLE UPDATE/CREATE SUBROUTINES - MAIN INPUT ROUTINE. 02563 M00S02251.profile +++| DIP SPACE 4,10 02564 M00S02252.profile +++|** DIP - DIRECTIVE INPUT PROCESSOR. 02565 M00S02253.profile +++|* 02566 M00S02254.profile +++|* READ DIRECTIVES FROM INPUT FILE- OR K-DISPLAY IF 02567 M00S02255.profile +++|* *K-DISPLAY* OPTION- AND CALL APPROPRIATE INPUT PROCESSOR. 02568 M00S02256.profile +++|* INPUT PROCESSING TERMINATES UPON ENCOUNTERING AN EOI, EOF, 02569 M00S02257.profile +++|* OR EOR- OR *STOP* IF K-DISPLAY. DIRECTIVES ARE QUEUED FOR 02570 M00S02258.profile +++|* PROCESSING BY ROUTINE *DQP* (NOT PERTINENT IF *CREATE* MODE). 02571 M00S02259.profile +++|* 02572 M00S02260.profile +++|* EXIT TO INPUT PROCESSORS- 02573 M00S02261.profile +++|* (X1) = (DTII) = TABLE INDEX. 02574 M00S02262.profile +++|* (X2) = TABLE ENTRY (TOPR). 02575 M00S02263.profile +++|* (X4) = NUMBER OF CHARACTERS IN VALUE. 02576 M00S02264.profile +++|*
| Line S02265 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02577 M01S02265.v23l617 ---|* CALLS ACI, AMQ, DQP, SCI, STB, WDL, WPL, INPUT PROCESSORS.
| Line S00072 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02578 M01S00072.v23l617 +++|* CALLS ACI, AMQ, DQP, PGD, SCI, SPT, STB, WDL, WPL, 02579 M01S00073.v23l617 +++|* INPUT PROCESSORS. 02580 M00S02266.profile +++|* 02581 M00S02267.profile +++|* USES ALL REGISTERS. 02582 M00S02268.profile +++| 02583 M00S02269.profile +++| 02584 M00S02270.profile +++| DIP9 SA1 UF 02585 M00S02271.profile +++| ZR X1,DIP10 IF *CREATE* MODE 02586 M00S02272.profile +++| RJ DQP DIRECTIVE QUEUE PROCESSOR 02587 M00S02273.profile +++| EQ DIPX 02588 M00S02274.profile +++| 02589 M00S02275.profile +++| DIP10 RJ WDL WRITE DATA LEVEL 02590 M00S02276.profile +++| SA0 B1+B1 02591 M00S02277.profile +++| FUNC STBT SORT TABLE 2 02592 M00S02278.profile +++| RJ WPL WRITE PROJECT LEVEL 02593 M00S02279.profile +++| 02594 M00S02280.profile +++| DIP SUBR ENTRY/EXIT 02595 M00S02281.profile +++| SA1 CBUF CHECK FOR OVERFLOW SUSPENDED PROCESSING 02596 M00S02282.profile +++| NZ X1,CND1 IF CHARGE NUMBER PRESENT 02597 M00S02283.profile +++| SA1 UF 02598 M00S02284.profile +++| ZR X1,DIP1 IF *CREATE* MODE 02599 M00S02285.profile +++| RJ AMQ ALLOCATE MEMORY TO QUEUE 02600 M00S02286.profile +++| SA1 PI 02601 M00S02287.profile +++| NZ X1,DIP1 IF NOT TERMINAL FILE 02602 M00S02288.profile +++| WRITEH O,DIPB,2 *ENTER DIRECTIVES* 02603 M00S02289.profile +++| READ I 02604 M00S02290.profile +++| 02605 M00S02291.profile +++|* *MAIN LOOP* 02606 M00S02292.profile +++| 02607 M00S02293.profile +++| DIP1 BSS 0 02608 M00S02294.profile +++| SX0 I
| Line S02295 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02609 M01S02295.v23l617 ---| BX1 X1-X1
| Line S00074 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02610 M01S00074.v23l617 +++| SA1 DIPC ALLOW K-DISPLAY PAGING CHARACTERS 02611 M00S02296.profile +++| SX6 TDIR TABLE OF DIRECTIVES 02612 M00S02297.profile +++| SX3 TSKD TABLE OF SPECIAL K-DISPLAY DIRECTIVES 02613 M00S02298.profile +++| FUNC SCIT SCAN FOR CODE IDENTIFIER 02614 M00S02299.profile +++| ZR X1,DIP6 IF ERROR 02615 M00S02300.profile +++| ZR B6,DIP4 IF ENTRY TERMINATION 02616 M00S02301.profile +++| PL B7,DIP5 IF NOT SPECIAL K-DISPLAY DIRECTIVE
| Line S00075 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02617 M01S00075.v23l617 +++| SB2 -5 02618 M01S00076.v23l617 +++| GT B2,B7,DIP1.1 IF PAGING COMMAND
| Line S02302 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02619 M01S02302.v23l617 ---| SB2 -B1
| Line S00077 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02620 M01S00077.v23l617 +++| SB2 -1 02621 M00S02303.profile +++| EQ B2,B7,DIP2 IF *END*
| Line S02304 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02622 M01S02304.v23l617 ---| BX6 X6-X6 PERFORM NO UPDATE
| Line S00078 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02623 M01S00078.v23l617 +++| SX6 B0+ PERFORM NO UPDATE 02624 M00S02305.profile +++| SA6 FUP1 02625 M00S02306.profile +++| SA6 A6+B1 02626 M00S02307.profile +++| SA6 A6+B1 02627 M00S02308.profile +++| SB2 -2 02628 M00S02309.profile +++| EQ B2,B7,DIP3 IF *DROP* 02629 M00S02310.profile +++| SX7 -B1 *STOP* - FORCE LEVEL-0 UPDATE 02630 M00S02311.profile +++| SA7 ET 02631 M00S02312.profile +++| RJ DQP DIRECTIVE QUEUE PROCESSOR 02632 M00S02313.profile +++| EQ DIPX 02633 M00S02314.profile +++|
| Line S00079 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S02315.profile +++| DIP2 RJ DQP DIRECTIVE QUEUE PROCESSOR 02653 M00S02316.profile +++| DIP3 BX6 X6-X6 CLEAR CHARGE AND PROJECT NUMBER FLAGS 02654 M00S02317.profile +++| SA6 FCNP 02655 M00S02318.profile +++| SA6 FPNP 02656 M00S02319.profile +++| SA6 DSCN DISABLE K-DISPLAY FOR CHARGE NUMBER
| Line S00097 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02657 M01S00097.v23l617 +++| SX1 B0+ 02658 M01S00098.v23l617 +++| RJ SPT SET PAGE TABLE 02659 M00S02320.profile +++| EQ DIP1 LOOP 02660 M00S02321.profile +++| 02661 M00S02322.profile +++| DIP4 SA1 ET 02662 M00S02323.profile +++| NG X1,DIP9 IF EOF 02663 M00S02324.profile +++| SB7 XCND EQIVALENCE */* TO *CN* 02664 M00S02325.profile +++| DIP5 SX6 B7 TABLE INDEX
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | profi11 |
Seq # *Modification Id* Act ----------------------------+ 02665 M01S00007.profi11 +++| MX0 1 02666 M00S02326.profile +++| SA6 DTII
| Line S02327 Modification History | |
|---|---|
M01 (Removed by) | profi11 |
Seq # *Modification Id* Act ----------------------------+ 02667 M01S02327.profi11 ---| SA1 DIPA
| Line S00008 Modification History | |
|---|---|
M01 (Added by) | profi11 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S02328.profile +++| RJ ACI ASSEMBLE CHARACTERS INTERFACE 02678 M00S02329.profile +++| ZR B6,DIP8 IF ENTRY TERMINATION 02679 M00S02330.profile +++| SB5 B5-1R=
| Line S02331 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02680 M01S02331.v23l617 ---| ZR B5,DIP7 IF ILLEGAL SEPARATOR
| Line S00099 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02681 M01S00099.v23l617 +++| ZR B5,DIP7 IF INCORRECT SEPARATOR 02682 M00S02332.profile +++| SA1 DTII 02683 M00S02333.profile +++| SX2 X1-XPAS 02684 M00S02334.profile +++| ZR X2,DIP1 IF *PASS* DIRECTIVE 02685 M00S02335.profile +++| SA2 X1+TOPR 02686 M00S02336.profile +++| BX3 X2 02687 M00S02337.profile +++| LX3 -18 02688 M00S02338.profile +++| SB2 X3 02689 M00S02339.profile +++| JP B2 INPUT PROCESSOR 02690 M00S02340.profile +++| 02691 M00S02341.profile +++| DIP6 NZ B5,DIP7 IF SEPARATOR NOT *=* 02692 M00S02342.profile +++| SA1 DIPA GET RID OF PARAMETER VALUE 02693 M00S02343.profile +++| RJ ACI ASSEMBLE CHARACTERS INTERFACE 02694 M00S02344.profile +++| ZR B6,DIP8 IF ENTRY TERMINATION 02695 M00S02345.profile +++| DIP7 SB3 ERUA 02696 M00S02346.profile +++| RJ ERU USER ERROR 02697 M00S02347.profile +++| EQ DIP1 LOOP 02698 M00S02348.profile +++| 02699 M00S02349.profile +++| DIP8 SB3 ERUQ 02700 M00S02350.profile +++| RJ ERU USER ERROR 02701 M00S02351.profile +++| EQ DIP9 02702 M00S02352.profile +++| 02703 M00S02353.profile +++| DIPA BITCON (-,+,*) BIT STRING OF CHARACTERS TO PERMIT 02704 M00S02354.profile +++| 02705 M00S02355.profile +++| DIPB DIS 2,ENTER DIRECTIVES
| Line S00100 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S02356.profile +++| TITLE UPDATE/CREATE SUBROUTINES - INPUT PROCESSORS. 02710 M00S02357.profile +++| CND SPACE 4,10 02711 M00S02358.profile +++|** CND - CHARGE NUMBER DIRECTIVE. 02712 M00S02359.profile +++|* 02713 M00S02360.profile +++|* *ACN*, *CN*, *DCN* DIRECTIVES. 02714 M00S02361.profile +++|* 02715 M00S02362.profile +++|* ENTRY (X1) = (DTII) = TABLE INDEX. 02716 M00S02363.profile +++|* (X2) = TABLE ENTRY (TOPR). 02717 M00S02364.profile +++|* (X4) = NUMBER OF CHARACTERS IN VALUE. 02718 M00S02365.profile +++|* TO CND1, IF OVERFLOW SUSPENDED PROCESSING. 02719 M00S02366.profile +++|* 02720 M00S02367.profile +++|* EXIT TO DIPX, IF *CREATE* OVERFLOW DETECTED. 02721 M00S02368.profile +++|* TO DIP1, ELSE. 02722 M00S02369.profile +++|* (CN) = CHARGE NUMBER. 02723 M00S02370.profile +++|*
| Line S02371 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02724 M01S02371.v23l617 ---|* CALLS ATS, CDV, DQP, KOC, MQE, MVE, MWS, SPB, STB, VMU,
| Line S00103 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02725 M01S00103.v23l617 +++|* CALLS ATS, CDV, DQP, KOC, MQE, MVE, MWS, SPB, SPT, STB, VMU, 02726 M00S02372.profile +++|* WDL, WPL. 02727 M00S02373.profile +++|* 02728 M00S02374.profile +++|* USES ALL REGISTERS. 02729 M00S02375.profile +++| 02730 M00S02376.profile +++| 02731 M00S02377.profile +++| CND BSS 0 02732 M00S02378.profile +++| BX6 X6-X6 CLEAR CHARGE AND PROJECT NUMBER FLAGS 02733 M00S02379.profile +++| SA6 FCNP 02734 M00S02380.profile +++| SA6 FPNP 02735 M00S02381.profile +++| SA6 DSCN DISABLE K-DISPLAY FOR CHARGE NUMBER
| Line S00104 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S02382.profile +++| RJ CDV CHECK DIRECTIVE AND VALUE 02745 M00S02383.profile +++| SA3 UF 02746 M00S02384.profile +++| NZ X3,CND1 IF *UPDATE* MODE 02747 M00S02385.profile +++| SX1 X1-XDCN 02748 M00S02386.profile +++| ZR X1,CND15 IF *DCN* 02749 M00S02387.profile +++| RJ WDL WRITE DATA LEVEL 02750 M00S02388.profile +++| SA0 B1+B1 02751 M00S02389.profile +++| FUNC STBT SORT TABLE 2 02752 M00S02390.profile +++| RJ WPL WRITE PROJECT LEVEL 02753 M00S02391.profile +++| BX6 X6-X6 02754 M00S02392.profile +++| SA6 L.TAB2 EMPTY TABLE 2 02755 M00S02393.profile +++| SA6 RA2 RESET LINKS 02756 M00S02394.profile +++| SA6 A6+B1 02757 M00S02395.profile +++| SA1 TV 02758 M00S02396.profile +++| NZ X1,DIPX IF OVERFLOW 02759 M00S02397.profile +++| SA0 B1 02760 M00S02398.profile +++| SB6 CBUF 02761 M00S02399.profile +++| FUNC MWST SEARCH TABLE 1 02762 M00S02400.profile +++| ZR X2,CND11 IF CHARGE NUMBER FOUND 02763 M00S02401.profile +++| SA5 L.TAB1 TABLE 1 INDEX OF ENTRY 02764 M00S02402.profile +++| BX6 X5 02765 M00S02403.profile +++| SA6 T1IE 02766 M00S02404.profile +++| ALLOC TAB1,C.TAB1 02767 M00S02405.profile +++| IX5 X2+X5 02768 M00S02406.profile +++| MOVE C.TAB1,D1AA,X5 INITIALIZE ENTRY TO DEFAULT 02769 M00S02407.profile +++| SX6 B1 INDICATE CHARGE NUMBER PRESENT 02770 M00S02408.profile +++| SA6 FCNP 02771 M00S02409.profile +++| SA1 CBUF CHARGE NUMBER 02772 M00S02410.profile +++| BX6 X1 02773 M00S02411.profile +++| SA6 X5 02774 M00S02412.profile +++| SA6 D3AA+PCHW 02775 M00S02413.profile +++| SA6 CN 02776 M00S02414.profile +++| EQ DIP1 *MAIN LOOP* RETURN 02777 M00S02415.profile +++| 02778 M00S02416.profile +++|* *UPDATE* MODE. 02779 M00S02417.profile +++| 02780 M00S02418.profile +++| CND1 RJ DQP DIRECTIVE QUEUE PROCESSOR 02781 M00S02419.profile +++| SA1 CBUF CHARGE NUMBER 02782 M00S02420.profile +++| BX6 X1 02783 M00S02421.profile +++| SA6 D1AA 02784 M00S02422.profile +++| SA6 D3AA+PCHW 02785 M00S02423.profile +++| SA6 CN 02786 M00S02424.profile +++| SX1 A6 02787 M00S02425.profile +++| SX0 N 02788 M00S02426.profile +++| FUNC SPBT SET PRIMARY BLOCK 02789 M00S02427.profile +++| NZ X6,ERD38 IF ERROR 02790 M00S02428.profile +++| SA1 OP 02791 M00S02429.profile +++| SB2 X1-COPT 02792 M00S02430.profile +++| SA1 DTII 02793 M00S02431.profile +++| NZ X4,CND6 IF CHARGE NUMBER NOT FOUND 02794 M00S02432.profile +++| ZR B2,CND11 IF *CREATE* OPTION 02795 M00S02433.profile +++| SA2 F.TAB1 TABLE 1 INDEX OF ENTRY 02796 M00S02434.profile +++| IX6 X3-X2 02797 M00S02435.profile +++| SA6 T1IE 02798 M00S02436.profile +++| MX0 1 02799 M00S02437.profile +++| SA2 X3+CSRW 02800 M00S02438.profile +++| SB3 X1-XCND 02801 M00S02439.profile +++| ZR B3,CND3 IF *CN* 02802 M00S02440.profile +++| SB3 X1-XACN 02803 M00S02441.profile +++| ZR B3,CND2 IF *ACN* 02804 M00S02442.profile +++| NG X2,CND12 IF CHARGE NUMBER INACTIVE 02805 M00S02443.profile +++| BX6 X0+X2 DEACTIVATE CHARGE NUMBER 02806 M00S02444.profile +++| SA6 A2 02807 M00S02445.profile +++| EQ CND10 02808 M00S02446.profile +++| 02809 M00S02447.profile +++| CND2 NG X2,CND5 IF CHARGE NUMBER INACTIVE 02810 M00S02448.profile +++| EQ CND14 ERROR 02811 M00S02449.profile +++|
| Line S02450 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02812 M01S02450.ns22000 ---| CND3 NG X2,CND4 IF CHARGE NUMBER INACTIVE
| Line S00159 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02813 M01S00159.ns22000 +++| CND3 NG X2,CND12 IF CHARGE NUMBER INACTIVE 02814 M00S02451.profile +++| RJ VMU VALIDATE FOR MASTER USER 02815 M00S02452.profile +++| ZR X1,CND9 IF VALIDATION OK 02816 M00S02453.profile +++| EQ CND13 ERROR 02817 M00S02454.profile +++|
| Line S02455 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02818 M01S02455.ns22000 ---| CND4 SA4 CV 02819 M01S02456.ns22000 ---| ZR X4,CND12 IF NOT *CV* OPTION 02820 M01S02457.ns22000 ---| SA4 ACCC 02821 M01S02458.ns22000 ---| SB3 X4-2 02822 M01S02459.ns22000 ---| PL B3,CND12 IF NOT AUTHORIZED 02823 M01S02460.ns22000 ---| SX6 XACN SET TO *ACN* 02824 M01S02461.ns22000 ---| SA6 DTII 02825 M00S02462.profile +++| CND5 BX6 -X0*X2 ACTIVATE CHARGE NUMBER 02826 M00S02463.profile +++| SA6 A2 02827 M00S02464.profile +++| EQ CND9 02828 M00S02465.profile +++| 02829 M00S02466.profile +++| CND6 SB3 X1-XACN 02830 M00S02467.profile +++| ZR B3,CND8 IF *ACN* 02831 M00S02468.profile +++| SB3 X1-XDCN 02832 M00S02469.profile +++| ZR B3,CND16 IF *DCN*
| Line S02470 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02833 M01S02470.ns22000 ---| ZR B2,CND7 IF *CREATE* OPTION 02834 M01S02471.ns22000 ---| SA1 CV 02835 M01S02472.ns22000 ---| ZR X1,CND16 IF NOT *CV* OPTION 02836 M01S02473.ns22000 ---| SA1 ACCC 02837 M01S02474.ns22000 ---| SB3 X1-2 02838 M01S02475.ns22000 ---| PL B3,CND16 IF NOT AUTHORIZED
| Line S00160 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02839 M01S00160.ns22000 +++| NZ B2,CND16 IF NOT *CREATE* OPTION 02840 M00S02476.profile +++| CND7 SX6 XACN SET TO *ACN* 02841 M00S02477.profile +++| SA6 DTII 02842 M00S02478.profile +++| CND8 SA5 L.TAB1 TABLE 1 INDEX OF ENTRY 02843 M00S02479.profile +++| BX6 X5 02844 M00S02480.profile +++| SA6 T1IE 02845 M00S02481.profile +++| ALLOC TAB1,C.TAB1 02846 M00S02482.profile +++| IX5 X2+X5 02847 M00S02483.profile +++| MOVE C.TAB1,D1AA,X5 INITIALIZE ENTRY TO DEFAULT 02848 M00S02484.profile +++| BX3 X5 02849 M00S02485.profile +++| 02850 M00S02486.profile +++| CND9 SX6 B1 INDICATE CHARGE NUMBER PRESENT 02851 M00S02487.profile +++| SA6 FCNP 02852 M00S02488.profile +++| CND10 RJ KOC K-DISPLAY OUTPUT FOR CHARGE NUMBER 02853 M00S02489.profile +++| BX6 X6-X6 RE-SET FIELD SIZE 02854 M00S02490.profile +++| SA6 DF+2 02855 M00S02491.profile +++| SA1 DTII 02856 M00S02492.profile +++| SA2 X1+TOPR 02857 M00S02493.profile +++| BX5 X5-X5 02858 M00S02494.profile +++| RJ MQE MAKE QUEUE ENTRY 02859 M00S02495.profile +++| JP DIP1 *MAIN LOOP* RETURN 02860 M00S02496.profile +++| 02861 M00S02497.profile +++| CND11 SB3 ERUR 02862 M00S02498.profile +++| EQ CND17 02863 M00S02499.profile +++| CND12 SB3 ERUF 02864 M00S02500.profile +++| EQ CND17 02865 M00S02501.profile +++| CND13 SB3 ERUG 02866 M00S02502.profile +++| EQ CND17 02867 M00S02503.profile +++| CND14 SB3 ERUD 02868 M00S02504.profile +++| EQ CND17 02869 M00S02505.profile +++| CND15 SB3 ERUA 02870 M00S02506.profile +++| EQ CND17 02871 M00S02507.profile +++| CND16 SB3 ERUE 02872 M00S02508.profile +++| CND17 RJ ERU USER ERROR 02873 M00S02509.profile +++| JP DIP1 *MAIN LOOP* RETURN
| Line S00112 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S02510.profile +++| CVD SPACE 4,10 02879 M00S02511.profile +++|** CVD - CONVERSION-VALIDATION DIRECTIVE. 02880 M00S02512.profile +++|* 02881 M00S02513.profile +++|* *ISV*, *SML* DIRECTIVES. 02882 M00S02514.profile +++|* *ISV* IS VALIDATED AGAINST *ISL* VALUE. 02883 M00S02515.profile +++|* *SML* IS VALIDATED AGAINST *SIL* VALUE. 02884 M00S02516.profile +++|* 02885 M00S02517.profile +++|* ENTRY (X2) = TABLE ENTRY (TOPR). 02886 M00S02518.profile +++|* (X4) = NUMBER OF CHARACTERS IN VALUE. 02887 M00S02519.profile +++|* (DTII) = TABLE INDEX. 02888 M00S02520.profile +++|* 02889 M00S02521.profile +++|* EXIT TO DIP1. 02890 M00S02522.profile +++|* 02891 M00S02523.profile +++|* CALLS CCP, CDV, CNV, DFS, GFV, MQE. 02892 M00S02524.profile +++|* 02893 M00S02525.profile +++|* USES ALL REGISTERS. 02894 M00S02526.profile +++| 02895 M00S02527.profile +++| 02896 M00S02528.profile +++| CVD BSS 0 02897 M00S02529.profile +++| CVD1 SA0 XISL *ISV* DIRECTIVE 02898 M00S02530.profile +++| EQ CVD3 02899 M00S02531.profile +++| 02900 M00S02532.profile +++| CVD2 SA0 XSIL *SML* DIRECTIVE 02901 M00S02533.profile +++| 02902 M00S02534.profile +++| CVD3 RJ CDV CHECK DIRECTIVE AND VALUE 02903 M00S02535.profile +++| RJ CNV CONVERT NUMERIC VALUE 02904 M00S02536.profile +++| SA1 DTII 02905 M00S02537.profile +++| SA2 X1+TOPR 02906 M00S02538.profile +++| RJ CCP CHECK FOR CHARGE/PROJECT NUMBER REQUIRED 02907 M00S02539.profile +++| SX7 A0 02908 M00S02540.profile +++| RJ DFS (DF) - (DF+4) SET-UP 02909 M00S02541.profile +++| RJ GFV GET FIELD,S VALUE 02910 M00S02542.profile +++| SB2 A0-XISL 02911 M00S02543.profile +++| ZR B2,CVD4 IF *ISV* DIRECTIVE 02912 M00S02544.profile +++| ZR X1,CVD5 IF VALIDATION NOT NECESSARY 02913 M00S02545.profile +++| CVD4 IX3 X1-X5 02914 M00S02546.profile +++| NG X3,CVD6 IF VALIDATION FAILED 02915 M00S02547.profile +++| CVD5 SA1 DTII RESTORE DIRECTIVE,S (DF) - (DF+4) 02916 M00S02548.profile +++| SX7 X1 02917 M00S02549.profile +++| RJ DFS (DF) - (DF+4) SET-UP 02918 M00S02550.profile +++| SA2 X1+TOPR 02919 M00S02551.profile +++| RJ MQE MAKE QUEUE ENTRY 02920 M00S02552.profile +++| JP DIP1 *MAIN LOOP* RETURN 02921 M00S02553.profile +++| 02922 M00S02554.profile +++| CVD6 SB3 ERUK 02923 M00S02555.profile +++| RJ ERU USER ERROR 02924 M00S02556.profile +++| JP DIP1 *MAIN LOOP* RETURN 02925 M00S02557.profile +++| DTD SPACE 4,10 02926 M00S02558.profile +++|** DTD - DATE DIRECTIVES. 02927 M00S02559.profile +++|* 02928 M00S02560.profile +++|* *CEX*, *PEX* DIRECTIVES. 02929 M00S02561.profile +++|* CONVERT DATE TO PACKED FORMAT PRODUCED BY *PDATE*. 02930 M00S02562.profile +++|* 02931 M00S02563.profile +++|* ENTRY (X2) = TABLE ENTRY (TOPR). 02932 M00S02564.profile +++|* (X4) = NUMBER OF CHARACTERS IN VALUE. 02933 M00S02565.profile +++|* (DTII) = TABLE INDEX. 02934 M00S02566.profile +++|* 02935 M00S02567.profile +++|* EXIT TO DIP1. 02936 M00S02568.profile +++|*
| Line S02569 Modification History | |
|---|---|
M01 (Removed by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02937 M01S02569.ns2786 ---|* CALLS CCP, CDV, CNV, MQE.
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02938 M01S00004.ns2786 +++|* CALLS CCP, CDV, CNV, MQE, VDT. 02939 M00S02570.profile +++|* 02940 M00S02571.profile +++|* USES ALL REGISTERS. 02941 M00S02572.profile +++| 02942 M00S02573.profile +++| 02943 M00S02574.profile +++| DTD BSS 0 02944 M00S02575.profile +++| RJ CDV CHECK DIRECTIVE AND VALUE 02945 M00S02576.profile +++| RJ CNV CONVERT NUMERIC VALUE 02946 M00S02577.profile +++| SA1 DTII 02947 M00S02578.profile +++| SA2 X1+TOPR 02948 M00S02579.profile +++| RJ CCP CHECK FOR CHARGE/PROJECT NUMBER REQUIRED 02949 M00S02580.profile +++| ZR X5,DTD1 IF ZERO VALUE
| Line S02581 Modification History | |
|---|---|
M01 (Removed by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02950 M01S02581.ns2786 ---| SX0 10000 CALCULATE YEAR 02951 M01S02582.ns2786 ---| BX3 X5 02952 M01S02583.ns2786 ---| IX3 X3/X0 02953 M01S02584.ns2786 ---| SX4 X3-70 BIASED BY 70 02954 M01S02585.ns2786 ---| NG X4,DTD2 IF TOO SMALL 02955 M01S02586.ns2786 ---| SX0 10000 02956 M01S02587.ns2786 ---| IX7 X0*X3 CALCULATE MONTH 02957 M01S02588.ns2786 ---| IX5 X5-X7 02958 M01S02589.ns2786 ---| SX0 100 02959 M01S02590.ns2786 ---| BX6 X5 02960 M01S02591.ns2786 ---| IX6 X6/X0 02961 M01S02592.ns2786 ---| ZR X6,DTD2 IF TOO SMALL 02962 M01S02593.ns2786 ---| SX7 X6-13 02963 M01S02594.ns2786 ---| PL X7,DTD2 IF TOO LARGE 02964 M01S02595.ns2786 ---| SX0 100 02965 M01S02596.ns2786 ---| IX7 X0*X6 CALCULATE DAY 02966 M01S02597.ns2786 ---| IX5 X5-X7 02967 M01S02598.ns2786 ---| ZR X5,DTD2 IF TOO SMALL 02968 M01S02599.ns2786 ---| SX7 X5-32 02969 M01S02600.ns2786 ---| PL X7,DTD2 IF TOO LARGE 02970 M01S02601.ns2786 ---| LX4 12 POSITION YEAR AND MONTH 02971 M01S02602.ns2786 ---| LX6 6 02972 M01S02603.ns2786 ---| BX5 X4+X5 MERGE YEAR-MONTH-DAY 02973 M01S02604.ns2786 ---| BX5 X5+X6
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 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
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | ns2786b |
Seq # *Modification Id* Act ----------------------------+ 02979 M01S00001.ns2786b +++| SA1 DTII 02980 M01S00002.ns2786b +++| SA2 X1+TOPR
| Line S00010 Modification History | |
|---|---|
M01 (Added by) | ns2786 |
Seq # *Modification Id* Act ----------------------------+ 02981 M01S00010.ns2786 +++| BX5 X6 02982 M00S02605.profile +++| DTD1 RJ MQE MAKE QUEUE ENTRY 02983 M00S02606.profile +++| JP DIP1 *MAIN LOOP* RETURN 02984 M00S02607.profile +++| 02985 M00S02608.profile +++| DTD2 SB3 ERUK 02986 M00S02609.profile +++| RJ ERU USER ERROR 02987 M00S02610.profile +++| JP DIP1 *MAIN LOOP* RETURN 02988 M00S02611.profile +++| NUD SPACE 4,10 02989 M00S02612.profile +++|** NUD - NUMERIC DIRECTIVE (NO VALIDATION REQUIRED). 02990 M00S02613.profile +++|* 02991 M00S02614.profile +++|* *M1*,..., *M4*, *AD*, *ISL*, *IR1*,..., *IR8*, *SMA*, 02992 M00S02615.profile +++|* *SIL*, *SIA*, *LR1*, *AR1*,..., *LR8*, *AR8* DIRECTIVES. 02993 M00S02616.profile +++|* 02994 M00S02617.profile +++|* ENTRY (X2) = TABLE ENTRY (TOPR). 02995 M00S02618.profile +++|* (X4) = NUMBER OF CHARACTERS IN VALUE. 02996 M00S02619.profile +++|* (DTII) = TABLE INDEX. 02997 M00S02620.profile +++|* 02998 M00S02621.profile +++|* EXIT TO DIP1. 02999 M00S02622.profile +++|* 03000 M00S02623.profile +++|* CALLS CCP, CDV, CNV, MQE. 03001 M00S02624.profile +++|* 03002 M00S02625.profile +++|* USES ALL REGISTERS. 03003 M00S02626.profile +++| 03004 M00S02627.profile +++| 03005 M00S02628.profile +++| NUD BSS 0 03006 M00S02629.profile +++| RJ CDV CHECK DIRECTIVE AND VALUE 03007 M00S02630.profile +++| RJ CNV CONVERT NUMERIC VALUE 03008 M00S02631.profile +++| SA1 DTII 03009 M00S02632.profile +++| SA2 X1+TOPR 03010 M00S02633.profile +++| RJ CCP CHECK FOR CHARGE/PROJECT NUMBER REQUIRED 03011 M00S02634.profile +++| RJ MQE MAKE QUEUE ENTRY 03012 M00S02635.profile +++| JP DIP1 *MAIN LOOP* RETURN 03013 M00S02636.profile +++| PCL SPACE 4,10 03014 M00S02637.profile +++|** PCL - *PCL* DIRECTIVE. 03015 M00S02638.profile +++|* 03016 M00S02639.profile +++|* VALIDATE AGAINST CURRENT PROJECT COUNT. 03017 M00S02640.profile +++|* 03018 M00S02641.profile +++|* ENTRY (X2) = TABLE ENTRY (TOPR). 03019 M00S02642.profile +++|* (X4) = NUMBER OF CHARACTERS IN VALUE. 03020 M00S02643.profile +++|* (DTII) = TABLE INDEX. 03021 M00S02644.profile +++|* 03022 M00S02645.profile +++|* EXIT TO DIP1. 03023 M00S02646.profile +++|* 03024 M00S02647.profile +++|* CALLS CCP, CDV, CNV, MQE. 03025 M00S02648.profile +++|* 03026 M00S02649.profile +++|* USES ALL REGISTERS. 03027 M00S02650.profile +++| 03028 M00S02651.profile +++| 03029 M00S02652.profile +++| PCL BSS 0 03030 M00S02653.profile +++| RJ CDV CHECK DIRECTIVE AND VALUE 03031 M00S02654.profile +++| RJ CNV CONVERT NUMERIC VALUE 03032 M00S02655.profile +++| SA1 DTII 03033 M00S02656.profile +++| SA2 X1+TOPR 03034 M00S02657.profile +++| RJ CCP CHECK FOR CHARGE/PROJECT NUMBER REQUIRED 03035 M00S02658.profile +++| ZR X5,PCL1 IF VALIDATION NOT NECESSARY 03036 M00S02659.profile +++| SA3 F.TAB1 PROJECT COUNT 03037 M00S02660.profile +++| SA4 T1IE 03038 M00S02661.profile +++| IX3 X3+X4 03039 M00S02662.profile +++| SA3 X3+CSRW 03040 M00S02663.profile +++| MX4 -12 03041 M00S02664.profile +++| LX3 30 03042 M00S02665.profile +++| BX3 -X4*X3 03043 M00S02666.profile +++| IX3 X5-X3 03044 M00S02667.profile +++| NG X3,PCL2 IF LESS THAN PROJECT COUNT 03045 M00S02668.profile +++| PCL1 RJ MQE MAKE QUEUE ENTRY 03046 M00S02669.profile +++| JP DIP1 *MAIN LOOP* RETURN 03047 M00S02670.profile +++| 03048 M00S02671.profile +++| PCL2 SB3 ERUK 03049 M00S02672.profile +++| RJ ERU USER ERROR 03050 M00S02673.profile +++| JP DIP1 *MAIN LOOP* RETURN
| Line S00161 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 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 M00S02674.profile +++| PND SPACE 4,10 03100 M00S02675.profile +++|** PND - PROJECT NUMBER DIRECTIVE. 03101 M00S02676.profile +++|* 03102 M00S02677.profile +++|* *APN*, *DPN*, AND *PN* DIRECTIVES. 03103 M00S02678.profile +++|* 03104 M00S02679.profile +++|* ENTRY (X1) = (DTII) = TABLE INDEX. 03105 M00S02680.profile +++|* (X2) = TABLE ENTRY (TOPR). 03106 M00S02681.profile +++|* (X4) = NUMBER OF CHARACTERS IN VALUE. 03107 M00S02682.profile +++|* 03108 M00S02683.profile +++|* EXIT TO DIP1. 03109 M00S02684.profile +++|* (PN - PN+1) = PROJECT NUMBER. 03110 M00S02685.profile +++|* 03111 M00S02686.profile +++|* CALLS ADB, ATS, CDD, CDV, DQP, ILR, KOP, MQE, MVE, MWS, PDE,
| Line S02687 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03112 M01S02687.v23l617 ---|* PEI, RCE, UPC, WDL.
| Line S00116 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03113 M01S00116.v23l617 +++|* PEI, RCE, SPT, UPC, WDL. 03114 M00S02688.profile +++|* 03115 M00S02689.profile +++|* USES ALL REGISTERS. 03116 M00S02690.profile +++| 03117 M00S02691.profile +++| 03118 M00S02692.profile +++| PND BSS 0 03119 M00S02693.profile +++| BX6 X6-X6 CLEAR PROJECT NUMBER FLAG 03120 M00S02694.profile +++| SA6 FPNP
| Line S00117 Modification History | |
|---|---|
M01 (Added by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03121 M01S00117.v23l617 +++| BX6 X1 SAVE REGISTER CONTENTS 03122 M01S00118.v23l617 +++| BX7 X2 03123 M01S00119.v23l617 +++| SA6 PNDA 03124 M01S00120.v23l617 +++| BX1 X1-X1 03125 M01S00121.v23l617 +++| SA7 PNDB 03126 M01S00122.v23l617 +++| RJ SPT SET PAGE TABLE TO CHARGE DISPLAY 03127 M01S00123.v23l617 +++| SA1 PNDA RESTORE REGISTERS 03128 M01S00124.v23l617 +++| SA2 PNDB
| Line S02695 Modification History | |
|---|---|
M01 (Removed by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 03129 M01S02695.v23l617 ---| SA6 DSPN DISABLE K-DISPLAY FOR PROJECT NUMBER 03130 M00S02696.profile +++| RJ CDV CHECK DIRECTIVE AND VALUE 03131 M00S02697.profile +++| SA3 FCNP 03132 M00S02698.profile +++| ZR X3,PND13 IF NO CHARGE NUMBER PRESENT 03133 M00S02699.profile +++| SA3 UF 03134 M00S02700.profile +++| NZ X3,PND2 IF *UPDATE* MODE 03135 M00S02701.profile +++| SX1 X1-XDPN 03136 M00S02702.profile +++| ZR X1,PND14 IF *DPN* 03137 M00S02703.profile +++| RJ WDL WRITE DATA LEVEL 03138 M00S02704.profile +++| SA0 B1+B1 03139 M00S02705.profile +++| BX1 X1-X1 03140 M00S02706.profile +++| SB6 CBUF 03141 M00S02707.profile +++| FUNC MWST SEARCH TABLE 2 03142 M00S02708.profile +++| ZR X2,PND15 IF PROJECT NUMBER FOUND 03143 M00S02709.profile +++| SX1 XAPN 03144 M00S02710.profile +++| RJ UPC UPDATE PROJECT COUNT 03145 M00S02711.profile +++| LX6 18 VALIDATE AGAINST *PCL* VALUE 03146 M00S02712.profile +++| MX3 -12 03147 M00S02713.profile +++| BX3 -X3*X6 03148 M00S02714.profile +++| ZR X3,PND1 IF NO RESTRICTION 03149 M00S02715.profile +++| IX3 X3-X4 03150 M00S02716.profile +++| NG X3,PND19 IF *PCL* VALUE EXCEEDED 03151 M00S02717.profile +++| PND1 LX6 -18 03152 M00S02718.profile +++| SA6 A2 03153 M00S02719.profile +++| SX6 B1 INDICATE NEED TO UPDATE LEVELS 2 AND 3 03154 M00S02720.profile +++| SA6 FUP2 03155 M00S02721.profile +++| SA6 A6+B1 03156 M00S02722.profile +++| SA5 L.TAB2 TABLE 2 INDEX OF ENTRY 03157 M00S02723.profile +++| BX6 X5 03158 M00S02724.profile +++| SA6 T2IE
Proceed to Part 2
cdc/nos2.source/opl.opl871/deck/profile.001.txt · Last modified: (external edit)