forked from moshix/mvs
-
Notifications
You must be signed in to change notification settings - Fork 0
/
PLIFzOS
52 lines (52 loc) · 3.49 KB
/
PLIFzOS
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
//MOSHIXQ JOB 'N QUEENS ',
// MSGCLASS=H,MSGLEVEL=(1,1),REGION=8M,
// CLASS=A,NOTIFY=&SYSUID
//******************************************************************
//** PLI F COMPILER PROCEDURE COMPILE LINK-EDIT AND GO
//** SYSIN ASSUME IN MOSHIX.WORK.PLI(PL1)
//** SYSLMOD MODULE IN &&LOADSET
//** GO MODULE FORM &&LOADSET
//** SYSUDMP IN SYSOUT=*
//**
//**
//*****************************************************8************
//PL1L EXEC PGM=IEMAA,REGION=9000K,
// PARM='LIST,SOURCE,NEST,XREF,OPT(2)'
//SYSPRINT DD SYSOUT=*
//STEPLIB DD DSN=SYSC.LINKLIB,DISP=SHR
//SYSLIB DD DSN=SYSC.PLILIB,DISP=SHR
//SYSIN DD DSN=MOSHIX.WORK.PROG(NQPLIF),DISP=SHR
//SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSUDUMP DD SYSOUT=*
//SYSLIN DD DSN=&&LOADSET,UNIT=SYSDA,
// DISP=(NEW,PASS,DELETE),
// SPACE=(CYL,(50,20))
//******************************************************
//** LINKAGE EDITOR, OR BINDER
//******************************************************
//LKED EXEC PGM=IEWL,PARM='XREF,LIST,LET',
// REGION=4M
//SYSLIB DD DSN=SYSC.PLILIB,DISP=SHR
//STEPLIB DD DSN=SYSC.LINKLIB,DISP=SHR
//SYSLMOD DD DSN=&&GOSET(GO),UNIT=SYSDA,
// SPACE=(CYL,(1,1,9),RLSE),DISP=(NEW,PASS,DELETE),
// DSORG=PO
//SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSLIN DD DSNAME=&&LOADSET,DISP=(OLD,DELETE)
//******************************************************
//** EXECUTE NEW PROGRAM
//******************************************************
//GO EXEC PGM=GO,REGION=90M
//STEPLIB DD DSN=&&GOSET,DISP=(OLD,DELETE)
// DD DSN=SYSC.PLILIB,DISP=SHR
//SYSLIB DD DSN=SYSC.PLILIB,DISP=SHR
//SYSOUT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//GO.SYSIN DD *
12
/*
//GO.SYSPRINT DD SYSOUT=*,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=13300)
//