Welcome to Eagle88 version 1.02.

You found the A1-ReadMe.txt.  Good start.  

To install Eagle88 software upload each of the 7 files to the mainframe to rebuild PDS libraries.  The 8th file M8- is the User Manual in MSWord document. 



STEP
-1- Download Eagle88 v1.02 zip file from the website www.eagle88.com   Either Windows or Apple Mac, expand the zip file to download 7 files.  They are labeled F1- through F7- .  Any order is fine.  Leave the M8- User Manual on your PC.   

Unzipped file:

A1-ReadMe.txt

F1-SYSTECH-V1EAG-CNTL-XMIT
F2-SYSTECH-V1EAG-LOADLIB-XMIT
F3-SYSTECH-V1EAG-OBJLIB-XMIT
F4-SYSTECH-V1EAG-PROCLIB-XMIT
F5-SYSTECH-V1EAG-TUTDATA-XMIT
F6-SYSTECH-V1EAG-TUTJCL-XMIT
F7-SYSTECH-V1EAG-REPORTS-XMIT
M8-Eagle88V1.02UserManual.Doc


These files are binary image.  Upload them back to the mainframe also as binary.  We are using the XMIT / RECEIVE method to rebuild the PDS.  

As an example, the original name for F1 is SYSTECH.V1EAG.CNTL. The dash (-) is replacing the dot (.) naming scheme.  


STEP
-2- Pre-allocate the 7 XMIT files.  To bring F1 file back, you need to pre-allocate SYSTECH.V1EAG.CNTL.XMIT as a lrecl=80, blksize=3120, DSORG=PS.  Must be this block size and lrecl or the RECEIVE command will fail.

Example JCL below. Change the SYSTECH name to your company/project/userid name.  


SYSTECH.V1EAG.CNTL(ALLOC4)   


//SYSTECHA JOB (123),'SYSTECH',CLASS=A,MSGCLASS=T,MSGLEVEL=(1,1),
//           NOTIFY=SYSTECH
//**********************************************************
//**  PREALLOCATE 7 FILES                                 **
//**  ALLOCATE 7 FILES AS 80/3120/PS F OR THE BINARY FILES**
//******************************************** *************
//DELETE   EXEC PGM=IEFBR14
//F1      DD DSN=SYSTECH.V1EAG.CNTL.XMIT,
// DISP=(MOD,DELETE,DELETE),UNIT=SYSDA,SPACE=(TRK,(5,1),RLSE),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=3120,DSORG=PS)
//F2      DD DSN=SYSTECH.V1EAG.LOADLIB.XMIT,
// DISP=(MOD,DELETE,DELETE),UNIT=SYSDA,SPACE=(TRK,(50,10),RLSE),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=3120,DSORG=PS)
//F3      DD DSN=SYSTECH.V1EAG.OBJLIB.XMIT,
// DISP=(MOD,DELETE,DELETE),UNIT=SYSDA,SPACE=(TRK,(5,1),RLSE),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=3120,DSORG=PS)
//F4      DD DSN=SYSTECH.V1EAG.PROCLIB.XMIT,
// DISP=(MOD,DELETE,DELETE),UNIT=SYSDA,SPACE=(TRK,(5,1),RLSE),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=3120,DSORG=PS)
//F5      DD DSN=SYSTECH.V1EAG.TUTDATA.XMIT,
// DISP=(MOD,DELETE,DELETE),UNIT=SYSDA,SPACE=(TRK,(5,1),RLSE),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=3120,DSORG=PS)
//F6      DD DSN=SYSTECH.V1EAG.TUTJCL.XMIT,
// DISP=(MOD,DELETE,DELETE),UNIT=SYSDA,SPACE=(TRK,(5,1),RLSE),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=3120,DSORG=PS)
//F7      DD DSN=SYSTECH.V1EAG.REPORTS.XMIT,
// DISP=(MOD,DELETE,DELETE),UNIT=SYSDA,SPACE=(TRK,(5,1),RLSE),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=3120,DSORG=PS)
//*
//**********************************************************
//**  ALLOCATE 9 FILES AS 80/3120/PS FOR THE BINARY FILES **
//******************************************** *************
//ALLOC1   EXEC PGM=IEFBR14
//F1      DD DSN=SYSTECH.V1EAG.CNTL.XMIT,
// DISP=(NEW,CATLG,CATLG),UNIT=SYSDA,SPACE=(TRK,(5,1),RLSE),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=3120,DSORG=PS)
//F2      DD DSN=SYSTECH.V1EAG.LOADLIB.XMIT,
// DISP=(NEW,CATLG,CATLG),UNIT=SYSDA,SPACE=(TRK,(50,10),RLSE),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=3120,DSORG=PS)
//F3      DD DSN=SYSTECH.V1EAG.OBJLIB.XMIT,
// DISP=(NEW,CATLG,CATLG),UNIT=SYSDA,SPACE=(TRK,(5,1),RLSE),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=3120,DSORG=PS)
//F4      DD DSN=SYSTECH.V1EAG.PROCLIB.XMIT,
// DISP=(NEW,CATLG,CATLG),UNIT=SYSDA,SPACE=(TRK,(5,1),RLSE),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=3120,DSORG=PS)
//F5      DD DSN=SYSTECH.V1EAG.TUTDATA.XMIT,
// DISP=(NEW,CATLG,CATLG),UNIT=SYSDA,SPACE=(TRK,(5,1),RLSE),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=3120,DSORG=PS)
//F6      DD DSN=SYSTECH.V1EAG.TUTJCL.XMIT,
// DISP=(NEW,CATLG,CATLG),UNIT=SYSDA,SPACE=(TRK,(5,1),RLSE),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=3120,DSORG=PS)
//F7      DD DSN=SYSTECH.V1EAG.REPORTS.XMIT,
// DISP=(NEW,CATLG,CATLG),UNIT=SYSDA,SPACE=(TRK,(5,1),RLSE),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=3120,DSORG=PS)
  



    
STEP
-3- FTP the 7 files to the pre-allocate the XMIT files you just built.

