Clint Schwartz wrote:

We need to create a tape with 1 file on it to be sent to an IBM shop.
We have tried using FCOPY, but we must be doing something wrong because
the company with the IBM keeps telling us that they can't find an EOF
marker.  I'm sure this is possible, is anyone doing this and how are you
doing it?  Thanks in advance.
--
Clint Schwartz
Memorial Hospital & Health System
615 North Michigan Street
South Bend, IN  46601    email:  [log in to unmask]

------------------------Reply Separator-------------------------

We used to do this for the purpose of printing our Library overdue
notices on an IBM MVS system.  We've recently abandoned this
technique in favor of FTP.  Here's a simplified version of the JCL we
used.  Note:  The first fcopy "from" file is a set of printer setup
pages used by the IBM system operator to allign our special forms on
the printer.


!JOB OVdtape,MGR.LIBRARY;HIPRI;OUTCLASS=LP,8,1
!comment *************************************************
!comment * This job copies Overdue Notices from the      *
!comment * output spool to tape.  The tape is 6250 BPI,  *
!comment * IBM Standard Label, EBCDIC Character Code.    *
!comment *************************************************
!file ffile1=ODFORMAT;dev=disc;cctl
!comment *************************************************
!comment * Change the next line to reflect the spool     *
!comment * file name for the latest generation of Overdue*
!comment * Notices.                                      *
!comment *************************************************
!file ffile2=o43551.out.hpspool;dev=disc;cctl
!file tfile=LIB,NEW;dev=7;ACC=INOUT; &
!     label="LIBOVD",ibm,,next;rec=-80,255,f,ascii;cctl
!fcopy
from=*ffile1;to=*tfile;ebcdicout
from=*ffile2;to=*;ebcdicout
EXIT
!EOJ


   ============================================================
   = Steven P. Barrett    [log in to unmask] =
   = Systems Analyst                                          =
   = Fairfax County Public Library     (703) 222-3132 - Voice =
   = Technical Operations Center       (703) 222-3135 - FAX   =
   = 4000 Stringfellow Rd.                                    =
   = Chantilly, VA  20151                                     =
   =                                                          =
   = --- The opinions expressed here are mine alone . ---     =
   ============================================================