Chapter 6: TSO Support

Mainframe Express supports the use of TSO commands, CLISTs and REXX execs. They can be run in a:

This chapter describes the differences that apply when using TSO in the Mainframe Express environment instead of the MVS mainframe environment.

6.1 CLISTs for Initialization and Termination

On a mainframe, the TSO, CICS and IMS allocation is controlled by JCL. There are usually DD statements that define data sets used by the subsystem and user programs. In Mainframe Express, this facility is emulated by means of CLISTs which contain ALLOCATE commands to define the data sets.

Three CLISTs are supplied. To execute, they must be placed in one of the CLIST folders defined for Source Libraries in the Workgroup View. If the CLIST contains project-specific information, place it in the project folder. If it does not contain project-specific information, place it in the mfuser\sysproc folder. The folders searched are those defined and selected for CLISTs in the Workgroup View.

Each CLIST has initialization phases which are run when the session starts and termination phases which are run when the session ends. The three CLISTs are:

Note that a FREE ALL command within a USERxxxx CLIST frees all allocated data sets.

6.2 TSO Commands and Micro Focus Extensions

The TSO commands and Micro Focus extensions that are supported by Mainframe Express are listed below. You can enter these commands individually, within a CLIST, or within a REXX exec. Please refer to the mainframe documentation for more information about the TSO commands.

ALLOCATE

Allocates an MVS data set to the current user and defines the data set's DD name.

 

Example:

ALLOCATE FILE(SYSUT1) DATASET(TESTDATA.SORTED.DATA) OLD

Allocates the existing data set TESTDATA.SORTED.DATA, with the DD name SYSUT1.

ATTRIB

Allows DCB parameters to be dynamically defined and named for use in subsequent ALLOCATE commands.

 

Example:

ATTRIB DATA1 BLKSIZE(32720) LRECL(80) DSORG(PS) RECFM(FB)

Sets up an attribute called DATA1 that can be used in conjunction with an ALLOCATE command to provide DCB information for a DD name

CALL

Invokes a program.

 

Example:

CALL PROG1

Invokes program PROG1.

CLS

Micro Focus extension.

Clears the screen.

DELETE

Deletes an MVS data set (and its related PC file).

 

Example:

DELETE 'TESTDATA.UNSORTED.DATA'	

Deletes the data set TESTDATA.UNSORTED.DATA.

DSN

Invokes the DSN command processor, which is used to run DB2 programs. In Mainframe Express, the following rules apply to the DSN command and its subcommands:

  • The subcommands ABEND, BIND, DCLGEN, FREE, REBIND and SPUFI are not supported and are ignored without syntax checking.
  • The DSN command keywords SYSTEM, RETRY and TEST are syntax checked but otherwise ignored
  • The RUN subcommand keyword PLAN is ignored for the SQL Option but is used as the plan name for DB2. This allows you to process multiple databases with the same program with DB2.
  • The RUN subcommand keyword LIBRARY is syntax checked but otherwise ignored
  • The RUN subcommand keyword CP is not supported

The features in the not supported category could impact the logic of your program. You are advised to analyze the importance of these to your application.

The features in the syntax checked but otherwise ignored category will probably have no impact on your application.

 

Example:

DSN
RUN PROGRAM(PROG1) PLAN(PLANX) PARMS('HELLO')
END

Invokes the DSN subcommand processor to execute the RUN subcommand, which invokes the program PROG1 with the parameter string "HELLO". The END subcommand terminates the DSN subcommand processor. For more information, see the DB2 manuals.

EXEC

Executes a TSO command, CLIST or REXX exec.

 

Example:

EXEC 'MYPDS.CLIST(ABCD)'

Executes the member ABCD from the partitioned data set MYPDS.CLIST.

FREE

Frees the allocation of a data set.

 

Example:

FREE FILE(SYSUT1)

Frees the allocation for the data set with DD name SYSUT1.

LISTALC

Displays the list of currently allocated DD names.

LISTCAT

Lists the entries in the catalog with the high-level data set qualifier equal to the user ID defined to Mainframe Express. If you invoke this command with the Micro Focus extension /F, it displays additional information.

LOGOFF

Terminates the current TSO session.

PROFILE

Allows you to specify different PREFIX and PROMPT settings.

 

Example:

PROFILE PREFIX(TVDF) NOPROMPT

Causes a dataset prefix of TVDF to be added to any data set name that is not enclosed in quotes.

Turns off prompting for REXX execs during this TSO session.

RELATE

Micro Focus extension.

Relates an MVS data set name in the catalog to a PC file name. It can be used in conjunction with an ALLOCATE command to set up tests in a TSO session.

 

Example:

RELATE TESTDATA.SORTED.DATA C:\MYFILE.DAT

Relates the MVS data set TESTDATA.SORTED.DATA to the PC file C:\MYFILE.DAT.

SUBMIT

Executes a file containing a set of JCL statements.

 

Example:

SUBMIT 'TVDF.WORK.CNTL(IOCBL02)'

Executes the JCL statements contained in IOCBL02.

TIME

Displays the current time and date and the CPU seconds used.

6.3 CLIST Statements

Mainframe Express supports the following CLIST statements:

Mainframe Express does not support the following CLIST statements:

6.4 CLIST Operators

Mainframe Express supports the following CLIST operators:

6.5 CLIST Built-in Functions

Mainframe Express supports the following CLIST built-in functions:

Mainframe Express does not support the following CLIST built-in functions:

6.6 CLIST File Statements

Mainframe Express supports the following CLIST file statements:

6.7 CLIST Control Variables

Mainframe Express supports the following CLIST control variables:

6.8 File-tailoring and SKEL Commands

Mainframe Express does not support any file-tailoring or SKEL commands.


Copyright © 2001 Micro Focus International Limited. All rights reserved.
This document and the proprietary marks and names used herein are protected by international law.