FTP 11.234.5.789        <<==your ftp IP address
FTP> USERID
FTP> PW

FTP> BIN 

FTP> put F1-SYSTECH-V1EAG-CNTL-XMIT      'SYSTECH.V1EAG.CNTL.XMIT' 
FTP> put F2-SYSTECH-V1EAG-LOADLIB-XMIT   'SYSTECH.V1EAG.LOADLIB.XMIT'
FTP> put F3-SYSTECH-V1EAG-OBJLIB-XMIT    'SYSTECH.V1EAG.OBJLIB.XMIT'
FTP> put F4-SYSTECH-V1EAG-PROCLIB-XMIT   'SYSTECH.V1EAG.PROCLIB.XMIT'
FTP> put F5-SYSTECH-V1EAG-TUTDATA-XMIT   'SYSTECH.V1EAG.TUTDATA.XMIT'
FTP> put F6-SYSTECH-V1EAG-TUTJCL-XMIT    'SYSTECH.V1EAG.TUTJCL.XMIT'
FTP> put F7-SYSTECH-V1EAG-REPORTS-XMIT   'SYSTECH.V1EAG.REPORTS.XMIT'
 

Browse each file sent on the mainframe and see if the allocations are still correct and the transmit did fill in the file.

What is in each file, you ask?   

F1 is typical test jcl, just misc eagle88 runs.  In the User manual under file M8- there are many examples with explanations that are better.  Also there are tutorial lessons to better help learn the Eagle88 product.

F2 contains the EAGLE88C load module we execute to perform commands.

F3 contains the OBJLIB that builds the EAGLE88C load module.  A link step is later performed using this file.

F4 contains PROCLIB the EAGLE88 procs.

F5 contains Tutorial data for test cases

F6 Contains Tutorial jcl for lessons.   Later you will update the JCL for a valid job card and the company file naming scheme.
 
F7 contains Sample reports



