Hidden Treasures in ISPF

Peter Van Dyke

IBM Global Services Australia
SHARE 98, Winter 2002
[email protected]

SHARE 98 - Session 2625

®

1
 SHARE Nashville - ISPF Project Grid

8:00am 9:30am 11:00am 1:30pm 3:00pm 4:30pm 6:00pm

2600 90 mins
ISPF and SCLM
Sunday Suite
March 3 Open / Reqs
Review ¤
2400 2601 ¤ 0001 2602 ¡ 2603 ¡ 2604 ¡ 2608 ¡L
MVS Program ISPF and SCLM General ISPF 101: ISPF 102: ISPF 103: ISPF laboratory
Monday Opening Suite Trends Session Introduction to Introduction to Introduction to
March 4 and Directions Panels and Skeletons and ISPF Dialogs
Messages Tables

2634 ¤ 2635 ¤ 2636 ¤ 2637 ¤ 2638 ¤L 2632 ¡

Tuesday IBM’s SCLM Suite SCLM Suite SCLM Suite SCLM Suite Dynamic ISPF
March 5 SCLM Suite 101: Intro. to 102: SCLM 103: SCLM 104: Laboratory
Library Mgmt in Action Admin.

2639 ¤ 2640 ¤ 2644 ¤

Wednesday SCLM Suite SCLM Suite and SCLM Suite
March 6 User Session InfoMan User Group
Integration Story

2625 ¡ 2627 ¡ 2605 ¡ 2646 ¡ 2649 90 mins

ISPF Hidden ISPF ISPF ISPF One Hour ISPF and SCLM
Thursday Treasures Panel Behind the – Two Topics Suite
March 7 Processing Scenes Reqs & Close
¤
ISPF and SCLM Suite sessions are in Ryman Chambers A/B/C,
except labs (marked L), which are in Presidential Chamber B.
¡ Attendance counts towards ISPF certification only
¤ Attendance counts towards ISPF and SCLM Suite certification
2
Hidden Treasures in ISPF* ®

IBM Software Solutions

DSLIST command

COMPARE edit command

ISRDTLCV macro
ISRCMDTB exec

ISRONLY edit macro

ISRDDN utility
Exploiting Multiple Screens
START
SPLIT
SWAP

* This presentation assumes ISPF V4.2 or later

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

3
Hidden Treasures in ISPF* ®

IBM Software Solutions

PASSTHRU action

Line command from PFKEY

Connect without GUI

Batch GUI

Calendar with notebook

Command Tables

STATUS Area

ISPVCALL

* This presentation assumes ISPF V4.2 or later

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

4
Hidden Treasures in ISPF* ®

IBM Software Solutions

ISREPDF

Site Wide EDIT Macros

Session Wide User EDIT Macros

RESIZE

RETP

RETF

ISPLIBD

ENVIRON

* This presentation assumes ISPF V4.2 or later

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

5
DSLIST ®

IBM Software Solutions

DSLIST personal_list_name | pattern

If a list name exists by that name, a data set list will be built based
on the entries in the list
If a list name does not exist, the parameter is treated as a pattern

APPEND command from within Data Set List

Adds entries to the displayed list
specify a personal list name or a pattern

REFRESH command from within Data Set List

Refreshes display to original list filter criteria

EXCLUDE command and X line command from within Data Set

List
Excludes data sets displayed in list
Shadow line displayed

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

6
COMPARE Edit Command ®

IBM Software Solutions

COMPARE [member|data_set_name [NEXT [X]]]

Uses SuperC APIs to compare to data sets or members
Changes are highlighted depending on if the change is new to
the source (member or data set where COMPARE command
was issued), only in the target, or common
NEXT compares next member in hierarchy of ISPF library
X excludes common lines except for a few around differences
only in "target"
(NEXT in this case)
MD to "make data"
new in "source"

common
common lines
excluded by X
parameter
© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

7
ISRDTLCV macro ®

IBM Software Solutions

Shipped in SISPEXEC library

Converts the non-displayable characters in panel output from

