Create a CLIST or Job to Invoke FOCUS and Verify Adapter Installation

Reference:

You must create a batch job or CLIST that you can use to invoke FOCUS with the adapter.


Top of page

x
Reference: Creating a Batch Job to Invoke FOCUS

Create a job by adding a JOB card and editing the following sample JCL to conform to the standards at your site.

job card goes here
//SQLMX    EXEC PGM=FOCUS,REGION=0M                                  
//STEPLIB  DD DSN=hlq.FOCLIB.LOAD,DISP=SHR           
//ERRORS   DD DSN=hlq.GOOD.DBCCLI.CFG,DISP=SHR                    
//         DD DSN=hlq.ERRORS.DATA,DISP=SHR              
//FOCLIB   DD DSN=hlq.FOCLIB.LOAD,DISP=SHR          
//SYSPRINT DD SYSOUT=*                                               
//FOCEXEC  DD DSN=hlq.FOCEXEC.DATA,DISP=SHR                    
//MASTER   DD DSN=hlq.MASTER.DATA,DISP=SHR                 
//ACCESS   DD DSN=user.ACCESS.LIBRARY,DISP=SHR    
//SYSIN DD *                                                     
   ENGINE SQLDBC ?
  FIN                                              
/*

where:

hlq

Is the high-level qualifier for your FOCUS production data sets.

user

Is the high-level qualifier for the private version of a data set.

In this example, hlq.FOCUS.DBCCLI.CFG has the members EDASERVE and FOCPROF in them.

If the job produces a list of SET parameter values, the adapter installation is verified.


Top of page

x
Reference: Creating a CLIST to Invoke FOCUS Interactively

Create a CLIST by editing the following sample CLIST to conform to the standards at your site.

ALLOC F(ERRORS)  DA('hlq.DBCCLI.CFG' +
                    'hlq.ERRORS.DATA') SHR REUSE
ALLOC F(FOCLIB)  DA('hlq.FOCLIB.LOAD') SHR REUSE
ALLOC F(FOCEXEC) DA('hlq.FOCEXEC.DATA') SHR REUSE
ALLOC F(MASTER)  DA('hlq.MASTER.DATA') SHR REUSE
ALLOC F(ACCESS)  DA('user.ACCESS.LIBRARY') SHR REUSE
CALL 'hlq.FOCLIB.LOAD(FOCUS)'

where:

hlq

Is the high-level qualifier for your FOCUS production data sets.

user

Is the high-level qualifier for the private version of a data set.

In this example, hlq.DBCCLI.CFG has the members EDASERVE and FOCPROF in them.

Use your CLIST to invoke FOCUS, and issue the following command at the FOCUS prompt.

ENGINE SQLDBC ?

If the command produces a list of SET parameter values, the adapter installation is verified.

Issue the following command to exit FOCUS.

FIN

Information Builders