STEP
-4- Rebuild the 7 PDS files using the RECEIVE command.  Change the output files to match the company naming scheme.  


Example to change on each job step:

/RECVDSN DD DISP=SHR,DSN=SYSTECH.V1EAG.CNTL.XMIT   <<<== the RECVDSN should match the downloaded file name you created. 
                
//SYSTSIN  DD  *                                                      
     RECEIVE  INDDNAME(RECVDSN)                                         
                  DSNAME('SYSTECH.V1EAG.CNTL')     <<<== the DSNAME will be the final PDS name you intend to use



For reference SYSTECH.V1EAG.CNTL(AXMIT4) contains the following JCL.  

If you run the first job steps for F1-, those JCL members are inside the PDS.




//SYSTECHD JOB (123),'SYSTECH',CLASS=A,MSGCLASS=T,MSGLEVEL=(1,1),       00010000
//             NOTIFY=SYSTECH                                           00020000
//PLIB    JCLLIB ORDER=(SYSTECH.V1EAG.PROCLIB)                          00030000
//*********************************************************             00040000
//*                                                                     00050000
//* RELOAD THE XMIT FILE TO WHICH EVER COMPANY NAME NEEDED              00060000
//*                                                                     00070000
/ 
//*********************************************************             00100000
//* F1-SYSTECH.V1EAG.CNTL                                               00110000
//* F2-SYSTECH.V1EAG.LOADLIB                                            00130000
//* F3-SYSTECH.V1EAG.OBJLIB                                             00140000
//* F4-SYSTECH.V1EAG.PROCLIB                                            00150000
//* F5-SYSTECH.V1EAG.TUTDATA                                            00160000
//* F7-SYSTECH.V1EAG.TUTJCL                                             00170000
//* F8-SYSTECH.V1EAG.REPORTS                                            00180000
//*                                                                     00210000
//*SCRATCH XMIT WORK FILE                                               00220000
//*********************************************************             00230000
//DELF1    EXEC PGM=IEFBR14                                             00240000
//XMITDS     DD DSN=SYSTECH.V1EAG.CNTL,                                 00250000
//          DISP=(MOD,DELETE,DELETE),                                   00260000
//          UNIT=SYSDA,SPACE=(TRK,(50,20,20),RLSE),                     00270000
//          DCB=(LRECL=80,RECFM=FB,BLKSIZE=800)                         00280000
//*********************************************************             00290000
//*  F1 RELOAD XMIT CNTL  RECEIVED                                      00300000
//*********************************************************             00310000
//XMITF1   EXEC PGM=IKJEFT01                                            00320000
//SYSPRINT   DD SYSOUT=*                                                00330000
//SYSTSPRT DD  SYSOUT=*                                                 00340000
//RECVDSN DD DISP=SHR,DSN=SYSTECH.V1EAG.CNTL.XMIT                       00350000
//SYSTSIN  DD  *                                                        00360000
     RECEIVE  INDDNAME(RECVDSN)                                         00370000
                  DSNAME('SYSTECH.V1EAG.CNTL')                          00380000
//*                                                                     00390000
//*                                                                     00580000
//*SCRATCH XMIT WORK FILE                                               00590000
//*********************************************************             00600000
//DELF2    EXEC PGM=IEFBR14                                             00610000
//XMITDS     DD DSN=SYSTECH.V1EAG.LOADLIB,                              00620000
//          DISP=(MOD,DELETE,DELETE),                                   00630000
//          UNIT=SYSDA,SPACE=(TRK,(50,20,20),RLSE),                     00640000
//          DCB=(LRECL=80,RECFM=FB,BLKSIZE=800)                         00650000
//*********************************************************             00660000
//*  F2 RELOAD XMIT LOADLIB RECEIVED                                    00670000
//*********************************************************             00680000
//XMITF2   EXEC PGM=IKJEFT01                                            00690000
//SYSPRINT   DD SYSOUT=*                                                00700000
//SYSTSPRT DD  SYSOUT=*                                                 00710000
//RECVDSN DD DISP=SHR,DSN=SYSTECH.V1EAG.LOADLIB.XMIT                    00720000
//SYSTSIN  DD  *                                                        00730000
     RECEIVE  INDDNAME(RECVDSN)                                         00740000
                  DSNAME('SYSTECH.V1EAG.LOADLIB')                       00750000
