//*
//* File name : jcl_ex
//*
//* Example of an MVS JCL-script that prints a given file.
//*
//* (C) Copyright 1993, Axis Communications AB, 1993, LUND, SWEDEN.
//*
//* Version 1.1 Apr 26, 1992 AB/RW
//*
//* In-stream data is used for the FTP session.
//* Words within "<>" should be altered before use.
//* The entries on the JOB line might be different for your system.
//*
//* Note that BINARY should only be used when data is to be transferred
//* transparently to the printer. If you want EBCDIC to ASCII conversion,
//* for plain text files, leave out BINARY.
//*
//* <file name> is in MVS format.
//*
//* <logical printer> is pr1 to pr8. Confer with the User's manual.
//*
//<job-name> JOB     <accounting>,<programmer>,MSGLEVEL=<msglevel>,MSGCLASS=<msgclass>
//           NOTIFY=<user>,CLASS=<class>
//EXECFTP    EXEC    PGM=FTP
//SYSIN      DD DUMMY
//SYSPRINT   DD SYSOUT=*
//INPUT      DD *
<TCP/IP-address>
root
pass
BINARY
PUT <file name> <logical printer>
QUIT
