x

FOCPARM ERRORS is executed before each user's PROFILE FOCEXEC, and may only include FOCUS SET commands. FOCUS SET commands are documented in the Developing Applications manual.

The sample FOCPARM ERRORS provided on the FOCUS cartridge is shown below:

-*--------------------------------------------------------------------*
-*  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 TRACEOFF=ALL
SET EMPTYREPORT=OFF
SET FIELDNAME=NEW
SET QUALCH=.
SET QUALTITL=OFF
SET HOLDSTAT=OFF
SET HOTMENU=OFF
SET IMMEDTYPE=OFF
SET AUTOPATH=ON
SET AUTOINDEX=ON
SET POOLRESERVE=1024
-*FOR A MORE CONSERVATIVE ENVIRONMENT, ACTIVATE THE FOLLOWING SETTINGS:
-*SET EMPTYREPORT=ON
-*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

x

An assembly language file called FOCPARM has also been provided, which enables sites to change startup default options, including some that may not be specified in SET commands.

This file contains instructions for changing the following startup options:

• Displaying the FOCUS banner (BANNER).
• Clearing the screen (CLRSCRN).
• National Language Support Defaults (LANG).
• Selecting an alternative PROFILE or no PROFILE (PROFOPT).
• Continental Decimal Notation (CDN).

The maximum number of data exceptions (DELIMIT) is no longer set using FOCPARM ASSEMBLE. Use the SET MAXDATAEXCP command to establish the maximum number of data exceptions. If you do not change this value, 10 data exceptions will be allowed. See the Developing Applications manual for information on this parameter.

The options may be changed by replacing old options with new ones, and then assembling and linking the options into FOCUS. The default values in the sample FOCPARM provided with FOCUS follow. The value 1 enables an option; the value 0 disables an option:

FOCPARM  CSECT ,
BANNER   DC    F'1'                    Indicates display banner
CLRSCRN  DC    F'1'                    Clear screen at startup
*
* National Language Support defaults
*
LANG     DC    F'1'                    Language Number  (INTLCM)
JTERM    DC    CL8'IBM3270'            J-Terminal       (INTLCM)
*
* DELIMIT defines the number of data exceptions (DataExceptionLIMIT)
* FOCUS will handle before termination.
* Set DELIMIT to ZERO (F'0') for an unlimited number of exceptions.
* When the limit is reach the following message will be issued:
* (FOC204) TOO MANY INTERRUPTS. RUN TERMINATED
* and FOCUS will terminate
*
DELIMIT  DC    F'10'                   no longer used
         DC    F'0'                    Available
         DC    F'0'                    Available
*
PROFOPT  DC    F'1'                    NOPROF / PROFILE 0 = disallow
*                                      PROFILE and NOPROF options on
*                                      FOCUS entry
*                                      1=allow user to specify NOPROF
CDN      DC    F'0'                    cdn setting 0=off 1=on
XDBSC    DC    CL4'@'                  character for ext. db security
PCHOLD   DC    F'1'                    pchold flag
TTFEX    DC    CL4'PDS'                dsorg of tabltalk focexec
DATTIM   DC    CL4'EDA'                date/time format
*
* DO NOT ADD, DELETE, OR CHANGE ORDER OF THE CURRENT OPTIONS
* ADD NEW OPTIONS AT THE END OF THE COMMON
*
         DC    (256-(FOCPARM-*))X'00'  pad to 256 bytes            

Note: Since each installation of FOCUS generates its own version of the FOCPARM options, the procedures outlined below must be performed each time a new release of FOCUS is installed.

1. Edit the file FOCPARM ASSEMBLE (using XEDIT or your system's equivalent), to revise the options as needed.
2. After making the change, file FOCPARM back onto the maintenance disk.
3. Assemble the file FOCPARM ASSEMBLE with the following command, ensuring that the resulting TEXT file is located on the maintenance disk:

   ASSEMBLE FOCPARM

The new version of FOCPARM ASSEMBLE must precede the old version in the CMS search order.