the DTL Conversion Utility (ISPDTLC) to editable characters

Issue ISRDTLCV on edit command line of generated panel

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

8
ISPCMDTB exec ®

IBM Software Solutions

converts ISPF command tables to DTL

command table must be in table concatenation (ISPTLIB)

Issue TSO ISPCMDTB applid (where applid is the application id

of the command table)
creates an edit session containing the DTL version of the command
table

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

9
ISRONLY macro ®

IBM Software Solutions

The ISRONLY macro is a combination of EXCLUDE and FIND

such that "only" the lines containing the search string will be
displayed
similar to ALL XEDIT command for those familiar with VM

The parameters are the same as those for the FIND command
with the exception of FIRST, LAST, NEXT, and PREV

Shipped in SISPSAMP library

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

10
ISRDDN Utility ®

IBM Software Solutions

Fullscreen display of DD allocations

Build a member list based on a DD
SELECT PGM(ISRDDN)

Browse (B), Edit (E), View (V), Free the entire DD (F), Compress
a PDS (C), Provide additional data set information (I), Display
list of users of jobs using a data set (Q)
© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

11
ISRDDN Utility ®

IBM Software Solutions

MEMBER name (string) scans allocations for a particular

member. string restricts the search to DDs with that string in
their name.

ONLY string to show or search only DDs with string in their

name
EXCLUDE string to exclude DDs with string in their name
CLIST creates a CLIST called 'prefix.ISRDDN.CLIST'
COUNT [string] counts the number of members in PDSs

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

12
ISRDDN - R5 only ®

IBM Software Solutions

ENQ - Enqueues on system

CON - Enqueue contention

Member - now uses CSVQUERY to locate

load modules

SEARCH - Same as member but does not

search DD's

LOAD - Explicitly loads a module

Uses ISPLLIB if available
Browses result
© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

13
ISRDDN - Browse of Control Blocks (R5)
®

IBM Software Solutions

BROWSE STORAGE
SEQUENTIAL FILE
Allocated to DDNAME ISRDDN
Fixed or VB
Max length of 230
First string on line is control block name
Second string is locater string
Everything else ignored

ASCB CVT?+C? Addr space control blk

CVT 10.? Comm Vector Table
TCB CVT?? Task Control Block

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

14
Multiple Screens ®

IBM Software Solutions

Exploiting Multiple Screens

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

15
32 Split Screens ®

IBM Software Solutions

ISPF allows up to 32 synchronously multi-tasking screens

under one ISPF session
4 to 32 screens allowed by installation, customized limit in
ISRCNFIG
Initial value set to 8
SCRMAX DC F'8' MAXIMUM NUMBER OF SCREENS
Each logical screen displays as separate window in a GUI
display
3270 display still only displays at most two at one time. The
others are hidden
ISPF Task List assists in the navigation between logical
screens as does the SWAP command

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

16
Creating Screens ®

IBM Software Solutions

SPLIT without parameters behaves as it always did.

A new logical screen is created the first time
The screen is resplit on subsequent invocations

SPLIT NEW creates a new logical screen

START command creates a new screen and starts the new

screen with a new "initial dialog"

When terminating a logical screen, control is returned to the

parent if it exists. If it does not exist, control is returned to the
grandparent, etc.

Optionally, a user can not display the split line on full-screen

splits by de-selecting the "Always show split line" option from
Settings

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

17
START Command ®

IBM Software Solutions

START PANEL(panel)|PGM(program)|CMD(command)
[select_parameters]
ISPF_command
primary_option_menu_option
Examples
START PGM(ISRDDN) NEWAPPL(ISR)
START KEYLIST
START 11

Creates a new logical screen with a different "initial dialog"

SELECT PGM(ISPSTRT) is the documented programming

interface to START
SELECT PGM(ISPSTRT) PARM(PANEL(YOURMAIN)
NEWAPPL(ABC))

If using PANEL, PGM, or CMD, one of these options must

precede the other select parameters (e.g. NEWAPPL)
© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

18
Naming Screens ®

