Focal Point Banner


As of December 1, 2020, Focal Point is retired and repurposed as a reference repository. We value the wealth of knowledge that's been shared here over the years. You'll continue to have access to this treasure trove of knowledge, for search purposes only.

Join the TIBCO Community
TIBCO Community is a collaborative space for users to share knowledge and support one another in making the best use of TIBCO products and services. There are several TIBCO WebFOCUS resources in the community.

  • From the Home page, select Predict: WebFOCUS to view articles, questions, and trending articles.
  • Select Products from the top navigation bar, scroll, and then select the TIBCO WebFOCUS product page to view product overview, articles, and discussions.
  • Request access to the private WebFOCUS User Group (login required) to network with fellow members.

Former myibi community members should have received an email on 8/3/22 to activate their user accounts to join the community. Check your Spam folder for the email. Please get in touch with us at community@tibco.com for further assistance. Reference the community FAQ to learn more about the community.


Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     FOCUS ON THE MAINFRAME

Read-Only Read-Only Topic
Go
Search
Notify
Tools
FOCUS ON THE MAINFRAME
 Login/Join
 
JOE
Platinum Member
posted
HELP! I HAVE TO WRITE FOCUS ON THE MAINFRAME WITH JCL. WHEN YOU CREATE YOUR MASTER FILE HOW DO YOU LINK THIS TO YOUR FOCEXCE FILE. ALSO, THE DATA FILE IS FROM A BATCH OR COPYBOOK FILE. HOW DO YOU CONTECT THIS WITH YOUR MASTER FILE. THIS IS A LOT DIFFERENT THAT A STRAIGHT TEXT FILE. ANY TUTORIALS AVAILABLE.

THANKS,

JOE


WebFocus 7.7.02 WinXP
 
Posts: 236 | Registered: May 12, 2006Report This Post
Francis Mariani
Expert
posted Hide Post
NOT SO LOUD, JOE Smiler (Unless, of course, you're writing to us from a mainframe terminal!)

An example JCL:

//YSMIC99P JOB (ZIZICG),'FRANCIS MARIANI',
//         MSGCLASS=T,NOTIFY=????????
//*
/*JOBPARM ROOM=O030
//*
/*ROUTE PRINT RMT225
//*
//HBCLIB JCLLIB ORDER=(YSMIC.FOCUS.PROCLIB)
//*
//***      FOCUS STEP
//*
//FOCUS    EXEC FOCUS
//MASTER   DD DSN=YSMIC.FM.MASTER,DISP=SHR
//FOCEXEC  DD DSN=YSMIC.FM.FOCEXEC,DISP=SHR
//FILEONE  DD DSN=YSMIC.FILE.ONE,DISP=SHR
//SYSIN    DD *
  EXEC PROGRAMME
  FIN
/*
//*


Masters are stored in the YSMIC.FM.MASTER library.
A member in the Master library is required with the same name as the DDNAME of the file allocated, eg. FILEONE.

What is the format of this "batch or copybook" file?


Francis


Give me code, or give me retirement. In FOCUS since 1991

Production: WF 7.7.05M, Dev Studio, BID, MRE, WebSphere, DB2 / Test: WF 8.1.05M, App Studio, BI Portal, Report Caster, jQuery, HighCharts, Apache Tomcat, MS SQL Server
 
Posts: 10577 | Location: Toronto, Ontario, Canada | Registered: April 27, 2005Report This Post
Jim Morrow
Platinum Member
posted Hide Post
Joe:

Here is a sample of the JCL. You will of course have to change the data set names.

//FOCUS1 EXEC PGM=FOCUS
//STEPLIB DD DSN=SYSTFOC.FOCUS.LOAD,DISP=SHR
//USERLIB DD DSN=SYSTFOC.FUSELIB.LOAD,DISP=SHR
//ERRORS DD DSN=SYSTFOC.ERRORS.DATA,DISP=SHR
//SYSPRINT DD SYSOUT=*
//OFFLINE DD SYSOUT=*
//FOCSORT DD UNIT=SYSDA,SPACE=(CYL,(30,30))
//FOCEXEC DD DSN=G36297.FOCUSCLS.FOCEXEC,DISP=SHR
//MASTER DD DSN=G36297.FOCUSCLS.MASTER,DISP=SHR
//EMPLOYEE DD DSN=G36297.FOCUSCLS.EMPLOYEE.FOCUS,DISP=SHR
//SYSIN DD *
EX $DOTHIS
FIN

The MASTER DD statement pints to a PDS library one of the members called “EPLOYEE” is the master file description for the file pointed to the by the EMPLOYEE DD statement. “hen you say” TABLE FILE EMPLOYEE mainframe FOCUS brings these together and produces your report.

The FOCEXEC DD statement points t a PDS library one of the members called “$DOTHIS” This is the what will be run by the EX $DOTHIS


Jim Morrow
Web Focus 7.6.10 under Windows 2003
MVS 7.3.3



 
Posts: 129 | Registered: June 01, 2005Report This Post
JOE
Platinum Member
posted Hide Post
Thanks for your help. I’ll give these two a try and get back to you. What does //SYSIN DD * mean.

Thanks,


WebFocus 7.7.02 WinXP
 
Posts: 236 | Registered: May 12, 2006Report This Post
Francis Mariani
Expert
posted Hide Post
//SYSIN DD *

is the generic JCL statemewnt where you provide input to the program being executed in the JCL step.

In this case the program is FOCUS and the FOCUS program (fex) you want to execute is called $DOTHIS or PROGRAMME.

The FIN statement is required after the FOCUS commands or the JCL step will complete with a condition code of 16, which is an error.


Francis


Give me code, or give me retirement. In FOCUS since 1991

Production: WF 7.7.05M, Dev Studio, BID, MRE, WebSphere, DB2 / Test: WF 8.1.05M, App Studio, BI Portal, Report Caster, jQuery, HighCharts, Apache Tomcat, MS SQL Server
 
Posts: 10577 | Location: Toronto, Ontario, Canada | Registered: April 27, 2005Report This Post
  Powered by Social Strata  

Read-Only Read-Only Topic

Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     FOCUS ON THE MAINFRAME

Copyright © 1996-2020 Information Builders