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

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

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.

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