Michael Hurdle wrote:

>We are in the process of eliminating a Series 70 which is being
>utilized solely as an MRJE link to the VM world and the suggestion has
>been made to convert to using existing NRJE links to an MVS system and
>then pass through somehow to the VM systems. Has anybody gone through
>such a conversion and have information on what we need to do? The
>suggestions of replacing MRJE by FTP have met with some resistance as
>we actually have jobstreams on the MPE system that are submitting JCL
>via the MRJE link.

>I have very limited knowledge of MRJE and/or NRJE so any assistance
>would be greatly appreciated.

We went through a similar conversion some years back and from the
application point was not very difficult.  In many cases it was as easy as
changing an 'M' to an 'N'.  I must admit that I do not know what changes had
to be made at the system level.

In my current environment we still have requirements to communicate with the
IBMs but are using FTP.  At the application level it is a little more
difficult to 'set up' since you would have to 're-code' the return step of
your JCL, if any, but on the other hand you do not need any additional lines
to maintain.  The MVS FTP has the needed command that will direct a file
that is being 'put' using FTP to its internal reader for execution.  I'd
recommend that you get a copy of the FTP manual (I'm using TCP/IP Version
2.1 for MVS [SC31-6088-02]) for additional details and you'd still need to
talk to the IBM folks in order to find out how to invoke FTP for any return
file transfers.

The following job stream and JCL snippets show how we use FTP in our
environment to transfer/submit files to the IBM and how to get resulting
files back:

  ....
!COMMENT
!BUILD FTPIN;REC=-80,,F,ASCII;TEMP
!FILE  FIN=FTPIN,OLDTEMP
!ECHO ExitOnError       >> *FIN
!ECHO open !FTPHOST     >> *FIN
!ECHO user !FTPUSER     >> *FIN
!ECHO !FTPPASS          >> *FIN
!ECHO put D6660OT2.hpgroup 'IBMUSER.IBMGROUP.D6652IN1'  >> *FIN
!ECHO site filetype=jes >> *FIN
!ECHO put J6652C.ACCT   >> *FIN
!ECHO close             >> *FIN
!ECHO quit              >> *FIN
!COMMENT
!COMMENT ****************************************************
!COMMENT * Run FTP with the $STDIN *FIN (which is FTPIN)
!COMMENT ****************************************************
!COMMENT
!FTP < *FIN
!COMMENT

 ...  IBM side
//************************************************************
//*  Use FTP, on the IBM side, to place the resulting file   *
//*  back to the HP                                          *
//************************************************************
//B         EXEC PGM=FTP$,REGION=5120K
//SYSPRINT DD SYSOUT=(*,,SFTP)
//ABENDAID DD SYSOUT=(*,,SFTP)
//SYSUDUMP DD SYSOUT=(*,,SFTP)
//SYSIN DD *
 hphostname
 hpuser.hpaccount userpass
 PUT 'IBMUSER.IBMGROUP.A7095106(0)' D6652OT1;REC=-80,,F,ASCII;DISC=200000
 CLOSE
 QUIT
//************************************************************

Regards

Paul H. Christidis