Mainframe Tips, Tricks And Tutorials: QA Hiperstation

Compuware Hiperstation is a suite of tools that streamlines the testing process and helps improve the quality of your applications. The Hiperstation tool suite offers these products:

•Hiperstation for VTAM provides the means for testing applications that use a 3270 user interface, or SNA LU0/LU2 communication protocols via unattended and interactive tools. It also provides an Automated Testing Vehicle (ATV) Manager and an auditing function for security monitoring.

•Hiperstation for Mainframe Servers includes support for testing applications using HTTP and HTTPS protocols. It includes SNA testing support and expands this support to test APPC/LU6.2 applications.

•Hiperstation for WebSphere MQ enables the testing of applications that use WebSphere MQ.

All of the Hiperstation products include the following functions:

•Record: Captures user sessions on a keystroke-by-keystroke or message-by-message basis. This is accomplished through a global record function for ALL components and interactively in the case of 3270 applications.

•Playback: Re-executes previously recorded sessions either online in interactive or non-stop mode, or in a batch job.

•Comparison: Compares the output of the current playback session with the recorded session.

Each of the components also has specific capabilities to aid testing in their respective environments. For advanced testing, Hiperstation incorporates IBM's REXX script language, allowing you to customize and enhance script creation, playback, and reporting.

This article explains how to record the CICS transactions that you execute in a CICS region in a dataset using QA Hiperstation.

Select option “1” for “Hiperstation for VTAM”

------------------------ Hiperstation - Product Menu --------------------------

Option ===> 1

0 Hiperstation Profiles Set user profiles

1 Hiperstation for VTAM VTAM Application Testing

2 Hiperstation for Mainframe Server SNA/APPC & HTTP Testing (Not licensed)

3 Hiperstation for WebSphere MQ WebSphere MQ Message Tes (Not licensed)

Profile ===>

Profile dataset ===>

Leave Profile blank for selection list

Leave Profile dataset blank to create new dataset

Leave both blank to run with no Profile

See Hiperstation frequently asked questions at:

http://frontline.compuware.com

Unpublished-rights Reserved Under the Copyright Laws of the United States .

Type LEGAL on the command line for Copyright/Trade Secret Notice information

Select option “1”

------------------------- Hiperstation - Main Menu --------------------------

Option ===> 1

Product Release: 07.08.00

1 Domain Traveler Record and Playback

2 Quick Play Select a Script and Go

3 Session Demo Demonstrate Online Applications

4 Global Recording System and Application Test Creation

5 Archive/Search Audit and Help Desk Functions

6 Script Processors Automatic Script Editing

7 Unattended Processing Setup Unattended Playback and Compare Jobs

8 File Manager File Manager

9 ATV Manager Automated Testing Vehicle (ATV) Manager

Type CICS region name as shown below

------------------------ Hiperstation * Domain Traveler -----------------------

Command ===>

Use this panel to connect to one of your site's domains. When

connected you can record your session or play back previous sessions.

Domain Destination . CICSTEST

Change session options (Enter "/")

Start = ISPF , Zoom = F23 , LUName = Default , Restore Keyboard

Logmode = D4A32782 , Model = 3-(32X80) , SNA = Yes , Queriable = Yes

Application Profiling(Off) , IMS = Y

Type command “ RECORD ON ” to record the transactions

ZOOM:F23 ------------------ HIPERSTATION ------------------------ LINE 1 OF 24

Command ===> record on Scroll ===> PAGE

Record OFF Play OFF Journal OFF Compare Log OFF autoDoc OFF

Signon to CICS APPLID CICSTEST

WELCOME TO CICS/TS 4.1.0 REGION CICSTEST

Type your userid and password, then press ENTER:

Userid . . . . Groupid . . .

Password . . .

Language . . .

New Password . . .

In the ISPF 3.2 screen allocate a PDS as shown below.

Menu RefList Utilities Help

ssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss

Allocate New Data Set

Command ===>

More: +

Data Set Name . . . : TSUXXXX.QAH

Management class . . . (Blank for default management class)

Storage class . . . . (Blank for default storage class)

Volume serial . . . . (Blank for system default volume) **

Device type . . . . . (Generic unit or device address) **

Data class . . . . . . (Blank for default data class)

Space units . . . . . CYLINDER (BLKS, TRKS, CYLS, KB, MB, BYTES

or RECORDS)

Average record unit (M, K, or U)

Primary quantity . . 2 (In above units)

Secondary quantity 2 (In above units)

Directory blocks . . 0 (Zero for sequential data set) *

Record format . . . . VB

Record length . . . . 256

Block size . . . . .

Data set name type LIBRARY (LIBRARY, HFS, PDS, LARGE, BASIC, *

EXTREQ, EXTPREF or blank)

