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