cdc:nos2.source:opl.opl871:deck:sdsplay.001
Deck SDSPLAY Part 001
5 Modifications
Listing Sections
- Deck SDSPLAY Start
- Deck SDSPLAY Part 1 (Line 1767)
Source
Seq # *Modification Id* Act ----------------------------+ 01767 M01S00074.271l716 +++| PL X1,PKC8 IF VALUE TOO LARGE 01768 M00S01581.sdsplay +++| PX5 X6 01769 M00S01582.sdsplay +++| NX6,B3 X5
| Line S01583 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01770 M01S01583.271l716 ---| SB3 B3-47 01771 M01S01584.271l716 ---| SX6 -B3 RETURN POWER OF 2 01772 M01S01585.271l716 ---| PSK2 RJ SPS SET PARAMETER IN SYSTEM BUFFER 01773 M01S01586.271l716 ---| SB2 B0+ CLEAR ERROR FLAG 01774 M01S01587.271l716 ---| EQ PSKX RETURN
| Line S00075 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01775 M01S00075.271l716 +++| SB3 B3-47 RETURN POWER OF 2 01776 M01S00076.271l716 +++| SX6 -B3
| Line S00077 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01777 M02S00077.271l750 ---| EQ PSK1 SET PARAMETER IN SYSTEM BUFFER
| Line S00101 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01778 M01S00101.271l750 +++| PSK1 RJ SPS SET PARAMETER IN SYSTEM BUFFER 01779 M01S00102.271l750 +++| SB2 B0 01780 M01S00103.271l750 +++| EQ PSKX RETURN 01781 M00S01588.sdsplay +++| 01782 M00S01589.sdsplay +++|* PROCESS *DT* PARAMETER. 01783 M00S01590.sdsplay +++| 01784 M00S01591.sdsplay +++| PSK3 SA1 TSCT FWA OF SERVICE CLASS TABLE
| Line S00078 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01785 M01S00078.271l716 +++| SB2 1 01786 M00S01592.sdsplay +++| PSK4 ZR X1,PSK6 IF END OF TABLE 01787 M00S01593.sdsplay +++| BX5 X1-X6 01788 M00S01594.sdsplay +++| SA1 A1+B1 GET NEXT ENTRY IN *TSCT*
| Line S01595 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01789 M01S01595.271l716 ---| ZR X5,PSK5 IF A MATCH 01790 M01S01596.271l716 ---| EQ PSK4 LOOP FOR NEXT ENTRY
| Line S00079 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01791 M01S00079.271l716 +++| NZ X5,PSK4 IF NOT SPECIFIED SERVICE CLASS 01792 M00S01597.sdsplay +++| 01793 M00S01598.sdsplay +++|* CHECK FOR SPECIAL CASE DISALLOWED ENTRIES. 01794 M00S01599.sdsplay +++|
| Line S01600 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01795 M01S01600.271l716 ---| PSK5 LX6 12 RIGHT JUSTIFY SERVICE CLASS 01796 M01S01601.271l716 ---| SX1 X6-2RSS
| Line S00080 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01797 M01S00080.271l716 +++| SX1 X6-2RSS 01798 M00S01602.sdsplay +++| ZR X1,PSK6 IF INCORRECT SERVICE CLASS 01799 M00S01603.sdsplay +++| 01800 M00S01604.sdsplay +++|* SET CORRECT *DT* VALUE IN SYSTEM BUFFER. 01801 M00S01605.sdsplay +++| 01802 M00S01606.sdsplay +++| SX6 A1-TSCT SET SERVICE CLASS ORDINAL+1
| Line S01607 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01803 M01S01607.271l716 ---| RJ SPS SET PARAMETER IN SYSTEM BUFFER 01804 M01S01608.271l716 ---| SB2 B0+ CLEAR ERROR FLAG 01805 M01S01609.271l716 ---| EQ PSKX RETURN
| Line S00081 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01806 M01S00081.271l716 +++| EQ PSK1 SET PARAMETER IN SYSTEM BUFFER 01807 M00S01610.sdsplay +++| RPN SPACE 4,10 01808 M00S01611.sdsplay +++|** RPN - RESET PAGE NUMBER. 01809 M00S01612.sdsplay +++|* 01810 M00S01613.sdsplay +++|* ENTRY (CLDS) = CURRENT *L* DISPLAY SCREEN STATUS. 01811 M00S01614.sdsplay +++|* 01812 M00S01615.sdsplay +++|* EXIT CURRENT LEFT PAGE NUMBER RESET TO 1. 01813 M00S01616.sdsplay +++|* 01814 M00S01617.sdsplay +++|* USES X - 0, 1, 2, 3, 6. 01815 M00S01618.sdsplay +++|* A - 1, 3, 6. 01816 M00S01619.sdsplay +++| 01817 M00S01620.sdsplay +++| 01818 M00S01621.sdsplay +++| RPN SUBR ENTRY/EXIT 01819 M00S01622.sdsplay +++| SA3 THLP ASSUME *HELP* STATUS 01820 M00S01623.sdsplay +++| SA1 CLDS CHECK CURRENT *L* DISPLAY SCREEN STATUS 01821 M00S01624.sdsplay +++| SX1 X1-SHLP 01822 M00S01625.sdsplay +++| MX0 42 01823 M00S01626.sdsplay +++| LX0 30 01824 M00S01627.sdsplay +++| ZR X1,RPN1 IF *HELP* STATUS 01825 M00S01628.sdsplay +++| SA3 TASC SET DATA DISPLAY STATUS 01826 M00S01629.sdsplay +++| RPN1 SX2 B1 SET PAGE 1 OF *HELP* DISPLAY 01827 M00S01630.sdsplay +++| LX2 30 01828 M00S01631.sdsplay +++| BX3 X0*X3 CLEAR CURRENT PAGE 01829 M00S01632.sdsplay +++| BX6 X2+X3 SET PAGE 1 01830 M00S01633.sdsplay +++| SA6 A3 01831 M00S01634.sdsplay +++| EQ RPNX RETURN 01832 M00S01635.sdsplay +++| SDT SPACE 4,15 01833 M00S01636.sdsplay +++|** SDT - SET DATA IN TEMPLATE. 01834 M00S01637.sdsplay +++|* 01835 M00S01638.sdsplay +++|* ENTRY (CSCL) = CURRENT SERVICE CLASS ORDINAL. 01836 M00S01639.sdsplay +++|* (SBUF) = CURRENT SYSTEM *JCB* INFORMATION. 01837 M00S01640.sdsplay +++|* 01838 M00S01641.sdsplay +++|* EXIT DATA FROM *SBUF* SET IN TEMPLATES. 01839 M00S01642.sdsplay +++|* 01840 M00S01643.sdsplay +++|* USES X - ALL. 01841 M00S01644.sdsplay +++|* A - 1, 3, 4, 5, 6, 7. 01842 M00S01645.sdsplay +++|* B - 2. 01843 M00S01646.sdsplay +++|* 01844 M00S01647.sdsplay +++|* CALLS CJA, EPA, EPB. 01845 M00S01648.sdsplay +++| 01846 M00S01649.sdsplay +++| 01847 M00S01650.sdsplay +++| SDT SUBR ENTRY/EXIT 01848 M00S01651.sdsplay +++| 01849 M00S01652.sdsplay +++|* SET SERVICE CLASS MNEMONIC IN PAGE HEADERS. 01850 M00S01653.sdsplay +++| 01851 M00S01654.sdsplay +++| SA3 TASC FWA DATA TEMPLATES PAGING TABLE 01852 M00S01655.sdsplay +++| MX0 12 01853 M00S01656.sdsplay +++| BX3 X0*X3 NUMBER OF PAGES IN DATA TEMPLATES 01854 M00S01657.sdsplay +++| LX3 12 01855 M00S01658.sdsplay +++| SB2 X3 01856 M00S01659.sdsplay +++| SA1 CSCL GET CURRENT SERVICE CLASS ORDINAL 01857 M00S01660.sdsplay +++| SA1 X1+TSCT 01858 M00S01661.sdsplay +++| BX1 X0*X1 01859 M00S01662.sdsplay +++| LX1 6 01860 M00S01663.sdsplay +++| MX0 -54 01861 M00S01664.sdsplay +++| BX2 -X0*X1 FIRST CHARACTER OF SERVICE CLASS 01862 M00S01665.sdsplay +++| BX1 X0*X1 LAST CHARACTER OF SERVICE CLASS 01863 M00S01666.sdsplay +++| SDT1 SA4 A3+B1 GET NEXT PAGE 01864 M00S01667.sdsplay +++| SA4 X4+2 GET TEMPLATE WORDS 01865 M00S01668.sdsplay +++| SA5 A4+B1 01866 M00S01669.sdsplay +++| BX5 -X0*X5 01867 M00S01670.sdsplay +++| LX0 6 01868 M00S01671.sdsplay +++| BX4 -X0*X4 01869 M00S01672.sdsplay +++| BX6 X4+X2 SET FIRST CHARACTER OF SERVICE CLASS 01870 M00S01673.sdsplay +++| BX7 X5+X1 SET LAST CHARACTER OF SERVICE CLASS 01871 M00S01674.sdsplay +++| SA6 A4 01872 M00S01675.sdsplay +++| MX0 -54 RESET MASK 01873 M00S01676.sdsplay +++| SA7 A5 01874 M00S01677.sdsplay +++| SB2 B2-B1 01875 M00S01678.sdsplay +++| ZR B2,SDT2 IF ALL PAGES DONE 01876 M00S01679.sdsplay +++| SA3 A3+B1 NEXT ENTRY IN PAGING TABLE 01877 M00S01680.sdsplay +++| EQ SDT1 ENTER SERVICE CLASS IN NEXT PAGE 01878 M00S01681.sdsplay +++| 01879 M00S01682.sdsplay +++|* SET DATA IN THE TEMPLATES. 01880 M00S01683.sdsplay +++| 01881 M00S01684.sdsplay +++| SDT2 RJ CJA CALCULATE *JCB* OFFSET IN *SBUF* 01882 M00S01685.sdsplay +++| RJ EPA ENTER PAGES 1 AND 2 VALUES 01883 M00S01686.sdsplay +++| RJ EPB ENTER PAGE 3 VALUES 01884 M00S01687.sdsplay +++| EQ SDTX RETURN 01885 M00S01688.sdsplay +++| SIN SPACE 4,20 01886 M00S01689.sdsplay +++|** SIN - SET INCORRECT NUMERIC PARAMETER. 01887 M00S01690.sdsplay +++|* 01888 M00S01691.sdsplay +++|* ENTRY (X1) = MESSAGE ORDINAL. 01889 M00S01692.sdsplay +++|* (A5) = FWA OF *TKWV* ENTRY OF KEYWORD TO ADD TO 01890 M00S01693.sdsplay +++|* MESSAGE. 01891 M00S01694.sdsplay +++|* 01892 M00S01695.sdsplay +++|* EXIT (EMOR) = MESSAGE ORDINAL. 01893 M00S01696.sdsplay +++|* KEYWORD SET IN MESSAGE. 01894 M00S01697.sdsplay +++|* 01895 M00S01698.sdsplay +++|* USES X - 0, 1, 2, 5, 6, 7. 01896 M00S01699.sdsplay +++|* A - 2, 5, 6, 7. 01897 M00S01700.sdsplay +++|* 01898 M00S01701.sdsplay +++|* CALLS AFT. 01899 M00S01702.sdsplay +++|* 01900 M00S01703.sdsplay +++|* NOTES THIS ROUTINE ASSUMES A SPECIFIC LOCATION FOR THE 01901 M00S01704.sdsplay +++|* KEYWORD IN THE MESSAGE. IF THE KEYWORD POSITION IN 01902 M00S01705.sdsplay +++|* THE MESSAGE IS CHANGED, THIS ROUTINE SHOULD BE 01903 M00S01706.sdsplay +++|* UPDATED. 01904 M00S01707.sdsplay +++| 01905 M00S01708.sdsplay +++| 01906 M00S01709.sdsplay +++| SIN SUBR ENTRY/EXIT 01907 M00S01710.sdsplay +++| BX7 X1 01908 M00S01711.sdsplay +++| SA7 EMOR SET MESSAGE ORDINAL 01909 M00S01712.sdsplay +++| SA5 A5 GET KEYWORD IN ERROR 01910 M00S01713.sdsplay +++| MX0 24 01911 M00S01714.sdsplay +++| BX1 X0*X5 01912 M00S01715.sdsplay +++| SA2 TMLD+3+X7 FWA OF WORD IN MESSAGE 01913 M00S01716.sdsplay +++| RJ AFT APPEND FLOATING TERMINATOR 01914 M00S01717.sdsplay +++| LX6 -12 JUSTIFY KEYWORD FOR MESSAGE 01915 M00S01718.sdsplay +++| MX0 12 01916 M00S01719.sdsplay +++| BX2 X0*X2 01917 M00S01720.sdsplay +++| BX6 -X0*X6 01918 M00S01721.sdsplay +++| BX6 X6+X2 01919 M00S01722.sdsplay +++| SA6 A2 ADD KEYWORD AND TERMINATOR TO MESSAGE 01920 M00S01723.sdsplay +++| EQ SINX RETURN 01921 M00S01724.sdsplay +++| SIP SPACE 4,20 01922 M00S01725.sdsplay +++|** SIP - SET INCORRECT PARAMETER KEYWORD. 01923 M00S01726.sdsplay +++|* 01924 M00S01727.sdsplay +++|* ENTRY (X1) = MESSAGE ORDINAL. 01925 M00S01728.sdsplay +++|* (POPA) = KEYWORD IN ERROR, LEFT JUSTIFIED, ZERO 01926 M00S01729.sdsplay +++|* FILLED. 01927 M00S01730.sdsplay +++|* 01928 M00S01731.sdsplay +++|* EXIT KEYWORD SET IN MESSAGE. 01929 M00S01732.sdsplay +++|* (EMOR) = MESSAGE ORDINAL. 01930 M00S01733.sdsplay +++|* 01931 M00S01734.sdsplay +++|* USES X - 1, 2, 7. 01932 M00S01735.sdsplay +++|* A - 1, 2, 6, 7. 01933 M00S01736.sdsplay +++|* 01934 M00S01737.sdsplay +++|* CALLS AFT. 01935 M00S01738.sdsplay +++|* 01936 M00S01739.sdsplay +++|* NOTES THIS ROUTINE ASSUMES A SPECIFIC LOCATION FOR THE 01937 M00S01740.sdsplay +++|* KEYWORD IN THE MESSAGE. IF THE KEYWORD POSITION IN 01938 M00S01741.sdsplay +++|* THE MESSAGE IS CHANGED, THIS ROUTINE SHOULD BE 01939 M00S01742.sdsplay +++|* UPDATED. 01940 M00S01743.sdsplay +++| 01941 M00S01744.sdsplay +++| 01942 M00S01745.sdsplay +++| SIP SUBR ENTRY/EXIT 01943 M00S01746.sdsplay +++| BX7 X1 01944 M00S01747.sdsplay +++| SA7 EMOR SET MESSAGE ORDINAL 01945 M00S01748.sdsplay +++| SA1 POPA GET PARAMETER IN ERROR 01946 M00S01749.sdsplay +++| SA2 TMLD+X7+2 GET WORD IN MESSAGE TO MODIFY 01947 M00S01750.sdsplay +++| RJ AFT APPEND FLOATING TERMINATOR 01948 M00S01751.sdsplay +++| SA6 A2 ADD KEYWORD AND TERMINATOR TO MESSAGE 01949 M00S01752.sdsplay +++| EQ SIPX RETURN 01950 M00S01753.sdsplay +++| SPS SPACE 4,15 01951 M00S01754.sdsplay +++|** SPS - SET PARAMETER INTO SYSTEM BUFFER. 01952 M00S01755.sdsplay +++|* 01953 M00S01756.sdsplay +++|* ENTRY (X6) = PARAMETER, RIGHT JUSTIFIED. 01954 M00S01757.sdsplay +++|* (A5) = FWA OF CURRENT *TKWV* ENTRY. 01955 M00S01758.sdsplay +++|* (CSCL) = CURRENT SERVICE CLASS ORDINAL. 01956 M00S01759.sdsplay +++|* 01957 M00S01760.sdsplay +++|* EXIT PARAMETER SET INTO *SBUF*. 01958 M00S01761.sdsplay +++|* 01959 M00S01762.sdsplay +++|* USES X - 0, 1, 3, 6. 01960 M00S01763.sdsplay +++|* A - 1, 6. 01961 M00S01764.sdsplay +++|* B - 2, 3. 01962 M00S01765.sdsplay +++|* 01963 M00S01766.sdsplay +++|* CALLS CJA, GMP. 01964 M00S01767.sdsplay +++| 01965 M00S01768.sdsplay +++| 01966 M00S01769.sdsplay +++| SPS SUBR ENTRY/EXIT 01967 M00S01770.sdsplay +++| RJ CJA CALCULATE *JCB* ADDRESS 01968 M00S01771.sdsplay +++| SA1 A5+ GET *TKWV* ENTRY 01969 M00S01772.sdsplay +++| RJ GMP GENERATE MASKING PARAMETERS 01970 M00S01773.sdsplay +++| LX6 B2 JUSTIFY PARAMETER FOR SYSTEM BUFFER 01971 M00S01774.sdsplay +++| SB2 B2+X4 SET SHIFT COUNT FOR MASK 01972 M00S01775.sdsplay +++| SB3 X4-1 01973 M00S01776.sdsplay +++| MX0 1 01974 M00S01777.sdsplay +++| AX0 B3 01975 M00S01778.sdsplay +++| LX0 B2 GENERATE MASK FOR PARAMETER 01976 M00S01779.sdsplay +++| BX3 -X0*X3 01977 M00S01780.sdsplay +++| BX6 X6+X3 01978 M00S01781.sdsplay +++| SA6 A3 SET VALUE IN SYSTEM BUFFER 01979 M00S01782.sdsplay +++| EQ SPSX RETURN
| Line S01783 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01980 M01S01783.271l750 ---| SSM SPACE 4,15
| Line S00104 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01981 M01S00104.271l750 +++| SSM SPACE 4,20 01982 M00S01784.sdsplay +++|** SSM - SET SERVICE CLASS IN MESSAGE. 01983 M00S01785.sdsplay +++|*
| Line S01786 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01984 M01S01786.271l716 ---|* ENTRY (X1) = WORD IN MESSAGE TO MODIFY. 01985 M01S01787.271l716 ---|* (X2) = ORDINAL OF SERVICE CLASS TO PUT IN MESSAGE. 01986 M01S01788.271l716 ---|* (A1) = ADDRESS OF WORD IN MESSAGE TO MODIFY. 01987 M01S01789.271l716 ---|* (B2) = *L* DISPLAY MESSAGE ORDINAL.
| Line S00082 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 01988 M01S00082.271l716 +++|* ENTRY (B5) = SERVICE CLASS.
| Line S00083 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01989 M02S00083.271l750 ---|* (X6) = *L* DISPLAY MESSAGE INDEX.
| Line S00105 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01990 M01S00105.271l750 +++|* (X0) = *L* DISPLAY MESSAGE INDEX. 01991 M00S01790.sdsplay +++|*
| Line S01791 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01992 M01S01791.271l750 ---|* EXIT SERVICE CLASS MNEMONIC SET IN MESSAGE. 01993 M01S01792.271l750 ---|* (EMOR) = MESSAGE ORDINAL.
| Line S00106 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01994 M01S00106.271l750 +++|* EXIT (EBUF) = MESSAGE WITH SERVICE CLASS MNEMONIC SET. 01995 M01S00107.271l750 +++|* (EMOR) = MESSAGE ORDINAL OF *EBUF*. 01996 M00S01793.sdsplay +++|*
| Line S01794 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01997 M01S01794.271l750 ---|* USES X - 0, 1, 2, 6. 01998 M01S01795.271l750 ---|* A - 2, 6.
| Line S00108 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 01999 M01S00108.271l750 +++|* USES X - 1, 6. 02000 M01S00109.271l750 +++|* A - 1, 6. 02001 M01S00110.271l750 +++|* B - 2, 3, 5. 02002 M01S00111.271l750 +++|* 02003 M01S00112.271l750 +++|* CALLS SNM. 02004 M01S00113.271l750 +++|* 02005 M01S00114.271l750 +++|* MACROS MOVE. 02006 M00S01796.sdsplay +++| 02007 M00S01797.sdsplay +++| 02008 M00S01798.sdsplay +++| SSM SUBR ENTRY/EXIT
| Line S00115 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02009 M01S00115.271l750 +++| MOVE LDML,TMLD+EBMS,TMLD+EBUF CLEAR ASSEMBLY BUFFER 02010 M01S00116.271l750 +++| SA1 B5+TSCT-1 GET SERVICE CLASS MNEMONIC 02011 M01S00117.271l750 +++| SB2 1RX SUBSTITUTION CHARACTER 02012 M01S00118.271l750 +++| SB3 TMLD+EBUF ASSEMBLY BUFFER 02013 M01S00119.271l750 +++| SB5 X0+TMLD MESSAGE ADDRESS 02014 M01S00120.271l750 +++| SB5 -B5 02015 M01S00121.271l750 +++| RJ SNM SET SERVICE CLASS NAME IN MESSAGE 02016 M01S00122.271l750 +++| SX6 EBUF ERROR MESSAGE ORDINAL FOR ASSEMBLY BUFFER
| Line S01799 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02017 M01S01799.271l716 ---| SA2 X2+TSCT GET SERVICE CLASS MNEMONIC
| Line S00084 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02018 M01S00084.271l716 +++| SA6 EMOR
| Line S00085 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02019 M02S00085.271l750 ---| SA2 B5+TSCT-1 GET SERVICE CLASS MNEMONIC
| Line S01800 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02020 M01S01800.271l750 ---| MX0 -48 02021 M01S01801.271l750 ---| LX0 -12
| Line S00086 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02022 M02S00086.271l750 ---| SA1 X6+TMLD+4 MESSAGE WORD NEEDING MNEMONIC
| Line S01802 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02023 M01S01802.271l750 ---| LX2 -12 02024 M01S01803.271l750 ---| BX1 -X0*X1 02025 M01S01804.271l750 ---| BX6 X1+X2 SET MODIFIED WORD IN MESSAGE 02026 M01S01805.271l750 ---| SA6 A1
| Line S01806 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02027 M01S01806.271l716 ---| SX6 B2+ SET MESSAGE ORDINAL 02028 M01S01807.271l716 ---| SA6 EMOR 02029 M00S01808.sdsplay +++| EQ SSMX RETURN 02030 M00S01809.sdsplay +++| SVT SPACE 4,15 02031 M00S01810.sdsplay +++|** SVT - SET VALUE IN TEMPLATE. 02032 M00S01811.sdsplay +++|* 02033 M00S01812.sdsplay +++|* ENTRY (A1) = ADDRESS OF CURRENT *TKWV* ENTRY. 02034 M00S01813.sdsplay +++|* (A2) = ADDRESS OF CURRENT *TKWP* ENTRY. 02035 M00S01814.sdsplay +++|* (X0) = MASK FOR FIRST PART OF VALUE TO BE SET. 02036 M00S01815.sdsplay +++|* (X1) = MASK FOR LAST PART OF VALUE TO BE SET. 02037 M00S01816.sdsplay +++|* (X6) = VALUE TO SET IN TEMPLATE. 02038 M00S01817.sdsplay +++|* (B2) = SHIFT COUNT FOR VALUE TO BE SET. 02039 M00S01818.sdsplay +++|* 02040 M00S01819.sdsplay +++|* EXIT VALUE SET INTO TEMPLATE. 02041 M00S01820.sdsplay +++|* (A1) = INCREMENTED TO NEXT *TKWV* ENTRY. 02042 M00S01821.sdsplay +++|* (A2) = INCREMENTED TO NEXT *TKWP* ENTRY. 02043 M00S01822.sdsplay +++|* 02044 M00S01823.sdsplay +++|* USES X - 1, 2, 3, 4, 6, 7. 02045 M00S01824.sdsplay +++|* A - 1, 2, 3, 4, 6, 7. 02046 M00S01825.sdsplay +++| 02047 M00S01826.sdsplay +++| 02048 M00S01827.sdsplay +++| SVT SUBR ENTRY/EXIT 02049 M00S01828.sdsplay +++| SA2 A2 GET TEMPLATE WORDS 02050 M00S01829.sdsplay +++| SA3 X2 02051 M00S01830.sdsplay +++| SA4 A3+B1 02052 M00S01831.sdsplay +++| LX6 B2 02053 M00S01832.sdsplay +++| BX7 -X0*X6 GET FIRST CHARACTERS OF VALUE 02054 M00S01833.sdsplay +++| BX3 X0*X3 02055 M00S01834.sdsplay +++| BX6 X1*X6 GET LAST CHARACTERS OF VALUE 02056 M00S01835.sdsplay +++| BX4 -X1*X4 02057 M00S01836.sdsplay +++| BX6 X6+X4 SET LAST CHARACTERS 02058 M00S01837.sdsplay +++| BX7 X7+X3 SET FIRST CHARACTERS 02059 M00S01838.sdsplay +++| SA6 A4 02060 M00S01839.sdsplay +++| SA7 A3 02061 M00S01840.sdsplay +++| SA1 A1+B1 NEXT ENTRY IN *TKWV* 02062 M00S01841.sdsplay +++| SA2 A2+B1 NEXT ENTRY IN *TKWP* 02063 M00S01842.sdsplay +++| EQ SVTX RETURN 02064 M00S01843.sdsplay +++| SPACE 4,10 02065 M00S01844.sdsplay +++|* COMMON DECKS. 02066 M00S01845.sdsplay +++| 02067 M00S01846.sdsplay +++| 02068 M00S01847.sdsplay +++|*CALL COMCCIO 02069 M00S01848.sdsplay +++|*CALL COMCCOD 02070 M00S01849.sdsplay +++|*CALL COMCCPM 02071 M00S01850.sdsplay +++|*CALL COMCDXB 02072 M00S01851.sdsplay +++|*CALL COMCFLD 02073 M00S01852.sdsplay +++|*CALL COMCLFM 02074 M00S01853.sdsplay +++|*CALL COMCMVE 02075 M00S01854.sdsplay +++|*CALL COMCPOP
| Line S00123 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02076 M01S00123.271l750 +++|*CALL COMCRDC 02077 M01S00124.271l750 +++|*CALL COMCRDW 02078 M00S01855.sdsplay +++|*CALL COMCSFN 02079 M00S01856.sdsplay +++|*CALL COMCSNM 02080 M00S01857.sdsplay +++|*CALL COMCSYS 02081 M00S01858.sdsplay +++|*CALL COMCUSB 02082 M00S01859.sdsplay +++|*CALL COMCWOD 02083 M00S01860.sdsplay +++|*CALL COMCWTC 02084 M00S01861.sdsplay +++|*CALL COMCWTO 02085 M00S01862.sdsplay +++|*CALL COMCWTW 02086 M00S01863.sdsplay +++|*CALL COMCZTB 02087 M00S01864.sdsplay +++| TITLE HELP - PAGE 1. 02088 M00S01865.sdsplay +++| USE BUFFERS 02089 M00S01866.sdsplay +++| SPACE 4,10 02090 M00S01867.sdsplay +++| HLPA BSS 0 02091 M00S01868.sdsplay +++| DATA 58CSDSPLAY COMMANDS PAGE 1 OF 3 02092 M00S01869.sdsplay +++| DATA 58C 02093 M00S01870.sdsplay +++| DATA 58C COMMAND DESCRIPTION 02094 M00S01871.sdsplay +++| DATA 58C 02095 M00S01872.sdsplay +++| DATA 58C CLASS=XX DISPLAY THE DATA FOR SERVICE CLASS XX. 02096 M00S01873.sdsplay +++| DATA 58C END END THE PROCESSING OF SDSPLAY. 02097 M00S01874.sdsplay +++| DATA 58C GO SET ALL ENTERED VALUES INTO THE SYSTEM. 02098 M00S01875.sdsplay +++| DATA 58C HELP SHOW L DISPLAY COMMANDS FOR SDSPLAY. 02099 M00S01876.sdsplay +++| DATA 58C RESET IGNORE ALL VALUES ENTERED SINCE THE 02100 M00S01877.sdsplay +++| DATA 58C LAST GO. 02101 M00S01878.sdsplay +++| DATA 58C 02102 M00S01879.sdsplay +++| DATA 58C + PAGE THE DISPLAY FORWARD. 02103 M00S01880.sdsplay +++| DATA 58C - PAGE THE DISPLAY BACKWARD. 02104 M00S01881.sdsplay +++| DATA 58C 02105 M00S01882.sdsplay +++| DATA 58C 02106 M00S01883.sdsplay +++| DATA 58C 02107 M00S01884.sdsplay +++| DATA 58C 02108 M00S01885.sdsplay +++| DATA 58C 02109 M00S01886.sdsplay +++| DATA 58C 02110 M00S01887.sdsplay +++| DATA 58C 02111 M00S01888.sdsplay +++| LDMO EQU *-HLPA GLOBAL MESSAGE OFFSET IN TEMPLATE 02112 M00S01889.sdsplay +++| DATA 58C 02113 M00S01890.sdsplay +++| DATA 58C 02114 M00S01891.sdsplay +++| HLPAL EQU *-HLPA LENGTH OF TEMPLATE 02115 M00S01892.sdsplay +++| DSPL EQU HLPAL GLOBAL TEMPLATE LENGTH 02116 M00S01893.sdsplay +++| TITLE HELP - PAGE 2. 02117 M00S01894.sdsplay +++| HLPB BSS 0 02118 M00S01895.sdsplay +++| DATA 58CSERVICE CLASS DEFINITIONS PAGE 2 OF 3 02119 M00S01896.sdsplay +++| DATA 58C 02120 M00S01897.sdsplay +++| DATA 58C SY SYSTEM SERVICE CLASS. 02121 M00S01898.sdsplay +++| DATA 58C BC BATCH SERVICE CLASS. 02122 M00S01899.sdsplay +++| DATA 58C RB REMOTE BATCH SERVICE CLASS. 02123 M00S01900.sdsplay +++| DATA 58C 02124 M00S01901.sdsplay +++| DATA 58C TS INTERACTIVE SERVICE CLASS. 02125 M00S01902.sdsplay +++| DATA 58C DI DETACHED INTERACTIVE SERVICE CLASS. 02126 M00S01903.sdsplay +++| DATA 58C NS NETWORK SUPERVISOR SERVICE CLASS. 02127 M00S01904.sdsplay +++| DATA 58C 02128 M00S01905.sdsplay +++| DATA 58C SS SUBSYSTEM SERVICE CLASS. 02129 M00S01906.sdsplay +++| DATA 58C MA MAINTENANCE SERVICE CLASS. 02130 M00S01907.sdsplay +++| DATA 58C CT COMMUNICATION TASK SERVICE CLASS. 02131 M00S01908.sdsplay +++| DATA 58C 02132 M00S01909.sdsplay +++| DATA 58C 02133 M00S01910.sdsplay +++| DATA 58C 02134 M00S01911.sdsplay +++| DATA 58C 02135 M00S01912.sdsplay +++| DATA 58C 02136 M00S01913.sdsplay +++| DATA 58C 02137 M00S01914.sdsplay +++| DATA 58C 02138 M00S01915.sdsplay +++| ERRNZ *-HLPB-LDMO MESSAGE LINE LOCATION INCORRECT 02139 M00S01916.sdsplay +++| DATA 58C 02140 M00S01917.sdsplay +++| ERRNZ *-HLPB-LDMO-LDML INPUT LINE LOCATION INCORRECT 02141 M00S01918.sdsplay +++| DATA 58C 02142 M00S01919.sdsplay +++| HLPBL EQU *-HLPB LENGTH OF TEMPLATE 02143 M00S01920.sdsplay +++| ERRNZ HLPBL-DSPL TEMPLATES MUST BE SAME LENGTH 02144 M00S01921.sdsplay +++| TITLE HELP - PAGE 3. 02145 M00S01922.sdsplay +++| HLPC BSS 0 02146 M00S01923.sdsplay +++| DATA 58CSERVICE CLASS DEFINITIONS PAGE 3 OF 3 02147 M00S01924.sdsplay +++| DATA 58C 02148 M00S01925.sdsplay +++| DATA 58C I0 INSTALLATION CLASS 0. 02149 M00S01926.sdsplay +++| DATA 58C I1 INSTALLATION CLASS 1. 02150 M00S01927.sdsplay +++| DATA 58C I2 INSTALLATION CLASS 2. 02151 M00S01928.sdsplay +++| DATA 58C I3 INSTALLATION CLASS 3. 02152 M00S01929.sdsplay +++| DATA 58C 02153 M00S01930.sdsplay +++| DATA 58CTHE FOLLOWING SERVICE CLASSES MAY BE DEFINED AT YOUR SITE. 02154 M00S01931.sdsplay +++| DATA 58C 02155 M00S01932.sdsplay +++| DATA 58C I4 INSTALLATION CLASS 4. 02156 M00S01933.sdsplay +++| DATA 58C I5 INSTALLATION CLASS 5. 02157 M00S01934.sdsplay +++| DATA 58C I6 INSTALLATION CLASS 6. 02158 M00S01935.sdsplay +++| DATA 58C I7 INSTALLATION CLASS 7. 02159 M00S01936.sdsplay +++| DATA 58C I8 INSTALLATION CLASS 8. 02160 M00S01937.sdsplay +++| DATA 58C I9 INSTALLATION CLASS 9. 02161 M00S01938.sdsplay +++| DATA 58C II INSTALLATION CLASS I. 02162 M00S01939.sdsplay +++| DATA 58C IJ INSTALLATION CLASS J. 02163 M00S01940.sdsplay +++| DATA 58C IK INSTALLATION CLASS K. 02164 M00S01941.sdsplay +++| DATA 58C IL INSTALLATION CLASS L. 02165 M00S01942.sdsplay +++| DATA 58C 02166 M00S01943.sdsplay +++| ERRNZ *-HLPC-LDMO MESSAGE LINE LOCATION INCORRECT 02167 M00S01944.sdsplay +++| DATA 58C 02168 M00S01945.sdsplay +++| ERRNZ *-HLPC-LDMO-LDML INPUT LINE LOCATION INCORRECT 02169 M00S01946.sdsplay +++| DATA 58C 02170 M00S01947.sdsplay +++| HLPCL EQU *-HLPC LENGTH OF TEMPLATE 02171 M00S01948.sdsplay +++| ERRNZ HLPCL-DSPL TEMPLATES MUST BE SAME LENGTH 02172 M00S01949.sdsplay +++| TITLE LINE PRINTER HEADER FOR TEMPLATES. 02173 M00S01950.sdsplay +++| LPHR BSS 0 02174 M00S01951.sdsplay +++| DATA 50HSDSPLAY - SYSTEM SERVICE CLASS DISPLAY 02175 M00S01952.sdsplay +++| LPHD BSS 1 DATE STAMP 02176 M00S01953.sdsplay +++| LPHT BSS 1 TIME STAMP 02177 M00S01954.sdsplay +++| DATA C* * 02178 M00S01955.sdsplay +++| CON 0 02179 M00S01956.sdsplay +++| LPHRL EQU *-LPHR HEADER LENGTH 02180 M00S01957.sdsplay +++| TITLE ATTRIBUTES FOR SERVICE CLASS - PAGE 1.
| Line S01958 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02181 M01S01958.271l716 ---| ASCA BSS 0
| Line S00087 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02182 M01S00087.271l716 +++| SCA1 BSS 0 02183 M00S01959.sdsplay +++| DATA 58CATTRIBUTES FOR SERVICE CLASS XX PAGE 1 OF 3 02184 M00S01960.sdsplay +++| DATA 58C 02185 M00S01961.sdsplay +++| DATA 58C OPTION DESCRIPTION 02186 M00S01962.sdsplay +++| DATA 58C 02187 M00S01963.sdsplay +++| INLP EQU * 02188 M00S01964.sdsplay +++| DATA 58C INLP = XXXXB INPUT QUEUE LOWER PRIORITY. 02189 M00S01965.sdsplay +++| INUP EQU * 02190 M00S01966.sdsplay +++| DATA 58C INUP = XXXXB INPUT QUEUE UPPER PRIORITY. 02191 M00S01967.sdsplay +++| OTLP EQU * 02192 M00S01968.sdsplay +++| DATA 58C OTLP = XXXXB OUTPUT QUEUE LOWER PRIORITY. 02193 M00S01969.sdsplay +++| OTUP EQU * 02194 M00S01970.sdsplay +++| DATA 58C OTUP = XXXXB OUTPUT QUEUE UPPER PRIORITY. 02195 M00S01971.sdsplay +++| EXLP EQU * 02196 M00S01972.sdsplay +++| DATA 58C EXLP = XXXXB EXECUTION QUEUE LOWER PRIORITY. 02197 M00S01973.sdsplay +++| EXUP EQU * 02198 M00S01974.sdsplay +++| DATA 58C EXUP = XXXXB EXECUTION QUEUE UPPER PRIORITY. 02199 M00S01975.sdsplay +++| EXIL EQU * 02200 M00S01976.sdsplay +++| DATA 58C EXIL = XXXXB EXECUTION QUEUE INITIAL LOWER PRIORITY. 02201 M00S01977.sdsplay +++| EXIP EQU * 02202 M00S01978.sdsplay +++| DATA 58C EXIP = XXXXB EXECUTION QUEUE INITIAL PRIORITY. 02203 M00S01979.sdsplay +++| EXTP EQU * 02204 M00S01980.sdsplay +++| DATA 58C EXTP = XXXXB INITIAL TERMINAL PRIORITY AFTER I/O. 02205 M00S01981.sdsplay +++| DATA 58C 02206 M00S01982.sdsplay +++| INWF EQU * 02207 M00S01983.sdsplay +++| DATA 58C INWF = XXXXB INPUT QUEUE WEIGHTING FACTOR. 02208 M00S01984.sdsplay +++| EXWF EQU * 02209 M00S01985.sdsplay +++| DATA 58C EXWF = XXXXB EXECUTION QUEUE WEIGHTING FACTOR. 02210 M00S01986.sdsplay +++| OTWF EQU * 02211 M00S01987.sdsplay +++| DATA 58C OTWF = XXXXB OUTPUT QUEUE WEIGHTING FACTOR. 02212 M00S01988.sdsplay +++| DATA 58C 02213 M00S01989.sdsplay +++| DATA 58C (ALL PRIORITY VALUES ARE 0-7777B). 02214 M00S01990.sdsplay +++| DATA 58C (WEIGHTING FACTORS MUST BE A POWER OF 2 FROM 1 - 4000B).
| Line S01991 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02215 M01S01991.271l716 ---| ERRNZ *-ASCA-LDMO MESSAGE LINE LOCATION INCORRECT 02216 M01S01992.271l716 ---| DATA 58C 02217 M01S01993.271l716 ---| ERRNZ *-ASCA-LDMO-LDML INPUT LINE LOCATION INCORRECT 02218 M01S01994.271l716 ---| DATA 58C 02219 M01S01995.271l716 ---| ASCAL EQU *-ASCA LENGTH OF TEMPLATE 02220 M01S01996.271l716 ---| ERRNZ ASCAL-DSPL TEMPLATES MUST BE SAME LENGTH
| Line S00088 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02221 M01S00088.271l716 +++| ERRNZ *-SCA1-LDMO MESSAGE LINE LOCATION INCORRECT 02222 M01S00089.271l716 +++| DATA 58C 02223 M01S00090.271l716 +++| ERRNZ *-SCA1-LDMO-LDML INPUT LINE LOCATION INCORRECT 02224 M01S00091.271l716 +++| DATA 58C 02225 M01S00092.271l716 +++| SCA1L EQU *-SCA1 LENGTH OF TEMPLATE 02226 M01S00093.271l716 +++| ERRNZ SCA1L-DSPL TEMPLATES MUST BE SAME LENGTH 02227 M00S01997.sdsplay +++| OBUFL EQU *-LPHR OUTPUT BUFFER LENGTH 02228 M00S01998.sdsplay +++| TITLE ATTRIBUTES FOR SERVICE CLASS - PAGE 2.
| Line S01999 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02229 M01S01999.271l716 ---| ASCB BSS 0
| Line S00094 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02230 M01S00094.271l716 +++| SCA2 BSS 0 02231 M00S02000.sdsplay +++| DATA 58CATTRIBUTES FOR SERVICE CLASS XX PAGE 2 OF 3 02232 M00S02001.sdsplay +++| DATA 58C 02233 M00S02002.sdsplay +++| DATA 58C OPTION DESCRIPTION 02234 M00S02003.sdsplay +++| DATA 58C
| Line S02004 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02235 M01S02004.271l716 ---| ASPR EQU * 02236 M01S02005.271l716 ---| DATA 58C PR = XXB CPU PRIORITY (2-77B). 02237 M01S02006.271l716 ---| ASCP EQU * 02238 M01S02007.271l716 ---| DATA 58C CP = XXXXB CPU TIME SLICE (1-7777B MILLISECONDS*64).
| Line S00095 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02239 M02S00095.271l750 ---| ASCB EQU * 02240 M02S00096.271l750 ---| DATA 58C CB = XXXXB = 6/LB + 6/UB CPU PRIORITY BOUNDS (2-77B). 02241 M02S00097.271l750 ---| DATA 58C LB = LOWER BOUND, UB = UPPER BOUND.
| Line S00098 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02242 M01S00098.271l716 +++| ASCT EQU *
| Line S00099 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02243 M02S00099.271l750 ---| DATA 58C CT = XXXXB CPU TIME SLICE (0-7777B MSECS*64).
| Line S00125 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02244 M01S00125.271l750 +++| DATA 58C CT = XXXXB CP TIME SLICE (0-7777B SECONDS). 02245 M00S02008.sdsplay +++| ASCM EQU * 02246 M00S02009.sdsplay +++| DATA 58C CM = XXXXB CM TIME SLICE (0-7777B SECONDS). 02247 M00S02010.sdsplay +++| ASNJ EQU * 02248 M00S02011.sdsplay +++| DATA 58C NJ = XXXXB MAXIMUM NUMBER OF JOBS (0-7777B). 02249 M00S02012.sdsplay +++| DATA 58C
| Line S00100 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02250 M01S00100.271l716 +++| ASCP EQU * 02251 M01S00101.271l716 +++| DATA 58C CP = XXXXB CONTROL POINT SLICE PRIORITY (0-7777B). 02252 M00S02013.sdsplay +++| ASFL EQU * 02253 M00S02014.sdsplay +++| ASFM EQU *+4
| Line S02015 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02254 M01S02015.271l716 ---| DATA 58C FL = XXXXB MAXIMUM CM FL/100B, ANY JOB (0-XXXXB).
| Line S00102 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02255 M01S00102.271l716 +++| DATA 58C FL = XXXXB MAXIMUM CM FL/100B, ANY JOB (0-MXFLB). 02256 M00S02016.sdsplay +++| ASAM EQU * 02257 M00S02017.sdsplay +++| DATA 58C AM = XXXXXB MAXIMUM CM FL/100B, ALL JOBS (0-77777B).
| Line S00103 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02258 M02S00103.271l750 ---| ASSD EQU * 02259 M02S00104.271l750 ---| DATA 58C SD = XXXXB CPU JOB SWITCH DELAY (1-7777B MSECS). 02260 M00S02018.sdsplay +++| ASEC EQU *
| Line S02019 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02261 M01S02019.271l716 ---| DATA 58C EC = XXXXB MAXIMUM EM FL/1000B, ANY JOB (0-7777B). 02262 M01S02020.271l716 ---| ASEM EQU * 02263 M01S02021.271l716 ---| DATA 58C EM = XXXXB MAXIMUM EM LF/1000B, ALL JOBS (0-7777B).
| Line S00105 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02264 M01S00105.271l716 +++| DATA 58C EC = XXXXB MAXIMUM XM FL/1000B, ANY JOB (0-3777B). 02265 M01S00106.271l716 +++| ASEM EQU * 02266 M01S00107.271l716 +++| DATA 58C EM = XXXXB MAXIMUM XM FL/1000B, ALL JOBS (0-7777B). 02267 M00S02022.sdsplay +++| DATA 58C
| Line S00126 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02268 M01S00126.271l750 +++| ASPR EQU * 02269 M01S00127.271l750 +++| DATA 58C PR = XXB CPU PRIORITY (2-77B). 02270 M01S00128.271l750 +++| ASSE EQU * 02271 M01S00129.271l750 +++| DATA 58C SE = XXXXB CPU SLICE EXTENSION (0-7777B MS). 02272 M01S00130.271l750 +++| ASRS EQU * 02273 M01S00131.271l750 +++| DATA 58C RS = XXXXB CPU RECALL SLICE (1-7777B MS). 02274 M01S00132.271l750 +++| ASUS EQU * 02275 M01S00133.271l750 +++| DATA 58C US = XXXXB UNEXTENDED CPU SLICE (1-7777B MS). 02276 M01S00134.271l750 +++| DATA 58C 02277 M00S02023.sdsplay +++| ASCJ EQU *+5 02278 M00S02024.sdsplay +++| DATA 58C THE CURRENT JOB COUNT FOR THIS SERVICE CLASS IS XXXXB.
| Line S02025 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02279 M01S02025.271l750 ---| DATA 58C
| Line S02026 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02280 M02S02026.271l750 ---| DATA 58C 02281 M02S02027.271l750 ---| DATA 58C 02282 M02S02028.271l750 ---| DATA 58C 02283 M02S02029.271l750 ---| DATA 58C 02284 M02S02030.271l750 ---| ERRNZ *-ASCB-LDMO MESSAGE LINE LOCATION INCORRECT 02285 M02S02031.271l750 ---| DATA 58C 02286 M02S02032.271l750 ---| ERRNZ *-ASCB-LDMO-LDML INPUT LINE LOCATION INCORRECT 02287 M02S02033.271l750 ---| DATA 58C 02288 M02S02034.271l750 ---| ASCBL EQU *-ASCB LENGTH OF TEMPLATE 02289 M02S02035.271l750 ---| ERRNZ ASCBL-DSPL TEMPLATES MUST BE SAME LENGTH
| Line S00108 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
M02 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02290 M02S00108.271l750 ---| DATA 58C
| Line S00109 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02291 M01S00109.271l716 +++| ERRNZ *-SCA2-LDMO MESSAGE LINE LOCATION INCORRECT 02292 M01S00110.271l716 +++| DATA 58C 02293 M01S00111.271l716 +++| ERRNZ *-SCA2-LDMO-LDML INPUT LINE LOCATION INCORRECT 02294 M01S00112.271l716 +++| DATA 58C 02295 M01S00113.271l716 +++| SCA2L EQU *-SCA2 LENGTH OF TEMPLATE 02296 M01S00114.271l716 +++| ERRNZ SCA2L-DSPL TEMPLATES MUST BE SAME LENGTH 02297 M00S02036.sdsplay +++| TITLE ATTRIBUTES FOR SERVICE CLASS - PAGE 3.
| Line S02037 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02298 M01S02037.271l716 ---| ASCC BSS 0
| Line S00115 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02299 M01S00115.271l716 +++| SCA3 BSS 0 02300 M00S02038.sdsplay +++| DATA 58CATTRIBUTES FOR SERVICE CLASS PAGE 3 OF 3 02301 M00S02039.sdsplay +++| DATA 58C 02302 M00S02040.sdsplay +++| DATA 58C INDEX VALUE DESCRIPTION 02303 M00S02041.sdsplay +++| DATA 58C 02304 M00S02042.sdsplay +++| ASDS EQU * 02305 M00S02043.sdsplay +++| DATA 58CDS = X (XXXXXXXXX) MAXIMUM DIRECT ACCESS FILE 02306 M00S02044.sdsplay +++| DATA 58C SIZE (0-7). 02307 M00S02045.sdsplay +++| ASFC EQU * 02308 M00S02046.sdsplay +++| DATA 58CFC = X (XXXXXXXXX) MAXIMUM NUMBER PERMANENT 02309 M00S02047.sdsplay +++| DATA 58C FILES (0-7). 02310 M00S02048.sdsplay +++| ASCS EQU * 02311 M00S02049.sdsplay +++| DATA 58CCS = X (XXXXXXXXX) MAXIMUM PRUS, ALL INDIRECT 02312 M00S02050.sdsplay +++| DATA 58C FILES (0-7). 02313 M00S02051.sdsplay +++| ASFS EQU * 02314 M00S02052.sdsplay +++| DATA 58CFS = X (XXXXXXXXX) MAXIMUM PRUS, ONE INDIRECT 02315 M00S02053.sdsplay +++| DATA 58C FILE (0-7). 02316 M00S02054.sdsplay +++| DATA 58C 02317 M00S02055.sdsplay +++| DATA 58C OPTION DESCRIPTION 02318 M00S02056.sdsplay +++| DATA 58C 02319 M00S02057.sdsplay +++| ASDT EQU * 02320 M00S02058.sdsplay +++| DATA 58CDT = XX SERVICE CLASS ON DETACH (NOT SS OR DS). 02321 M00S02059.sdsplay +++| ASTD EQU * 02322 M00S02060.sdsplay +++| DATA 58CTD = XXXXB SUSPENSION TIMEOUT DELAY (0-7777B 02323 M00S02061.sdsplay +++| DATA 58C SECONDS*10B). 02324 M00S02062.sdsplay +++| DATA 58C 02325 M00S02063.sdsplay +++| DATA 58CNOTE - EXTP, DT AND TD ARE USED ONLY FOR INTERACTIVE JOBS.
| Line S02064 Modification History | |
|---|---|
M01 (Removed by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02326 M01S02064.271l716 ---| ERRNZ *-ASCC-LDMO MESSAGE LINE LOCATION INCORRECT 02327 M01S02065.271l716 ---| DATA 58C 02328 M01S02066.271l716 ---| ERRNZ *-ASCC-LDMO-LDML INPUT LINE LOCATION INCORRECT 02329 M01S02067.271l716 ---| DATA 58C 02330 M01S02068.271l716 ---| ASCCL EQU *-ASCC LENGTH OF TEMPLATE 02331 M01S02069.271l716 ---| ERRNZ ASCCL-DSPL TEMPLATES MUST BE SAME LENGTH
| Line S00116 Modification History | |
|---|---|
M01 (Added by) | 271l716 |
Seq # *Modification Id* Act ----------------------------+ 02332 M01S00116.271l716 +++| ERRNZ *-SCA3-LDMO MESSAGE LINE LOCATION INCORRECT 02333 M01S00117.271l716 +++| DATA 58C 02334 M01S00118.271l716 +++| ERRNZ *-SCA3-LDMO-LDML INPUT LINE LOCATION INCORRECT 02335 M01S00119.271l716 +++| DATA 58C 02336 M01S00120.271l716 +++| SCA3L EQU *-SCA3 LENGTH OF TEMPLATE 02337 M01S00121.271l716 +++| ERRNZ SCA3L-DSPL TEMPLATES MUST BE SAME LENGTH 02338 M00S02070.sdsplay +++| TITLE OTHER BUFFERS. 02339 M00S02071.sdsplay +++|* *L* DISPLAY INPUT BUFFER. 02340 M00S02072.sdsplay +++| 02341 M00S02073.sdsplay +++| IPW BSS 0 INPUT BUFFER FOR *L* DISPLAY 02342 M00S02074.sdsplay +++| VFD 12/LIML,1/0,1/0,46/0 02343 M00S02075.sdsplay +++| IBUF BSSZ LIML INPUT BUFFER
| Line S00012 Modification History | |
|---|---|
M01 (Added by) | sdspl1 |
Seq # *Modification Id* Act ----------------------------+ 02344 M01S00012.sdspl1 +++| 02345 M01S00013.sdspl1 +++|* *L* DISPLAY ID STRINGS. 02346 M01S00014.sdspl1 +++| 02347 M01S00015.sdspl1 +++| LHLP DATA C*SDSPLAY - HELP.* 02348 M01S00016.sdspl1 +++| LCLS DATA C*SDSPLAY - CLASS.* 02349 M00S02076.sdsplay +++| 02350 M00S02077.sdsplay +++|* *L* DISPLAY BUFFER. 02351 M00S02078.sdsplay +++| 02352 M00S02079.sdsplay +++| .DSPL EQU DSPL/6 EXTRA DISPLAY LENGTH FOR COORDINATES 02353 M00S02080.sdsplay +++| LBUFL EQU DSPL+.DSPL *L* DISPLAY BUFFER LENGTH 02354 M00S02081.sdsplay +++| LFWA VFD 12/LBUFL,1/0,1/0,46/0 02355 M00S02082.sdsplay +++| LBUF EQU * *L* DISPLAY BUFFER 02356 M00S02083.sdsplay +++| LBUFE EQU LBUF+LBUFL END OF *L* DISPLAY BUFFER 02357 M00S02084.sdsplay +++| 02358 M00S02085.sdsplay +++|* SYSTEM SERVICE CLASS INFORMATION BUFFER. 02359 M00S02086.sdsplay +++| 02360 M00S02087.sdsplay +++| SBUF EQU LBUFE FWA *SBUF* 02361 M00S02088.sdsplay +++| SBUFE EQU SBUF+SBUFL LWA *SBUF*
| Line S00135 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02362 M01S00135.271l750 +++| 02363 M01S00136.271l750 +++|* DIRECTIVE INPUT FILE BUFFER. 02364 M01S00137.271l750 +++| 02365 M01S00138.271l750 +++| DBUF EQU SBUFE FWA INPUT FILE BUFFER 02366 M01S00139.271l750 +++| DBUFE EQU DBUF+DBUFL END OF INPUT FILE BUFFER 02367 M00S02089.sdsplay +++| 02368 M00S02090.sdsplay +++|* OUTPUT FILE BUFFER. 02369 M00S02091.sdsplay +++|
| Line S02092 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02370 M01S02092.271l750 ---| OBUF EQU SBUFE FWA OUTPUT FILE BUFFER
| Line S00140 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02371 M01S00140.271l750 +++| OBUF EQU DBUFE FWA OUTPUT FILE BUFFER 02372 M00S02093.sdsplay +++| OBUFE EQU OBUF+OBUFL END OF OUTPUT BUFFER 02373 M00S02094.sdsplay +++| TITLE PRESET. 02374 M00S02095.sdsplay +++| PRS SPACE 4,20 02375 M00S02096.sdsplay +++|** PRS - PRESET ROUTINE. 02376 M00S02097.sdsplay +++|* 02377 M00S02098.sdsplay +++|* ENTRY CONTROL STATEMENT ARGUMENT LIST IN RA+2 (*ARGR*) 02378 M00S02099.sdsplay +++|* IN OPERATING SYSTEM FORMAT. 02379 M00S02100.sdsplay +++|* 02380 M00S02101.sdsplay +++|* EXIT (B1) = 1.
| Line S02102 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02381 M01S02102.271l750 ---|* (LFLG) = LFN FOR FET, IF LINE PRINTER OPTION 02382 M01S02103.271l750 ---|* SPECIFIED. 02383 M01S02104.271l750 ---|* (LFLG) = 0 IF *L* DISPLAY OPTION SPECIFIED.
| Line S00141 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02384 M01S00141.271l750 +++|* (DFLG) = NON-ZERO IF DIRECTIVE INPUT FILE SPECIFIED. 02385 M01S00142.271l750 +++|* (LFLG) = NON-ZERO IF LINE PRINTER OPTION SPECIFIED. 02386 M00S02105.sdsplay +++|* 02387 M00S02106.sdsplay +++|* ERROR TO *ERR* IF ARGUMENT ERROR OR INCORRECT USER ACCESS. 02388 M00S02107.sdsplay +++|* (X1) = ERROR MESSAGE OFFSET. 02389 M00S02108.sdsplay +++|* 02390 M00S02109.sdsplay +++|* USES X - ALL. 02391 M00S02110.sdsplay +++|* A - 1, 2, 3, 6, 7. 02392 M00S02111.sdsplay +++|* B - 1, 2. 02393 M00S02112.sdsplay +++|* 02394 M00S02113.sdsplay +++|* CALLS COD, CVO, GSD, POP, USB. 02395 M00S02114.sdsplay +++|* 02396 M00S02115.sdsplay +++|* MACROS CLOCK, DATE, GETSPS. 02397 M00S02116.sdsplay +++| 02398 M00S02117.sdsplay +++| 02399 M00S02118.sdsplay +++| PRS SUBR ENTRY/EXIT 02400 M00S02119.sdsplay +++| SB1 1 SYSTEM COMMUNICATION (B1) = 1 02401 M00S02120.sdsplay +++| DATE LPHD SET DATE IN PRINTER HEADER 02402 M00S02121.sdsplay +++| CLOCK LPHT SET TIME IN PRINTER HEADER 02403 M00S02122.sdsplay +++| GETSPS PRSE CHECK FOR SYSTEM ORIGIN PRIVILEGES 02404 M00S02123.sdsplay +++| SA1 PRSE 02405 M00S02124.sdsplay +++| ZR X1,PRS1 IF SYSTEM ORIGIN PRIVILEGES 02406 M00S02125.sdsplay +++| SX1 ERNV * USER ACCESS NOT VALID.* 02407 M00S02126.sdsplay +++| EQ ERR ABORT WITH ERROR MESSAGE 02408 M00S02127.sdsplay +++| 02409 M00S02128.sdsplay +++|* PROCESS ARGUMENT LIST. 02410 M00S02129.sdsplay +++| 02411 M00S02130.sdsplay +++| PRS1 SB2 CCDR UNPACK COMMAND 02412 M00S02131.sdsplay +++| RJ USB UNPACK STRING BUFFER 02413 M00S02132.sdsplay +++| SX6 1R. ASSURE TERMINATOR CHARACTER 02414 M00S02133.sdsplay +++| SA6 B7+1 02415 M00S02134.sdsplay +++| RJ POP SKIP PROGRAM NAME 02416 M00S02135.sdsplay +++| ZR B6,PRS13 IF NO ARGUMENTS ON CONTROL CARD 02417 M00S02136.sdsplay +++| 02418 M00S02137.sdsplay +++|* PROCESS CONTROL CARD ARGUMENTS. 02419 M00S02138.sdsplay +++| 02420 M00S02139.sdsplay +++| PRS2 RJ POP GET ARGUMENT 02421 M00S02140.sdsplay +++| PL B5,PRS3 IF NO ERROR 02422 M00S02141.sdsplay +++| SX1 ERAE * ARGUMENT ERROR - XXXXXXX.* 02423 M00S02142.sdsplay +++| EQ ERR PROCESS ERROR 02424 M00S02143.sdsplay +++| 02425 M00S02144.sdsplay +++| PRS3 NZ B6,PRS4 IF NO TERMINATOR 02426 M00S02145.sdsplay +++| SX7 B1+ 02427 M00S02146.sdsplay +++| SA7 PRSD SET TERMINATOR FLAG 02428 M00S02147.sdsplay +++| PRS4 SX2 X1-1R= 02429 M00S02148.sdsplay +++| SX1 ERAE * ARGUMENT ERROR - XXXXXXX.* 02430 M00S02149.sdsplay +++| SA3 PRSA INCREMENT ARGUMENT COUNTER 02431 M00S02150.sdsplay +++| SX7 X3+B1 02432 M00S02151.sdsplay +++| SA7 A3 02433 M00S02152.sdsplay +++| SX7 X7-TARGL-1 02434 M00S02153.sdsplay +++| PL X7,ERR IF TOO MANY ARGUMENTS 02435 M00S02154.sdsplay +++| NZ X2,PRS8 IF POSITIONAL ARGUMENT 02436 M00S02155.sdsplay +++| 02437 M00S02156.sdsplay +++|* PROCESS EQUIVALENCED ARGUMENTS. 02438 M00S02157.sdsplay +++| 02439 M00S02158.sdsplay +++| SA2 PRSD 02440 M00S02159.sdsplay +++| NZ X2,ERR IF TERMINATOR, NO VALUE FOR ARGUMENT 02441 M00S02160.sdsplay +++| SA2 TARG FWA OF ARGUMENT TABLE 02442 M00S02161.sdsplay +++| PRS5 ZR X2,ERR IF END OF TABLE, INCORRECT ARGUMENT 02443 M00S02162.sdsplay +++| MX0 12 02444 M00S02163.sdsplay +++| BX3 X6-X2 02445 M00S02164.sdsplay +++| BX3 X0*X3 02446 M00S02165.sdsplay +++| ZR X3,PRS6 IF A MATCH 02447 M00S02166.sdsplay +++| SA2 A2+B1 02448 M00S02167.sdsplay +++| EQ PRS5 CHECK NEXT ARGUMENT IN TABLE 02449 M00S02168.sdsplay +++| 02450 M00S02169.sdsplay +++| PRS6 SX4 X2+ FWA OF TABLE OF LIST OPTIONS 02451 M00S02170.sdsplay +++| AX2 18 02452 M00S02171.sdsplay +++| SX5 X2 FWA OF ARGUMENT AREA 02453 M00S02172.sdsplay +++| RJ POP GET ARGUMENT VALUE 02454 M00S02173.sdsplay +++| SX1 ERAE * ARGUMENT ERROR - XXXXXXX.* 02455 M00S02174.sdsplay +++| NG B5,ERR IF ERROR 02456 M00S02175.sdsplay +++| ZR X4,PRS7 IF NO OPTION TABLE 02457 M00S02176.sdsplay +++| RJ CVO CHECK FOR VALID OPTION 02458 M00S02177.sdsplay +++| NZ X3,ERR IF VALID OPTION NOT FOUND 02459 M00S02178.sdsplay +++| PRS7 MX0 -18 02460 M00S02179.sdsplay +++| BX2 -X0*X6 02461 M00S02180.sdsplay +++| NZ X2,ERR IF ARGUMENT VALUE TOO LONG 02462 M00S02181.sdsplay +++| SA6 X5+ SAVE VALID OPTION 02463 M00S02182.sdsplay +++| ZR B6,PRS10 IF END OF ARGUMENTS 02464 M00S02183.sdsplay +++| EQ PRS2 CHECK NEXT ARGUMENT 02465 M00S02184.sdsplay +++| 02466 M00S02185.sdsplay +++|* PROCESS POSITIONAL ARGUMENTS. 02467 M00S02186.sdsplay +++| 02468 M00S02187.sdsplay +++| PRS8 SX1 ERAE * ARGUMENT ERROR - XXXXXXX.* 02469 M00S02188.sdsplay +++| MX0 -18 02470 M00S02189.sdsplay +++| BX2 -X0*X6 02471 M00S02190.sdsplay +++| NZ X2,ERR IF ARGUMENT TOO LONG 02472 M00S02191.sdsplay +++| SA2 PRSA GET ARGUMENT COUNTER 02473 M00S02192.sdsplay +++| SA3 TARG+X2-1 02474 M00S02193.sdsplay +++| SX4 X3+ FWA TABLE OF LIST OPTIONS 02475 M00S02194.sdsplay +++| AX3 18 02476 M00S02195.sdsplay +++| SX5 X3 SAVE FWA OF ARGUMENT AREA 02477 M00S02196.sdsplay +++| ZR X4,PRS9 IF NO LIST OPTION TABLE 02478 M00S02197.sdsplay +++| RJ CVO CHECK FOR VALID OPTION 02479 M00S02198.sdsplay +++| NZ X3,ERR IF INVALID OPTION 02480 M00S02199.sdsplay +++| PRS9 SA6 X5+ SAVE ARGUMENT 02481 M00S02200.sdsplay +++| SA1 PRSD 02482 M00S02201.sdsplay +++| ZR X1,PRS2 IF NOT END OF ARGUMENTS 02483 M00S02202.sdsplay +++| 02484 M00S02203.sdsplay +++|* CHECK FOR ARGUMENT CONFLICTS. 02485 M00S02204.sdsplay +++| 02486 M00S02205.sdsplay +++| PRS10 SA2 PRSC CHECK LIST OPTION 02487 M00S02206.sdsplay +++| SX3 1RL 02488 M00S02207.sdsplay +++| LX3 54 02489 M00S02208.sdsplay +++| BX3 X3-X2 02490 M00S02209.sdsplay +++| NZ X3,PRS12 IF NOT LINE PRINTER OPTION 02491 M00S02210.sdsplay +++| SA2 PRSB GET LOCAL FILE NAME 02492 M00S02211.sdsplay +++| SA1 OUTPUT 02493 M00S02212.sdsplay +++| BX6 X1 02494 M00S02213.sdsplay +++| ZR X2,PRS11 IF FILE NAME NOT SPECIFIED 02495 M00S02214.sdsplay +++| MX0 -18 02496 M00S02215.sdsplay +++| BX1 -X0*X1 02497 M00S02216.sdsplay +++| BX6 X1+X2 02498 M00S02217.sdsplay +++| SA6 OUTPUT SET FILE NAME IN FET 02499 M00S02218.sdsplay +++| PRS11 SA6 LFLG SET LINE PRINTER FLAG
| Line S02219 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02500 M01S02219.271l750 ---| EQ PRS13 FINISH PRESET
| Line S00143 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02501 M01S00143.271l750 +++| EQ PRS12.1 CHECK INPUT FILE OPTION 02502 M00S02220.sdsplay +++| 02503 M00S02221.sdsplay +++| PRS12 SA2 PRSB CHECK IF FILE NAME SPECIFIED
| Line S02222 Modification History | |
|---|---|
M01 (Removed by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02504 M01S02222.271l750 ---| ZR X2,PRS13 IF NO FILE NAME SPECIFIED
| Line S00144 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02505 M01S00144.271l750 +++| ZR X2,PRS12.1 IF NOT FILE NAME SPECIFIED 02506 M00S02223.sdsplay +++| BX6 X2 02507 M00S02224.sdsplay +++| SX1 ERAE * ARGUMENT ERROR - XXXXXXX.* 02508 M00S02225.sdsplay +++| EQ ERR PROCESS ERROR 02509 M00S02226.sdsplay +++|
| Line S00145 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02510 M01S00145.271l750 +++| PRS12.1 SA1 PRSF GET LOCAL FILE NAME FOR DIRECTIVES 02511 M01S00146.271l750 +++| SA2 INPUT 02512 M01S00147.271l750 +++| MX0 42 02513 M01S00148.271l750 +++| BX6 X0*X1 02514 M01S00149.271l750 +++| BX7 -X0*X2 02515 M01S00150.271l750 +++| BX7 X6+X7 02516 M01S00151.271l750 +++| SA6 DFLG SET INPUT FILE FLAG 02517 M01S00152.271l750 +++| SA7 A2+ SET INPUT FILE 02518 M01S00153.271l750 +++| 02519 M00S02227.sdsplay +++|* SET *MAXIMUM CM FL FOR ONE JOB* IN TEMPLATE DESCRIPTION. 02520 M00S02228.sdsplay +++| 02521 M00S02229.sdsplay +++| PRS13 SX1 MXFL MAXIMUM CM FL FOR ONE JOB 02522 M00S02230.sdsplay +++| RJ COD CONVERT TO DISPLAY CODE 02523 M00S02231.sdsplay +++| LX6 -12 02524 M00S02232.sdsplay +++| MX0 12 02525 M00S02233.sdsplay +++| SA1 ASFM GET TEMPLATE WORDS 02526 M00S02234.sdsplay +++| SA2 A1+B1 02527 M00S02235.sdsplay +++| BX7 X0*X6 SET SET LAST PART OF VALUE 02528 M00S02236.sdsplay +++| BX2 -X0*X2 SET FIRST PART OF VALUE 02529 M00S02237.sdsplay +++| LX0 12 02530 M00S02238.sdsplay +++| BX6 X0*X6 02531 M00S02239.sdsplay +++| BX1 -X0*X1 02532 M00S02240.sdsplay +++| BX6 X6+X1 02533 M00S02241.sdsplay +++| BX7 X7+X2 02534 M00S02242.sdsplay +++| SA6 A1 SET VALUE IN TEMPLATE 02535 M00S02243.sdsplay +++| SA7 A2 02536 M00S02244.sdsplay +++| RJ GSD GET SYSTEM DATA 02537 M00S02245.sdsplay +++| EQ PRSX RETURN 02538 M00S02246.sdsplay +++| 02539 M00S02247.sdsplay +++| 02540 M00S02248.sdsplay +++| PRSA CON 0 ARGUMENT COUNTER 02541 M00S02249.sdsplay +++| PRSB CON 0 OUTPUT FILE ARGUMENT VALUE 02542 M00S02250.sdsplay +++| PRSC CON 0LD LIST OPTION ARGUMENT VALUE 02543 M00S02251.sdsplay +++| PRSD CON 0 TERMINATOR ENCOUNTERED FLAG 02544 M00S02252.sdsplay +++| PRSE CON 0 SYSTEM ORIGIN FLAG
| Line S00154 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02545 M01S00154.271l750 +++| PRSF CON 0 INPUT FILE ARGUMENT VALUE 02546 M00S02253.sdsplay +++| SPACE 4,10 02547 M00S02254.sdsplay +++|** ARGUMENT EQUIVALENCE TABLE. 02548 M00S02255.sdsplay +++|* 02549 M00S02256.sdsplay +++|*T 12/ OP,12/ ,18/ AV,18/ OT
Figure
02550 M00S02257.sdsplay +++|* 02551 M00S02258.sdsplay +++|* OP = DISPLAY CODE ARGUMENT OPTION VALUE. 02552 M00S02259.sdsplay +++|* AV = ADDRESS OF ARGUMENT VALUE. 02553 M00S02260.sdsplay +++|* OT = FWA OPTION TABLE, IF ARGUMENT HAS DISCRETE OPTIONS. 02554 M00S02261.sdsplay +++|* = 0, OTHERWISE. 02555 M00S02262.sdsplay +++| 02556 M00S02263.sdsplay +++| 02557 M00S02264.sdsplay +++| TARG BSS 0 02558 M00S02265.sdsplay +++| VFD 12/0LL,12/0,18/PRSB,18/0 LOCAL FILE ARGUMENT 02559 M00S02266.sdsplay +++| VFD 12/0LLO,12/0,18/PRSC,18/TLOP LIST OPTION ARGUMENT
| Line S00155 Modification History | |
|---|---|
M01 (Added by) | 271l750 |
Seq # *Modification Id* Act ----------------------------+ 02560 M01S00155.271l750 +++| VFD 12/0LI,12/0,18/PRSF,18/0 INPUT FILE ARGUMENT 02561 M00S02267.sdsplay +++| TARGL EQU *-TARG NUMBER OF VALID ARGUMENTS 02562 M00S02268.sdsplay +++| CON 0 END OF TABLE 02563 M00S02269.sdsplay +++| SPACE 4,10 02564 M00S02270.sdsplay +++|** TLOP - TABLE OF LIST OPTIONS. 02565 M00S02271.sdsplay +++|* 02566 M00S02272.sdsplay +++|*T 42/ OPTION,18/
Figure
02567 M00S02273.sdsplay +++|* 02568 M00S02274.sdsplay +++|* OPTION = DISPLAY CODE OPTION VALUE. 02569 M00S02275.sdsplay +++| 02570 M00S02276.sdsplay +++| 02571 M00S02277.sdsplay +++| TLOP BSS 0 02572 M00S02278.sdsplay +++| VFD 42/0LD,18/0 SELECT *L* DISPLAY/DUMMY LOCATION 02573 M00S02279.sdsplay +++| VFD 42/0LL,18/0 SELECT LINE PRINTER 02574 M00S02280.sdsplay +++| CON 0 END OF TABLE 02575 M00S02281.sdsplay +++| CVO SPACE 4,10 02576 M00S02282.sdsplay +++|** CVO - CHECK FOR VALID OPTION. 02577 M00S02283.sdsplay +++|* 02578 M00S02284.sdsplay +++|* ENTRY (X4) = FWA OF LIST OPTION TABLE. 02579 M00S02285.sdsplay +++|* (X6) = LIST OPTION ARGUMENT. 02580 M00S02286.sdsplay +++|* 02581 M00S02287.sdsplay +++|* EXIT (X3) = 0, IF VALID LIST OPTION FOUND. 02582 M00S02288.sdsplay +++|* = NOT 0, IF VALID LIST OPTION NOT FOUND. 02583 M00S02289.sdsplay +++|* 02584 M00S02290.sdsplay +++|* USES X - 2, 3. 02585 M00S02291.sdsplay +++|* A - 2. 02586 M00S02292.sdsplay +++| 02587 M00S02293.sdsplay +++| 02588 M00S02294.sdsplay +++| CVO SUBR ENTRY/EXIT 02589 M00S02295.sdsplay +++| SA2 X4+ FWA OF LIST OPTION TABLE. 02590 M00S02296.sdsplay +++| CVO1 ZR X2,CVOX IF END OF TABLE, OPTION NOT FOUND 02591 M00S02297.sdsplay +++| BX3 X6-X2 02592 M00S02298.sdsplay +++| ZR X3,CVOX IF LIST OPTION FOUND 02593 M00S02299.sdsplay +++| SA2 A2+1 02594 M00S02300.sdsplay +++| EQ CVO1 PROCESS NEXT ENTRY IN TABLE 02595 M00S02301.sdsplay +++| ERR SPACE 4,10 02596 M00S02302.sdsplay +++|** ERR - ABORT PROGRAM WITH ERROR MESSAGE. 02597 M00S02303.sdsplay +++|* 02598 M00S02304.sdsplay +++|* *ERR* ISSUES AN ERROR MESSAGE TO THE USER AND SYSTEM 02599 M00S02305.sdsplay +++|* DAYFILE AND THEN ABORTS THE UTILITY. 02600 M00S02306.sdsplay +++|* 02601 M00S02307.sdsplay +++|* ENTRY (X1) = FWA OF ERROR MESSAGE. 02602 M00S02308.sdsplay +++|* (X6) = KEYWORD VALUE FOR ERROR MESSAGE, IF THE 02603 M00S02309.sdsplay +++|* MESSAGE IS *ERAE*. 02604 M00S02310.sdsplay +++|* (X6) = KEYWORD VALUE FOR ERROR MESSAGE. 02605 M00S02311.sdsplay +++|* 02606 M00S02312.sdsplay +++|* EXIT MESSAGE ISSUED IN SYSTEM AND USER DAYFILE. 02607 M00S02313.sdsplay +++|* 02608 M00S02314.sdsplay +++|* USES X - 1, 2. 02609 M00S02315.sdsplay +++|* B - 2, 5. 02610 M00S02316.sdsplay +++|* 02611 M00S02317.sdsplay +++|* CALLS AFT, SNM. 02612 M00S02318.sdsplay +++|* 02613 M00S02319.sdsplay +++|* MACROS ABORT, MESSAGE. 02614 M00S02320.sdsplay +++| 02615 M00S02321.sdsplay +++| 02616 M00S02322.sdsplay +++| ERR BSS 0 ENTRY 02617 M00S02323.sdsplay +++| SB5 X1+ SET FWA OF MESSAGE 02618 M00S02324.sdsplay +++| SX2 X1-ERAE 02619 M00S02325.sdsplay +++| NZ X2,ERR1 IF NOT * ARGUMENT ERROR...* MESSAGE 02620 M00S02326.sdsplay +++| BX1 X6 02621 M00S02327.sdsplay +++| RJ AFT APPEND FLOATING TERMINATOR 02622 M00S02328.sdsplay +++| SB2 1RX SET SEARCH CHARACTER 02623 M00S02329.sdsplay +++| BX1 X6 SET PARAMETER IN ERROR 02624 M00S02330.sdsplay +++| RJ SNM SET PARAMETER IN MESSAGE 02625 M00S02331.sdsplay +++| ERR1 MESSAGE B5,0,R ISSUE MESSAGE TO USER AND SYSTEM DAYFILE 02626 M00S02332.sdsplay +++| ABORT ABORT UTILITY 02627 M00S02333.sdsplay +++| SPACE 4,10 02628 M00S02334.sdsplay +++| SDSPE EQU * END OF PROGRAM 02629 M00S02335.sdsplay +++| .RFL= MAX SDSPE,LBUFE,OBUFE 02630 M00S02336.sdsplay +++| RFL= EQU .RFL= 02631 M00S02337.sdsplay +++| SPACE 4,10 02632 M00S02338.sdsplay +++| END
cdc/nos2.source/opl.opl871/deck/sdsplay.001.txt · Last modified: by 127.0.0.1