Screen Protect/Unprotect Utility

Introduction

Certain systems, at times, require input from various user offices to be terminated. However, input should still be permitted for certain core offices. The SCTU application was developed for CICS to accommodate this. It uses two tables to control processing. The first table, SUT, controls the options available to the SCTU utility. In general, this is a control table and need not be of any concern. The second table, SST, contains the parameters about which operator IDs need to be modified.

The basic process here is to provide two sets of operator ID profiles, one for unprotected or normal mode and another set for protected mode. The protected set should be a copy of the unprotected profile with desired screens specified for inquiry only.

For example, operator profile 9701 may be a general departmental user profile. A second profile, say 9801, would be set up identical to 9701 except that screens that are to be inquiry only during protected mode will exist at the start of the profile.

The SST Table

This table has a key composed of 3 parts and three data fields. The key is comprised as follows:

  1. System Identifier (3 bytes). This is the SCT numeric system identifier (ZSS=000, SIS=001, FRS=002, HRS=003, LMS=005)
  2. Operator ID (4 bytes). This is the operator ID that is a profile that is used in unprotected mode. Any operator ID having this operator ID as its Screen Pointer will be processed.
  3. Type indicator (1 byte). A P indicates this entry is used to put the system into protected mode. A U indicates the entry is for unprotected mode

The table entry has three data fields as follows:

  1. New operator ID profile (4 bytes). This is the new profile operator ID that will be used for protected or unprotected mode.
  2. Description (40 bytes). This is an optional description field that identifies this table entry.
  3. Logon Screen. If specified, this screen will be inserted into this operator ID's security record as its initial screen. If all asterisks (***) are specified, the default logon screen for the system is used.

Sample SST Table Entry:

The key indicates this entry to be for system 003 (HRS), for operator IDs having a screen pointer of 9701, for entering protected mode.

All operator IDs having 9701 as a screen pointer will have their screen pointers changed to 9801 and will have an initial logon screen of 01A.

Invocation

Online

In the online environment, invoke this function by entering the following CICS command:

SCTU,xxx,yyy

where xxx is the function. Use function 003 to go into protected mode. Use function 004 to revert to unprotected or normal mode; and

where yyy is the SCT system number (000=ZSS, 001=SIS, 002=FRS, 003=HRS and 005=LMS).

Batch

This can be invoked in the batch environment by using Batch CAFC. Here is a JCL step to invoke the function: 

//*********************************************************************
//*****    AFCBATCH:  INVOKE BATCH CAFC
//*********************************************************************
//AFCBATCH EXEC  AFCBATCH,APPLID=PROD
//AFCBATCH.SYSIN  DD  *
CP1I,TRAN,AFSG                                                         C
CP1I,TRAN,SCTU,xxx,yyy                                                 C
CP1I,TRAN,CESF LOGOFF                                                  E
/*

where xxx and yyy are defined as above.

OIT--Applications Support


Last Modified: Tuesday, 28-Nov-2000 11:00:16 CST

©1999 All Rights Reserved