On Mon, 7 Feb 2011 08:32:06 -0600 Larry Macioce <[email protected]> wrote:
:>Here is the jcl:
:>
:>//SMPE EXEC PGM=GIMSMP,PARM='DATE=U',REGION=4096K
:>//SMPCSI DD DISP=OLD,DSN=CAI.DS60.CSI
:>//SMPPTS DD DISP=OLD,DSN=CAI.DS60.SMPPTS
:>//SMPLOG DD SYSOUT=X
:>//SYSUT1 DD UNIT=SYSDA,SPACE=(3000,(380,760)),DISP=(,DELETE)
:>//SYSUT2 DD UNIT=SYSDA,SPACE=(3000,(380,760)),DISP=(,DELETE)
:>//SYSUT3 DD UNIT=SYSDA,SPACE=(3000,(380,760)),DISP=(,DELETE)
:>//SYSUT4 DD UNIT=SYSDA,SPACE=(3000,(380,760)),DISP=(,DELETE)
:>//SMPE.SMPPTFIN DD DSN=SYSP.DS60.FILES,DISP=SHR
:>//SMPCNTL DD *
:> SET BOUNDARY(GLOBAL) .
:> RECEIVE
:> SYSMODS LIST .
Your earlier post indicated
RECEIVE SELECT(
Which is it?
--
Binyamin Dissen <[email protected]>
http://www.dissensoftware.com
Director, Dissen Software, Bar & Grill - Israel
Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.
I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html