TSO CLIST $EDIT TSO CLIST $EDIT Author: David McRitchie formatted on 1995/04/01 06:54 for assistance contact: D. McRitchie DMcRitchie@hotmail.com -------------------------------------------------------------------------------- CLIST NAME. $EDIT users. PDF EDIT users particularly SCRIPT users type. Edit Macro resides in SYS1.TSOCLIST -------------------------------------------------------------------------------- $EDIT $EDIT any file from any ISPF panel -------------------------------------------------------------------------------- related BROWSE command related browse clists -- $USERS, PROC, CLIST -- many browse clists also h ave EDIT capability. related browse clists -- $USERS, PROC, CLIST -- also see text in editor related MACMAC -- can be invoked by $EDIT using MACRO(MACMAC) to invoke one or more edit macro instructions including parameters. Parame ters had to be previously stored using "VPUT (MACPARM SHARED". See MACMAC documentation form more infor mation. -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- The $EDIT clist can be used from any ISPF panel and is used without quotes and permits you to invoke an ISPF $EDIT without having to back out of what you are currently doing under ISPF. This in effect give you an extra "window" which disappears when you use the "end" key. -------------------------------------------------------------------------------- normal usage -- complete dsname specified, membername optional ç PDF option 2 ===> TSO %$EDIT datasetname ===> TSO %$EDIT datasetname(membername) ===> TSO %$EDIT datasetname(membername) MACRO(macroname) ===> TSO %$EDIT datasetname(xyz*) -- using a pattern using DSLIST to process a list of DSNAMES ç ties into PDF option 3.4 ===> TSO %$EDIT is03.* ===> TSO %$EDIT is03.*.text ===> TSO %$EDIT is03.*.text* -------------------------------------------------------------------------------- PROC 1 DSNAME MACRO(RCVYON) NEW PANEL() TRACE REXX dsname, the dataset name to be edited can include a membername If the dsname is 8 characters or less it will be taken to be a membername. The membername can be a pattern -- e.g. select all members beginning with "P". Patternnames end with exactly one as- terisk, there are no other characters or positions that indicate a pattern. MACRO(), specify an initial edit macro NEW, will create member if it is not found PANEL(), specify a different panel TRACE, (program debugging, inconsistent results if invoked) REXX, (not operational) When using the $BROWSE clist the member name pattern (wild card) is provide, but none of the other options above. -------------------------------------------------------------------------------- Example ===> TSO $EDIT IS03.SHARE.CNTL(@INDEX) contains sample JCL for a variety of tasks most entries prefixed by "00006" exist in this library ===> TSO $EDIT IS03.SHARE.CNTL will edit from the directory of this library ===> TSO $EDIT IS03.SHARE.TEXT(P*) instead of choosing a membername, you can indicate a pattern. Patterns end with an asterisk, and indicate all members beginning with the characters preceding the asterisk. In this case all members beginning with "P" will be shown in the directory. ===> TSO %$EDIT is03.*.text* By using an asterisk as a part of the dsname, membername doesn't count here, the DSLIST utility (PDF 3.4) will be invoked. Change other options if desired and hit enter the same as if you had used PDF option 3.4. The first node must be complete and correct (requirement of DSLIST). The clist may be invoked recursively -- the dsname level will not be available in your profile for subse- quent use once you have exited. ===> TSO $EDIT PHO.GENERAL.GENERAL.ZZ2B0701.G1097V00 ===> TSO $EDIT PHO.GENERAL.GENERAL.ZZ2B0701(0) ===> TSO $EDIT PHO.GENERAL.GENERAL.ZZ2B0701(-3) Will edit the GDG dataset indicated. Relative generations (n) greater 0 do not exist and will result in error and termination. ===> TSO %$EDIT userid.*.text* By using an asterisk as a part of the dsname, membername doesn't count here, the DSLIST utility (PDF 3.4) will be invoked. Change other options if desired and hit enter the same as if you had used PDF option 3.4. The first node must be complete and correct (requirement of DSLIST). The clist may be invoked recursively -- the dsname level will not be available in your profile for subse- quent use once you have exited. another example PROC 0 $EDIT dsname(member1) MACRO(xxxxx) $EDIT dsname(member2) MACRO(xxxxx) $EDIT dsname(member3) MACRO(xxxxx) $EDIT dsname(member4) MACRO(xxxxx) $EDIT dsname(member5) MACRO(xxxxx) $EDIT dsname(member6) MACRO(xxxxx) comment If you have the above TSO clist viewable in PDF edit you may invoke the edit clist @TSOX to invoke it. You need not place the above into a separate clist library. Internal Aspects Basically the $EDIT and $BROWSE executes are the same. $EDIT will check to see if anyone is using the dataset/member, which is not necessary for $BROWSE. 1. If an included membername is a relative GDG then the latest (or perhaps rel- ative) dataset will be used based on trapping lines from a ListCat for the GDG dsname level. 2. Existence of dataset will be checked for. 3. RACF will be checked to make sure file is accessible to user. 4. File will be edited with CONTROL ERRORS RETURN so that severe errors will be returned to message area of panel. If the dataset is unavailable a WHOGOT will be issued for the dataset (or should be).