Selecting FOCUS Default Startup Options

Member FOCPARM in ERRNLS.DATA is executed before FOCPROF and before each user's PROFILE FOCEXEC. It may only include SET commands. The FOCPARM file shipped with FOCUS follows:

-*--------------------------------------------------------------------*
-* THIS SECTION CONSISTS SOLELY OF SET COMMANDS USED TO CUSTOMIZE     *
-* THE BEHAVIOR OF FOCUS AT YOUR SITE. PLEASE NOTE THAT ONLY SET      *
-* COMMANDS ARE SUPPORTED, AND THAT ANY OTHER FOCUS COMMANDS ARE      *
-* NOT PERMITTED AND WILL FORCE YOU OUT OF FOCUS. THIS MEMBER MAY     *
-* NOT BE USED AS A PROFILE EXCEPT FOR SET COMMANDS.                  *
-*--------------------------------------------------------------------*
SET EMPTYREPORT=OFF                                                     
SET BLKCALC=NEW                                                         
SET FIELDNAME=NEW                                                       
SET QUALCH=.                                                            
SET QUALTITL=OFF                                                        
SET HOLDSTAT=OFF                                                        
SET HOTMENU=OFF                                                         
SET IMMEDTYPE=OFF                                                       
SET AUTOPATH=ON                                                         
SET AUTOINDEX=ON                                                        
SET COLLATION=BINARY                                                    
SET JOINLM=RANGE                                                        
-*FOR A MORE CONSERVATIVE ENVIRONMENT, ACTIVATE THE FOLLOWING SETTINGS: 
-*SET EMPTYREPORT=ON                                                    
-*SET BLKCALC=OLD                                                       
-*SET FIELDNAME=OLD                                                     
-*SET AUTOPATH=OFF                                                      
-*SET AUTOINDEX=OFF                                                  
-*FOR A MORE AGGRESSIVE ENVIRONMENT, ACTIVATE THE FOLLOWING SETTINGS:
-*SET HOLDSTAT=ON                                                    
-*SET HOTMENU=ON                                                     
-*SET IMMEDTYPE=ON                                                   
-*SET CACHE=256                                                      
-*SET QUALTITL=ON                                                    
-*SET PRINTPLUS=ON                                                   

FOCPROF is a global profile for FOCUS that can contain any command valid in a FOCEXEC, including: TABLE, MATCH, MODIFY, MAINTAIN, REBUILD, COMPILE, LOAD, Dialogue Manager commands, TSO commands and DYNAM commands.

This gives you three FOCUS profiles: FOCPARM, FOCPROF, and PROFILE. FOCPARM and FOCPROF files are members of the ERRNLS PDS. The PROFILE file is a member of the FOCEXEC PDS. Their order of execution is:

1. FOCPARM, which can only contain FOCUS SET commands.
2. FOCPROF, a global profile.
3. PROFILE.

Create a new member of the ERRNLS PDS named FOCPROF and include any commands you wish to have executed each time FOCUS is invoked.

The ODIN communication file can contain nodes that enable access to remote servers (see the Overview and Operating Environments manual) and that point sink machines and clients to subsystems that have been generated with non-default names.

The ODIN file can be used to control the name of the subsystem that is used for communication using the SBS protocol. SBS is the data exchange protocol on z/OS that uses the subsystem. The subsystem is a named driver resident in the host operating system.

The following rules determine the subsystem name for the FOCUS Database Server (sink machine). You must first have installed a subsystem with that name and started the subsystem, using the jobs described in Subsystem Sample JCL and Zaps:

1. If ODIN exists, and there is a block with PROTOCOL=SBS that has a variable named SUBSYS within its body, the value of the SUBSYS variable is used as the subsystem name.
2. Else, if there is an environment variable named IBIS and it is not empty, its value is used as the subsystem name.
3. Otherwise, the default name IBIS is used as the subsystem name.

The following are CLIENT-side rules that determine the subsystem name (for example SUB1):

1. If ODIN exists, and there is a block NODE=SUB1 with CLASS=SUCLIENT in its body, and the body has a variable named SUBSYS, the value of this SUBSYS variable is used as a subsystem name.
2. Otherwise, the previous rules for the sink machine are used.

When there is no ODIN file, or this file does not have any SUBSYS settings, the subsystem name is controlled by the IBIS environment variable. Its value can be set in the JCL by using one of the following methods:

• Using the ENVAR parameter. For example, the following EXEC card sets the variable IBIS to the value IBIT:

  //FOCSINK  EXEC  PGM=HLISNK,PARM='ENVAR(IBIS=IBIT)/ ECHO'

  This technique is not limited to HLISNK, but can be used for any startup, including FOCUS and HLI programs.

• Using an EDAENV DD card. For example, the following DD card sets the variable IBIS to the value IBIT:

  //EDAENV DD *
  IBIS=IBIT

PROTOCOL=SBS
BEGIN
  SUBSYS=ABCD
END

PROTOCOL=SBS
BEGIN
  SUBSYS=ABCD
END

NODE=FOCSBS
BEGIN
  CLASS=SUCLIENT
  PROTOCOL=SBS
  SUBSYS=IBIT
  SERVICE=USER1.FOCSU.DATA
END

NODE=FOCSBS
BEGIN
  CLASS=SUCLIENT
  PROTOCOL=SBS
  SUBSYS=IBIT
  SERVICE=USER1.FOCSU.DATA
END