JOB SUBMISSION VIA FTP

 Introduction

In the use of an rci account, it is useful to submit jobs directly to the mvs system. This allows the data and fortran source to remain on the local computers with user familiar editors and word processors while using the compute power of the NERDC's MVS system. The submission can take place from a dos computer or from a unix computer. Both must have ftp access. Since this is mvs there is a jcl file involved. The dos machine has carriage returns. The unix does not.

Tne MVS side of the NERDC is relatively unused, and has easy access to high speed printers, laser printers, and large scale plot routines. The use of nermvs makes the NERDC almost a simple extension of the PC. This method routinely prints large number of exams for a few departments, so bugs are found and eliminated as they crop up. A recent timing comparison of the nersp with a gigahertz PC indicates that MVS may not be as much faster than a PC as one might hope. -- nersp - timing.

Nerdc jobs require funds

The balance in your account nerinfo.htm must be greater than the expected cost of the job.

The jcl file is jcl.job:

//RCI003A JOB ,COLDWELL,CLASS=A,REGION=2048K,MSGCLASS=H
/*JOBPARM TIME=009,LINES=5,CARDS=4000
//*ROUTE PRINT N1R0
// EXEC VSFCG,
// CPARM='OPT(3)'
//SYSPRINT DD SYSOUT=H
 print*,' hello world'
 stop
 end
//GO.SYSIN DD *
//GO.FT06F001 DD SYSOUT=H,DCB=(RECFM=UA,BLKSIZE=133)
/*EOF

On the job card, the name RCI003A is tied to the account RCI003 to which ftp will connect. The class=A, is only appropriate for testing short code, use class= H for medium runs and class = G for gigantic runs. The MSGCLASS=H is the signal that routes the results to the ftp site. The line //SYSPRINT DD SYSOUT=H is used to direct the compiler output to the ftp site. The line 

//GO.FT06F001 DD SYSOUT=H,DCB=(RECFM=UA,BLKSIZE=133)

directs the results of print or write(6,*) to the ftp site. The lower case lines are hello.for, the fortran source.

MAKING THE FILE JOB.SUB --

This section describes a code that uses includes to make a job file out of a number of fortran files before each submission. Most people will have one big job file of the type described above. They might as well skip this section.
 
For a unix machine the best starting point is mvsunix.zip, for a dos machine the best starting point is dos\mvsdos.zip. These zip files contain a text version of this file plus the fortran and executables for maksub described below. Put these in the folder desired, unzip them and experiment.
 
There can be as many includes as desired in the file job.jcl only. The /*INCLUDE is case sensitive.
 
D:\MVSSUB>maksub jcl.job
 INSIDE MAKESUB
JOB FILE IS jcl.JOB
//RCI003A JOB ,COLDWELL,CLASS=A,REGION=2048K,MSGCLASS=H
/*JOBPARM TIME=009,LINES=5,CARDS=4000
//*ROUTE PRINT N1R0
// EXEC VSFCG,
// CPARM='OPT(3)'
//SYSPRINT DD SYSOUT=H
/*INCLUDE HELLO.FOR
 OPENED FILE = HELLO.FOR
//GO.SYSIN DD *
//GO.FT06F001 DD SYSOUT=H,DCB=(RECFM=UA,BLKSIZE=133)
/*EOF
 THE CODE READY FOR MVS IS IN
job.sub
Stop - Program terminated.

The fortran code for this is maksub.for on a unix conmputer and dos\maksub.for on a dos computer. The difference is that the dos computer does not require the < on the command line.

ftp to nermvs

After creating job.sub, it is necessary to ftp to nermvs.

D:\MVSSUB>ftp nermvs.nerdc.ufl.edu
Connected to nermvs.nerdc.ufl.edu.
220-FTPD1 IBM FTP CS V2R6 at NERMVS.NERDC.UFL.EDU, 09:18:47 on 1999-09-17.
220 Connection will close if idle for more than 5 minutes.
User (nermvs.nerdc.ufl.edu:(none)): rci003
331 Send password please.
Password:
230 RCI003 is logged on. Working directory is "U.".
ftp> quote site filetype=jes
200 Site command was accepted
ftp> put job.sub
200 Port request OK.
125 Sending Job to JES internal reader FIXrecfm 80
250-It is known to JES as JOB27773
250 Transfer completed successfully.
902 bytes sent in 0.00 seconds (902000.00 Kbytes/sec)
ftp> dir
200 Port request OK.
125 List started OK
RCI003A JOB27773 OUTPUT 5 Spool Files
250 List completed successfully.
74 bytes received in 0.06 seconds (1.23 Kbytes/sec)
ftp> get job27773
200 Port request OK.
125 Sending all spool files for requested Jobid
250 Transfer completed successfully.
23514 bytes received in 0.66 seconds (35.63 Kbytes/sec)
ftp> del job27773
250 Cancel successful
ftp> quit
221 Quit command received. Goodbye.

Except for the password, all commands that the user needs in the example are in bold. It is easy to forget the qoute site filetype=jes command. If you do, the dir command will give a long list of nerdc jobs. If you do not issue the del jobxxxxx command, these will accumulate. There are probably limits.

The output file

The output is in dos\job27773. The various segments of the output are separated by

!! END OF JES SPOOL FILE !!

The last segment of course is

!! END OF JES SPOOL FILE !!
 hello world
!! END OF JES SPOOL FILE !!