Look in the SMP/E Reference manual, in the section for ++SRC.   There are
some specific examples that will help.

Adam

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Paul Gilmartin
Sent: Tuesday, December 27, 2016 1:55 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Looking for USERMOD samples

On 2016-12-27 14:47, R.S. wrote:
> I'm trying to learn a little bit about SMP/E usermods.
> Unfortunately neither SMP/E manuals nor google did not provide good (*well
explained*) samples.
> 
> 
> Example (from File Manager):
> //SMPCNTL  DD *
>  SET BDY(GLOBAL).
>  RECEIVE SELECT(FMN2001) SYSMODS.
>  SET BDY (TARGET).
>  APPLY SELECT(FMN2001) RETRY(YES) REDO.
> /*
> //SMPPTFIN DD DATA,DLM=$$
> ++USERMOD (FMN2001) REWORK(201601) .
> ++VER (Z038) FMID(JADLD12) PRE(UI25246) .
> ++JCLIN.
> /*
> ++SRC(FMN2POPT) TXLIB(FMN2SRC) DISTLIB(AFMNSAM1).
> $$
> FMN2SRC is a DD name pointing to a member with source code.
> Q1: How can I know what's target library for the load module?
> Q2: there is no assemble or linkedit jobstep. I assume it comes from
SMP/E.
> Q3: FMN2SRC DD - should it describe library or member? In other words:
DSN=MY.LIB or DSN=MY.LIB(MEM) ?
> 
A TXLIB is a library in which APPLY (I think) will save member FNM2POPT.
With the options coded, the assembler source of FNM2POPT should appear
inline, after the ++SRC.  There are other ways; I'd need to RTFM to say
more.

You'll need to allocate FNM2SRC in JCL and/or have a DDDEF for it.

-- gil

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions, send email
to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to