//*                                                                     00760000
//*SCRATCH XMIT WORK FILE                                               00770000
//*********************************************************             00780000
//DELF3    EXEC PGM=IEFBR14                                             00790000
//XMITDS     DD DSN=SYSTECH.V1EAG.OBJLIB,                               00800000
//          DISP=(MOD,DELETE,DELETE),                                   00810000
//          UNIT=SYSDA,SPACE=(TRK,(50,20,20),RLSE),                     00820000
//          DCB=(LRECL=80,RECFM=FB,BLKSIZE=800)                         00830000
//*********************************************************             00840000
//*  F3 RELOAD XMIT OBJLIB RECEIVED                                     00850000
//*********************************************************             00860000
//XMITF3   EXEC PGM=IKJEFT01                                            00870000
//SYSPRINT   DD SYSOUT=*                                                00880000
//SYSTSPRT DD  SYSOUT=*                                                 00890000
//RECVDSN DD DISP=SHR,DSN=SYSTECH.V1EAG.OBJLIB.XMIT                     00900000
//SYSTSIN  DD  *                                                        00910000
     RECEIVE  INDDNAME(RECVDSN)                                         00920000
                  DSNAME('SYSTECH.V1EAG.OBJLIB')                        00930000
//*                                                                     00940000
//*SCRATCH XMIT WORK FILE                                               00950000
//*********************************************************             00960000
//DELF4    EXEC PGM=IEFBR14                                             00970000
//XMITDS     DD DSN=SYSTECH.V1EAG.PROCLIB,                              00980000
//          DISP=(MOD,DELETE,DELETE),                                   00990000
//          UNIT=SYSDA,SPACE=(TRK,(50,20,20),RLSE),                     01000000
//          DCB=(LRECL=80,RECFM=FB,BLKSIZE=800)                         01010000
//*********************************************************             01020000
//*  F4 RELOAD XMIT PROCLIB RECEIVED                                    01030000
//*********************************************************             01040000
//XMITF4   EXEC PGM=IKJEFT01                                            01050000
//SYSPRINT   DD SYSOUT=*                                                01060000
//SYSTSPRT DD  SYSOUT=*                                                 01070000
//RECVDSN DD DISP=SHR,DSN=SYSTECH.V1EAG.PROCLIB.XMIT                    01080000
//SYSTSIN  DD  *                                                        01090000
     RECEIVE  INDDNAME(RECVDSN)                                         01100000
                  DSNAME('SYSTECH.V1EAG.PROCLIB')                       01110000
//*SCRATCH XMIT WORK FILE                                               01120000
//*********************************************************             01130000
//DELF5    EXEC PGM=IEFBR14                                             01140000
//XMITDS     DD DSN=SYSTECH.V1EAG.TUTDATA,                              01150000
//          DISP=(MOD,DELETE,DELETE),                                   01160000
//          UNIT=SYSDA,SPACE=(TRK,(50,20,20),RLSE),                     01170000
//          DCB=(LRECL=80,RECFM=FB,BLKSIZE=800)                         01180000
//*********************************************************             01190000
//*  F5 RELOAD XMIT TUTORIAL DATA RECEIVED                              01200000
//*********************************************************             01210000
//XMITF5   EXEC PGM=IKJEFT01                                            01220000
//SYSPRINT   DD SYSOUT=*                                                01230000
//SYSTSPRT DD  SYSOUT=*                                                 01240000
//RECVDSN DD DISP=SHR,DSN=SYSTECH.V1EAG.TUTDATA.XMIT                    01250000
//SYSTSIN  DD  *                                                        01260000
     RECEIVE  INDDNAME(RECVDSN)                                         01270000
                  DSNAME('SYSTECH.V1EAG.TUTDATA')                       01280000
