I think that the ISPF startup will automativally allocate a clean ISPF profile
if none exists? It does here.
So rename your ISPF profile at the READY prompt, then start ISPF and
copy+replace back from the original (if needs be)?
From: IBM Mainframe Discussion L
You cannot issue ISPF dialog commands from within a panel's *REXX section or
PANEXIT..
You will get syntax errors (or worse).
You can set values inside a *REXX section and act on them afterwards, ie...
...
&ZERRALRM = YES
&ZERRHM = MYAPPL
&CURSOR = .CURSOR
&CSRPOS = .CSRPOS
*REXX(*,ZCMD,ZER
Hi Lizette,
I have a UDLC (User Defined Line Command) for our group.
DJ - Displays Job status info.
It creates a list of assignment SET statements in JCL for each of: SYSVAR,
MVSVAR, MVSVAR SYMDEF, and then does the same for System Symbols (trapped from
SDSF command -D SYMBOLS).
Then I extract on
Hi Lizette
I tried even a 2 stage attempt, hoping to fool it!
2 // SET B=' '
3 // SET A=&B'UNIT=SYSDA'
IEFC653I SUBSTITUTION JCL - A=
4 //STEP1EXEC PGM=IEFBR14
5 //SETDDDD DISP=SHR,DSN=MY.DSN&A
IEFC653I SUBSTITUTION JCL - DISP=SHR,DSN=MY.DSN
Same, see, not even &A ge
Hi Lizette - this site gets forbidden for me (I work for Nordea bank now - no
longer IBM - more restrictive)
Could you possibly be so kind as to send me this code :-D to
coalb...@hotmail.com ?
/Steve
> Date: Thu, 3 Mar 2016 10:27:28 -0700
> From: stars...@mindspring.com
> Subject: Re: rexx
ALLOC with VB LRECL=32756 ?
;-)
/S
> Date: Thu, 3 Mar 2016 10:27:28 -0700
> From: stars...@mindspring.com
> Subject: Re: rexx and tso alllocate
> To: IBM-MAIN@LISTSERV.UA.EDU
>
> Have you tried under TSO BATCH with or without ISPF libraries (and I am
> thinking the ISF libraries may need to be
I am trying to migrate all data on one TSO userid to a new id.
Is there an easy way to do this?
At the moment I have been working using ISPF LMD utiities to generate
HBACK+HRECOVER NEWNAME commands but I can see that GDGs will prsent a problem.
I guess VSAM will also.
Any ideas?!
/Steve
---
*/
/*=TRY===>>
CALL ABEXIT "ERROR TEST","ONE§TWO§THREE§FOUR§F½½½I½½½V½½½E";EXIT
>>---*/
ABEXIT: PROCEDURE
You're right Lizette - should be under TSO-REXX or even ISPF-L ?
/Steve
From: Lizette Koehler
To: IBM-MAIN@LISTSERV.UA.EDU
Date: 2015-07-28 16:55
Subject:Re: Submit job without messages
Sent by:IBM Mainframe Discussion List
For those that might not be aware. There i
2015-07-28 17:34
Subject:Message handling (was: Submit job without messages)
Sent by:IBM Mainframe Discussion List
(LISTSERV appears to have mangled your nice section marks and
required blanks.)
On 2015-07-28, at 08:41, Steve Coalbran wrote:
>
> /* Break lm at the fir
need help on this. (I said I was naive.)
On Tue, 28 Jul 2015 15:40:09 +0200, Steve Coalbran wrote:
>SAYMSG: PROCEDURE
>PARSE ARG zedsmsg,lm
>zedlmsg = ""
/* Break lm at the first paragraph mark. Since lm appears to be
no further used, anything after the paragraph mark is
Correction!!!
Last line of ABEXIT: should be:
EXIT cc /*>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>*/
c
gt;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>*/
NOTE:
In these...
§ is a paragraph-mark so forces a newline in the long-message block.
½ is a required-blan
CALL OUTTRAP "M."
ADDRESS TSO "SUBMIT" jcljob /* "jcljob" is tso format dataset name of a
single JCL job */
CALL OUTTRAP "OFF"
PARSE VAR m.1 jobname "(" jobid ")" qsub .
IF( qsub<>"SUBMITTED" )THEN SIGNAL SUBMITERROR
Then you can do what you will with the message details.
/Steve
From:
Hi Peter
Any chance of a screen print/trap to show this phenomena?
/Steve
From: Peter Hunkeler
To: IBM-MAIN@LISTSERV.UA.EDU
Date: 2015-07-27 12:53
Subject:How comes SDSF HOLD panel shows one line per OutputGroup
instead of per job?
Sent by:IBM Mainframe Discussion List
HELP
Såvida annat inte anges ovan: / Unless stated otherwise above:
IBM Svenska AB
Organisationsnummer: 556026-6883
Adress: 164 92 Stockholm
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists.
by:IBM Mainframe Discussion List
In
,
on 06/13/2015
at 10:22 AM, Steve Coalbran said:
>1. What's a CV (apart from what I need for my next job!)?
SNA Control Vector.
>2. Whatever address I need, how do I get it?
GTTERM
--
Shmuel (Seymour J.) Metz, SysProg and JO
TSERV.UA.EDU
Date: 2015-06-13 01:15
Subject:Re: ISPF Workstation Setup ( Was: IND$FILE Resource Log &
Monitoring)
Sent by:IBM Mainframe Discussion List
In
,
on 06/12/2015
at 03:02 PM, Steve Coalbran said:
>Thanks Lizette,
>I have played with WSA but not for som
Thanks Dave, I will try downloading at z/OS 2.1 and retry my scenarios.
It may make a difference here? Who knows?
/Steve
From: Dave Salt
To: IBM-MAIN@LISTSERV.UA.EDU
Date: 2015-06-12 17:24
Subject:Re: ISPF Workstation Setup ( Was: IND$FILE Resource Log &
Monitoring)
Sent by:
interception, tampering, amendment or viruses or any consequence thereof.
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Steve Coalbran
Sent: Friday, June 12, 2015 9:21 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ISPF Workstation Setup ( Wa
Hi John,
What is this of which you speak? "an already in-place FTP of members"
Does it have a psychic IPADDR function for 'obfuscated' servers?
/Steve
From: John Abell
To: IBM-MAIN@LISTSERV.UA.EDU
Date: 2015-06-12 15:09
Subject:Re: ISPF Workstation Setup ( Was: IND$FILE Resourc
Thanks Lizette,
I have played with WSA but not for some time.
I had to stop when I found Customers whose servers are behind:
LDAP+Citrix+TPX, etc... don't seem to have a locatable IPADDR.
I tried the standard, running TSO NETSTAT and locating the first
'Established' connection, but that does not
NICE!
I remember it well...!
Give me a 3279, SNA-attached with SSRT (Remember that?!
SubSecondRespondTime?!)
Eat your heart out TCP/IP+LDAP+CITRIX+?!=CTRT (CoffeeTimeResponseTime)!
Then we could really work fast!? "and yer try and tell the young folk of
today... "[https://youtu.be/Xe1a1wHxTyo] :-
Excellent solution!
Just tried it using original data supplied.
I will save this example should I ever get such an unusual format of input
data.
Almost unchanged after JCL snippet Cut&Paste...
//*
//S010 EXEC PGM=IDCAMS
//SY
Excellent!
Trevlig helg!
/Steve
From: Thomas Berg
To: IBM-MAIN@LISTSERV.UA.EDU
Date: 2015-06-05 15:30
Subject:Re: Fault Analyzer experts?
Sent by:IBM Mainframe Discussion List
FYI and YMMV, I edited the variable successfully in the )INIT section, it
was easy:
)INI
__
Thomas Berg Specialist zOS/RQM/IT Delivery Swedbank AB (Publ)
Interactive is 'manual.' Batch is 'automatic.'
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of
> Steve Coalbran
> Sent: Thursday, June
#x27;manual.' Batch is 'automatic.'
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of
> Steve Coalbran
> Sent: Thursday, June 04, 2015 4:22 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Fault Analyzer
Hej Thomas,
Sorry I missed the bulk of the answers and this may be a duplicate.
Does PANEL(IDIPIDAD) display?
If so TYPE command DDLIST M IDIPIDAD to see the PANEL source --- if that
helps. :-/
/Steve
From: Thomas Berg
To: IBM-MAIN@LISTSERV.UA.EDU
Date: 2015-06-04 16:10
Subject:
It seemed to work without error with NOW on the SEND but changing that to
NOWADAYS...
SEND 'MESSAGE' USER(FOO) NOWADAYS
INVALID KEYWORD, NOWADAYS
SEND RETURNED CC 92
(typo '7' removed)
/Steve
From: "Shmuel Metz (Seymour J.)"
To: IBM-MAIN@LISTSERV.UA.EDU
Date: 2015-05-31 19:55
Sub
What happened to the X37 exit.
I thought it had been incorporated into JES2.
Melvin Avis in IBM UK wrote the basic code for this years ago (before
retiring).
It intercepts an x37 abend and overrides (expands) space allocation values
for many situations.
/Steve
From: "Vernooij, CP (ITOPT1) -
n List
On Thu, 28 May 2015 13:51:26 +0200, Steve Coalbran wrote:
>I missed the original of this.
>Is the original JCL for the job available?
>
Yes. It's in the archives.
-- gil
--
For IBM-MAIN subscribe / sign
Clearly this is not the case:
"JES requires that the "*" will be separated by a comma or blank from
the next JCL keyword"
I knew this because just today I discovered the SYMBOLS,EXPORT SYMLIST JCL
functions.
Well I have only been writing it for 40 years.
I'm sure it wasn't there in OS/360 ?
I missed the original of this.
Is the original JCL for the job available?
/steve
From: Doron Geva
To: IBM-MAIN@LISTSERV.UA.EDU
Date: 2015-05-28 12:26
Subject:Re: GENERATED STATEMENT!?
Sent by:IBM Mainframe Discussion List
It seems like JES error.
JES is the one that
Microwave it!
/Steve
From: Todd Arnold
To: IBM-MAIN@LISTSERV.UA.EDU
Date: 2015-05-19 14:25
Subject:Re: PCI DSS compliance for z/OS
Sent by:IBM Mainframe Discussion List
Phil Smith wrote:
> ... and when decommissioning hardware-no more "How many DSEs should
we > do?
We use IBM TWS as our mainframe scheduler and I have worked on this as
it's previous name OPC which is still used synominously.
/Steve
From: Scott Barry
To: IBM-MAIN@LISTSERV.UA.EDU
Date: 2015-05-15 18:08
Subject:Re: Scheduling software
Sent by:IBM Mainframe Discussion
I missed most of the thread but, is this what you mean, in REXX you can
issue:
RC = LISTDSI('K248610.USER.EXEC' "RECALL DIRECTORY SMSINFO")
Which might give results something like this...
SYSDSNAME= K248610.USER.EXEC
SYSVOLUME= PRI001
SYSUNIT
Hi Ed
re: "Don't have internet connectivity to the Internet" (& "DVD" what's
that?)
Our S148 (IBM 3148) is still 'out' for uploads at the moment as both our
proudly maintained 3420s 'crapped out' (after a program using BSPs
weirdly) ran on first one then the other!
We had to fallback to our re
Hi Rupert
In TSO REXX you can use a 'SYSVAR'...
tid = SYSVAR("SYSTERMID")
/Steve
From: Rupert Reynolds
To: IBM-MAIN@LISTSERV.UA.EDU
Date: 2015-05-12 19:59
Subject:Re: Where can a running TSO program get its "terminal
name"
Sent by:IBM Mainframe Discussion List
Many
38 matches
Mail list logo