IBM Software Solutions

Screen names have been added to keep track of logical

screens and to be able to reference them in the SWAP
command
SCRNAME command allows you to name a screen or override
an existing name of a screen

SCRNAME name|ON|OFF [PERM]

name must be 2-8 alphanumerics and cannot be LIST, PREV, NEXT,
ON or OFF
ON displays the name in the upper left corner of the panel if the
panel ID is not being displayed
OFF turns off the display of the screen name in the upper left-hand
corner of the panel
PERM makes the screen name persist across all invocations of
applications in that logical screen

Unless PERM is specified the screen name is remembered for

that SELECT invocation.
© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

19
Naming Screens from a Program ®

IBM Software Solutions

The SCRNAME parameter on the SELECT service allows an

application developer to name screens within the application
Screen names are remembered for each SELECT level.
When another SELECT is performed from within the current
SELECT invocation, the screen name of the current SELECT
invocation is saved and a new screen name is set for the new
SELECT invocation if a SCRNAME is specified
When the new SELECT invocation ends, the original screen name is
restored
The SCRNAME command overrides a screen name set by an
application for that SELECT level only, unless the PERM option
was specified
The SCRNAME parameter on ISPSTART sets the screen name
for the Primary Option Menu

ISPF sets screen names in ISR@PRIM for all of the options

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

20
'ISPF Task List - SWAP LIST Command ®

IBM Software Solutions

Screen names
Panelid and Applid

Current
screen

"Other"
screen

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

21
PASSTHRU ®

IBM Software Solutions

>Cmd
Greater than sign followed by a command
Command is passed thru to dialog
Can be typed in or used in PFKEY
Avoids conflict with Dialog Manager command

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

22
Line Command ®

IBM Software Solutions

:Cmd
Colon followed by a line command
Special case for PFKEY processing
Colon is stripped off
Command is passed to dialog in first input field where
the cursor is positioned
Example
PF4 . . . :R
The above will repeat a line in Edit if PF4 is pressed
while the cursor on the line

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

23
Connect Without GUI ®

IBM Software Solutions

SETTINGS
Workstation pulldown (or GUIINIT)
Workstation connection
Without GUI display
Allows workstation commands
FILEXFER
Edit on workstation
SELECT WSCMD

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

24
Batch ISPF ®

IBM Software Solutions

Batch ISPF
Normal without displays
In GUI mode
Allows batch job with a display to the workstation
Run an asynchronous job without tying up host
session

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

25
'Batch JCL ®

IBM Software Solutions

