Using SyzMPF/z you would only need to code 3 lines in the script for message
IEF455D:
IF WORD 02 = SP5145 | SP5146 | SP5147 | SP5149
Reply ,NO
ENDIF
We count the words of a message starting with zero as the messageid and (in
this case) the message itself is:
IEF455D MOUNT ser ON dev FOR
This guy gets it - "TOKEN" is useful, so long as the vendor doesn't change
the message layout.
On Mon, Nov 30, 2020 at 11:47 AM Cieri, Anthony <
02d7f4ec1fff-dmarc-requ...@listserv.ua.edu> wrote:
>
> You could try something like this:
>
> IF (LABEL:IEF455D) MSGID = 'IEF455D'
On Mon, 30 Nov 2020 23:03:25 +, Seymour J Metz wrote:
>It's not just IBM that has never heard of orthogonality.
>
Ah! meta-orthogonality!
FOSS is somewhat immune. Requesters needn't provide a
revenue justification because revenue is not a concern.
-- gil
It's not just IBM that has never heard of orthogonality.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
On Tue, 1 Dec 2020 08:14:06 +1100, Attila Fogarasi wrote:
>SKIP(ON) is the ISPF panel field attribute that causes automatic skip to
>next field when the cursor reaches the end of a field (SKIP(OFF) is the
>default). I'm not 100% sure about your second question (insert spanning
>
Not needed.
Except for the handling of the New Line order, the end of a line has no
significance to a 3270 data stream. If the field extends into another line and
you type into the last character of the first line, then you advance to the
first character of the next line. Similarly, if a field has trailing
SKIP(ON) is the ISPF panel field attribute that causes automatic skip to
next field when the cursor reaches the end of a field (SKIP(OFF) is the
default). I'm not 100% sure about your second question (insert spanning
fields) but AFAIK insert is limited to a single field (it certainly was in
the
Not in any meaningful sense, no, it isn’t possible. There are two
varieties of System Recovery Boost: longer boosts, that happen during IPL
and shutdown, and short boosts that happen in response to certain sysplex
events. It's not something you can trigger whenever you want to.
---
Kevin
In your example, assuming that the input field spans two lines :
(1) When the user starts to type on the first line and gets to the end of the
input field in the line, is the input skipped to the next line?
(2) If there is existing data on the second line and the user attempts to
insert data
I don't understand. If you have an SFE in the middle of line n and the next
SF/SFE is at the end of line n+1, what insert issue exists? Or do you have
another field at the end of line n, e.g.,
)ATTR DEFAULT(%+])
^ TYPE(INPUT) CAPS(OFF) INTENS(HIGH) MAXLEN(120)
! TYPE(OUTPUT)
On Mon, 30 Nov 2020 17:47:06 +, Jesse 1 Robinson wrote:
>I considered the effect of trailing blanks and had my colleague check for
>nulls or blanks in ISPF Option 0.
>
>General
> Input field pad . . N
> Command delimiter . ;
>
>Even after changing from blank to nlll, his
>> How about a panel that has a single field across two lines? That's bog
>> standard.
The insert mode issue still persists. We have tried using ZEXPAND but that does
not solve the problem either.
As for 43x80 being archaic, we still have LOTS of customers still using 24x80 !
From: IBM
On Mon, 30 Nov 2020 17:39:33 +, Jeremy Nicoll wrote:
>On Mon, 30 Nov 2020, at 17:29, Rob Scott wrote:
>
>> This may well be different in raw 3270 datasteam (I have very limited
>> exposure to that) , however interactive use of SDSF on z/OS is mainly
>> via ISPF.
>
>Is it still possible to run
When you run SDSF in batch it assumes card images and the functionality is VERY
limited.
SDSF batch was stabilized many years ago and we now strongly suggest that users
adopt SDSF REXX.
You can use the ISFSLASH function in SDSF REXX to issue operator commands.
Rob Scott
Rocket Software
You could try something like this:
IF (LABEL:IEF455D) MSGID = 'IEF455D' & TEXT(1) = REPLYID .
& (TEXT = .'SP5145'. | TEXT = .'SP5146'. | TEXT = .'SP5147'. | TEXT =
.'SP5149'.)
THEN EXEC(CMD('MVS REPLY ' REPLYID ',NO')
I considered the effect of trailing blanks and had my colleague check for nulls
or blanks in ISPF Option 0.
General
Input field pad . . N
Command delimiter . ;
Even after changing from blank to null, his SDSF fill character appeared to be
blank.
.
.
J.O.Skip Robinson
On Mon, 30 Nov 2020, at 17:29, Rob Scott wrote:
> This may well be different in raw 3270 datasteam (I have very limited
> exposure to that) , however interactive use of SDSF on z/OS is mainly
> via ISPF.
Is it still possible to run SDSF in batch, with commands provided via an
ISFIN dd
>> No! Don't think of "stripping trailing blanks". Simply don't append blanks
>> when the input field contained NULs (which the 3270 protocol doesn't
>> transmit to the host. Some emulators deviate from this.)
When a user EOFs part of the line and presses enter, the ISPF application gets
> The lack of "insert mode" across both lines is frustrating, but I am not sure
> there is a solution to that
> apart from a wide screen panel that has a single input field.
How about a panel that has a single field across two lines? That's bog standard.
> This would only provide relief for
so now I've got a lead on our good friend SMS :(
which of course hasn't changed in 2 years.
looks like maybe storclas isn't being defined
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to
On Mon, 30 Nov 2020 16:10:51 +, Rob Scott wrote:
>
>(3) Automatically stripping trailing blanks from the first line would require
>SDSF to have knowledge of the syntax of the command or some sort of awareness
>of whether quotes or double-quotes are in effect and unbounded and if so, is
A few notes about this issue.
(1) The reason that "skip" does not work on the POPUP panel is down to the
interplay between the ISPF attributes and the escape characters used to draw
the window.
(2) The original developer workaround for (1) was the ability to switch to a
panel using PF5 to
We most commonly see names like
IGY.V630.SIGYCOMP
IGY.V6R3M0.SIGYCOMP
IGY630.SIGYCOMP
Charles
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf
Of Mark Jacobs
Sent: Monday, November 30, 2020 6:26 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject:
On Mon, 30 Nov 2020, at 14:42, Barkow, Eileen wrote:
> All I know is that in the past I was not able to use the STRIP function
> in NETVIEW - I remember researching the issue at the time and
> comparing TSO REXX to NETVIEW REXX. Even if STRIP worked in native
> NETVIEW, it did not work with
Gil, thanks.
I do get that message but when I do a listcat, the mastcat and usercat look
correct.
They look the same as other previously defined users.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send
On Mon, 30 Nov 2020 07:51:15 -0600, Jeffrey Holst wrote:
>If you press PF1 to get the help for this panel, you will see that this is
>working exactly as described there. As someone else discussed, PF5 will get
>you to a screen where you can type your command in one continuous stream.
>
All too
All I know is that in the past I was not able to use the STRIP function in
NETVIEW - I remember researching the issue at the time and
comparing TSO REXX to NETVIEW REXX. Even if STRIP worked in native NETVIEW,
it did not work with automation.
-Original Message-
From: IBM Mainframe
On Mon, 30 Nov 2020, at 14:35, Seymour J Metz wrote:
> That appears to refer to native NetView EXECs, not to REXX NetView EXECs.
No, it's describing the Message Automation Table syntax, where one
tells netview how to match messages it might see, and for selected
messages invoke specific
On Mon, 30 Nov 2020, at 14:30, Barkow, Eileen wrote:
> APAR Identifier .. OA36757 Last Changed 11/09/02
> STRIP FUNCTION TO STRIP OFF LEADING AND TRAILING BLANKS
This isn't a Netview REXX issue. It's describing use in a message
automation table, in the EXEC command that
That appears to refer to native NetView EXECs, not to REXX NetView EXECs.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Barkow, Eileen
APAR Identifier .. OA36757 Last Changed 11/09/02
STRIP FUNCTION TO STRIP OFF LEADING AND TRAILING BLANKS
FROM A VARIABLE VALUE
Symptom .. NF NEWFUNCTION Status ... CLOSED UR1
Severity ... 3 Date Closed . 11/08/01
On Mon, 30 Nov 2020, at 13:57, Seymour J Metz wrote:
> Where and how is the code failing?
[snip]
Sorry to reply to this post, but I've deleted the OP's question. But
looking at the part you included at the foot of your mail...
> 'PIPE SAFE * | STEM MSG.'
>
> TOvolume = Word( Msg,4 )
>
The runtime library is most likely CEE.SCEERUM, CEE.SCEERUN2. The compiler
datasets are usually prefixed by IGY.
Mark Jacobs
Sent from ProtonMail, Swiss-based encrypted email.
GPG Public Key -
https://api.protonmail.ch/pks/lookup?op=get=markjac...@protonmail.com
‐‐‐ Original Message
Hello all,
Does anyone know the default library for IBM COBOL in Z/OS?
SYS1.
Thanks Carlos Martinez
SUNY Down State
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Don Poitras
Sent: Monday, November 30, 2020 7:55 AM
To:
On Mon, 30 Nov 2020, at 14:00, Barkow, Eileen wrote:
> Sorry about that. I see that STRIP is available in NETVIEW REXX now. it
> was not a few releases ago when I tried to use it.
I have a handful of copies of old netview execs here. I'm looking now
at one I wrote in 1996 and it uses strip().
Sorry about that. I see that STRIP is available in NETVIEW REXX now. it was not
a few releases ago when I tried to use it.
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Seymour J Metz
Sent: Monday, November 30, 2020 8:44 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject:
Where and how is the code failing?
BTW, you don't need the STRIP the output of the WORD function.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
saurabh khandelwal
If you press PF1 to get the help for this panel, you will see that this is
working exactly as described there. As someone else discussed, PF5 will get you
to a screen where you can type your command in one continuous stream.
Someone noted that the SLIP command is "quirky." Perhaps so, but only
Where is that documented? As far as I can tell Netview doesn't have its own
REXX interpreter, but rather uses TSO/E REXX and the REXX compiler product.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List
On Mon, 30 Nov 2020, at 12:42, Barkow, Eileen wrote:
> STRIP is not allowed in NETVIEW REXX
Why do you say that?
--
Jeremy Nicoll - my opinions are my own.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
In article
you wrote:
> Rupert Reynolds wrote:
> >Thinking further, I now remember that their only debugger was TSO TEST! I
> >wrote a mixture of Rexx and CLIST commands to extend it a bit (show regs
> >and disassemble the next instruction, every breakpoint).
> >
> >Is there anything more
STRIP is not allowed in NETVIEW REXX
You can just do something like this:
V = SUBSTR(MSGVAR(4),1,8)
IF V = '*SP5145*' | V='*SP5146*' THEN
R MSGVAR(1),NO
EXIT
EXIT
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Itschak Mugzach
Sent: Monday, November 30, 2020 3:40
See SYS1.PARMLIB(AUTORxx)
ITschak Mugzach
*|** IronSphere Platform* *|* *Information Security Continuous Monitoring
for z/OS, x/Linux & IBM I **| z/VM coming soon *
On Mon, Nov 30, 2020 at 10:39 AM Itschak Mugzach
wrote:
> See SYS1.PARMLIB(AUTORxx)
>
> *| **Itschak Mugzach | Director |
See SYS1.PARMLIB(AUTORxx)
*| **Itschak Mugzach | Director | SecuriTeam Software **|** IronSphere
Platform* *|* *Information Security Continuous Monitoring for Z/OS, zLinux
and IBM I **| *
*|* *Email**: i_mugz...@securiteam.co.il **|* *Mob**: +972 522 986404 **|*
*Skype**: ItschakMugzach **|*
Dear Group ,
We have requirement to automate below manual reply comes in console every
time, when we don’t find volume in our system and the standard reply to
these message is *Reply id, NO.*
10.14.03 JOB09020 *29 *IEF455D* MOUNT *SP5145* ON 0FAA FOR CASPLPRO SARBCH
OR REPLY 'NO'l
In this
45 matches
Mail list logo