//*                                                                     01290000
//*********************************************************             01300000
//*SCRATCH XMIT WORK FILE                                               01310000
//*********************************************************             01320000
//DELF6    EXEC PGM=IEFBR14                                             01330000
//XMITDS     DD DSN=SYSTECH.V1EAG.TUTJCL,                               01340000
//          DISP=(MOD,DELETE,DELETE),                                   01350000
//          UNIT=SYSDA,SPACE=(TRK,(50,20,20),RLSE),                     01360000
//          DCB=(LRECL=80,RECFM=FB,BLKSIZE=800)                         01370000
//*********************************************************             01380000
//*  F6 RELOAD XMIT TUTORIAL CTLCARD1 RECEIVED                          01390000
//*********************************************************             01400000
//XMITF6   EXEC PGM=IKJEFT01                                            01410000
//SYSPRINT   DD SYSOUT=*                                                01420000
//SYSTSPRT DD  SYSOUT=*                                                 01430000
//RECVDSN DD DISP=SHR,DSN=SYSTECH.V1EAG.TUTJCL.XMIT                     01440000
//SYSTSIN  DD  *                                                        01450000
     RECEIVE  INDDNAME(RECVDSN)                                         01460000
                  DSNAME('SYSTECH.V1EAG.TUTJCL')                        01470000
//*********************************************************             01480000
//*SCRATCH XMIT WORK FILE                                               01490000
//*********************************************************             01500000
//DELF6    EXEC PGM=IEFBR14                                             01510000
//XMITDS     DD DSN=SYSTECH.V1EAG.REPORTS,                              01520000
//          DISP=(MOD,DELETE,DELETE),                                   01530000
//          UNIT=SYSDA,SPACE=(TRK,(50,20,20),RLSE),                     01540000
//          DCB=(LRECL=80,RECFM=FB,BLKSIZE=800)                         01550000
//*********************************************************             01560000
//*  F7 RELOAD XMIT REPORTS RECEIVED                                    01570000
//*********************************************************             01580000
//XMITF7   EXEC PGM=IKJEFT01                                            01590000
//SYSPRINT   DD SYSOUT=*                                                01600000
//SYSTSPRT DD  SYSOUT=*                                                 01610000
//RECVDSN DD DISP=SHR,DSN=SYSTECH.V1EAG.REPORTS.XMIT                    01620000
//SYSTSIN  DD  *                                                        01630000
     RECEIVE  INDDNAME(RECVDSN)                                         01640000
                  DSNAME('SYSTECH.V1EAG.REPORTS')                       01650000
//                                                                      01840000
 




STEP
-5- Browse each of the 7 PDSs just built to see if they have content.  If the RECEIVE commands, fails, you will get messages in the job.  Problems occur if the XMIT file sent down was not pre-allocated to 80/3120/PS.  Or possibly the binary ftp was not correct.  

If you see members built, chances are 99.5% all is good.





STEP
-6- Link the executable EAGLE88C composite module.  

Locate the main link job in 'SYSTECH.V1EAG.CNTL(LINK88C). Change the file names to match your scheme.  Save it the changed name for later use with your names.   

CC=4 is acceptable.  It indicates a warning on the DB2 overrides.  That is normal and correct.

If LINK fails badly, check the OBJLIB for damaged members, call if you have issues.  I am guessing your FTP didn't come in clean, or I sent you a bad file, or gremlins. Email jrmull@eagle88.com with questions.

