1 " BEGIN INCLUDE FILE gtss_prgdes_alm_.incl.alm
2 "
3 " Created: Kepner 1978
4 " Modified: Ron Barstad 82-08-09 Add label .TPD
5 " fix BASIC call name,
6 " change leading 7 digit on 7P0..7K5 names,
7 " change leading 7 on 7FOR,
8 " and other misc fixes for 4JS3.
9 " Modified: Ron Barstad 83-01-14 Changed PSP Fortran names .YPxxx to .YQxxx
10 " Modified: Ron Barstad 83-05-09 Brought up to 4JS3 Update 7
11 "
12 use loc1
13 even
14 segdef prgdes
15 prgdes: null
16 .TPRGD:NULL ORIGIN OF PROGRAM DESCRIPTORS
17 .TPD: NULL
18 " Program descriptor 1.
19 CARD: PRGDES 0,0,0,0,0,0,0,
20 card,CARDCL1,,.BCMCL 4.2
21 " Program descriptor 2.
22 CARDIN:PRGDES 1,0,8489,5190,5084,112,106, " Added by gtbl on 05/19/83 1759.5
23 cdin,EXPCL,.TSCDI 6/D-1
24 " Program descriptor 3.
25 PRINT: PRGDES 1,0,13585,2438,2330,112,108, " Added by gtbl on 05/19/83 1759.5
26 prin,EXPCL,.TSCPT 6/D-1
27 " Program descriptor 4.
28 ASCBCD:PRGDES 1,0,46374,4742,4634,108,108, " Added by gtbl on 05/19/83 1759.5
29 ascb,EXPCL,.TSZAA 6/D-1
30 " Program descriptor 5.
31 BPRI: PRGDES 1,0,46374,4742,4634,108,108, " Added by gtbl on 05/19/83 1759.5
32 bpri,EXPCL,.TSZAA,,ASCBCD 2/H-2
33 " Program descriptor 6.
34 BPUN: PRGDES 1,0,46374,4742,4634,108,108, " Added by gtbl on 05/19/83 1759.5
35 bpun,EXPCL,.TSZAA,,ASCBCD 2/H-2
36 " Program descriptor 7.
37 BCDA: PRGDES 1,0,46374,4742,4634,108,108, " Added by gtbl on 05/19/83 1759.5
38 bcda,EXPCL,.TSZAA,,ASCBCD 2/H-2
39 " Program descriptor 8.
40 ASCASC:PRGDES 1,0,51020,2798,2690,108,108, " Added by gtbl on 05/19/83 1759.5
41 asca,EXPCL,.TSZCA,.BLUSE 6/D-1
42 " Program descriptor 9.
43 NONE: PRGDES 0,0,0,0,0,0,0,
44 none,NONECL0,,.BASIC
45 " Program descriptor 10.
46 BASIC: PRGDES 0,0,0,0,0,0,0,
47 basi,BASCL2,,.BASIC+.BSPO BASIC -PSP-
48 " Program descriptor 11.
49 DATAB: PRGDES 0,0,0,0,0,0,0,
50 data,DATCL6,,.BASIC+.BSPO DATA-BASIC -PSP-
51 " Program descriptor 12.
52 JOVIAL:PRGDES 0,0,0,0,0,0,0,
53 jovi,JOVCL1,,.BCMCL+.BSPO JOVIAL -PSP-
54 " Program descriptor 13.
55 FORTY: PRGDES 0,0,0,0,0,0,0,
56 yfor,YFORCL1,,.BCMCL+.BSPO FORTRAN-Y -PSP-
57 " Program descriptor 14.
58 FORTT: PRGDES 0,0,0,0,0,0,0,
59 fort,TFORCL1,,.BCMCL+.BSPO TSS FORTRAN -PSP-
60 " Program descriptor 15.
61 ALGOL: PRGDES 0,0,0,0,0,0,0,
62 algo,ALGLCL1,,.BCMCL+.BSPO ALGOL -PSP-
63 " Program descriptor 16.
64 ACCESS:PRGDES 1,0,165340,5002,4900,102,102, " Added by gtbl on 05/19/83 1759.5
65 acce,EXPCL,.TSACC,.BGSPC+.BHUSE+.BLUSE+.BSPO -PSP-
66 " Program descriptor 17.
67 EDITOR:PRGDES 0,0,0,0,0,0,0,
68 edit,EDCL
69 " Program descriptor 18.
70 EDTX: PRGDES 1,0,15929,11264,11162,1435,102, " Added by gtbl on 05/19/83 1759.5
71 edtx,EXPCL,.TSEDT,.BHUSE+.BLUSE+.BSPO TEXT EDITOR -PSP-
72 " Program descriptor 19.
73 TEX: PRGDES 0,0,0,0,0,0,0,
74 tex,EXPCL,.TSTED,.BSPO
75 " Program descriptor 20.
76 PRGDES 0,0,0,0,0,0,0,
77 ttex,EXPCL,.TSTEX,.BNSYS+.BSPO
78 " Program descriptor 21.
79 PRGDES 0,0,0,0,0,0,0,
80 tteb,EXPCL,.TSTEB,.BNSYS+.BSPO 4JS2
81 " Program descriptor 22.
82 PRGDES 0,0,0,0,0,0,0,
83 ttec,EXPCL,.TSTEC,.BNSYS+.BSPO 4JS2
84 " Program descriptor 23.
85 CONV: PRGDES 1,1,27032,12380,12277,503,103, " Added by gtbl on 05/19/83 1759.5
86 conv,EXPCL,.TCONV,.BCMOV
87 " Program descriptor 24.
88 JRN: PRGDES 1,1,27032,12380,12277,503,103, " Added by gtbl on 05/19/83 1759.5
89 jrn,EXPCL,.TCONV,.BCMOV,CONV
90 " Program descriptor 25.
91 JPRINT:PRGDES 1,1,27032,12380,12277,503,103, " Added by gtbl on 05/19/83 1759.5
92 jpri,EXPCL,.TCONV,.BCMOV,CONV
93 " Program descriptor 26.
94 JPUNCH:PRGDES 1,1,27032,12380,12277,503,103, " Added by gtbl on 05/19/83 1759.5
95 jpun,EXPCL,.TCONV,.BCMOV,CONV
96 " Program descriptor 27.
97 JDAC: PRGDES 1,1,27032,12380,12277,503,103, " Added by gtbl on 05/19/83 1759.5
98 jdac,EXPCL,.TCONV,,CONV
99 " Program descriptor 28.
100 DISP: PRGDES 1,1,27032,12380,12277,503,103, " Added by gtbl on 05/19/83 1759.5
101 disp,EXPCL,.TCONV,.BCMOV,CONV
102 " Program descriptor 29.
103 MAIL: PRGDES 0,0,0,0,0,0,0,
104 mail,EXPCL,.TMAIL,.BSPO
105 " Program descriptor 30.
106 SORT: PRGDES 0,0,0,0,0,0,0,
107 sort,EXPCL,.TSORT,.BSPO
108 " Program descriptor 31.
109 BYE: PRGDES 0,0,0,0,0,0,0,
110 bye,BYEBYE
111 " Program descriptor 32.
112 LODX: PRGDES 1,0,161781,2034,1932,102,102, " Added by gtbl on 05/19/83 1759.5
113 lodx,EXPCL,.TSCLD,.BHUSE+.BLUSE+.BEXEC+.BSPO LODX -PSP-
114 " Program descriptor 33.
115 LOGO: PRGDES 1,0,252015,1088,980,708,108, " Added by gtbl on 05/19/83 1759.5
116 logo,EXPCL,.TSLOG,.BPRIV+.BLSMC
117 " Program descriptor 34.
118 NEWU: PRGDES 1,0,252015,1088,980,708,108, " Added by gtbl on 05/19/83 1759.5
119 newu,EXPCL,.TSLOG,.BPRIV+.BLSMC+.BCMOV,LOGO TSSA0WSM
120 " Program descriptor 35.
121 STAT: PRGDES 1,1,15875,1364,1192,172,172, " Added by gtbl on 05/19/83 1759.5
122 stat,EXPCL,.TSSTT
123 " Program descriptor 36.
124 CONN: PRGDES 1,1,15875,1364,1192,172,172, " Added by gtbl on 05/19/83 1759.5
125 conn,EXPCL,.TSSTT,.BPRIV,STAT
126 " Program descriptor 37.
127 AFT: PRGDES 1,1,15875,1364,1192,172,172, " Added by gtbl on 05/19/83 1759.5
128 aft,EXPCL,.TSSTT,,STAT 4JS2
129 " Program descriptor 38.
130 TEMP: PRGDES 1,1,15875,1364,1192,172,172, " Added by gtbl on 05/19/83 1759.5
131 temp,EXPCL,.TSSTT,,STAT 4JS2
132 " Program descriptor 39.
133 HELP: PRGDES 1,0,236668,4608,4506,102,102, " Added by gtbl on 05/19/83 1759.5
134 help,EXPCL,.TSHLP,.BLUSE
135 " Program descriptor 40.
136 MASTER:PRGDES 0,0,0,0,0,0,0,
137 mast,EXPCL,.tsmas,.BMAST+.BPRIV+.BLSMC+.BMASX+.BSPO -PSP-
138 " Program descriptor 41.
139 TSAR: PRGDES 0,0,0,0,0,0,0,
140 tsar,EXPCL,.tsma3,.BMAST+.BPRIV+.BMASX+.BSPO TSAR -PSP-
141 " Program descriptor 42.
142 MAS1: PRGDES 0,0,0,0,0,0,0,
143 mas1,EXPCL,.tsmas,.BSPO STIA4PZX
144 " Program descriptor 43.
145 MAS3: PRGDES 0,0,0,0,0,0,0,
146 mas3,EXPCL,.tsma3,.BSPO STIA4PZX
147 " Program descriptor 44.
148 MAS4: PRGDES 0,0,0,0,0,0,0,
149 mas4,EXPCL,.tsma4,.BSPO STIA4PZX
150 " Program descriptor 45.
151 TSRI: PRGDES 0,0,0,0,0,0,0,
152 tsri,EXPCL,.tsma4,.BMAST+.BPRIV+.BMASX+.BSPO TSRI -PSP-
153 " Program descriptor 46.
154 BASY: PRGDES 1,0,83360,13476,13240,387,236, " Added by gtbl on 05/19/83 1759.5
155 basy,EXPCL,.TSBAS,.BEXEC+.BSPO -PSP-
156 " Program descriptor 47.
157 SAVE: PRGDES 1,1,17080,5196,5094,102,102, " Added by gtbl on 05/19/83 1759.5
158 save,EXPCL,.TSSAV,.BHUSE+.BLUSE
159 " Program descriptor 48.
160 RESE: PRGDES 1,1,5106,4890,4788,1772,102, " Added by gtbl on 05/19/83 1759.5
161 rese,EXPCL,.TSRSQ,.BNSYS
162 " Program descriptor 49.
163 DELETE:PRGDES 1,1,5106,4890,4788,1772,102, " Added by gtbl on 05/19/83 1759.5
164 dele,EXPCL,.TSRSQ,,RESE
165 " Program descriptor 50.
166 OLDNEW:PRGDES 1,1,13,4858,4756,103,102, " Added by gtbl on 05/19/83 1759.5
167 oldn,EXPCL,.TSONR,.BTFSW+.BHUSE+.BLUSE+.BCACH 4JS2
168 " Program descriptor 51.
169 BSED: PRGDES 1,0,232425,4332,4230,102,102, " Added by gtbl on 05/19/83 1759.5
170 bsed,EXPCL,.TSBED,.BHUSE+.BLUSE+.BCACH 4JS2
171 " Program descriptor 52.
172 LIST: PRGDES 1,0,253007,3448,3344,128,104, " Added by gtbl on 05/19/83 1759.5
173 list,EXPCL,.TSLST,.BHUSE+.BLUSE
174 " Program descriptor 53.
175 TAPE: PRGDES 1,0,226152,1346,1244,102,102, " Added by gtbl on 05/19/83 1759.5
176 tape,EXPCL,.TSTAP,.BNSYS+.BSPO PAPER TAPE INPUT -PSP-
177 " Program descriptor 54.
178 PTON: PRGDES 1,0,226152,1346,1244,102,102, " Added by gtbl on 05/19/83 1759.5
179 pton,EXPCL,.TSTAP,.BSPO TSSA4M6U
180 " Program descriptor 55.
181 PTOF: PRGDES 1,0,226152,1346,1244,102,102, " Added by gtbl on 05/19/83 1759.5
182 ptof,EXPCL,.TSTAP,.BSPO TSSA4M6U
183 " Program descriptor 56.
184 EDBN: PRGDES 0,0,0,0,0,0,0,
185 edbn,EDBNCL8
186 " Program descriptor 57.
187 NEW: PRGDES 1,0,256363,2506,2404,195,102, " Added by gtbl on 05/19/83 1759.5
188 new,EXPCL,.TSNEW,.BPRIV+.BLSMC+.BCMOV
189 " Program descriptor 58.
190 TERM: PRGDES 1,0,252015,1088,980,708,108, " Added by gtbl on 05/19/83 1759.5
191 term,EXPCL,.TSLOG,.BPRIV+.BLSMC,LOGO
192 " Program descriptor 59.
193 AUTO: PRGDES 1,0,231856,662,556,106,106, " Added by gtbl on 05/19/83 1759.5
194 auto,EXPCL,.TSATO,.BNSYS
195 " Program descriptor 60.
196 LINE: PRGDES 1,0,231856,662,556,106,106, " Added by gtbl on 05/19/83 1759.5
197 line,EXPCL,.TSATO,,AUTO
198 " Program descriptor 61.
199 PAGE: PRGDES 1,0,231856,662,556,106,106, " Added by gtbl on 05/19/83 1759.5
200 page,EXPCL,.TSATO,,AUTO
201 " Program descriptor 62.
202 FDUMP: PRGDES 1,0,157403,4472,4366,121,106, " Added by gtbl on 05/19/83 1759.5
203 fdum,EXPCL,.TSFDS,.BSPO FILE DUMP -PSP-
204 " Program descriptor 63.
205 GET: PRGDES 1,0,165340,5002,4900,102,102, " Added by gtbl on 05/19/83 1759.5
206 get,EXPCL,.TSACC,,ACCESS
207 " Program descriptor 64.
208 SNAP: PRGDES 1,0,148075,2076,1968,108,108, " Added by gtbl on 05/19/83 1759.5
209 sabt,EXPCL,.TSABT,.BLUSE+.BSPO SCAN ABORT FILE -PSP-
210 " Program descriptor 65.
211 CATA: PRGDES 1,0,165340,5002,4900,102,102, " Added by gtbl on 05/19/83 1759.5
212 cata,EXPCL,.TSACC,.BGSPC,ACCESS
213 " Program descriptor 66.
214 PERM: PRGDES 1,1,17080,5196,5094,102,102, " Added by gtbl on 05/19/83 1759.5
215 perm,EXPCL,.TSSAV,,SAVE
216 " Program descriptor 67.
217 REMO: PRGDES 1,0,165340,5002,4900,102,102, " Added by gtbl on 05/19/83 1759.5
218 remo,EXPCL,.TSACC,,ACCESS
219 " Program descriptor 68.
220 UCASE: PRGDES 0,0,0,0,0,0,0,
221 ucas,UCASCL UPPER CASE COMMAND
222 " Program descriptor 69.
223 LCASE: PRGDES 0,0,0,0,0,0,0,
224 lcas,LCASCL LOWER CASE COMMAND
225 " Program descriptor 70.
226 FORM: PRGDES 0,0,0,0,0,0,0,
227 form,FORMCL FORM FEED COMMAND
228 " Program descriptor 71.
229 NFORM: PRGDES 0,0,0,0,0,0,0,
230 nfor,NFORCL NO FORM FEED COMMAND
231 " Program descriptor 72.
232 STRIP: PRGDES 1,1,5106,4890,4788,1772,102, " Added by gtbl on 05/19/83 1759.5
233 stri,EXPCL,.TSRSQ,,RESE
234 " Program descriptor 73.
235 SCAN: PRGDES 1,1,9907,6064,5956,119,108, " Added by gtbl on 05/19/83 1759.5
236 scan,EXPCL,.TSCAN
237 " Program descriptor 74.
238 RUNOFF:PRGDES 1,0,40321,6142,6040,103,102, " Added by gtbl on 05/19/83 1759.5
239 runo,EXPCL,.TSROF,.BCMOV+.BSPO RUNOFF -PSP-
240 " Program descriptor 75.
241 JSTS: PRGDES 1,0,242464,2038,1930,108,108, " Added by gtbl on 05/19/83 1759.5
242 jsts,EXPCL,.TSJST,.BPRIV
243 " Program descriptor 76.
244 ABC: PRGDES 1,0,228314,3630,3530,100,100, " Added by gtbl on 05/19/83 1759.5
245 abc,EXPCL,.TSABC
246 " Program descriptor 77.
247 HOLD: PRGDES 0,0,0,0,0,0,0,
248 hold,HOLDCL
249 " Program descriptor 78.
250 SEND: PRGDES 0,0,0,0,0,0,0,
251 send,SENDCL
252 " Program descriptor 79.
253 LENG: PRGDES 1,1,17080,5196,5094,102,102, " Added by gtbl on 05/19/83 1759.5
254 leng,EXPCL,.TSSAV,,SAVE
255 " Program descriptor 80.
256 JABT: PRGDES 1,0,242464,2038,1930,108,108, " Added by gtbl on 05/19/83 1759.5
257 jabt,EXPCL,.TSJST,.BPRIV,JSTS
258 " Program descriptor 81.
259 APRT: PRGDES 1,1,27032,12380,12277,503,103, " Added by gtbl on 05/19/83 1759.5
260 apri,EXPCL,.TCONV,.BCMOV,CONV 4JS2
261 " Program descriptor 82.
262 PURG: PRGDES 1,0,165340,5002,4900,102,102, " Added by gtbl on 05/19/83 1759.5
263 purg,EXPCL,.TSACC,,ACCESS
264 " Program descriptor 83.
265 RELE: PRGDES 1,0,165340,5002,4900,102,102, " Added by gtbl on 05/19/83 1759.5
266 rele,EXPCL,.TSACC,,ACCESS
267 " Program descriptor 84.
268 SMCL: PRGDES 1,0,165340,5002,4900,102,102, " Added by gtbl on 05/19/83 1759.5
269 smcl,EXPCL,.TSACC,,ACCESS
270 " Program descriptor 85.
271 COPY: PRGDES 1,1,17080,5196,5094,102,102, " Added by gtbl on 05/19/83 1759.5
272 cpy,EXPCL,.TSSAV,,SAVE
273 " Program descriptor 86.
274 CODE: PRGDES 1,1,17080,5196,5094,102,102, " Added by gtbl on 05/19/83 1759.5
275 code,EXPCL,.TSSAV,,SAVE
276 " Program descriptor 87.
277 DECODE:PRGDES 1,1,17080,5196,5094,102,102, " Added by gtbl on 05/19/83 1759.5
278 deco,EXPCL,.TSSAV,,SAVE
279 " Program descriptor 88.
280 DASH: PRGDES 1,0,15929,11264,11162,1435,102, " Added by gtbl on 05/19/83 1759.5
281 -,EXPCL,.TSEDT,,EDTX
282 " Program descriptor 89.
283 ERAS: PRGDES 1,1,17080,5196,5094,102,102, " Added by gtbl on 05/19/83 1759.5
284 eras,EXPCL,.TSSAV,,SAVE
285 " Program descriptor 90.
286 RESA: PRGDES 1,1,17080,5196,5094,102,102, " Added by gtbl on 05/19/83 1759.5
287 resa,EXPCL,.TSSAV,,SAVE
288 " Program descriptor 91.
289 PRGDES 1,0,241186,1366,1266,100,100, " Added by gtbl on 05/19/83 1759.5
290 jmes,EXPCL,.TSJMS
291 " Program descriptor 92.
292 NOPAR: PRGDES 0,0,0,0,0,0,0,
293 nopa,NOPACL
294 " Program descriptor 93.
295 PARI: PRGDES 0,0,0,0,0,0,0,
296 pari,PARICL
297 " Program descriptor 94.
298 RECO: PRGDES 1,0,163725,1704,1602,103,102, " Added by gtbl on 05/19/83 1759.5
299 reco,EXPCL,.TSREC,.BTFSW+.BSPO RECOVERY -PSP-
300 " Program descriptor 95.
301 JOUT: PRGDES 1,0,244407,7704,7596,108,108, " Added by gtbl on 05/19/83 1759.5
302 jout,EXPCL,.TSJOT,.BPRIV
303 " Program descriptor 96.
304 PRGDES 1,0,96614,8756,8500,256,256, " Added by gtbl on 05/19/83 1759.5
305 bexp,EXPCL,.TSBEX
306 " Program descriptor 97.
307 RUNY: PRGDES 1,1,22187,4938,4830,109,108, " Added by gtbl on 05/19/83 1759.5
308 runy,EXPCL,.TSRNY,.BEXEC
309 " Program descriptor 98.
310 PASS: PRGDES 1,0,256363,2506,2404,195,102, " Added by gtbl on 05/19/83 1759.5
311 pass,EXPCL,.TSNEW,.BGSPC+.BPRIV+.BLSMC,NEW 4JS2
312 " Program descriptor 99.
313 APB: PRGDES 1,0,256363,2506,2404,195,102, " Added by gtbl on 05/19/83 1759.5
314 apb,EXPCL,.TSNEW,.BCMOV,NEW 4JS2
315 " Program descriptor 100.
316 TSDA: PRGDES 1,0,53729,28670,28568,102,102, " Added by gtbl on 05/19/83 1759.5
317 tsda,EXPCL,.TSDAS,.BPRIV+.BLUSE+.BCMOV+.BSPO -PSP-
318 " Program descriptor 101.
319 ADMN: PRGDES 1,0,18,8596,8458,138,138, " Added by gtbl on 05/19/83 1759.5
320 admn,EXPCL,.TSADM,.BPRIV+.BLSMC+.BSPO
321 " Program descriptor 102.
322 LODS: PRGDES 1,0,161781,2034,1932,102,102, " Added by gtbl on 05/19/83 1759.5
323 lods,EXPCL,.TSCLD,.BPRIV+.BEXEC+.BGSPC+.BTFSW+.BCMOV,LODX
324 " Program descriptor 103.
325 LODT: PRGDES 1,0,161781,2034,1932,102,102, " Added by gtbl on 05/19/83 1759.5
326 lodt,EXPCL,.TSCLD,,LODX
327 " Program descriptor 104.
328 TRACE: PRGDES 1,0,32396,7984,7912,79,72, " Added by gtbl on 05/19/83 1759.5
329 trac,EXPCL,.TSTRC,.BSPO TRACE -PSP-
330 " Program descriptor 105.
331 PRGDES 1,1,4781,376,312,64,64, " Added by gtbl on 05/19/83 1759.5
332 pwss,EXPCL,.TSPWS
333 " Program descriptor 106.
334 PCF: PRGDES 0,0,0,0,0,0,0,
335 pcf,EXPCL,.PCPCF,.BSPO TSSA4OHK
336 " Program descriptor 107.
337 IDSQ: PRGDES 1,0,203780,1234,1132,102,102, " Added by gtbl on 05/19/83 1759.5
338 idsq,EXPCL,.TSQIJ,.BSPO -PSP-
339 " Program descriptor 108.
340 PASSWD:PRGDES 1,0,170253,12374,7456,4918,4918, " Added by gtbl on 05/19/83 1759.5
341 pswd,EXPCL,.TSQIA,.BSPO TSSA0WCY
342 " Program descriptor 109.
343 LANGDP:PRGDES 1,0,177721,1190,1088,102,102, " Added by gtbl on 05/19/83 1759.5
344 ldsp,EXPCL,.TSQIC,.BSPO TSSA0WCY
345 " Program descriptor 110.
346 DCLIST:PRGDES 1,0,204924,606,504,102,102, " Added by gtbl on 05/19/83 1759.5
347 dclt,EXPCL,.TSQIL,.BSPO TSSA0WCY
348 " Program descriptor 111.
349 QUERY: PRGDES 1,0,178823,10932,8586,2346,2346, " Added by gtbl on 05/19/83 1759.5
350 qanl,EXPCL,.TSQIE,.BSPO TSSA0WCY
351 " Program descriptor 112.
352 EXEC: PRGDES 1,0,205442,13070,10342,4978,2728, " Added by gtbl on 05/19/83 1759.5
353 exut,EXPCL,.TSQJ1,.BSPO TSSA0WCY
354 " Program descriptor 113.
355 TRANS: PRGDES 1,0,187422,4376,4268,108,108, " Added by gtbl on 05/19/83 1759.5
356 trfl,EXPCL,.TSQIF,.BSPO TSSA0WCY
357 " Program descriptor 114.
358 OUTP: PRGDES 1,0,191703,5046,4944,102,102, " Added by gtbl on 05/19/83 1759.5
359 oprm,EXPCL,.TSQIG,.BSPO TSSA0WCY
360 " Program descriptor 115.
361 OUTR: PRGDES 1,0,196659,2614,2512,102,102, " Added by gtbl on 05/19/83 1759.5
362 orec,EXPCL,.TSQIH,.BSPO TSSA0WCY
363 " Program descriptor 116.
364 OUTF: PRGDES 1,0,199184,4686,4584,102,102, " Added by gtbl on 05/19/83 1759.5
365 ofld,EXPCL,.TSQII,.BSPO TSSA0WCY
366 " Program descriptor 117.
367 DBLP: PRGDES 1,0,105130,15688,15586,11069,102, " Added by gtbl on 05/19/83 1759.5
368 dblp,EXPCL,.TSDBL,.BSPO
369 " Program descriptor 118.
370 DBRT: PRGDES 1,0,145315,1734,1548,726,186, " Added by gtbl on 05/19/83 1759.5
371 dbrt,EXPCL,.TSDBR,.BSPO
372 " Program descriptor 119.
373 DBCR: PRGDES 1,0,120729,6614,6442,5315,172, " Added by gtbl on 05/19/83 1759.5
374 dbcr,EXPCL,.TSDBC,.BSPO
375 " Program descriptor 120.
376 DBDE: PRGDES 1,0,146875,1360,1188,953,172, " Added by gtbl on 05/19/83 1759.5
377 dbde,EXPCL,.TSDBD,.BSPO
378 " Program descriptor 121.
379 DBVE: PRGDES 1,0,129267,16138,16036,102,102, " Added by gtbl on 05/19/83 1759.5
380 dbve,EXPCL,.TSDBV,.BSPO
381 " Program descriptor 122.
382 DBAN: PRGDES 1,0,127183,2240,2068,813,172, " Added by gtbl on 05/19/83 1759.5
383 dban,EXPCL,.TSDBA,.BSPO
384 " Program descriptor 123.
385 .YQ0: PRGDES 0,0,0,0,0,0,0,
386 .yp0,EXPCL,.YQ0AT,.BEXEC+.BNSYS+.BSPSZ+.BSPO
387 " Program descriptor 124.
388 PRGDES 0,0,0,0,0,0,0,
389 .yp1,EXPCL,.YQ1AT,.BNSYS+.BSPO
390 " Program descriptor 125.
391 PRGDES 0,0,0,0,0,0,0,
392 .yp2,EXPCL,.YQ2AT,.BNSYS+.BSPO
393 " Program descriptor 126.
394 PRGDES 0,0,0,0,0,0,0,
395 .yp3,EXPCL,.YQ3AT,.BNSYS+.BSPO
396 " Program descriptor 127.
397 PRGDES 0,0,0,0,0,0,0,
398 .yp4,EXPCL,.YQ4AT,.BNSYS+.BSPO
399 " Program descriptor 128.
400 PRGDES 0,0,0,0,0,0,0,
401 .yp5,EXPCL,.YQ5AT,.BNSYS+.BSPO
402 " Program descriptor 129.
403 PRGDES 0,0,0,0,0,0,0,
404 .yp6,EXPCL,.YQ6AT,.BNSYS+.BSPO
405 " Program descriptor 130.
406 PRGDES 1,1,60840,4434,4332,129,102, " Added by gtbl on 05/19/83 1801.0
407 .yld,EXPCL,.YLDAT,.BNSYS+.BSPO
408 " Program descriptor 131.
409 PRGDES 1,1,65184,3676,3574,137,102, " Added by gtbl on 05/19/83 1801.0
410 yldb,EXPCL,.YLDBT,.BNSYS+.BSPO
411 " Program descriptor 132.
412 sevenP0: PRGDES 0,0,0,0,0,0,0,
413 .7p0,EXPCL,.7P0AT,.BEXEC+.BNSYS+.BSPSZ+.BSPO FORT77 LDR TSSA0RGW
414 " Program descriptor 133.
415 sevenP1: PRGDES 0,0,0,0,0,0,0,
416 .7p1,EXPCL,.7P1AT,.BNSYS+.BSPO TSSA0RGW
417 " Program descriptor 134.
418 sevenP2: PRGDES 0,0,0,0,0,0,0,
419 .7p2,EXPCL,.7P2AT,.BNSYS+.BSPO TSSA0RGW
420 " Program descriptor 135.
421 sevenP3: PRGDES 0,0,0,0,0,0,0,
422 .7p3,EXPCL,.7P3AT,.BNSYS+.BSPO TSSA0RGW
423 " Program descriptor 136.
424 sevenP4: PRGDES 0,0,0,0,0,0,0,
425 .7p4,EXPCL,.7P4AT,.BNSYS+.BSPO TSSA0RGW
426 " Program descriptor 137.
427 sevenP5: PRGDES 0,0,0,0,0,0,0,
428 .7p5,EXPCL,.7P5AT,.BNSYS+.BSPO TSSA0RGW
429 " Program descriptor 138.
430 sevenP6: PRGDES 0,0,0,0,0,0,0,
431 .7p6,EXPCL,.7P6AT,.BNSYS+.BSPO TSSA0RGW
432 " Program descriptor 139.
433 sevenP7: PRGDES 0,0,0,0,0,0,0,
434 .7p7,EXPCL,.7P7AT,.BNSYS+.BSPO TSSA0T40
435 " Program descriptor 140.
436 PRGDES 0,0,0,0,0,0,0,
437 .77b,EXPCL,.77BT,.BNSYS+.BSPO TSSA4QDP
438 " Program descriptor 141.
439 sevenLD: PRGDES 1,1,40244,12662,12560,608,102, " Added by gtbl on 05/19/83 1759.5
440 .7ld,EXPCL,.7LDAT,.BNSYS+.BSPO TSSA0RGW
441 " Program descriptor 142.
442 sevenK1: PRGDES 0,0,0,0,0,0,0,
443 .7k1,EXPCL,.7K1,.BNSYS+.BSPO FORT77 OPTION KEYS TSSA0RGW
444 " Program descriptor 143.
445 sevenK2: PRGDES 0,0,0,0,0,0,0,
446 .7k2,EXPCL,.7K2,.BNSYS+.BSPO TSSA0RGW
447 " Program descriptor 144.
448 sevenK3: PRGDES 0,0,0,0,0,0,0,
449 .7k3,EXPCL,.7K3,.BNSYS+.BSPO TSSA0RGW
450 " Program descriptor 145.
451 sevenK4: PRGDES 0,0,0,0,0,0,0,
452 .7k4,EXPCL,.7K4,.BNSYS+.BSPO TSSA0RGW
453 " Program descriptor 146.
454 sevenK5: PRGDES 0,0,0,0,0,0,0,
455 .7k5,EXPCL,.7K5,.BNSYS+.BSPO TSSA0RGW
456 " Program descriptor 147.
457 LEAD: PRGDES 1,0,227408,994,894,100,100, " Added by gtbl on 05/19/83 1759.5
458 lead,EXPCL,.TSPTL,.BSPO PAPER TAPE LEADER -PSP-
459 " Program descriptor 148.
460 SYST: PRGDES 0,0,0,0,0,0,0,
461 syst,SYSCL
462 " Program descriptor 149.
463 PRGDES 0,0,0,0,0,0,0,
464 ebld,EBLDCL2
465 " Program descriptor 150.
466 CRUN: PRGDES 1,0,150056,7436,7334,104,102, " Added by gtbl on 05/19/83 1759.5
467 crun,EXPCL,.TSCFP,.BPRIV+.BSPO COMMAND FILE PROC -PSP-
468 " Program descriptor 151.
469 QUOTE: PRGDES 1,0,150056,7436,7334,104,102, " Added by gtbl on 05/19/83 1759.5
470 ",EXPCL,.TSCFP,.BPRIV,CRUN
471 " Program descriptor 152.
472 DSTS: PRGDES 1,0,150056,7436,7334,104,102, " Added by gtbl on 05/19/83 1759.5
473 dsts,EXPCL,.TSCFP,.BPRIV,CRUN
474 " Program descriptor 153.
475 DABT: PRGDES 1,0,150056,7436,7334,104,102, " Added by gtbl on 05/19/83 1759.5
476 dabt,EXPCL,.TSCFP,.BPRIV,CRUN
477 " Program descriptor 154.
478 DRUN: PRGDES 1,0,150056,7436,7334,104,102, " Added by gtbl on 05/19/83 1759.5
479 drun,EXPCL,.TSCFP,.BPRIV,CRUN
480 " Program descriptor 155.
481 CPOS: PRGDES 1,0,150056,7436,7334,104,102, " Added by gtbl on 05/19/83 1759.5
482 cpos,EXPCL,.TSCFP,.BPRIV,CRUN TSSA0NML
483 " Program descriptor 156.
484 CMOD: PRGDES 1,0,150056,7436,7334,104,102, " Added by gtbl on 05/19/83 1759.5
485 cmod,EXPCL,.TSCFP,.BPRIV,CRUN TSSA0NML
486 " Program descriptor 157.
487 COUT: PRGDES 1,0,150056,7436,7334,104,102, " Added by gtbl on 05/19/83 1759.5
488 cout,EXPCL,.TSCFP,.BPRIV,CRUN
489 " Program descriptor 158.
490 QUIT: PRGDES 1,0,150056,7436,7334,104,102, " Added by gtbl on 05/19/83 1759.5
491 quit,EXPCL,.TSCFP,.BPRIV,CRUN TSSA0O9I
492 " Program descriptor 159.
493 RESU: PRGDES 1,0,150056,7436,7334,104,102, " Added by gtbl on 05/19/83 1759.5
494 resu,EXPCL,.TSCFP,.BPRIV,CRUN TSSA0O9I
495 " Program descriptor 160.
496 REM: PRGDES 1,0,150056,7436,7334,104,102, " Added by gtbl on 05/19/83 1759.5
497 rem,EXPCL,.TSCFP,.BPRIV,CRUN TSSA0O9I
498 " Program descriptor 161.
499 PRGDES 1,1,76479,1002,1002,2,0, " Added by gtbl on 05/19/83 1801.0
500 dmpa,EXPCL,.TDMPA,.BNSYS
501 " Program descriptor 162.
502 PRGDES 1,1,75557,910,910,2,0, " Added by gtbl on 05/19/83 1801.0
503 dmpb,EXPCL,.TDMPB,.BNSYS
504 " Program descriptor 163.
505 PRGDES 1,1,80553,3048,3048,2,0, " Added by gtbl on 05/19/83 1801.0
506 dbga,EXPCL,.TDBGA,.BNSYS
507 " Program descriptor 164.
508 PRGDES 1,1,77493,3048,3048,2,0, " Added by gtbl on 05/19/83 1801.0
509 dbgb,EXPCL,.TDBGB,.BNSYS
510 " LEVEL T3 MDQS
511 " Program descriptor 165.
512 DMSRED:PRGDES 0,0,0,0,0,0,0,
513 redi,EXPCL,.TSRED,.BNSYS+.BSPO
514 " Program descriptor 166.
515 DMSPER:PRGDES 0,0,0,0,0,0,0,
516 perf,EXPCL,.TXBG,.BSPO
517 " Program descriptor 167.
518 WDMS: PRGDES 0,0,0,0,0,0,0,
519 mdq,WWB3CL14,,.BCMCL
520 " Program descriptor 168.
521 B3RUN: PRGDES 0,0,0,0,0,0,0,
522 b3ru,EXPCL,.TXEB,.BNSYS+.BSPO+.BSPSZ
523 " Program descriptor 169.
524 PRGDES 0,0,0,0,0,0,0,
525 wwp2,EXPCL,PHASE2,.BNSYS+.BSPO
526 " Program descriptor 170.
527 PRGDES 0,0,0,0,0,0,0,
528 wwp3,EXPCL,PHASE3,.BNSYS+.BSPO
529 " Program descriptor 171.
530 PRGDES 0,0,0,0,0,0,0,
531 wwp4,EXPCL,PHASE4,.BNSYS+.BSPO
532 " Program descriptor 172.
533 PRGDES 0,0,0,0,0,0,0,
534 wwp5,EXPCL,PHASE5,.BNSYS+.BSPO
535 " Program descriptor 173.
536 PRGDES 0,0,0,0,0,0,0,
537 wwpg,EXPCL,PHASEG,.BNSYS+.BSPO
538 " Program descriptor 174.
539 PRGDES 0,0,0,0,0,0,0,
540 wwpq,EXPCL,PHASEQ,.BNSYS+.BSPO
541 " Program descriptor 175.
542 TZCK: PRGDES 0,0,0,0,0,0,0,
543 wwpc,EXPCL,.TXGU,.BNSYS+.BSPO
544 " Program descriptor 176.
545 B3TUT: PRGDES 0,0,0,0,0,0,0,
546 tut0,EXPCL,.TXGC,.BNSYS+.BSPO
547 " Program descriptor 177.
548 B3DIR: PRGDES 0,0,0,0,0,0,0,
549 diru,EXPCL,.TXGA,.BNSYS+.BSPO
550 " Program descriptor 178.
551 B3SIN: PRGDES 0,0,0,0,0,0,0,
552 sini,EXPCL,.TXGF,.BNSYS+.BSPO
553 " Program descriptor 179.
554 B3DJS: PRGDES 0,0,0,0,0,0,0,
555 djst,EXPCL,.TXGE,.BNSYS+.BSPO
556 " Program descriptor 180.
557 B3PRI: PRGDES 0,0,0,0,0,0,0,
558 priv,EXPCL,.TXGB,.BNSYS+.BSPO
559 " Program descriptor 181.
560 B3ADF: PRGDES 0,0,0,0,0,0,0,
561 adfq,EXPCL,.TXGD,.BNSYS+.BSPO
562 " Program descriptor 182.
563 TGPRO: PRGDES 0,0,0,0,0,0,0,
564 dmup,EXPCL,.TXGI,.BNSYS+.BSPO
565 " Program descriptor 183.
566 B3XX1: PRGDES 0,0,0,0,0,0,0,
567 cmdq,EXPCL,.TXGL,.BNSYS+.BSPO
568 " Program descriptor 184.
569 B3XX2: PRGDES 0,0,0,0,0,0,0,
570 dmli,EXPCL,.TXGO,.BNSYS+.BSPO
571 " Program descriptor 185.
572 B3XX3: PRGDES 0,0,0,0,0,0,0,
573 dfau,EXPCL,DFAULT,.BNSYS+.BSPO
574 " DISCRIPTORS FOR INTERACTIVE COBOL SPECIAL PRODUCT OFFERING
575 " Program descriptor 186.
576 PRGDES 1,1,68770,1282,1282,15,0, " Added by gtbl on 05/19/83 1801.0
577 cwga,EXPCL,.CSL0A,.BNSYS+.BSPO
578 " Program descriptor 187.
579 PRGDES 1,1,70064,1206,1206,15,0, " Added by gtbl on 05/19/83 1801.0
580 cwgb,EXPCL,.CSL0B,.BNSYS+.BSPO
581 " Program descriptor 188.
582 PRGDES 1,1,71282,1068,1068,15,0, " Added by gtbl on 05/19/83 1801.0
583 cwgc,EXPCL,.CSL0C,.BNSYS+.BSPO
584 " Program descriptor 189.
585 PRGDES 1,1,72362,1490,1490,15,0, " Added by gtbl on 05/19/83 1801.0
586 cwgd,EXPCL,.CSL0D,.BNSYS+.BSPO
587 " Program descriptor 190.
588 PRGDES 1,1,73864,526,526,0,0, " Added by gtbl on 05/19/83 1801.0
589 cwgh,EXPCL,.CSL0H,.BNSYS+.BSPO
590 " Program descriptor 191.
591 PRGDES 1,1,74402,1082,1082,18,0, " Added by gtbl on 05/19/83 1801.0
592 cwgi,EXPCL,.CSL0I,.BNSYS+.BSPO
593 " DESCRIPTORS FOR INTERACTIVE I-D-S/II & UFAS.
594 " Program descriptor 192.
595 IIDS: PRGDES 0,0,0,0,0,0,0,
596 iids,EXPCL,IIDS,.BSPO
597 " Program descriptor 193.
598 PRGDES 0,0,0,0,0,0,0,
599 dbcs,EXPCL,.TSQ2A,.BNSYS+.BSPO
600 " Program descriptor 194.
601 CIDS: PRGDES 0,0,0,0,0,0,0,
602 cids,EXPCL,CIDS,.BSPO
603 " Program descriptor 195.
604 PRGDES 0,0,0,0,0,0,0,
605 coex,EXPCL,.TSQ2B,.BNSYS+.BSPO
606 " Program descriptor 196.
607 PRGDES 0,0,0,0,0,0,0,
608 dtco,EXPCL,.DTSCO,.BNSYS+.BSPO
609 " Program descriptor 197.
610 PRGDES 0,0,0,0,0,0,0,
611 dtuf,EXPCL,.DTSUF,.BNSYS+.BSPO
612 " Program descriptor 198.
613 PRGDES 0,0,0,0,0,0,0,
614 dtab,EXPCL,.DTSAB,.BNSYS+.BSPO
615 " Program descriptor 199.
616 PRGDES 0,0,0,0,0,0,0,
617 dtgf,EXPCL,.DTSGF,.BNSYS+.BSPO
618 " Program descriptor 200.
619 PRGDES 0,0,0,0,0,0,0,
620 dtls,EXPCL,.DTSLS,.BNSYS+.BSPO
621 " Program descriptor 201.
622 DXEC: PRGDES 1,0,215798,13070,10342,4978,2728, " Added by gtbl on 05/19/83 1759.5
623 dxut,EXPCL,.TSQJ2,.BNSYS+.BSPO TSSA0TKD
624 " DESCRIPTORS FOR TSS UFAS.
625 " Program descriptor 202.
626 PRGDES 1,1,52816,1140,1140,20,0, " Added by gtbl on 05/19/83 1801.0
627 daft,EXPCL,DAFT.1,.BNSYS
628 " Program descriptor 203.
629 PRGDES 1,1,53968,1406,1406,28,0, " Added by gtbl on 05/19/83 1801.0
630 dopn,EXPCL,DOPN.1,.BNSYS
631 " Program descriptor 204.
632 PRGDES 1,1,55465,1424,1424,20,0, " Added by gtbl on 05/19/83 1801.0
633 dufs,EXPCL,DUFS.1,.BNSYS
634 " Program descriptor 205.
635 PRGDES 1,1,56981,606,606,20,0, " Added by gtbl on 05/19/83 1801.0
636 drps,EXPCL,DRPS.1,.BNSYS
637 " Program descriptor 206.
638 PRGDES 1,1,57633,882,882,20,0, " Added by gtbl on 05/19/83 1801.0
639 dabf,EXPCL,DABF.1,.BNSYS
640 " Program descriptor 207.
641 PRGDES 1,1,58527,802,802,20,0, " Added by gtbl on 05/19/83 1801.0
642 dacl,EXPCL,DACL.1,.BNSYS
643 " Program descriptor 208.
644 PRGDES 1,1,59341,1486,1486,0,0, " Added by gtbl on 05/19/83 1801.0
645 dabr,EXPCL,DABR.1,.BNSYS
646 " Program descriptor 209.
647 PRGDES 1,1,39321,980,908,72,72, " Added by gtbl on 05/19/83 1759.5
648 scaf,EXPCL,LSCAF,.BNSYS
649 " Program descriptor 210.
650 PRGDES 1,0,82309,968,896,72,72, " Added by gtbl on 05/19/83 1759.5
651 gtfl,EXPCL,LGTFL,.BNSYS
652 " Program descriptor 211.
653 PRGDES 1,0,83217,200,128,72,72, " Added by gtbl on 05/19/83 1759.5
654 rtfl,EXPCL,LRTFL,.BNSYS
655 " DESCRIPTOR FOR COBOL-74
656 " Program descriptor 212.
657 COBL74:PRGDES 0,0,0,0,0,0,0,
658 crn,EXPCL,.TSC74,.BSPO+.BEXEC
659 " Program descriptor 213.
660 BRN: PRGDES 1,0,83360,13476,13240,387,236, " Added by gtbl on 05/19/83 1759.5
661 brn,BRNCL,.TSBAS,.BEXEC,BASY
662 " Program descriptor 214.
663 sevenFOR: PRGDES 0,0,0,0,0,0,0,
664 7for,EXPCL,.T7RNY,.BEXEC+.BSPO FORT77 TSSA0RGW
665 " Program descriptor 215.
666 FR7T: PRGDES 0,0,0,0,0,0,0,
667 fr7t,FR7TCL,.T7RNY,.BEXEC+.BSPO,7FOR FORT77 TSS TSSA0RGW
668 " Program descriptor 216.
669 FR7: PRGDES 0,0,0,0,0,0,0,
670 fr7,FR7CL,.T7RNY,.BEXEC+.BSPO,7FOR FORT77 TASK TSSA0RGW
671 " Program descriptor 217.
672 FRN: PRGDES 1,1,22187,4938,4830,109,108, " Added by gtbl on 05/19/83 1759.5
673 frn,FRNCL,.TSRNY,.BEXEC,RUNY
674 " Program descriptor 218.
675 BSEQ: PRGDES 1,1,5106,4890,4788,1772,102, " Added by gtbl on 05/19/83 1759.5
676 bseq,BSQCL,.TSRSQ,,RESE
677 " Program descriptor 219.
678 SEQU: PRGDES 1,1,5106,4890,4788,1772,102, " Added by gtbl on 05/19/83 1759.5
679 sequ,SEQCL,.TSRSQ,,RESE
680 " Program descriptor 220.
681 DBU: PRGDES 0,0,0,0,0,0,0,
682 dbu,EXPCL,DBU,.BSPO TSSA4M8U
683 " Program descriptor 221.
684 PRGDES 0,0,0,0,0,0,0,
685 dbua,EXPCL,DBUA,.BNSYS+.BSPO TSSA4M8U
686 " Program descriptor 222.
687 PRGDES 0,0,0,0,0,0,0,
688 dbub,EXPCL,DBUB,.BNSYS+.BSPO TSSA4M8U
689 " Program descriptor 223.
690 PRGDES 0,0,0,0,0,0,0,
691 dbuc,EXPCL,DBUC,.BNSYS+.BSPO TSSA4M8U
692 " Program descriptor 224.
693 PRGDES 0,0,0,0,0,0,0,
694 dbud,EXPCL,DBUD,.BNSYS+.BSPO TSSA4M8U
695 " Program descriptor 225.
696 PRGDES 0,0,0,0,0,0,0,
697 dbue,EXPCL,DBUE,.BNSYS+.BSPO TSSA4M8U
698 " Program descriptor 226.
699 PRGDES 0,0,0,0,0,0,0,
700 dbuf,EXPCL,DBUF,.BNSYS+.BSPO TSSA4M8U
701 " Program descriptor 227.
702 PRGDES 0,0,0,0,0,0,0,
703 dbug,EXPCL,DBUG,.BNSYS+.BSPO TSSA4M8U
704 " Program descriptor 228.
705 PRGDES 0,0,0,0,0,0,0,
706 dbuh,EXPCL,DBUH,.BNSYS+.BSPO TSSA4M8U
707 " Program descriptor 229.
708 PRGDES 0,0,0,0,0,0,0,
709 dbui,EXPCL,DBUI,.BNSYS+.BSPO TSSA4M8U
710 " Program descriptor 230.
711 PRGDES 0,0,0,0,0,0,0,
712 dbuj,EXPCL,DBUJ,.BNSYS+.BSPO TSSA4M8U
713 " Program descriptor 231.
714 PRGDES 0,0,0,0,0,0,0,
715 dbuk,EXPCL,DBUK,.BNSYS+.BSPO TSSA4M8U
716 " Program descriptor 232.
717 PRGDES 0,0,0,0,0,0,0,
718 dbul,EXPCL,DBUL,.BNSYS+.BSPO TSSA4M8U
719 " Program descriptor 233.
720 PRGDES 0,0,0,0,0,0,0,
721 dbum,EXPCL,DBUM,.BNSYS+.BSPO TSSA4M8U
722 " Program descriptor 234.
723 PRGDES 0,0,0,0,0,0,0,
724 dbun,EXPCL,DBUN,.BNSYS+.BSPO TSSA4M8U
725 " Program descriptor 235.
726 PRGDES 0,0,0,0,0,0,0,
727 dbuo,EXPCL,DBUO,.BNSYS+.BSPO TSSA4M8U
728 " Program descriptor 236.
729 PRGDES 0,0,0,0,0,0,0,
730 dbup,EXPCL,DBUP,.BNSYS+.BSPO TSSA4M8U
731 " Program descriptor 237.
732 PRGDES 0,0,0,0,0,0,0,
733 dbuq,EXPCL,DBUQ,.BNSYS+.BSPO TSSA4M8U
734 " Program descriptor 238.
735 PRGDES 0,0,0,0,0,0,0,
736 dbur,EXPCL,DBUR,.BNSYS+.BSPO TSSA4M8U
737 " Program descriptor 239.
738 PRGDES 0,0,0,0,0,0,0,
739 dbus,EXPCL,DBUS,.BNSYS+.BSPO TSSA4M8U
740 " Program descriptor 240.
741 PRGDES 0,0,0,0,0,0,0,
742 dbut,EXPCL,DBUT,.BNSYS+.BSPO TSSA4M8U
743 " Program descriptor 241.
744 PRGDES 0,0,0,0,0,0,0,
745 dbuu,EXPCL,DBUU,.BNSYS+.BSPO TSSA4M8U
746 " Program descriptor 242.
747 PRGDES 0,0,0,0,0,0,0,
748 dbuv,EXPCL,DBUV,.BNSYS+.BSPO TSSA4M8U
749 " Program descriptor 243.
750 PRGDES 0,0,0,0,0,0,0,
751 dbuw,EXPCL,DBUW,.BNSYS+.BSPO TSSA4M8U
752 " Program descriptor 244.
753 PRGDES 0,0,0,0,0,0,0,
754 dbux,EXPCL,DBUX,.BNSYS+.BSPO TSSA4M8U
755 " Program descriptor 245.
756 PRGDES 0,0,0,0,0,0,0,
757 dbuy,EXPCL,DBUY,.BNSYS+.BSPO TSSA4M8U
758 " Program descriptor 246.
759 PRGDES 0,0,0,0,0,0,0,
760 dbuz,EXPCL,DBUZ,.BNSYS+.BSPO TSSA4M8U
761 " DESCRIPTORS FOR ASCII MDQ DMIV
762 " Program descriptor 247.
763 DMIV: PRGDES 0,0,0,0,0,0,0,
764 dmiv,AMDCL15,,.BCMCL
765 " Program descriptor 248.
766 MDRUN: PRGDES 0,0,0,0,0,0,0,
767 mdru,EXPCL,.TXIA,.BNSYS+.BSPO+.BSPSZ
768 " Program descriptor 249.
769 PRGDES 0,0,0,0,0,0,0,
770 mdp2,EXPCL,ASYN2,.BNSYS+.BSPO
771 " Program descriptor 250.
772 PRGDES 0,0,0,0,0,0,0,
773 mdp3,EXPCL,ASYN3,.BNSYS+.BSPO
774 " Program descriptor 251.
775 PRGDES 0,0,0,0,0,0,0,
776 mdp4,EXPCL,ASYN4,.BNSYS+.BSPO
777 " Program descriptor 252.
778 PRGDES 0,0,0,0,0,0,0,
779 mdp5,EXPCL,ASYN5,.BNSYS+.BSPO
780 " Program descriptor 253.
781 PRGDES 0,0,0,0,0,0,0,
782 mdpg,EXPCL,ASYNG,.BNSYS+.BSPO
783 " Program descriptor 254.
784 PRGDES 0,0,0,0,0,0,0,
785 mdpq,EXPCL,ASYNQ,.BNSYS+.BSPO
786 " Program descriptor 255.
787 ATZCK: PRGDES 0,0,0,0,0,0,0,
788 mdpc,EXPCL,.TXJA,.BNSYS+.BSPO
789 " Program descriptor 256.
790 MDPER: PRGDES 0,0,0,0,0,0,0,
791 .dm0,EXPCL,.TXIM,.BSPO
792 " Program descriptor 257.
793 MDTUT: PRGDES 0,0,0,0,0,0,0,
794 .dm1,EXPCL,.TXIQ,.BNSYS+.BSPO
795 " Program descriptor 258.
796 MDDIR: PRGDES 0,0,0,0,0,0,0,
797 .dm2,EXPCL,.TXIO,.BNSYS+.BSPO
798 " Program descriptor 259.
799 MDPRI: PRGDES 0,0,0,0,0,0,0,
800 .dm3,EXPCL,.TXIP,.BNSYS+.BSPO
801 " Program descriptor 260.
802 MDADF: PRGDES 0,0,0,0,0,0,0,
803 desc,EXPCL,.TXIR,.BNSYS+.BSPO
804 " Program descriptor 261.
805 MDUPS: PRGDES 0,0,0,0,0,0,0,
806 .dm4,EXPCL,.TXIS,.BNSYS+.BSPO
807 " Program descriptor 262.
808 MDCMD: PRGDES 0,0,0,0,0,0,0,
809 dial,EXPCL,.TXIT,.BNSYS+.BSPO
810 " Program descriptor 263.
811 MDDML: PRGDES 0,0,0,0,0,0,0,
812 .dm5,EXPCL,.TXIU,.BNSYS+.BSPO
813 " Program descriptor 264.
814 MDREDI:PRGDES 0,0,0,0,0,0,0,
815 .dm6,EXPCL,.TXJL,.BNSYS+.BSPO
816 " Program descriptor 265.
817 MDFLO: PRGDES 0,0,0,0,0,0,0,
818 plus,EXPCL,.TXJH,.BNSYS+.BSPO
819 " DESCRIPTORS FOR APL SPECIAL PRODUCT OFFERING
820 " Program descriptor 266.
821 APL: PRGDES 0,0,0,0,0,0,0,
822 apl,EXPCL,.TAPL,.BSPO
823 " Program descriptor 267.
824 PRGDES 0,0,0,0,0,0,0,
825 apla,EXPCL,.TAPLA,.BNSYS+.BSPO
826 " Program descriptor 268.
827 PRGDES 0,0,0,0,0,0,0,
828 aplb,EXPCL,.TAPLB,.BNSYS+.BSPO
829 " Program descriptor 269.
830 PRGDES 0,0,0,0,0,0,0,
831 aplc,EXPCL,.TAPLC,.BNSYS+.BSPO
832 " Program descriptor 270.
833 PRGDES 0,0,0,0,0,0,0,
834 apld,EXPCL,.TAPLD,.BNSYS+.BSPO
835 " Program descriptor 271.
836 PRGDES 0,0,0,0,0,0,0,
837 aple,EXPCL,.TAPLE,.BNSYS+.BSPO
838 " Program descriptor 272.
839 PRGDES 0,0,0,0,0,0,0,
840 aplf,EXPCL,.TAPLF,.BNSYS+.BSPO
841 " Program descriptor 273.
842 PRGDES 0,0,0,0,0,0,0,
843 aplg,EXPCL,.TAPLG,.BNSYS+.BSPO
844 " Program descriptor 274.
845 PRGDES 0,0,0,0,0,0,0,
846 aplh,EXPCL,.TAPLH,.BNSYS+.BSPO
847 " Program descriptor 275.
848 PRGDES 0,0,0,0,0,0,0,
849 apli,EXPCL,.TAPLI,.BNSYS+.BSPO
850 " Program descriptor 276.
851 PRGDES 0,0,0,0,0,0,0,
852 aplj,EXPCL,.TAPLJ,.BNSYS+.BSPO
853 " Program descriptor 277.
854 PRGDES 0,0,0,0,0,0,0,
855 aplk,EXPCL,.TAPLK,.BNSYS+.BSPO
856 " Program descriptor 278.
857 PRGDES 0,0,0,0,0,0,0,
858 apll,EXPCL,.TAPLL,.BNSYS+.BSPO
859 " ISP OVERLAYS
860 " Program descriptor 279.
861 PRGDES 1,1,90491,1024,1024,0,0, " Added by gtbl on 05/19/83 1801.0
862 xopf,EXPCL,XOPFST,.BNSYS+.BSPO
863 " Program descriptor 280.
864 PRGDES 1,1,91584,630,630,0,0, " Added by gtbl on 05/19/83 1801.0
865 xops,EXPCL,XOPSEC,.BNSYS+.BSPO
866 " Program descriptor 281.
867 PRGDES 1,1,92261,902,902,0,0, " Added by gtbl on 05/19/83 1801.0
868 xclf,EXPCL,XCLFST,.BNSYS+.BSPO
869 " Program descriptor 282.
870 PRGDES 0,0,0,0,0,0,0,
871 xisp,EXPCL,XISPAB,.BNSYS+.BSPO
872 " Program descriptor 283.
873 DSS: PRGDES 0,0,0,0,0,0,0,
874 dss,EXPCL,DSS,.BNSYS+.BSPO DEBUG SUPPORT SYSTEM TSSA0RGW
875 " Program descriptor 284.
876 DS01: PRGDES 0,0,0,0,0,0,0,
877 ds01,EXPCL,DS01,.BNSYS+.BSPO TSSA0RGW
878 " Program descriptor 285.
879 DS02: PRGDES 0,0,0,0,0,0,0,
880 ds02,EXPCL,DS02,.BNSYS+.BSPO TSSA0RGW
881 " Program descriptor 286.
882 DS03: PRGDES 0,0,0,0,0,0,0,
883 ds03,EXPCL,DS03,.BNSYS+.BSPO TSSA0RGW
884 " Program descriptor 287.
885 DS04: PRGDES 0,0,0,0,0,0,0,
886 ds04,EXPCL,DS04,.BNSYS+.BSPO TSSA0RGW
887 " Program descriptor 288.
888 DS05: PRGDES 0,0,0,0,0,0,0,
889 ds05,EXPCL,DS05,.BNSYS+.BSPO TSSA0RGW
890 " Program descriptor 289.
891 DS06: PRGDES 0,0,0,0,0,0,0,
892 ds06,EXPCL,DS06,.BNSYS+.BSPO TSSA0RGW
893 " Program descriptor 290.
894 DS07: PRGDES 0,0,0,0,0,0,0,
895 ds07,EXPCL,DS07,.BNSYS+.BSPO TSSA0RGW
896 " Program descriptor 291.
897 DS08: PRGDES 0,0,0,0,0,0,0,
898 ds08,EXPCL,DS08,.BNSYS+.BSPO TSSA0RGW
899 " Program descriptor 292.
900 DS09: PRGDES 0,0,0,0,0,0,0,
901 ds09,EXPCL,DS09,.BNSYS+.BSPO TSSA0RGW
902 " Program descriptor 293.
903 DS10: PRGDES 0,0,0,0,0,0,0,
904 ds10,EXPCL,DS10,.BNSYS+.BSPO TSSA0RGW
905 " Program descriptor 294.
906 DS11: PRGDES 0,0,0,0,0,0,0,
907 ds11,EXPCL,DS11,.BNSYS+.BSPO TSSA0RGW
908 " Program descriptor 295.
909 DS12: PRGDES 0,0,0,0,0,0,0,
910 ds12,EXPCL,DS12,.BNSYS+.BSPO TSSA0RGW
911 " Program descriptor 296.
912 DS13: PRGDES 0,0,0,0,0,0,0,
913 ds13,EXPCL,DS13,.BNSYS+.BSPO TSSA0RGW
914 " Program descriptor 297.
915 DS14: PRGDES 0,0,0,0,0,0,0,
916 ds14,EXPCL,DS14,.BNSYS+.BSPO TSSA0RGW
917 " Program descriptor 298.
918 DS15: PRGDES 0,0,0,0,0,0,0,
919 ds15,EXPCL,DS15,.BNSYS+.BSPO TSSA0RGW
920 " Program descriptor 299.
921 DS16: PRGDES 0,0,0,0,0,0,0,
922 ds16,EXPCL,DS16,.BNSYS+.BSPO TSSA0TBF
923 " Program descriptor 300.
924 TTOP: PRGDES 1,1,85567,5018,4912,128,106, " Added by gtbl on 05/19/83 1801.0
925 ttop,EXPCL,.TTTOP,.BLUSE+.BGSPC STIA4PZX
926 " Program descriptor 301.
927 STII: PRGDES 1,0,27104,5380,5278,116,102, " Added by gtbl on 05/19/83 1759.5
928 stii,EXPCL,.TSTII,.BLUSE+.BMASX+.BCMOV STIA4PZX
929 " Program descriptor 302.
930 CMDL: PRGDES 1,0,161781,2034,1932,102,102, " Added by gtbl on 05/19/83 1759.5
931 cmdl,EXPCL,.TSCLD,.BEXEC,LODX MUST BE LAST DESCR.
932 " Program descriptor end.
933 segdef basic_cmd_num " Number of commands of the common command list
934 " used for BASIC.
935 basic_cmd_num: zero ,.BASNM/2
936
937 segdef common_cmd_num " Number of commands in the common command list.
938 common_cmd_num: zero ,.COMCL/2
939
940 segdef bsed " Program descriptor number for BSED.
941 bsed: zero ,51
942
943 segdef cmlcl " Offset of primitive list for command loader
944 cmlcl: zero ,CMLCL-BASNM
945
946 segdef edbn " Program descriptor number for EDBN.
947 edbn: zero ,56
948
949 even
950 segdef primitives
951 primitives: null
952 BASNM: zero
953 COMCL: zero
954 aci ~list~,4
955 dec 4
956 aci ~save~,4
957 dec 4
958 aci ~old ~,4
959 dec 3
960 aci ~get ~,4
961 dec 3
962 aci ~edit~,4 CALL EDITOR
963 dec 4
964 aci ~cata~,4 "CATALOG
965 dec 4
966 aci ~remo~,4 "REMOVE
967 dec 4
968 aci ~aft ~,4 AFT 4JS2
969 dec 3 4JS2
970 aci ~rele~,4 "RELEASE PURGE
971 dec 4
972 aci ~crun~,4
973 dec 4
974 aci ~drun~,4
975 dec 4
976 aci ~jsts~,4
977 dec 4
978 aci ~resa~,4 "RESAVE
979 dec 4
980 aci ~acce~,4 "ACCESS
981 dec 4
982 oct 004004004001 DUMMY FOR FULL SY**
983 dec 4
984 oct 015000000000
985 dec 1
986 aci ~- ~,4
987 dec 1
988 aci ~" ~,4
989 dec 1
990 aci ~conv~,4
991 dec 4
992 aci ~jrn ~,4
993 dec 3
994 aci ~disp~,4 "DISPLAY
995 dec 4
996 aci ~sequ~,4
997 dec 4
998 aci ~tex ~,4
999 dec 3
1000 aci ~asca~,4 D.2
1001 dec 4 D.2
1002 aci ~ascb~,4 "ASCBCD
1003 dec 4
1004 aci ~bpri~,4 "BPRINT
1005 dec 4
1006 aci ~bpun~,4 "BPUNCH
1007 dec 4
1008 aci ~bcda~,4 "BCDASC
1009 dec 4
1010 aci ~prin~,4 "PRINT
1011 dec 4
1012 aci ~card~,4 4.2
1013 dec 4 4.2
1014 aci ~done~,4
1015 dec 4
1016 aci ~bye ~,4
1017 dec 3
1018 aci ~newu~,4
1019 dec 4
1020 aci ~new ~,4
1021 dec 3
1022 aci ~tape~,4
1023 dec 4
1024 aci ~writ~,4 WRITE TAPE N / WRITE CEOF N
1025 dec 4
1026 aci ~pton~,4 PRINT ON.
1027 dec 4
1028 aci ~read~,4 READ TAPE N
1029 dec 4
1030 aci ~ptof~,4 PRINT OFF
1031 dec 4
1032 aci ~bsp ~,4 BSP TAPE N
1033 dec 3
1034 aci ~rew ~,4 REW TAPE N
1035 dec 3
1036 aci ~dele~,4 DELETE
1037 dec 4
1038 aci ~lib ~,4 LIBRARY
1039 dec 3
1040 aci ~purg~,4 PURGE
1041 dec 4
1042 aci ~stat~,4
1043 dec 4
1044 aci ~conn~,4 CONNECT
1045 dec 4
1046 aci ~auto~,4
1047 dec 4
1048 aci ~line~,4 TTY LINE LENGTH COMMAND
1049 dec 4
1050 aci ~lead~,4 PPT LEADER
1051 dec 4
1052 aci ~dsts~,4
1053 dec 4
1054 aci ~dabt~,4
1055 dec 4
1056 aci ~cpos~,4
1057 dec 4
1058 aci ~cmod~,4
1059 dec 4
1060 aci ~cout~,4
1061 dec 4
1062 aci ~quit~,4 QUIT TSSA0O9I
1063 dec 4 TSSA0O9I
1064 aci ~resu~,4 RESUME TSSA0O9I
1065 dec 4 TSSA0O9I
1066 aci ~rem ~,4 REMARK TSSA0O9I
1067 dec 3 TSSA0O9I
1068 aci ~abc ~,4
1069 dec 3
1070 aci ~eras~,4 "ERASE
1071 dec 4
1072 aci ~hold~,4
1073 dec 4
1074 aci ~send~,4
1075 dec 4
1076 aci ~leng~,4 LENGTH
1077 dec 4
1078 aci ~help~,4
1079 dec 4
1080 aci ~syst~,4 "SYSTEM
1081 dec 4
1082 aci ~nopa~,4
1083 dec 4
1084 aci ~pari~,4
1085 dec 4
1086 aci ~reco~,4 "RECOVER
1087 dec 4
1088 aci ~roll~,4 "ROLLBACK
1089 dec 4
1090 aci ~luci~,4 "LUCID
1091 dec 4
1092 aci ~perm~,4
1093 dec 4
1094 aci ~jout~,4
1095 dec 4
1096 aci ~apri~,4 "APRINT
1097 dec 4
1098 aci ~fdum~,4 "FDUMP
1099 dec 4
1100 aci ~jabt~,4
1101 dec 4
1102 aci ~scan~,4
1103 dec 4
1104 aci ~ucas~,4
1105 dec 4
1106 aci ~lcas~,4
1107 dec 4
1108 aci ~form~,4
1109 dec 4
1110 aci ~nfor~,4
1111 dec 4
1112 aci ~stri~,4 STRIP
1113 dec 4
1114 aci ~smcl~,4
1115 dec 4
1116 aci ~cpy ~,4
1117 dec 3
1118 aci ~code~,4
1119 dec 4
1120 aci ~deco~,4 "DECODE
1121 dec 4
1122 aci ~sabt~,4
1123 dec 4
1124 aci ~apl ~,4
1125 dec 3
1126 aci ~jpri~,4 "JPRINT
1127 dec 4
1128 aci ~jpun~,4 "JPUNCH
1129 dec 4
1130 aci ~jdac~,4
1131 dec 4
1132 aci ~lodx~,4
1133 dec 4
1134 aci ~lods~,4
1135 dec 4
1136 aci ~lodt~,4
1137 dec 4
1138 aci ~mast~,4
1139 dec 4
1140 aci ~crn ~,4 COBOL-74 RUN
1141 dec 3
1142 aci ~frn ~,4
1143 dec 3
1144 aci ~fr7t~,4 FR7T TSSA0TCS
1145 dec 4 TSSA0TCS
1146 aci ~fr7 ~,4 TSSA0TCS
1147 dec 3 TSSA0TCS
1148 aci ~brn ~,4
1149 dec 3
1150 aci ~bseq~,4
1151 dec 4
1152 aci ~runo~,4
1153 dec 4
1154 aci ~basi~,4
1155 dec 4
1156 aci ~data~,4
1157 dec 4
1158 aci ~jovi~,4
1159 dec 4
1160 aci ~yfor~,4
1161 dec 4
1162 aci ~fort~,4
1163 dec 4
1164 aci ~algo~,4
1165 dec 4
1166 aci ~pcf ~,4 TSSA4OHK
1167 dec 3 TSSA4OHK
1168 aci ~idsq~,4
1169 dec 4
1170 aci ~iids~,4
1171 dec 4
1172 aci ~logo~,4
1173 dec 4
1174 aci ~dbu ~,4 TSSA4M8U
1175 dec 3 TSSA4M8U
1176 aci ~tsar~,4
1177 dec 4
1178 aci ~mdq ~,4
1179 dec 3
1180 aci ~cids~,4
1181 dec 4
1182 aci ~mail~,4
1183 dec 4
1184 aci ~dmiv~,4
1185 dec 4
1186 aci ~admn~,4
1187 dec 4
1188 aci ~sort~,4 4JS2
1189 dec 4 4JS2
1190 aci ~tsda~,4 4JS2
1191 dec 4 4JS2
1192 aci ~pass~,4 4JS2
1193 dec 4 4JS2
1194 aci ~apb ~,4 4JS2
1195 dec 3 4JS2
1196 aci ~page~,4 4JS2
1197 dec 4 4JS2
1198 aci ~temp~,4 4JS2
1199 dec 4 4JS2
1200 aci ~ttop~,4 STIA4PZX
1201 dec 4 STIA4PZX
1202 aci ~stii~,4 STIA4PZX
1203 dec 4 STIA4PZX
1204 equ .BASNM,*-COMCL-1
1205 "
1206 " COMMANDS BELOW HERE ARE COMMON FOR ANY
1207 " NON-BASIC SYSTEM
1208 "
1209 aci ~rese~,4 "RESEQUENCE
1210 dec 4
1211 equ .COMCL,*-COMCL-1
1212 ZEROP C1 LIST
1213 ZEROP C3 SAVE
1214 ZEROP C5 OLD
1215 ZEROP C8 GET
1216 ZEROP C9 EDITOR
1217 ZEROP C10 CATALOG
1218 ZEROP C11 REMOVE
1219 ZEROP C23.1 AFT 4JS2
1220 ZEROP C24 RELEASE
1221 ZEROP C28 CRUN
1222 ZEROP C31 DRUN
1223 ZEROP C35 JSTS
1224 ZEROP C37 RESAVE
1225 ZEROP C38 ACCESS
1226 ZEROP C50 FULL SY**
1227 ZEROP C53 CR CAUSES SY** BUFFER FLUSH ONLY
1228 ZEROP C74 - EDIT
1229 ZEROP C75 " CRUN
1230 ZEROP C78 CONVERT
1231 ZEROP C79 JRN
1232 ZEROP C83 DISPLAY
1233 ZEROP C92 SEQU
1234 ZEROP C109 TEX
1235 ZEROP C52 ASCASC 2/H-2
1236 ZEROP C55 ASCBCD 2/H-2
1237 ZEROP C57 BPRINT 2/H-2
1238 ZEROP C58 BPUNCH 2/H-2
1239 ZEROP C59 BCDASC 2/H-2
1240 ZEROP C63 PRINT 2/H-2
1241 ZEROP C96 CARD 4.2
1242 ZEROP C2 DONE
1243 BYEBYE:ZEROP C4 BYE
1244 ZEROP C6 NEWUSER
1245 ZEROP C7 NEW
1246 ZEROP C12 TAPE
1247 ZEROP C13 WRITE TAPE N / WRITE CEOF N
1248 ZEROP C14 PRINT ON
1249 ZEROP C15 READ TAPE N
1250 ZEROP C16 PRINT OFF
1251 ZEROP C17 BSP TAPE N
1252 ZEROP C18 REW TAPE N
1253 ZEROP C19 DELETE
1254 ZEROP C20 LIB
1255 ZEROP C21 PURGE
1256 ZEROP C22 STATUS
1257 ZEROP C23 CONNECT
1258 ZEROP C25 AUTOMATIC
1259 ZEROP C26 LINE
1260 ZEROP C27 LEADER
1261 ZEROP C29 DSTS
1262 ZEROP C30 DABT
1263 ZEROP C32 CPOS
1264 ZEROP C33 CMOD
1265 ZEROP C34 COUT
1266 ZEROP C34.1 QUIT TSSA0O9I
1267 ZEROP C34.2 RESUME TSSA0O9I
1268 ZEROP C34.3 REMARK TSSA0O9I
1269 ZEROP C36 ABACUS
1270 ZEROP C39 ERASE
1271 ZEROP C40 HOLD
1272 ZEROP C41 SEND
1273 ZEROP C42 LENGTH
1274 ZEROP C43 HELP
1275 ZEROP C44 SYSTEM
1276 ZEROP C45 NOPARITY
1277 ZEROP C46 PARITY
1278 ZEROP C47 RECOVER
1279 ZEROP C48 ROLLBACK
1280 ZEROP C49 LUCID
1281 ZEROP C51 PERM
1282 ZEROP C54 JOUT
1283 ZEROP C56 APRINT
1284 ZEROP C60 FDUMP
1285 ZEROP C61 JABT
1286 ZEROP C62 SCAN
1287 ZEROP C65 UPPER CASE
1288 ZEROP C66 LOWER CASE
1289 ZEROP C67 FORM
1290 ZEROP C68 NO FORM
1291 ZEROP C69 STRIP
1292 ZEROP C70 SMCL
1293 ZEROP C71 COPY
1294 ZEROP C72 CODE
1295 ZEROP C73 DECODE
1296 ZEROP C76 SABT
1297 ZEROP C77 APL
1298 ZEROP C80 JPRINT
1299 ZEROP C81 JPUNCH
1300 ZEROP C82 JDAC
1301 ZEROP C84 LODX
1302 ZEROP C85 LODS
1303 ZEROP C86 LODT
1304 ZEROP C87 MAST
1305 ZEROP C88 CRN COBOL-74 RUN
1306 ZEROP F1 FRN
1307 ZEROP FR7T.4 FR7T TSSA0TCS
1308 ZEROP FR7.4 FR7 TSSA0TCS
1309 ZEROP B1 BRN
1310 ZEROP B2 BSEQ
1311 ZEROP C93 RUNO
1312 ZEROP C94 BASI
1313 ZEROP C95 DATA
1314 ZEROP C97 JOVI
1315 ZEROP C98 YFOR
1316 ZEROP C99 FORT
1317 ZEROP C100 ALGO
1318 ZEROP C122 PCF TSSA4OHK
1319 ZEROP C101 IDSQ
1320 ZEROP C102 IIDS
1321 ZEROP C103 LOGO
1322 ZEROP C120 DBU TSSA4M8U
1323 ZEROP C104 TSAR
1324 ZEROP C105 MDQ
1325 ZEROP C106 CIDS- COEXISTANCE IDS
1326 ZEROP C107 MAIL
1327 ZEROP C108 DMIV
1328 ZEROP C109.1 ADMN
1329 ZEROP C110 SORT 4JS2
1330 ZEROP C111 TSDA 4JS2
1331 ZEROP C112 PASS 4JS2
1332 ZEROP C113 APB 4JS2
1333 ZEROP C114 PAGE 4JS2
1334 ZEROP C115 TEMP 4JS2
1335 ZEROP C118 TTOP STIA4PZX
1336 ZEROP C119 STII STIA4PZX
1337 ".X SET 0 -PSP-
1338 " DUP 2,.LXTRA -PSP-
1339 " ZERO C999+.X UNUSED PRIMITIVE POINTER -PSP-
1340 ".X SET .X+1 -PSP-
1341 ZEROP C64 RESEQUENCE NON-BASIC
1342 "
1343 even
1344 NONECL:null DEFAULT SYSTEM SELECTION
1345 ZEROP .BIN START-UP PRIMITIVE
1346 "
1347 "
1348 BRNCL: ZEROP *+1
1349 CALLP BSED,.SW17 BRN FROM CALLSS
1350 BRN.1: CALLP BASY
1351 IFTRUE .SW9,BRN.1
1352 POPUP
1353 "
1354 FRNCL: ZEROP *+1
1355 STRUE .SW0,FRN.1 FRN FROM CALLSS
1356 FRN.1: STRUE .SW1,FRN.2
1357 FRN.2: STFALS .SW2,FRN.3
1358 FRN.3: XCALL RUNY
1359 CALLP .YQ0,.SW40
1360 POPUP
1361 "
1362 " TSSA0RGW
1363 FR7CL: ZEROP FR7.0 TASK FORT77 TSSA0RGW
1364 FR7.0: STFALS .SW0,FR7.1 TSSA0T6C
1365 FR7.1: STFALS .SW1,FR7.2 TSSA0T6C
1366 FR7.2: STFALS .SW2,FR7.3 TSSA0T6C
1367 FR7.3: XCALL sevenFOR TSSA0RGW
1368 CALLP sevenP0,.SW40 TSSA0RGW
1369 POPUP TSSA0RGW
1370 " TSSA0RGW
1371 FR7TCL:ZEROP FR7T.0 TSS FORT77 TSSA0RGW
1372 FR7T.0:STRUE .SW0,FR7T.1 TSSA0T6C
1373 FR7T.1:STRUE .SW1,FR7T.2 TSSA0T6C
1374 FR7T.2:STRUE .SW2,FR7T.3 TSSA0T6C
1375 FR7T.3:XCALL sevenFOR TSSA0RGW
1376 CALLP sevenP0,.SW40 TSSA0RGW
1377 POPUP TSSA0RGW
1378 " TSSA0RGW
1379 "
1380 BSQCL: ZEROP *+1
1381 STFALS .SW14,BSQ.1 BSEQ FROM CALLSS
1382 BSQ.1: XCALL RESE
1383 POPUP
1384 SEQCL: ZEROP *+1
1385 STRUE .SW14,BSQ.1 SEQU FROM CALLSS
1386 "
1387 even
1388 BASCL: aci ~run ~,4
1389 dec 3
1390 aci ~rese~,4
1391 dec 4
1392 ZEROP B1 RUN
1393 ZEROP B2 RESEQUENCE
1394 ZEROP B3 STARTUP
1395 "
1396 C1: XCALL LIST,BIN LIST
1397 C2: CALLP BSED,.SW17 DONE
1398 C2.1: POPUP
1399 C3: XCALL SAVE,BIN SAVE
1400 C4: XCALL PERM BYE
1401 C4.1: CALLP LOGO LOGOFF
1402 POPUP
1403 C5: STRUE .SW15,C5.1 OLD
1404 C5.1: XCALL OLDNEW,BIN
1405 C6: XCALL NEWU,BIN NEWUSER
1406 equ C7,C5 NEW
1407 C8: XCALL GET,BIN GET
1408 C9: XCALL EDTX,BIN EDITOR
1409 C10: XCALL CATA,BIN CATALOG
1410 C11: XCALL REMO,BIN REMOVE
1411 C12: XCALL TAPE TAPE
1412 C12.1: STRUE .SW10,*+1
1413 CALLP BSED
1414 STFALS .SW10,.BIN
1415 C13: STRUE .SW4,C13.1 WRITE TAPE N / WRITE CEOF N
1416 C13.1: XCALL TAPE,BIN
1417 equ C14,C13.1 PRINT ON.
1418 equ C15,C12 READ TAPE N
1419 equ C16,C13.1 PRINT OFF.
1420 equ C17,C13.1 BSP TAPE N
1421 equ C18,C13.1 REW TAPE N
1422 C19: XCALL DELETE,BIN DELETE
1423 equ C20,C5 LIB
1424 C21: XCALL PURG,BIN PURGE
1425 C22: XCALL STAT,BIN STATUS
1426 C23: XCALL CONN,BIN CONNECT
1427 C23.1: XCALL AFT,BIN AFT 4JS2
1428 C24: XCALL RELE,BIN RELEASE
1429 C25: XCALL AUTO,BIN AUTOMATIC
1430 C26: XCALL LINE,BIN LINE
1431 C27: XCALL LEAD,BIN LEADER
1432 C28: XCALL CRUN,BIN CRUN
1433 C29: XCALL DSTS,BIN DSTS
1434 C30: XCALL DABT,BIN DABT
1435 C31: XCALL DRUN,BIN DRUN
1436 C32: XCALL CPOS,BIN CPOS
1437 C33: XCALL CMOD,BIN CMOD
1438 C34: XCALL COUT,BIN COUT
1439 C34.1: XCALL QUIT,BIN QUIT TSSA0O9I
1440 C34.2: XCALL RESU,BIN RESUME TSSA0O9I
1441 C34.3: XCALL REM,BIN REMARK TSSA0O9I
1442 C35: XCALL JSTS,BIN JSTS
1443 C36: XCALL ABC,BIN ABACUS
1444 C37: XCALL RESA,BIN RESAVE
1445 C38: XCALL ACCESS,BIN ACCESS
1446 C39: XCALL ERAS,BIN ERASE
1447 C40: XCALL HOLD,BIN HOLD
1448 C41: XCALL SEND,BIN SEND
1449 C42: XCALL LENG,BIN LENGTH
1450 C43: XCALL HELP,BIN HELP
1451 C44: XCALL SYST SYSTEM
1452 C45: XCALL NOPAR,BIN NOPARITY
1453 C46: XCALL PARI,BIN PARITY
1454 C47: XCALL RECO,BIN RECOVER
1455 C48: XCALL RECO ROLLBACK
1456 CALLP BSED,.SW10
1457 BIN
1458 C49: STRUE .SW5,C13.1 LUCID
1459 equ C50,C12.1 FULL SY**
1460 C51: XCALL PERM,BIN PERM
1461 C53: CALLP BSED,.SW17 CR IN LINE NUMBERED BUILD MODE
1462 BIN
1463 C54: XCALL JOUT,BIN JOUT
1464 C52: XCALL ASCASC,BIN ASCASC 2/H-2
1465 C55: XCALL ASCBCD,BIN ASCBCD 2/H-2
1466 C57: XCALL BPRI,BIN BPRINT 2/H-2
1467 C58: XCALL BPUN,BIN BPUNCH 2/H-2
1468 C59: XCALL BCDA,BIN BCDASC 2/H-2
1469 C63: XCALL PRINT,BIN PRINT 2/H-2
1470 equ C96,C44 CARD 4.2
1471 C56: XCALL APRT,BIN APRINT
1472 C60: XCALL FDUMP,BIN FDUMP
1473 C61: XCALL JABT,BIN JABT
1474 C62: XCALL SCAN,BIN SCAN
1475 C64: STRUE .SW14,C64.1 RESEQUENCE NON-BASIC
1476 C64.1: XCALL RESE,BIN
1477 C65: XCALL UCASE,BIN UCASE
1478 C66: XCALL LCASE,BIN LCASE
1479 C67: XCALL FORM,BIN FORM
1480 C68: XCALL NFORM,BIN NFORM
1481 equ C69,C19 STRIP
1482 C70: XCALL SMCL,BIN SMCL
1483 C71: XCALL COPY,BIN COPY
1484 C72: XCALL CODE,BIN CODE
1485 C73: XCALL DECODE,BIN DECODE
1486 equ C74,C9 - ONE-LINER EDIT COMMAND
1487 equ C75,C28 " CRUN ABBREV
1488 C76: XCALL SNAP,BIN SABT
1489 C77: XCALL APL,BIN APL
1490 C78: XCALL CONV,BIN CONVERT
1491 C79: XCALL JRN,BIN JRN
1492 C80: XCALL JPRINT,BIN JPRINT
1493 C81: XCALL JPUNCH,BIN JPUNCH
1494 C82: XCALL JDAC,BIN JDAC
1495 C83: XCALL DISP,BIN DISPLAY
1496 C84: XCALL LODX,BIN LODX
1497 C85: XCALL LODS,BIN LODS
1498 C86: XCALL LODT,BIN LODT
1499 C87: XCALL MASTER,BIN MAST
1500 C88: XCALL COBL74,BIN C74 - COBOL-74 RUN
1501 equ C92,C64 SEQU - NON-BASIC RESEQUENCE
1502 C93: XCALL RUNOFF,BIN RUNOFF
1503 equ C94,C44 BASIC
1504 equ C95,C44 DATA
1505 equ C97,C44 JOVI
1506 equ C98,C44 YFOR
1507 equ C99,C44 FORT
1508 equ C100,C44 ALGO
1509 C101: XCALL IDSQ,BIN IDSQ
1510 C102: XCALL IIDS,BIN IIDS
1511 equ C103,C4.1 LOGOFF
1512 C104: XCALL TSAR,BIN
1513 equ C105,C44 MDQ
1514 C106: XCALL CIDS,BIN CIDS
1515 C107: XCALL MAIL,BIN MAIL
1516 equ C108,C44
1517 C109: XCALL TEX,BIN TEX
1518 C109.1:XCALL ADMN,BIN ADMN
1519 C110: XCALL SORT,BIN SORT 4JS2
1520 C111: XCALL TSDA,BIN TSDA 4JS2
1521 C112: XCALL PASS,BIN PASS 4JS2
1522 C113: XCALL APB,BIN APB 4JS2
1523 C114: XCALL PAGE,BIN PAGE 4JS2
1524 C115: XCALL TEMP,BIN TEMP 4JS2
1525 C120: XCALL DBU,BIN DBU TSSA4M8U
1526 C122: XCALL PCF,BIN PCF TSSA4OHK
1527 C118: XCALL TTOP,BIN STIA4PZX
1528 C119: XCALL STII,BIN STIA4PZX
1529 "
1530 B1: CALLP BSED,.SW17 BASIC RUN
1531 B1.1: CALLP BASY
1532 IFTRUE .SW9,B1.1
1533 BIN
1534 B2: STFALS .SW14,C64.1 BASIC RESEQUENCE
1535 B3: STFALS .SW15,B3.1 BASIC STARTUP
1536 B3.1: CALLP OLDNEW
1537 BIN
1538 "
1539 "
1540 "
1541 " DATABASIC COMMANDS
1542 even
1543 DATCL: aci ~run ~,4 1 RUN
1544 dec 3
1545 aci ~rese~,4 14 RESEQUENCE
1546 dec 4
1547 aci ~crea~,4 31 CREATE
1548 dec 4
1549 aci ~dest~,4 32 DESTROY
1550 dec 4
1551 aci ~veri~,4 33 VERIFY
1552 dec 4
1553 aci ~anal~,4 34 ANALYZE
1554 dec 4
1555 ZEROP D1 RUN
1556 ZEROP D2 RESEQUENCE
1557 ZEROP D3 CREATE
1558 ZEROP D4 DESTROY
1559 ZEROP D5 VERIFY
1560 ZEROP D6 ANALYZE
1561 ZEROP D7 STARTUP
1562 "
1563 D1: CALLP BSED,.SW17 RUN
1564 D1.1: CALLP DBLP
1565 IFALSE .SW36,D1.2
1566 CALLP DBRT
1567 IFTRUE .SW37,D1.1
1568 D1.2: BIN
1569 equ D2,B2 RESEQUENCE
1570 D3: XCALL DBCR,BIN CREATE
1571 D4: XCALL DBDE,BIN DESTROY
1572 D5: XCALL DBVE,BIN VERIFY
1573 D6: XCALL DBAN,BIN ANALYZE
1574 equ D7,B3 STARTUP
1575 "
1576 even
1577 CARDCL:aci ~run ~,4 CARDIN COMMAND LANGUAGE
1578 dec 3
1579 ZEROP S1 RUN 2/H-2
1580 ZEROP S3 STARTUP 2/H-2
1581 " 2/H-2
1582 S1: XCALL CARDIN,BIN RUN 2/H-2
1583 equ S3,B3 STARTUP 2/H-2
1584 "REM 2/H-2
1585 even
1586 TFORCL:aci ~run ~,4
1587 dec 3
1588 ZEROP F1 FORTRAN RUN
1589 ZEROP F2 FORTRAN STARTUP
1590 "
1591 F1: STRUE .SW0,F1.1 FORTRAN RUN PRIMITIVE SEQUENCE
1592 F1.1: STRUE .SW1,F1.2
1593 F1.2: STFALS .SW2,F1.3
1594 F1.3: XCALL RUNY
1595 CALLP .YQ0,.SW40
1596 BIN
1597 equ F2,B3 STARTUP
1598 "
1599 " TSSA0T6C
1600 " TSSA0T6C
1601 FR7.4: STFALS .SW0,FR7.5 TSSA0T6C
1602 FR7.5: STFALS .SW1,FR7.6 TSSA0T6C
1603 FR7.6: STFALS .SW2,FR7.7 TSSA0T6C
1604 FR7.7: XCALL sevenFOR TSSA0T6C
1605 CALLP sevenP0,.SW40 TSSA0T6C
1606 BIN TSSA0T6C
1607 FR7T.4:STRUE .SW0,FR7T.5 TSSA0T6C
1608 FR7T.5:STRUE .SW1,FR7T.6 TSSA0T6C
1609 FR7T.6:STRUE .SW2,FR7T.7 TSSA0T6C
1610 FR7T.7:XCALL sevenFOR TSSA0T6C
1611 CALLP sevenP0,.SW40 TSSA0T6C
1612 BIN TSSA0T6C
1613 " TSSA0T6C
1614 " TSSA0T6C
1615 even
1616 JOVCL: aci ~run ~,4
1617 dec 3
1618 ZEROP J1 JOVIAL RUN
1619 ZEROP J2 JOVIAL STARTUP
1620 "
1621 J1: STFALS .SW0,F1.1 JOVIAL RUN PRIMITIVE SEQUENCE
1622 equ J2,B3 STARTUP
1623 "
1624 even
1625 YFORCL:aci ~run ~,4
1626 dec 3
1627 ZEROP Y1 YFORTRAN RUN
1628 ZEROP Y2 YFORTRAN STARTUP
1629 "
1630 Y1: STFALS .SW0,Y1.1 YFORTRAN RUN PRIMITIVE SEQUENCE
1631 Y1.1: STFALS .SW1,F1.2
1632 equ Y2,B3 STARTUP
1633 "
1634 even
1635 ALGLCL:aci ~run ~,4
1636 dec 3
1637 ZEROP A1 ALGOL RUN
1638 ZEROP A2 ALGOL STARTUP
1639 "
1640 A1: STRUE .SW0,Y1.1 ALGOL RUN PRIMITIVE SEQUENCE
1641 equ A2,B3 STARTUP
1642 "
1643 EDCL: ZEROP *+1
1644 CALLP EDTX
1645 POPUP
1646 even
1647 EDBNCL:oct 015000000000
1648 dec 1
1649 aci ~#tap~,4
1650 dec 4
1651 aci ~## ~,4
1652 dec 3 END OF BUILD MODE FOR DN760 IS ##BLANK
1653 aci ~#rec~,4 "#RECOVER
1654 dec 4
1655 aci ~#rol~,4 "#ROLLBACK
1656 dec 4
1657 aci ~#luc~,4 "#LUCID
1658 dec 4
1659 aci ~#aut~,4 "#AUTO
1660 dec 4
1661 oct 004004004001,4 DUMMY FOR SY** OVERFLOW
1662 ZEROP E1 CR ONLY
1663 ZEROP E2 #TAPE
1664 ZEROP E3 ##BLANK
1665 ZEROP E4 #RECOVER
1666 ZEROP E5 #ROLLBACK
1667 ZEROP E6 #LUCID
1668 ZEROP E9 #AUTO
1669 ZEROP E7 FULL SY**
1670 ZEROP E8 STARTUP
1671 "
1672 equ E1,C2.1 CR ONLY
1673 E2: IFALSE .SW17,E2.1 #TAPE
1674 STRUE .SW0,.POPUP
1675 E2.1: CALLP TAPE
1676 IFALSE .SW12,.BIN
1677 POPUP
1678 equ E3,C2.1 ##BLANK
1679 E4: IFALSE .SW17,E4.1 #RECOVER
1680 STRUE .SW1,.POPUP
1681 E4.1: CALLP RECO
1682 IFALSE .SW10,.BIN
1683 POPUP
1684 equ E5,E4 #ROLLBACK
1685 E6: STRUE .SW5,E2 #LUCID
1686 E9: POPUP #AUTO
1687 E7: STRUE .SW10,.POPUP FULL SY**
1688 E8: STFALS .SW0,E8.1 EDBN STARTUP
1689 E8.1: STFALS .SW1,E8.2
1690 E8.2: STFALS .SW2,.BIN
1691 "
1692 " MDQ T3 COMMAND LIST...
1693 even
1694 WWB3CL:aci ~run ~,4
1695 dec 3
1696 aci ~adfq~,4
1697 dec 4
1698 aci ~chec~,4
1699 dec 4
1700 aci ~tuto~,4
1701 dec 4
1702 aci ~diru~,4
1703 dec 4
1704 aci ~perf~,4
1705 dec 4
1706 aci ~sini~,4
1707 dec 4
1708 aci ~djst~,4
1709 dec 4
1710 aci ~priv~,4
1711 dec 4
1712 aci ~redi~,4
1713 dec 4
1714 aci ~cmdq~,4
1715 dec 4
1716 aci ~dmli~,4
1717 dec 4
1718 aci ~dmup~,4
1719 dec 4
1720 aci ~dfau~,4
1721 dec 4
1722 ZEROP WWDMR
1723 ZEROP WWADF
1724 ZEROP WWDMR
1725 ZEROP WWDMT
1726 ZEROP WWDMDI
1727 ZEROP DM6
1728 ZEROP WWDMS
1729 ZEROP WWDMDJ
1730 ZEROP WWDMP
1731 ZEROP DM12
1732 ZEROP WWXD1 RESERVED...
1733 ZEROP WWDX2 RESERVED...
1734 ZEROP WWDX3
1735 ZEROP WWDX4
1736 ZEROP WWSU
1737 "
1738 DM6: XCALL DMSPER,BIN
1739 DM12: XCALL DMSRED,BIN
1740 WWDMR: XCALL B3RUN,BIN
1741 WWADF: XCALL B3ADF,BIN
1742 WWDMT: XCALL B3TUT,BIN
1743 WWDMDI:XCALL B3DIR,BIN
1744 WWDMS: XCALL B3SIN,BIN
1745 WWDMDJ:XCALL B3DJS,BIN
1746 WWDMP: XCALL B3PRI,BIN
1747 WWSU: CALLP BSED,.SW17
1748 CALLP TZCK
1749 CALLP OLDNEW
1750 BIN
1751 WWXD1: XCALL B3XX1,BIN PRESENTLY UNUSED...
1752 WWDX2: XCALL B3XX2,BIN
1753 WWDX3: XCALL TGPRO,BIN
1754 WWDX4: XCALL B3XX3,BIN
1755 even
1756 AMDCL: null ASCII MDQ COMMAND LANGUAGE
1757 aci ~run ~,4
1758 dec 3
1759 aci ~desc~,4
1760 dec 4
1761 aci ~chec~,4
1762 dec 4
1763 aci ~tuto~,4
1764 dec 4
1765 aci ~diru~,4
1766 dec 4
1767 aci ~perf~,4
1768 dec 4
1769 aci ~djst~,4
1770 dec 4
1771 aci ~priv~,4
1772 dec 4
1773 aci ~redi~,4
1774 dec 4
1775 aci ~dial~,4
1776 dec 4
1777 aci ~dmli~,4
1778 dec 4
1779 aci ~sini~,4
1780 dec 4
1781 aci ~dmup~,4
1782 dec 4
1783 aci ~dfau~,4
1784 dec 4
1785 aci ~plus~,4
1786 dec 4
1787 ZEROP MDDMR
1788 ZEROP MDADFQ
1789 ZEROP MDDMR
1790 ZEROP MDDMT
1791 ZEROP MDDMDI
1792 ZEROP MDPRF
1793 ZEROP WWDMDJ
1794 ZEROP MDDMP
1795 ZEROP MDRED
1796 ZEROP MDCON
1797 ZEROP MDLIB
1798 ZEROP WWDMS
1799 ZEROP MDUSR
1800 ZEROP WWDX4
1801 ZEROP MDPLS
1802 ZEROP MDSU
1803 MDDMR: XCALL MDRUN,BIN
1804 MDSU: CALLP BSED,.SW17
1805 CALLP ATZCK
1806 CALLP OLDNEW
1807 BIN
1808 MDPRF: XCALL MDPER,BIN
1809 MDDMT: XCALL MDTUT,BIN
1810 MDDMDI:XCALL MDDIR,BIN
1811 MDDMP: XCALL MDPRI,BIN
1812 MDRED: XCALL MDREDI,BIN
1813 MDADFQ:XCALL MDADF,BIN
1814 MDUSR: XCALL MDUPS,BIN
1815 MDCON: XCALL MDCMD,BIN
1816 MDLIB: XCALL MDDML,BIN
1817 MDPLS: XCALL MDFLO,BIN
1818 "
1819 SYSCL: ZEROP *+1
1820 SYSTM
1821 HOLDCL:ZEROP *+1
1822 STRUE .SW11,.POPUP
1823 SENDCL:ZEROP *+1
1824 STFALS .SW11,.POPUP
1825 NOPACL:ZEROP *+1
1826 STRUE .SW16,.POPUP
1827 PARICL:ZEROP *+1
1828 STFALS .SW16,.POPUP
1829 UCASCL:ZEROP *+1
1830 STFALS .SW38,.POPUP
1831 LCASCL:ZEROP *+1
1832 STRUE .SW38,.POPUP
1833 FORMCL:ZEROP *+1
1834 STFALS .SW39,.POPUP
1835 NFORCL:ZEROP *+1
1836 STRUE .SW39,.POPUP
1837 EXPCL: ZEROP *+1
1838 EXEC
1839 POPUP
1840 ZEROP PSKEL **MUST IMMEDIATELY PRECEDE CMLCL**
1841 CMLCL: XCALL CMDL,BIN
1842 PSKEL: CALLP BSED,.SW17 SKELETON SEQUENCE FOR XCALL SS,BIN
1843 CALLP 0
1844 .BIN: BIN
1845 equ .POPUP,C2.1
1846 "
1847 even
1848 EBLDCL:oct 004004004001
1849 dec 4
1850 oct 0
1851 dec 0
1852 ZEROP C12.1
1853 ZEROP C2
1854 ZEROP .BIN
1855 " END INCLUDE FILE gtss_prgdes_alm_.incl.alm