Extended Attributes (NO, OPT or blank)

Type the PDS allocated above with a member as shown below

------------------------ Hiperstation * Recording Setup -----------------------

Command ===>

Recording File Name:

Project . . . .

Group . . . . .

Type . . . . .

Member . . . . (Blank or pattern for member selection list)

Other Dsn . . . 'TSUXXXX.QAH(TEST)'

Description . .

Recording Options:

Enter "/" to select option

Replace Like Member(s)

/ Format Recording

Record Inputs Only

Stop Recording

/ Script Recovery

Input fields in (row,column) format

File Manager

Press ENTER to begin recording, END to cancel setup.

Below screen shows that Hiperstation is ready to record your transaction

ZOOM:F23 ------------------ HIPERSTATION --------------- RECORDING IN PROGRESS

Command ===> Scroll ===> PAGE

Recording TEST Play OFF Journal OFF Compare Log OFF autoDoc OFF

Signon to CICS APPLID CICSTEST

WELCOME TO CICS/TS 4.1.0 REGION CICSTEST

Type your userid and password, then press ENTER:

Userid . . . . Groupid . . .

Password . . .

Language . . .

New Password . . .

Use Shift+PF11 to toggle between the Hiperstation menu and the region. Pressing Shift+PF11 key in the above screen, shows the below CICS screen in full screen mode.

Signon to CICS APPLID CICSTEST

WELCOME TO CICS/TS 4.1.0 REGION CICSTEST

Type your userid and password, then press ENTER:

Userid . . . . TSUXXXX Groupid . . .

Password . . .

Language . . .

New Password . . .

DFHCE3520 Please type your userid.

F3=Exit

Completed the above sign on screen and entered “CMAC” transaction.

CMAC

DFHCE3549 Sign-on is complete (Language ENU).

Type “ASRA” to see the explanation

DFHCMC01 Display On-line Messages and Codes

Type the required message identifier, then press Enter.

Component ID. . . . (for example, TC for Terminal Control

FC for File Control, etc.)

This field is required for messages in the

form DFHxxyyyy, where xx is the Component ID.

Message Number. . . ASRA (for example, 1060, 5718, or Abend Code

such as ASRA, etc.)

F3=Exit to CICS

ASRA

EXPLANATION: The task has terminated abnormally because

of a program check.

SYSTEM ACTION: The task is abnormally terminated and CICS

issues either message DFHAP0001 or DFHSR0001. Message

DFHSR0622 may also be issued.

USER RESPONSE: Refer to the description of the associated

message or messages to determine and correct the cause of

the program check.

MODULE: DFHSRP

F3=Cancel

Press clear key and then Shift+PF11 key to go back to Hiperstation and type “RECORD OFF” to stop the recording.

ZOOM:F23 ------------------ HIPERSTATION ------------------------ LINE 1 OF 24

Command ===> RECORD OFF Scroll ===> PAGE

Recording TEST Play OFF Journal OFF Compare Log OFF autoDoc OFF

The blow screen shows that recording has stopped

ZOOM:F23 ------------------ HIPERSTATION ------------------- RECORDING STOPPED

Command ===> Scroll ===> PAGE

Record OFF Play OFF Journal OFF Compare Log OFF autoDoc OFF

Type “CANCEL” to disconnect the CICS session

ZOOM:F23 ------------------ HIPERSTATION ------------------- RECORDING STOPPED

Command ===> CANCEL Scroll ===> PAGE

Record OFF Play OFF Journal OFF Compare Log OFF autoDoc OFF

Browsing the dataset shows that CICS transaction has been recorded in the dataset.

Menu Utilities Compilers Help

sssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss

BROWSE TSUXXXX.QAH(TEST) - 00.00 Line 00000000 Col 001 080

Command ===> Scroll ===> CSR

********************************* Top of Data **********************************

************************************************************************

* CREATED BY USER: TSUXXXX TPF: CICSTEST TIME: 20:39 DATE: 02/08/12 *

* DESC: *

************************************************************************

* LU: UHG02Q01 TPF: CICSTEST LOGMODE: D4A32782 *

************************************************************************

<VERSION>7

<IMSUNLOK>Y

<OUTPUT>0000001 (24,080)

<RESPONSE>00.00.000

<S01>............................Signon to CICS ......................APPLID.CIC

<S02>

<S03>.WELCOME TO CICS/TS 4.1.0 REGION CICSTEST

<S04>.

<S05>.

<S06>.

<S07>

<S08>.Type your userid and password, then press ENTER:

<S09>

Mainframe Tips, Tricks And Tutorials

Wednesday, February 8, 2012

What is QA Hiperstation

Using QA Hiperstation to record a CICS session