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
Copyright (C) 1994, 2009 Compuware Corporation. All Rights Reserved.
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)
------------------------ 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
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>
No comments:
Post a Comment
Note: Only a member of this blog may post a comment.