//MARVY JOB (123456,C508,,,,N),'KNIGHT',MSGCLASS=T,USER=MARV,
// REGION=4096K,GROUP=ISPFPROJ,CLASS=A,NOTIFY=MARV
//* ROUTE PRINT=CARMVS1
//* JOBPARM=R=C688
//* JCL TO RUN ISPF IN BATCH
//ST0 EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=T
//IN1 DD DSN=PDFTDEV.STG.TABLES,DISP=SHR
//IN2 DD DSN=PDFTDEV.INT.TABLES,DISP=SHR
//IN3 DD DSN=PDFTDEV.SVT.TABLES,DISP=SHR
//OUT1 DD DSN=&&TPDS1,
// UNIT=SYSDA,
// SPACE=(TRK,(5,5,5)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160),
// DISP=(,PASS,DELETE)
//OUT2 DD DSN=&&TPDS2,
// UNIT=SYSDA,
// SPACE=(TRK,(5,5,5)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160),
// DISP=(,PASS,DELETE)
//SYSIN DD *
COPY INDD=IN3,OUTDD=OUT1
SELECT MEMBER=(ISPSPROF,ISPPROF)
COPY INDD=IN3,OUTDD=OUT2
/*

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

26
'Batch JCL ®

IBM Software Solutions

//BATCH EXEC PGM=IKJEFT01,TIME=1440,REGION=2048K,DYNAMNBR=25

//STEPLIB DD DSN=PDFTDEV.STG.LOAD,DISP=SHR
// DD DSN=PDFTDEV.INT.LOAD,DISP=SHR
// DD DSN=PDFTDEV.SVT.LOAD,DISP=SHR
// DD DSN=PDFTDEV.MARV.LOAD,DISP=SHR
// DD DSN=ISPFPROJ.DMMASTER.LOAD,DISP=SHR
// DD DSN=PDFTDEV.SASC.C600.LINKLIB,DISP=SHR
//SYSUADS DD DSN=SYS1.UADS,DISP=SHR
//SYSHELP DD DSN=SYS1.HELP,DISP=SHR
//SYSEXEC DD DSN=MARV.TEST.EXEC,DISP=SHR
// DD DSN=PDFTDEV.STG.EXEC,DISP=SHR
// DD DSN=PDFTDEV.INT.EXEC,DISP=SHR
// DD DSN=PDFTDEV.SVT.EXEC,DISP=SHR
//SYSPROC DD DSN=ISPFPROJ.MRK.CLIST,DISP=SHR
// DD DSN=PDFTDEV.STG.CLIST,DISP=SHR
// DD DSN=PDFTDEV.INT.CLIST,DISP=SHR
// DD DSN=PDFTDEV.SVT.CLIST,DISP=SHR
// DD DSN=SYS1.LOCAL.CLIST,DISP=SHR
// DD DSN=SYS1.SER.ISRCLIB.VB,DISP=SHR
//ISPLLIB DD DSN=ISPFPROJ.MRK.LOAD,DISP=SHR
// DD DSN=PDFTDEV.STG.LOAD,DISP=SHR
// DD DSN=PDFTDEV.INT.LOAD,DISP=SHR
// DD DSN=PDFTDEV.SVT.LOAD,DISP=SHR
// DD DSN=PDFTOOL.COMMON.LOAD,DISP=SHR

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

27
'Batch JCL ®

IBM Software Solutions

//ISPILIB DD DSN=ISPFPROJ.MRK.GIF,DISP=SHR
// DD DSN=PDFTDEV.STG.GIF,DISP=SHR
// DD DSN=PDFTDEV.INT.GIF,DISP=SHR
// DD DSN=PDFTDEV.SVT.GIF,DISP=SHR
//ISPMLIB DD DSN=ISPFPROJ.MRK35.MSGS,DISP=SHR
// DD DSN=PDFTDEV.STG.MSGGEN,DISP=SHR
// DD DSN=PDFTDEV.STG.MSGS,DISP=SHR
// DD DSN=PDFTDEV.INT.MSGGEN,DISP=SHR
// DD DSN=PDFTDEV.INT.MSGS,DISP=SHR
// DD DSN=PDFTDEV.SVT.MSGGEN,DISP=SHR
// DD DSN=PDFTDEV.SVT.MSGS,DISP=SHR
// DD DSN=PDFTOOL.COMMON.MSGS,DISP=SHR
//ISPPLIB DD DSN=ISPFPROJ.MRK35.PANELS,DISP=SHR
// DD DSN=PDFTDEV.STG.PANELGEN,DISP=SHR
// DD DSN=PDFTDEV.STG.PANELS,DISP=SHR
// DD DSN=PDFTDEV.INT.PANELGEN,DISP=SHR
// DD DSN=PDFTDEV.INT.PANELS,DISP=SHR
// DD DSN=PDFTDEV.SVT.PANELGEN,DISP=SHR
// DD DSN=PDFTDEV.SVT.PANELS,DISP=SHR
// DD DSN=PDFTOOL.COMMON.PANELS,DISP=SHR
//ISPSLIB DD DSN=ISPFPROJ.MRK35.SKELS,DISP=SHR
// DD DSN=PDFTDEV.STG.SKELS,DISP=SHR
// DD DSN=PDFTDEV.INT.SKELS,DISP=SHR
// DD DSN=PDFTDEV.SVT.SKELS,DISP=SHR
// DD DSN=PDFTOOL.COMMON.SKELS,DISP=SHR

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

28
'Batch JCL ®

IBM Software Solutions

//ISPTABL DD DSN=&&TPDS3,
// UNIT=SYSDA,
// SPACE=(TRK,(5,5,5)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160),
// DISP=(,PASS,DELETE)
//*
//* THE FIRST DSN IN ISPTLIB IS USED FOR THE ENQUEUE OF TABLES.
//* IF THE ISPPROF DD DOES NOT HAVE THE XXXPROF MEMBER TO RUN THE
//* APPLICATION THEN THE ISPTLIB DD IS USED TO DO THE TBOPEN ON EITHER
//* XXXPROF OR ISPPROF.
//* ISPT036 - ENQUEUE ERROR ON ISPSPROF TYPICALLY OCCURS RUNNING 2 JOBS
//* THAT BOTH HAVE A TEMPORARY ISPPROF DATASET AND A COMMON
//* TABLE LIBRARY CONCATENATED FIRST IN ISPTLIB.
//*
//ISPTLIB DD DSN=*.ST0.OUT2,DISP=(OLD,PASS)
// DD DSN=PDFTDEV.STG.TABLES,DISP=SHR
// DD DSN=PDFTDEV.INT.TABLES,DISP=SHR
// DD DSN=PDFTDEV.SVT.TABLES,DISP=SHR
// DD DSN=PDFTOOL.COMMON.TABLES,DISP=SHR
//SYSUDUMP DD DUMMY
//ISPLOG DD SYSOUT=T,
// DCB=(RECFM=VA,LRECL=125,BLKSIZE=129)

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

29
'Batch JCL ®

IBM Software Solutions

//*
//* ISPCTL0 IS USED FOR EDIT SUBMIT
//* ALLOCATE THE SPACE BASED ON THE LARGEST
//* JOB EDIT SUBMIT WOULD PROCESS
//*
//ISPCTL0 DD DSN=&&TEMP1,
// UNIT=SYSDA,
// SPACE=(TRK,(5,5,5)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160),
// DISP=(,PASS,DELETE)
//*
//* ISPCTLn (WHERE n IS 1-9, A-W.) IS USED FOR FILE TAILORING
//* THERE SHOULD BE 1 FOR EACH SCREEN USED WHERE n REPRESENTS
//* THE SCREEN NUMBER.
//*
//ISPCTL1 DD DSN=&&TEMP1,
// UNIT=SYSDA,
// SPACE=(TRK,(5,5,5)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160),
// DISP=(,PASS,DELETE)
//ISPCTL2 DD DSN=&&TEMP1,
// UNIT=SYSDA,
// SPACE=(TRK,(5,5,5)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160),
// DISP=(,PASS,DELETE)

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

30
 Batch JCL ®

IBM Software Solutions

//*
//* EACH BATCH JOB MUST HAVE A UNIQUE PROFILE DSN IF THEY ARE
//* TO RUN SIMULTANEOUSLY
//*
//ISPPROF DD DSN=*.ST0.OUT1,DISP=(OLD,PASS)
//* PRT DD DSN=ISPFPROJ.MRKBAT1.TSOOUT,DISP=SHR
//SYSTSPRT DD SYSOUT=T
//SYSPRINT DD SYSOUT=T
//SYSOUT DD SYSOUT=T
//*
//SYSTSIN DD *
PROFILE PREFIX(MARV)
ISPSTART PANEL(ISR@PRIM) +
NEWAPPL(ISR) GUI(IP:32.224.141.83) +
TITLE(ISPF SESSION 1) +
GUISCRW(80) GUISCRD(32)
/*
//

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

31
Calendar Notebook
®

IBM Software Solutions

&ZKIT = LO
Set in Primary Menu
Allows TBDISPL dialog for Calendar view
Keeps 15 lines of data for day selected
Day is hilited to indicate note

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

32
ISPF Command Tables ®

IBM Software Solutions

ISPF Commands

Command Processing

Command Table Utility

Examples

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

33
ISPF Commands ®

IBM Software Solutions

System Commands - Provided by ISPF and always

available unless overridden

User or Site Commands - Defined by site

administrator in the
ISRCONFG module.
Available if defined.
Application Commands - Available only while an
application is running.

Function Commands - Meaningful only to a specific

function

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

34
ISPF Commands ®

IBM Software Solutions

How defined
Thru command tables
Self defined by function

How entered
Typing input on the command line and pressing
enter
Pressing a function key
Selecting an Attention field
Pull down choice selection

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

35
ISPF Commands ®

IBM Software Solutions

Command field
Identified on )BODY statement of panel
Defaults to first input field
Use CMD() for no command field

Command delimeter
Allows stacking of commands
Exceptions - HELP, RETRIEVE, RETF
Defined in Settings option

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

36
ISPF Commands - Processing ®

IBM Software Solutions

ISPF intercepts all commands

Check for match in command tables
Invoke command if found
No match
Assumed to be function command and is passed to
dialog
Search order
Controlled by SCTSRCH in ISRCONFG
Application command table
User command table (if defined in ISRCONFG)
Site , ISPCMDS (if SCTSRCH not = A)

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

37
ISPF Commands - OPT3.9 ®

IBM Software Solutions

Command Table Utility - OPT 3.9

Used to update or view command table
xxxCMDS where xxx is the applid of application,
name of SITE, or USER command table
command table resides in ISPTLIB
Output goes to ISPTABL

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

38
Command Table Utility ®

IBM Software Solutions

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

39
Command Table Utility ®

IBM Software Solutions

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

40
Command Table Utility ®

IBM Software Solutions

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

41
Status Area ®

IBM Software Solutions

5 views from primary menu

Session
Function Keys
Calendar
User status
User point & shoot
SAREA
Menu pulldown
Status area
Enter SAREA from command line
Get a separate status area view anywhere

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

42
ISPVCALL ®

IBM Software Solutions

Primarily level 2 & level 3 debugging tool

Shows the following
Dataset allocations
Active LIBDEF's
SVC 26 info
ISPLINK calls
ISPF messages
Module flow
Dynamic allocation info
PTF levels

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

43
ISREPDF ®

IBM Software Solutions

EXEC to allow edit browse or view from any

command line
TSO ISREPDF dsname [ V | B ]
V is View
B is Browse
default is edit.
ISREPDF also lets you specify other service
parms like MACRO() RECOVERY, etc

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

44
Site Wide and User EDIT Macros ®

IBM Software Solutions

Site wide and user edit macros

Site wide macro (executed 1st)
Specified in command table
Session wide edit macro (runs 2nd):
Variable ZUSERMAC in shared or profile pool
specifies exit name
Either exit can stop further exits with a bad rc or
place the cursor on the command line with RC=1

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

45
RESIZE ®

IBM Software Solutions

Remove or replace window frame

Window frame exists
RESIZE will remove frame and panel will fill entire
displace space for that logical screen
Enter RESIZE again to restore window frame
No window frame
NOP

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

46
RETP / RETF ®

IBM Software Solutions

RETP
Pop-up panel with last 25 commands in RETRIEVE
stack
Options pull down
- Set minimum number of characters to save in
retrieve stack
- Set cursor position to beginning or end of command
when commands are retrieved
RETF
Same as RETRIEVE only reverse direction
Oldest first

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

47
ISPLIBD ®

IBM Software Solutions

ISPLIBD xxxxx
Without a parm
All active LIBDEF's for the logical screen
With a parm
may specify specific library to just display one type
LIBDEF ISPTLIB

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

48
ENVIRON ®

IBM Software Solutions

ENVIRON <ENBLDUMP <ON | OFF> >

<TERMTRAC <ON|ERROR|DUMP|OFF>
<TERMSTAT <QUERY> >
ENABLDUMP - Disables ISPF ESTAI without using
option 7
TERMTRAC - traces ISPF SVC 93 ( TPUT/TGET)
TERMSTAT - Gives information about terminal you
are currently using

© COPYRIGHT IBM CORPORATION 2002 IBM SOFTWARE SHARE Winter 2002

49