RE: RJE question - any old timers out there

["Urbanek, Marty" <Marty_Urbanek@xxxxxxxxxxxx>]

Carl,

I am not familiar with the MS/RJE product, but perhaps you need to place the
".. EOF" card after the //.

If that doesn't work, maybe MS/RJE is so "smart" that it is interpreting the
JCL and deciding that the /* and // are essentially null anyway and
therefore don't need to be sent. If you think that may be the case, you
might try overriding the default delimiter of /*, for example:

//TCEMF8NO JOB (IC17,NDC2),'COMPANY NAME',CLASS=1,MSGCLASS=D, 
//      MSGLEVEL=(1,1),PRTY=9                                      
/*ROUTE  PRINT N1R7439                                             
//  JCLLIB ORDER=XXXX.AYYYPRD.PROCLIB                              
//STEP1 EXEC  TSTCEQ02                                             
//CARRDATA DD   DATA,DLM=QQ
.. READFILE FILE(DATAFILE) MBR(*ALL)                               
QQ
.. EOF                                                             
/*                                                                 
//                         

That would tell MVS that the delimiter is QQ instead of /*.

That's a long shot, but something to try, like I said, I never worked with
MS/RJE.

-Marty

------------------------------------------
date: Thu, 8 Jan 2004 16:08:42 -0500
from: "Carl Galgano" <cgalgano2@xxxxxxxxxxxxxxxxx>
subject: RJE question - any old timers out there

//TCEMF8NO JOB (IC17,NDC2),'COMPANY NAME',CLASS=1,MSGCLASS=D, 
//      MSGLEVEL=(1,1),PRTY=9                                      
/*ROUTE  PRINT N1R7439                                             
//  JCLLIB ORDER=XXXX.AYYYPRD.PROCLIB                              
//STEP1 EXEC  TSTCEQ02                                             
//CARRDATA DD   *                                                  
.. READFILE FILE(DATAFILE) MBR(*ALL)                               
.. EOF                                                             
/*                                                                 
//                                                                 


Above is a JCL set that I submit to a partner that we are still doing dial
up MS/RJE over SNA.  The beginning JCL cards get sent fine (thru the
//CARRDATA DD * card) and the data that is in file DATEFILE gets sent in its
entirety.  After the data is sent and I hit EOF, I want to send a /* and a
// card to terminate the data.  I have scoped the line and do not see these
cards being sent and the partner does not see them either.  Anyone have any
suggestion as to how to do this, beside put the 2 JCL cards are the end of
the file in DATAFILE.

Thanks in advance.
cjg

Carl J. Galgano
EDI Consulting Services, Inc.
600 Kennesaw Avenue, Suite 400
Marietta, GA  30060
(770) 422-2995 - voice
(419) 730-8212 - fax
mailto:cgalgano@xxxxxxxxxxxxxxxxx
http://www.ediconsulting.com
AS400 EDI, Networking, E-Commerce and Communications Consulting and
Implementation 
http://www.icecreamovernight.com
Premium Ice Cream Brands shipped Overnight

Visit our website to subscribe to our FREE AS/400 Timesharing Service