If the link worked, chances are 99.6% all is good.  



 
//*********************************************************
//*Link the EAGLE88c load module using the following JCL.  *
//*********************************************************
//LINK1  EXEC PGM=HEWL,PARM='LIST,LET,XREF,CALL,AMODE=31,RMODE=24'
//SYSLIB   DD DSN=company.V1EAG.LOADLIB,DISP=SHR
//SYSUT1   DD UNIT=SYSDA,SPACE=(1024,(100,10))
//SYSPRINT DD SYSOUT=*
//SYSLMOD  DD DSN=SYSTECH.V1EAG.LOADLIB,DISP=SHR
//SYSLIN   DD DSN=SYSTECH.V1EAG.OBJLIB(EAGLE88),DISP=SHR
//         DD DSN=SYSTECH.V1EAG.OBJLIB(EAGLE81),DISP=SHR
//         DD DSN=SYSTECH.V1EAG.OBJLIB(EAGLE82),DISP=SHR
//         DD DSN=SYSTECH.V1EAG.OBJLIB(EAGLE83),DISP=SHR
//         DD DSN=SYSTECH.V1EAG.OBJLIB(EAGLE84),DISP=SHR
//         DD DSN=SYSTECH.V1EAG.OBJLIB(EAGLE85),DISP=SHR
//         DD DSN=SYSTECH.V1EAG.OBJLIB(EAGLE86),DISP=SHR
//         DD DSN=SYSTECH.V1EAG.OBJLIB(EAGLE87),DISP=SHR
//         DD DDNAME=SYSIN
//SYSIN    DD *
  ENTRY EAGLE88
  NAME EAGLE88C(R)

/*



STEP
-7-  PROCLIB changes.  Review each member in 'SYSTECH.V1EAG.PROCLIB' and change the LOADLIB name to match your company naming scheme.

 
 
//EAGLE88 PROC RGN=4M,ERRORS=                                 
//******************************************                  
//*  EXEC EAGLE88 UTILITY                  *                  
//******************************************                  
//RUNEAGL EXEC PGM=EAGLE88C,PARM=&ERRORS,REGION=&RGN          
//STEPLIB   DD DSN=SYSTECH.V1EAG.LOADLIB,DISP=SHR             
//EAGLER01  DD SYSOUT=*,DCB=(BLKSIZE=133,LRECL=133,RECFM=FBA) 
//EAGLER02  DD SYSOUT=*,DCB=(BLKSIZE=133,LRECL=133,RECFM=FBA) 
//EAGLER03  DD SYSOUT=*,DCB=(BLKSIZE=133,LRECL=133,RECFM=FBA) 
//EAGLER04  DD SYSOUT=*,DCB=(BLKSIZE=133,LRECL=133,RECFM=FBA) 
//EAGLER05  DD SYSOUT=*,DCB=(BLKSIZE=133,LRECL=133,RECFM=FBA) 
//EAGLER06  DD SYSOUT=*,DCB=(BLKSIZE=133,LRECL=133,RECFM=FBA) 
//EAGLECMD  DD DDNAME=SYSIN
//*       PEND

 
STEP
-8-  Run TESTPRT from the provided JCL lib.  Return code = 0 should occur.   


SYSTECH.V1EAG.CNTL(TESTPRT)


//SYSTECH1 JOB (123),'SYSTECH',CLASS=A,MSGCLASS=T,MSGLEVEL=(1,1), 
//             NOTIFY=SYSTECH                                     
//PLIB    JCLLIB ORDER=(COMPANY.EAGVL704.PROCLIB)              <<<change this to match your name        
//STEP001 EXEC EAGLE88                                            
//IN  DD *                                                        
REC1                                                              
REC2                                                              
REC3                                                              
//SYSIN     DD *                                                  
************************                                          
* EAGLE88 COMMANDS     *                                          
************************                                          
LOOP  READ  IN                                                    
      PRINT IN                                                    
      DUMP  IN                                                    
      DUMPH IN                                                    
      GOTO  LOOP.                                                 
/*  
//  



STEP
-9-   

The User manual has a Tutorial section with six lessons.  The test data and JCL are prebuilt and stored in the "Tutorial" files. 
 
A valid job card needs to be pasted in and file names matching your company naming scheme is needed.  Each job will execute with cc=0 and provide useful reports for the students. 


If these job runs, chances are 101% all is good.  



WRAPUP
========


Your comments and corrections are welcome to make this install easier.  Feel free to email a specific business task you would like to perform.  I will return with a possible solution using Eagle88.
 

Regards 

John Mull
630-759-4805
jrmull@eagle88.com



