Previous Topic Next topic Print topic


Set Up and Run the ACCT Application

Having created and configured an enterprise server instance with Mainframe Subsystem Support for the ACCT application, you can now use a TN3270 Mainframe emulator to run it.

If you have Micro Focus Rumba 8.3 or later installed on your machine and licensed (for example, if you have installed Rumba as part of your Enterprise Developer installation), the default TN3270 Mainframe emulator is a TN3270 Mainframe Rumba display embedded in the IDE.

Configuring the TN3270 Properties

Ensure that the IDE is configured to use the embedded Rumba emulator to run mainframe applications:

  1. In the IDE, click Tools > Options.
  2. Expand Micro Focus, and click TN3270 Display.
  3. Ensure that Enable Display is checked and that the Rumba (Embedded) display option is selected.
  4. Ensure that Connect automatically is checked.
  5. Click OK.

Open the Embedded Rumba Display

Now that you have configured an enterprise server and have associated the server with your CICS project, you can start the embedded Rumba Display as follows:

  1. Ensure that the ACCT server is running and that it is associated with your project.
  2. Right-click the ACCT project in Solution Explorer, and click Show TN3270 Display.

    This opens the embedded Rumba Display inside the IDE and connects it to the ACCT application running in the ACCT enterprise server.

Note: If the embedded embedded TN3270 Rumba display is not available, for example, if you are using an older version of Rumba which does not support integration with Enterprise Developer, you can start the Rumba Desktop application outside of the IDE and connect it to the ACCT server.

First, you need to find out which TN3270 port your ACCT server is using (the server must be running):

  1. In the IDE, right-click Micro Focus Servers in Server Explorer and click Administration.
  2. On the homepage of Enterprise Server Administration, click Edit on the row of the ACCT server.
  3. Click the Listeners tab and make a note of the TN3270 port number that the server uses.

Then, to connect Rumba Desktop to the ACCT server:

  1. Use a host name of 127.0.0.1 and the TN3270 port number you wrote down earlier to connect Rumba Desktop to the ACCT enterprise server.
  2. Clear the CESN login screen as security is not enabled - in Micro Focus Rumba you need to press CTRL+SHIFT+Z.

Initialize the VSAM file of the application

The first time you connect to the ACCT server you also need to initialize the application VSAM file as follows:

  1. Type CFCR ACCTFIL and press Enter to initialize the VSAM files for the application.

    You should receive a message indicating that the file was successfully created.

If the ACCTFIL VSAM was previously initialized, a message appears explaining that the ACCTFIL already exists. This might be the case, especially if you have previously run this tutorial.

Clear the screen of the emulator and run the application as described earlier in this tutorial.

Start the CICS Transaction

  1. Clear the CESN login screen as security is not enabled - in Micro Focus Rumba you need to press CTRL+SHIFT+Z.
  2. Enter ACCT. This shows the initial screen of our application.

    CICS Application in the Rumba Mainframe Display

Add Two Records

You will use the records you create here later on in the tutorial.

  1. Tab to the REQUEST TYPE field and type A.
  2. In the ACCOUNT field, type 11111.
  3. Press Enter.
  4. Complete the fields on the NEW RECORD screen as follows, pressing the Tab key to advance from one field to another.
    Note:
    • Of the three ADDRESS fields, complete only the first two.
    • Screen fields not represented in this table are not mandatory and can be ignored.
    SURNAME Washington
    FIRST George
    TITLE Pres
    TELEPHONE 7037802000
    ADDRESS Mt. Vernon Estate
      Mt. Vernon, VA 22121
    NO. CARDS ISSUED 1
    DATE ISSUED 07 04 76
    REASON N
    CARD CODE 1
    APPROVED BY JF
  5. Press Enter.
  6. Tab to the REQUEST TYPE field and type A.
  7. In the ACCOUNT field, type 11112 and press Enter.
  8. Repeat step 4, substituting the following data:
    SURNAME Jefferson
    FIRST Thomas
    TITLE Pres
    TELEPHONE 4349849800
    ADDRESS Monticello
      C'sville, VA 22902
    NO. CARDS ISSUED 3
    DATE ISSUED 07 04 76
    REASON N
    CARD CODE 1
    APPROVED BY JF
  9. Press Enter to return to the Menu.

Display a Record

  1. Tab to the REQUEST TYPE field.
  2. Type D to display a record.
  3. In the ACCOUNT field, type 11111.
  4. Press Enter. This displays the record retrieved from the database.

    CICS Application in the Rumba Mainframe Display

  5. Clear the screen of your TN3270 emulator to exit the application.
Previous Topic Next topic Print topic