forked from mvslovers/mvsclib
-
Notifications
You must be signed in to change notification settings - Fork 0
/
job_mvs_template.m4
403 lines (403 loc) · 8.1 KB
/
job_mvs_template.m4
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
//MVSCLIB JOB (MVSCLIB),'MVSCLIB',
// CLASS=A,
// MSGCLASS=A,
// MSGLEVEL=(1,1),
// REGION=4096K,
// USER=__USER__,
// PASSWORD=__PASS__,
// NOTIFY=__USER__
/*JOBPARM LINES=100
//* -------------------------------------------------------------------
//ALIAS1 EXEC PGM=IDCAMS
//SYSIN DD *
DEFINE ALIAS(NAME(MVSCLIB) RELATE(UCPUB000))
DELETE MVSCLIB.INCLUDE
DELETE MVSCLIB.MACLIB
DELETE MVSCLIB.NCALIB
SET MAXCC=0
//SYSPRINT DD SYSOUT=*
//* -------------------------------------------------------------------
//ALLOC EXEC PGM=IEFBR14
//INCLUDE DD DSN=MVSCLIB.INCLUDE,
// DISP=(NEW,CATLG,DELETE),
// UNIT=3375,
// SPACE=(CYL,(1,0,32)),
// DCB=(DSORG=PO,RECFM=VB,LRECL=255,BLKSIZE=6233)
//MACLIB DD DSN=MVSCLIB.MACLIB,
// DISP=(NEW,CATLG,DELETE),
// UNIT=3375,
// SPACE=(CYL,(1,0,32)),
// DCB=(DSORG=PO,RECFM=FB,LRECL=80,BLKSIZE=6160)
//NCALIB DD DSN=MVSCLIB.NCALIB,
// DISP=(NEW,CATLG,DELETE),
// UNIT=3375,
// SPACE=(CYL,(2,0,80)),
// DCB=(DSORG=PO,RECFM=U,LRECL=256,BLKSIZE=6144)
//* -------------------------------------------------------------------
//PDPMAIN EXEC PGM=IEBGENER
//SYSUT2 DD DSN=MVSCLIB.MACLIB(PDPMAIN),DISP=(OLD,PASS)
//SYSUT1 DD *
undivert(pdpmain.mac)dnl
/*
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
//* -------------------------------------------------------------------
//PDPPRLG EXEC PGM=IEBGENER
//SYSUT2 DD DSN=MVSCLIB.MACLIB(PDPPRLG),DISP=(OLD,PASS)
//SYSUT1 DD *
undivert(pdpprlg.mac)dnl
/*
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
//* -------------------------------------------------------------------
//PDPEPIL EXEC PGM=IEBGENER
//SYSUT2 DD DSN=MVSCLIB.MACLIB(PDPEPIL),DISP=(OLD,PASS)
//SYSUT1 DD *
undivert(pdpepil.mac)dnl
/*
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
//* -------------------------------------------------------------------
//PDPTOP EXEC PGM=IEBGENER
//SYSUT2 DD DSN=MVSCLIB.MACLIB(PDPTOP),DISP=(OLD,PASS)
//SYSUT1 DD *
undivert(pdptop.mac)dnl
/*
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
//* -------------------------------------------------------------------
//PDPASM PROC MVSPREF=MVSCLIB,MEMBER=DUMMY
//ASM EXEC PGM=IFOX00,
// PARM='DECK,LIST,TERM'
//SYSLIB DD DSN=SYS1.MACLIB,DISP=SHR,DCB=BLKSIZE=32720
// DD DSN=SYS1.AMODGEN,DISP=SHR
// DD DSN=&MVSPREF..MACLIB,DISP=SHR
//SYSUT1 DD UNIT=SYSALLDA,SPACE=(CYL,(20,10))
//SYSUT2 DD UNIT=SYSALLDA,SPACE=(CYL,(10,10))
//SYSUT3 DD UNIT=SYSALLDA,SPACE=(CYL,(10,10))
//SYSTERM DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSLIN DD DUMMY
//SYSGO DD DUMMY
//SYSPUNCH DD DSN=&&OBJSET,UNIT=SYSALLDA,SPACE=(80,(4000,4000)),
// DISP=(,PASS)
//LKED EXEC PGM=IEWL,PARM='NCAL',COND=(4,LT,ASM)
//SYSLIN DD DSN=&&OBJSET,DISP=(OLD,DELETE)
// DD DDNAME=SYSIN
//SYSIN DD DUMMY
//SYSLMOD DD DSN=&MVSPREF..NCALIB(&MEMBER),DISP=SHR
//SYSUT1 DD UNIT=SYSALLDA,SPACE=(CYL,(2,1))
//SYSPRINT DD SYSOUT=*
// PEND
//MVSSTART EXEC PDPASM,MEMBER=MVSSTART
//SYSIN DD *
undivert(mvsstart.asm)dnl
//LKED.SYSLIN DD
// DD *
ALIAS @@CRT0
ALIAS @@EXITA
/*
//* -------------------------------------------------------------------
//MVSSUPA EXEC PDPASM,MEMBER=MVSSUPA
//SYSIN DD *
undivert(mvssupa.asm)dnl
//LKED.SYSLIN DD
// DD *
ALIAS @@AOPEN
ALIAS @@AREAD
ALIAS @@AWRITE
ALIAS @@ACLOSE
ALIAS @@GETM
ALIAS @@FREEM
ALIAS @@GETCLK
ALIAS @@SAVER
ALIAS @@MANSTK
ALIAS @@LOADR
ALIAS @@SYSTEM
ALIAS @@IDCAMS
ALIAS @@DYNAL
ALIAS @@SVC
/*
//START EXEC PDPASM,MEMBER=START
//SYSIN DD *
undivert(start.s)dnl
//LKED.SYSIN DD *
ALIAS @@START
ALIAS @@EXIT
NAME START(R)
/*
//STDIO EXEC PDPASM,MEMBER=STDIO
//SYSIN DD *
undivert(stdio.s)dnl
/*
//LKED.SYSIN DD *
ALIAS STDIN
ALIAS STDOUT
ALIAS STDERR
ALIAS PRINTF
ALIAS FPRINTF
ALIAS VFPRINTF
ALIAS FOPEN
ALIAS FCLOSE
ALIAS FPUTC
ALIAS REMOVE
ALIAS RENAME
ALIAS SPRINTF
ALIAS VSPRINTF
ALIAS UNGETC
ALIAS FGETC
ALIAS FSEEK
NAME STDIO(R)
/*
//* -------------------------------------------------------------------
//STDIO2 EXEC PDPASM,MEMBER=STDIO
//SYSIN DD *
undivert(stdio.s)dnl
/*
//LKED.SYSIN DD *
ALIAS FTELL
ALIAS FSETPOS
ALIAS FGETPOS
ALIAS REWIND
ALIAS CLEARERR
ALIAS PERROR
ALIAS SETVBUF
ALIAS SETBUF
ALIAS FREOPEN
ALIAS FFLUSH
ALIAS TMPNAM
ALIAS TMPFILE
ALIAS FSCANF
ALIAS SCANF
ALIAS SSCANF
ALIAS GETS
NAME STDIO2(R)
/*
//* -------------------------------------------------------------------
//STDIO3 EXEC PDPASM,MEMBER=STDIO
//SYSIN DD *
undivert(stdio.s)dnl
/*
//LKED.SYSIN DD *
ALIAS PUTS
ALIAS GETC
ALIAS PUTC
ALIAS GETCHAR
ALIAS PUTCHAR
ALIAS FEOF
ALIAS FERROR
ALIAS FGETS
ALIAS FPUTS
ALIAS FWRITE
ALIAS FREAD
ALIAS @@USERFI
NAME STDIO3(R)
/*
//* -------------------------------------------------------------------
//STDLIB EXEC PDPASM,MEMBER=STDLIB
//SYSIN DD *
undivert(stdlib.s)dnl
/*
//LKED.SYSIN DD *
ALIAS MALLOC
ALIAS CALLOC
ALIAS REALLOC
ALIAS FREE
ALIAS ABORT
ALIAS EXIT
ALIAS QSORT
ALIAS SRAND
ALIAS RAND
ALIAS ATOF
ALIAS STRTOD
ALIAS ATOI
ALIAS ATOL
ALIAS STRTOL
ALIAS STRTOUL
ALIAS MBLEN
NAME STDLIB(R)
/*
//* -------------------------------------------------------------------
//STDLIB2 EXEC PDPASM,MEMBER=STDLIB
//SYSIN DD *
undivert(stdlib.s)dnl
/*
//LKED.SYSIN DD *
ALIAS MBTOWC
ALIAS WCTOMB
ALIAS MBSTOWCS
ALIAS WCSTOMBS
ALIAS ABS
ALIAS DIV
ALIAS LABS
ALIAS LDIV
ALIAS ATEXIT
ALIAS GETENV
ALIAS SYSTEM
ALIAS BSEARCH
ALIAS @@USEREX
NAME STDLIB2(R)
/*
//* -------------------------------------------------------------------
//CTYPE EXEC PDPASM,MEMBER=CTYPE
//SYSIN DD *
undivert(ctype.s)dnl
/*
//LKED.SYSIN DD *
ALIAS @@ISBUF
ALIAS @@TOLOW
ALIAS @@TOUP
ALIAS ISALNUM
ALIAS ISALPHA
ALIAS ISCNTRL
ALIAS ISDIGIT
ALIAS ISGRAPH
ALIAS ISLOWER
ALIAS ISPRINT
ALIAS ISPUNCT
ALIAS ISSPACE
ALIAS ISUPPER
ALIAS ISXDIGIT
ALIAS TOLOWER
ALIAS TOUPPER
NAME CTYPE(R)
/*
//* -------------------------------------------------------------------
//STRING EXEC PDPASM,MEMBER=STRING
//SYSIN DD *
undivert(string.s)dnl
/*
//LKED.SYSIN DD *
ALIAS MEMMOVE
ALIAS STRCPY
ALIAS STRNCPY
ALIAS STRCAT
ALIAS STRNCAT
ALIAS MEMCMP
ALIAS STRCMP
ALIAS STRCOLL
ALIAS STRNCMP
ALIAS STRXFRM
ALIAS MEMCHR
ALIAS STRCHR
ALIAS STRCSPN
ALIAS STRPBRK
ALIAS STRRCHR
ALIAS STRSPN
NAME STRING(R)
//STRING2 EXEC PDPASM,MEMBER=STRING
//SYSIN DD *
undivert(string.s)dnl
/*
//LKED.SYSIN DD *
ALIAS STRSTR
ALIAS STRTOK
ALIAS MEMSET
ALIAS STRERROR
ALIAS STRLEN
ALIAS MEMCPY
NAME STRING2(R)
/*
//TIME EXEC PDPASM,MEMBER=TIME
//SYSIN DD *
undivert(time.s)dnl
/*
//LKED.SYSIN DD *
ALIAS CLOCK
ALIAS DIFFTIME
ALIAS MKTIME
ALIAS ASCTIME
ALIAS CTIME
ALIAS GMTIME
ALIAS LOCALTIM
ALIAS STRFTIME
NAME TIME(R)
/*
//ERRNO EXEC PDPASM,MEMBER=ERRNO
//SYSIN DD *
undivert(errno.s)dnl
/*
//LKED.SYSIN DD *
ALIAS @@GET@ER
NAME ERRNO(R)
/*
//ASSERT EXEC PDPASM,MEMBER=ASSERT
//SYSIN DD *
undivert(assert.s)dnl
/*
//LKED.SYSIN DD *
ALIAS @ASSERT
NAME ASSERT(R)
/*
//LOCALE EXEC PDPASM,MEMBER=LOCALE
//SYSIN DD *
undivert(locale.s)dnl
/*
//LKED.SYSIN DD *
ALIAS SETLOCAL
ALIAS LOCALECO
NAME LOCALE(R)
/*
//MATH EXEC PDPASM,MEMBER=MATH
//SYSIN DD *
undivert(math.s)dnl
/*
//LKED.SYSIN DD *
ALIAS CEIL
ALIAS FABS
ALIAS FLOOR
ALIAS FMOD
ALIAS ACOS
ALIAS ASIN
ALIAS ATAN
ALIAS ATAN2
ALIAS COS
ALIAS SIN
ALIAS TAN
ALIAS COSH
ALIAS SINH
ALIAS TANH
ALIAS EXP
ALIAS LOG
NAME MATH(R)
//MATH2 EXEC PDPASM,MEMBER=MATH
//SYSIN DD *
undivert(math.s)dnl
/*
//LKED.SYSIN DD *
ALIAS LOG10
ALIAS POW
ALIAS SQRT
ALIAS FREXP
ALIAS LDEXP
ALIAS MODF
NAME MATH2(R)
/*
//SETJMP EXEC PDPASM,MEMBER=SETJMP
//SYSIN DD *
undivert(setjmp.s)dnl
/*
//LKED.SYSIN DD *
ALIAS LONGJMP
NAME SETJMP(R)
/*
//SIGNAL EXEC PDPASM,MEMBER=SIGNAL
//SYSIN DD *
undivert(signal.s)dnl
/*
//LKED.SYSIN DD *
ALIAS RAISE
ALIAS @@SIGDFL
ALIAS @@SIGERR
ALIAS @@SIGIGN
NAME SIGNAL(R)
/*
//@@MEMMGR EXEC PDPASM,MEMBER=@@MEMMGR
//SYSIN DD *
undivert(__memmgr.s)dnl
/*
//LKED.SYSIN DD *
NAME @@MEMMGR(R)
/*
//* -------------------------------------------------------------------
//