Defining the 3270 interface



The example application is supplied with a 3270 user interface to run the application and to customize it. The user interface consists of two transactions, EGUI and ECFG. A third transaction, ECLI, is used for the CICS® web service client.

About this task

Optional: Those users that do not use CICS Explorer can use the CEDA transaction to amend and install the resources contained in groups DFH$EXBS and DFH$EXWS.

Procedure

  1. Create transaction definitions for the following transactions using the CICS Explorer®.
    The correct operation of the example application does not depend on the names of the transactions, so you can use different names.
    EGUI
    1. Copy the definitions for transaction EGUI from the CICS supplied group DFH$EXBS by right-clicking DFH$EXBS in the Resource Group Definitions view.
    2. Select New > Transaction Definition.
    3. Type EGUI in the Name text box, specify a name in the Resource/CSD Group text box, and DFH0XGUI in the Program Name text box.
    4. Click Finish to create the EGUI transaction definition.

    Use the default values for all other attributes.

    ECFG
    1. Copy the definitions for transaction ECFG from the CICS supplied group DFH$EXBS by right-clicking DFH$EXBS in the Resource Group Definitions window.
    2. Select New > Transaction Definition.
    3. Type ECFG in the Name text box, specify a name in the Resource/CSD Group text box, and DFH0XCFG in the Program Name text box.
    4. Click Finish to create the ECFG transaction definition.

    Use the default values for all other attributes.

    ECLI (optional)
    1. Copy the definitions for transactions ECLI from the CICS supplied group DFH$EXWS by right-clicking DFH$EXWS in the Resource Group Definitions view.
    2. Select New > Transaction Definition.
    3. Type ECLI in the Name text box, specify a name in the Resource/CSD Group text box, and DFH0XCUI in the Program Name text box.
    4. Click Finish to create the ECLI transaction definition.

    Use the default values for all other attributes.

  2. Optional: If you do not want to use program autoinstall, copy the PROGRAM definitions for the base application programs and the MAPSET definitions for the BMS maps from the CICS supplied group DFH$EXBS.
    1. Copy the MAPSET resource definitions for the BMS maps in members DFH0XS1, DFH0XS2, and DFH0XS3.
      For details of what is in each member, see Components of the base application.
    2. Copy the PROGRAM resource definitions for the following COBOL programs.
      Table 1. SDFHSAMP members containing COBOL source for the base application
      Member name Description
      DFH0XCFG Program invoked by transaction ECFG to read and update the VSAM configuration file.
      DFH0XCMN Controller program for the catalog application. All requests pass through the controller program.
      DFH0XGUI Program invoked by transaction EGUI to manage the sending of the BMS maps to the terminal user and the receiving of the maps from the terminal user. This program links to program DFH0XCMN.
      DFH0XODE One of two versions of the endpoint for the order dispatch web service. This is the version that runs in CICS. This program sets the text " Order in dispatch " in the return COMMAREA.
      DFH0XSDS A stubbed or dummy version of the data store program that allows the application to work when the VSAM catalog file has not been set up. DFH0XSDS uses data defined in the program rather than data stored in a VSAM file.
      DFH0XSOD A stubbed version of the order dispatch program. It sets the return code in the COMMAREA to 0 and returns to its caller. DFH0XSOD is used when outbound web services are not required.
      DFH0XSSM A stubbed version of the stock manager (replenishment) program. DFH0XSSM sets the return code in the COMMAREA to 0 and returns to its caller.
      DFH0XVDS The VSAM version of the data store program. DFH0XVDS accesses the VSAM file to perform reads and updates of the catalog.
      DFH0XWOD The web service version of the order dispatch program. DFH0XWOD issues an EXEC CICS INVOKE WEBSERVICE to make an outbound web service call to an order dispatcher.
      Use the default values for all other attributes.
    3. Optional: Copy the PROGRAM definitions for DFH0XCUI from the CICS supplied group DFH$EXWS.
      Use the default values for all other attributes. This program is required if you want to use transaction ECLI that starts the web service client.
       DIS G(DFH$EXWS)
      ENTER COMMANDS
      NAME TYPE GROUP
      DFH0XCUI PROGRAM DFH£EXWS
      ECLI TRANSACTION DFH£EXWS
      EXMPPORT TCPIPSERVICE DFH£EXWS
      EXPIPE01 PIPELINE DFH£EXWS
      EXPIPE02 PIPELINE DFH£EXWS