cdc:nos2.source:opl.opl871:deck:dsdump
Deck DSDUMP
2 Modifications
Source
Seq # *Modification Id* Act ----------------------------+ 00001 M01S00001.dsdump +++| IDENT DSDUMP 00002 M01S00002.dsdump +++| ENTRY DSDUMP 00003 M01S00003.dsdump +++| SYSCOM B1
| Line S00004 Modification History | |
|---|---|
M01 (Added by) | dsdump |
M02 (Updated by) | ns2440 |
Seq # *Modification Id* Act ----------------------------+ 00004 M02S00004.ns2440 ---| COMMENT 72/07/24. 72/10/05. DIRECT SUBSEQUENT DUMPS. 00005 M01S00001.ns2440 +++| TITLE DSDUMP - DIRECT SUBSEQUENT DUMPS. 00006 M01S00002.ns2440 +++|*COMMENT DSDUMP - DIRECT SUBSEQUENT DUMPS.
| Line S00005 Modification History | |
|---|---|
M01 (Added by) | dsdump |
M02 (Updated by) | 281l803 |
Seq # *Modification Id* Act ----------------------------+ 00007 M02S00005.281l803 ---| COMMENT COPYRIGHT CONTROL DATA CORPORATION. 1978. 00008 M01S00001.281l803 +++| COMMENT COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
| Line S00006 Modification History | |
|---|---|
M01 (Added by) | dsdump |
M02 (Updated by) | ns2440 |
Seq # *Modification Id* Act ----------------------------+ 00009 M02S00006.ns2440 ---| TITLE DSDUMP - DIRECT SUBSEQUENT DUMPS. 00010 M01S00007.dsdump +++| SPACE 4 00011 M01S00008.dsdump +++|***** DSDUMP - DIRECT SUBSEQUENT DUMPS. 00012 M01S00009.dsdump +++|* 00013 M01S00010.dsdump +++|* A. J. KOMOR. 72/07/24. 00014 M01S00011.dsdump +++|* J. R. HOGUE. 72/10/05. 00015 M01S00012.dsdump +++|* W. E. MARTIN. 78/12/30. 00016 M01S00013.dsdump +++| SPACE 4 00017 M01S00014.dsdump +++|* COMMON TEXTS. 00018 M01S00015.dsdump +++| 00019 M01S00016.dsdump +++| 00020 M01S00017.dsdump +++|*CALL COMCMAC 00021 M01S00018.dsdump +++|*CALL COMKMAC 00022 M01S00019.dsdump +++|*CALL COMSPRD 00023 M01S00020.dsdump +++| SPACE 4,75 00024 M01S00021.dsdump +++|*** DSDUMP - DIRECT SUBSEQUENT DUMPS. 00025 M01S00022.dsdump +++|* 00026 M01S00023.dsdump +++|* DSDUMP IS A PRODUCT SET INTERFACE WHICH ALLOWS THE APPLI- 00027 M01S00024.dsdump +++|* CATION PROGRAMMER TO CHANGE ANY OF THE DEFAULT VALUES OF A 00028 M01S00025.dsdump +++|* CMDUMP REQUEST. THE DSDUMP DOES NOT CAUSE A DUMP IN ITSELF, 00029 M01S00026.dsdump +++|* EXCEPT, WHEN THE SYSTEM DETECTS AN ERROR (I.E. ABORT). ANY 00030 M01S00027.dsdump +++|* DEFAULT VALUES ON THE DSDUMP ARE SATISFIED FROM THE GENERAL 00031 M01S00028.dsdump +++|* DEFAULT VALUES WHICH ARE ASSEMBLED IN THE EXECUTIVE. 00032 M01S00029.dsdump +++|* 00033 M01S00030.dsdump +++|* CALLING FORMATS - 00034 M01S00031.dsdump +++|* 00035 M01S00032.dsdump +++|* COBOL - 00036 M01S00033.dsdump +++|* 00037 M01S00034.dsdump +++|* ENTER DSDUMP USING FWA, LWA, EP, DB, OQ, QD. 00038 M01S00035.dsdump +++|* 00039 M01S00036.dsdump +++|* FORTRAN EXTENDED - 00040 M01S00037.dsdump +++|* 00041 M01S00038.dsdump +++|* CALL DSDUMP(FWA,LWA,EP,DB,OQ,QD) 00042 M01S00039.dsdump +++|* 00043 M01S00040.dsdump +++|* FWA BEGINNING ADDRESS, LEGAL VALUES - FWA .LT. FL. 00044 M01S00041.dsdump +++|* IF NEGATIVE (BIT 17 SET) USE DEFAULT. 00045 M01S00042.dsdump +++|* COBOL COMP-1. 00046 M01S00043.dsdump +++|* FORTRAN EXTENDED INTEGER. 00047 M01S00044.dsdump +++|* 00048 M01S00045.dsdump +++|* LWA LAST WORD ADDRESS, LEGAL VALUES - FWA .LT. FL. 00049 M01S00046.dsdump +++|* .EQ. 0 - IMPLIES NO DUMP OF FIELD LENGTH. 00050 M01S00047.dsdump +++|* IF NEGATIVE (BIT 17 SET) USE DEFAULT. 00051 M01S00048.dsdump +++|* COBOL COMP-1. 00052 M01S00049.dsdump +++|* FORTRAN EXTENDED INTEGER. 00053 M01S00050.dsdump +++|* 00054 M01S00051.dsdump +++|* EP EXCHANGE PACKAGE, LEGAL VALUES - 00055 M01S00052.dsdump +++|* .EQ. 0 - OPTION NOT DESIRED. 00056 M01S00053.dsdump +++|* .NE. 0 - OPTION SELECTED. 00057 M01S00054.dsdump +++|* IF NEGATIVE (BIT 59 SET) USE DEFAULT. 00058 M01S00055.dsdump +++|* COBOL COMP-1. 00059 M01S00056.dsdump +++|* FORTRAN EXTENDED INTEGER. 00060 M01S00057.dsdump +++|* 00061 M01S00058.dsdump +++|* DB DATA BUFFERS DUMP, LEGAL VALUES - 00062 M01S00059.dsdump +++|* .EQ. 0 - OPTION NOT DESIRED. 00063 M01S00060.dsdump +++|* .NE. 0 - OPTIONSELECTED. 00064 M01S00061.dsdump +++|* IF NEGATIVE (BIT 59 SET) USE DEFAULT. 00065 M01S00062.dsdump +++|* COBOL COMP-1. 00066 M01S00063.dsdump +++|* FORTRAN EXTENDED INTEGER. 00067 M01S00064.dsdump +++|* 00068 M01S00065.dsdump +++|* OQ OUTPUT QUEUE, LEGAL VALUES - 00069 M01S00066.dsdump +++|* .EQ. O - DUMP TO BATCH PRINTER. 00070 M01S00067.dsdump +++|* .EQ. 1 - DUMP TO E/I 200. 00071 M01S00068.dsdump +++|* .EQ 2 - DUMP TO USER PERMANENT FILE. 00072 M01S00069.dsdump +++|* IF NEGATIVE (BIT 59 SET) USE DEFAULT. 00073 M01S00070.dsdump +++|* COBOL COMP-1. 00074 M01S00071.dsdump +++|* FORTRAN EXTENDED INTEGER. 00075 M01S00072.dsdump +++|* 00076 M01S00073.dsdump +++|* QD QUEUE DESTINATION, LEGAL VALUES - 00077 M01S00074.dsdump +++|* IF PRINTER IS SPECIFIED IN PREVIOUS PARAMETER, 00078 M01S00075.dsdump +++|* PRINTER I.D. IS SPECIFIED IN NUMERIC CHARACTERS 00079 M01S00076.dsdump +++|* RIGHT JUSTIFIED WITHIN WORD. 00080 M01S00077.dsdump +++|* IF NEGATIVE (BIT 17 SET) USE DEFAULT. 00081 M01S00078.dsdump +++|* 00082 M01S00079.dsdump +++|* IF E/I 200 IS SPECIFIED IN PREVIOUS PARAMETER, THE 00083 M01S00080.dsdump +++|* ACCOUNT NUMBER IS SPECIFIED IN DISPLAY CODED LEFT 00084 M01S00081.dsdump +++|* JUSTIFIED CHARACTERS. MAXIMUM LENGTH IS SEVEN 00085 M01S00082.dsdump +++|* CHARACTERS. 00086 M01S00083.dsdump +++|* IF NEGATIVE (BIT 59 SET) USE DEFAULT. 00087 M01S00084.dsdump +++|* 00088 M01S00085.dsdump +++|* IF USER PERMANENT FILE IS SPECIFIED, THE PERMANENT 00089 M01S00086.dsdump +++|* FILE NAME IS SPECIFIED IN DISPLAY CODED LEFT 00090 M01S00087.dsdump +++|* JUSTIFIED CHARACTERS. ANY LEGAL FILE NAME IS 00091 M01S00088.dsdump +++|* PERMISSIBLE WITH A MAXIMUM OF SEVEN CHARACTERS. 00092 M01S00089.dsdump +++|* IF NEGATIVE (BIT 59 SET) USE DEFAULT. 00093 M01S00090.dsdump +++|* 00094 M01S00091.dsdump +++|* 00095 M01S00092.dsdump +++|* USES A - 1, 2, 3, 4, 6, 7. 00096 M01S00093.dsdump +++|* X - ALL. 00097 M01S00094.dsdump +++|* B - 1, 3. 00098 M01S00095.dsdump +++|* 00099 M01S00096.dsdump +++|* CALLS ZFN. 00100 M01S00097.dsdump +++|* 00101 M01S00098.dsdump +++|* MACROS DSDUMP. 00102 M01S00099.dsdump +++| 00103 M01S00100.dsdump +++| 00104 M01S00101.dsdump +++| VFD 42/0LDSDUMP,18/DSDUMP 00105 M01S00102.dsdump +++| 00106 M01S00103.dsdump +++| DSD5 SA1 DSDB RESTORE (A0) 00107 M01S00104.dsdump +++| SA0 X1+ 00108 M01S00105.dsdump +++| 00109 M01S00106.dsdump +++| DSDUMP SUBR ENTRY/RETURN 00110 M01S00107.dsdump +++| SX6 A0 SAVE (A0) 00111 M01S00108.dsdump +++| MX5 60-18 00112 M01S00109.dsdump +++| SA6 DSDB 00113 M01S00110.dsdump +++| SB1 1 00114 M01S00111.dsdump +++| SA4 X1 READ FWA PARAMETER ADDRESS 00115 M01S00112.dsdump +++| SA3 A1+B1 READ LWA PARAMETER ADDRESS 00116 M01S00113.dsdump +++| BX6 -X5*X4 00117 M01S00114.dsdump +++| SA2 X3 READ LWA 00118 M01S00115.dsdump +++| BX2 -X5*X2 00119 M01S00116.dsdump +++| LX2 30 00120 M01S00117.dsdump +++| BX6 X2+X6 (X6) = LWA AND FWA 00121 M01S00118.dsdump +++| SA1 A3+B1 READ EXCHANGE POINT PARAMETER 00122 M01S00119.dsdump +++| SA3 A1+B1 READ DATA BASE PARAMETER ADDRESS 00123 M01S00120.dsdump +++| SA2 X1 READ EXCHANGE PACKAGE DUMP FLAG 00124 M01S00121.dsdump +++| SA1 X3 READ DATA BASE DUMP FLAG 00125 M01S00122.dsdump +++| BX3 X3-X3 00126 M01S00123.dsdump +++| SA4 A3+B1 READ OUTPUT QUEUE PARAMETER ADDRESS 00127 M01S00124.dsdump +++| SX7 X1 00128 M01S00125.dsdump +++| ZR X7,DSD1 IF DATA BUFFER DUMP NOT DESIRED 00129 M01S00126.dsdump +++| SX3 B1 00130 M01S00127.dsdump +++| LX3 58 00131 M01S00128.dsdump +++| PL X1,DSD1 IF NOT DEFAULT PARAMETER 00132 M01S00129.dsdump +++| LX3 -2 00133 M01S00130.dsdump +++| DSD1 SX7 X2 00134 M01S00131.dsdump +++| BX1 X1-X1 00135 M01S00132.dsdump +++| ZR X7,DSD2 IF EXCHANGE PACKAGE DUMP NOT DESIRED 00136 M01S00133.dsdump +++| MX1 1 00137 M01S00134.dsdump +++| PL X2,DSD2 IF NOT DEFAULT PARAMETER 00138 M01S00135.dsdump +++| LX1 -2 00139 M01S00136.dsdump +++| DSD2 BX6 X6+X3 (X6) = LWA + FWA + DB 00140 M01S00137.dsdump +++| SA3 A4+B1 READ SIXTH PARAMETER POINTER 00141 M01S00138.dsdump +++| BX6 X6+X1 (X6) = LWA + FWA + DB + EP 00142 M01S00139.dsdump +++| SA2 X4 READ OUTPUT QUEUE 00143 M01S00140.dsdump +++| SA6 DSDA 00144 M01S00141.dsdump +++| BX0 -X5*X2 00145 M01S00142.dsdump +++| SA1 X3 READ QUEUE DESTINATION 00146 M01S00143.dsdump +++| SB3 X0+ 00147 M01S00144.dsdump +++| ZR B3,DSD3 IF DUMP IS TO LOCAL PRINTER 00148 M01S00145.dsdump +++| RJ ZFN ZERO FILL NAME 00149 M01S00146.dsdump +++| EQ DSD4 PROCESS QUEUE DESTINATION PARAMETER 00150 M01S00147.dsdump +++| 00151 M01S00148.dsdump +++| DSD3 BX5 -X5 00152 M01S00149.dsdump +++| DSD4 BX7 X5*X1 EXTRACT QUEUE DESTINATION 00153 M01S00150.dsdump +++| BX7 X7+X0 (X7) = DESTINATION + QUEUE 00154 M01S00151.dsdump +++| SA7 A6+1 00155 M01S00152.dsdump +++| DSDUMP DSDA ISSUE REQUEST TO EXECUTIVE 00156 M01S00153.dsdump +++| EQ DSD5 RESTORE (A0) AND RETURN 00157 M01S00154.dsdump +++| 00158 M01S00155.dsdump +++| DSDA VFD 1/1,1/1,1/0,1/0,8/,18/3LLWA,12/0,18/3LFWA 00159 M01S00156.dsdump +++| VFD 42/2LQD,18/2LOT 00160 M01S00157.dsdump +++| DSDB CON 0 STORAGE FOR (A0) 00161 M01S00158.dsdump +++| SPACE 4 00162 M01S00159.dsdump +++|* COMMON DECK. 00163 M01S00160.dsdump +++| 00164 M01S00161.dsdump +++| 00165 M01S00162.dsdump +++|*CALL COMKZFN 00166 M01S00163.dsdump +++| SPACE 4 00167 M01S00164.dsdump +++| END
cdc/nos2.source/opl.opl871/deck/dsdump.txt · Last modified: by 127.0.0.1