Re: Issue WTO message using MVS SEND command

2018-06-22 Thread saurabh khandelwal
Hello Steve,
In below example, how do we make sure which console, this output should go.
Don't we need to put console name in this rexx and will i be getting these
message in white color or red color. to operator console.


 /* REXX   */
'PIPE SAFE * | STEM MSG.'
TODataset = Word( Msg.3,3 )
WTO.CONSNAME = ''
WTO.DESC = '00100010'/* RED   */
WTO.DESC = '01000100'/* WHITE */
WTO.MCSFLAG  = ''
WTO.TEXT =  'OPSMSG01 FIB DATASET NAME IS' TODataset
WTO.
EXIT



On Sat, Jun 23, 2018 at 3:35 AM, Steve Horein 
wrote:

>  /* REXX   */
> 'PIPE SAFE * | STEM MSG.'
> TODataset = Word( Msg.3,3 )
> WTO.CONSNAME = ''
> WTO.DESC = '00100010'/* RED   */
> WTO.DESC = '01000100'/* WHITE */
> WTO.MCSFLAG  = ''
> WTO.TEXT =  'OPSMSG01 FIB DATASET NAME IS' TODataset
> WTO.
> EXIT
>
> On Fri, Jun 22, 2018 at 1:15 PM saurabh khandelwal <
> sourabhkhandelwal...@gmail.com> wrote:
>
> > Thanks for reply.
> >
> > I looked at netview command manual and found  "WTO.TEXT" can be used for
> > this purpose. But I am not sure, how do I incorporate this into this
> case.
> >
> > Netview table code.
> >
> >  IF MSGID = 'SVTM052I' THEN
> >  EXEC(CMD('FIBREXX')) NETLOG(Y) SYSLOG(Y);
> >
> >
> >
> > In our rexx we retrieve the full messge via:
> >
> > /* REXX   */
> >
> > 'PIPE SAFE * | STEM MSG.'
> >
> > TODataset = Word( Msg.3,3 )
> > mvs "send 'FIB DATASET NAME IS "TODataset"',CON=CNDVMSTR"
> >
> > in this rexx, where do I need to add WTO.TEXT to display  TODataset as
> WTO
> > message on operator console.
> >
> > Can anybody suggest to implement this change.
> >
> >
> >
> > On Fri, Jun 22, 2018 at 5:15 PM, Lucas Rosalen 
> > wrote:
> >
> > > Right tool for the right job.
> > >
> > > Read about WTO (REXX) command in Netview commands manual.
> > >
> > > 
> > > ---
> > > *Lucas Rosalen*
> > > rosalen.lu...@gmail.com / lucas.rosal...@ibm.com
> > > http://br.linkedin.com/in/lrosalen
> > >
> > >
> > > 2018-06-22 6:31 GMT+02:00 saurabh khandelwal <
> venkatkulkarn...@gmail.com
> > >:
> > >
> > > > Hello Group,
> > > >
> > > >
> > > >  /*  REXX */
> > > >
> > > > 'PIPE SAFE * | STEM MSG.'
> > > >
> > > >
> > > >
> > > > TODataset = Word( Msg.3,3 )
> > > >
> > > > mvs "send 'My console name is  "TODataset"',CN=CNDVMSTR"
> > > >
> > > > exit
> > > >
> > > >
> > > > We used CN operand with send command to send message to  operator
> > console
> > > > and now i receive output as required.
> > > >
> > > > But this message is visible in green color which get disappeared as
> > other
> > > > message comes on console.
> > > >
> > > > But, I would like to have these message in white color ( not sure if
> we
> > > can
> > > > say as WTO), so that until operator intervention, these message will
> be
> > > on
> > > > console itself.
> > > >
> > > >
> > > > Can you please suggest, how can i achieve this
> > > >
> > > > 
> --
> > > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > > send email to lists...@listserv.ua.edu with the message: INFO
> IBM-MAIN
> > > >
> > >
> > > --
> > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> > >
> >
> >
> >
> > --
> > Thanks & Regards
> > Saurabh Khandelwal
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Issue WTO message using MVS SEND command

2018-06-22 Thread Steve Horein
 /* REXX   */
'PIPE SAFE * | STEM MSG.'
TODataset = Word( Msg.3,3 )
WTO.CONSNAME = ''
WTO.DESC = '00100010'/* RED   */
WTO.DESC = '01000100'/* WHITE */
WTO.MCSFLAG  = ''
WTO.TEXT =  'OPSMSG01 FIB DATASET NAME IS' TODataset
WTO.
EXIT

On Fri, Jun 22, 2018 at 1:15 PM saurabh khandelwal <
sourabhkhandelwal...@gmail.com> wrote:

> Thanks for reply.
>
> I looked at netview command manual and found  "WTO.TEXT" can be used for
> this purpose. But I am not sure, how do I incorporate this into this case.
>
> Netview table code.
>
>  IF MSGID = 'SVTM052I' THEN
>  EXEC(CMD('FIBREXX')) NETLOG(Y) SYSLOG(Y);
>
>
>
> In our rexx we retrieve the full messge via:
>
> /* REXX   */
>
> 'PIPE SAFE * | STEM MSG.'
>
> TODataset = Word( Msg.3,3 )
> mvs "send 'FIB DATASET NAME IS "TODataset"',CON=CNDVMSTR"
>
> in this rexx, where do I need to add WTO.TEXT to display  TODataset as WTO
> message on operator console.
>
> Can anybody suggest to implement this change.
>
>
>
> On Fri, Jun 22, 2018 at 5:15 PM, Lucas Rosalen 
> wrote:
>
> > Right tool for the right job.
> >
> > Read about WTO (REXX) command in Netview commands manual.
> >
> > 
> > ---
> > *Lucas Rosalen*
> > rosalen.lu...@gmail.com / lucas.rosal...@ibm.com
> > http://br.linkedin.com/in/lrosalen
> >
> >
> > 2018-06-22 6:31 GMT+02:00 saurabh khandelwal  >:
> >
> > > Hello Group,
> > >
> > >
> > >  /*  REXX */
> > >
> > > 'PIPE SAFE * | STEM MSG.'
> > >
> > >
> > >
> > > TODataset = Word( Msg.3,3 )
> > >
> > > mvs "send 'My console name is  "TODataset"',CN=CNDVMSTR"
> > >
> > > exit
> > >
> > >
> > > We used CN operand with send command to send message to  operator
> console
> > > and now i receive output as required.
> > >
> > > But this message is visible in green color which get disappeared as
> other
> > > message comes on console.
> > >
> > > But, I would like to have these message in white color ( not sure if we
> > can
> > > say as WTO), so that until operator intervention, these message will be
> > on
> > > console itself.
> > >
> > >
> > > Can you please suggest, how can i achieve this
> > >
> > > --
> > > For IBM-MAIN subscribe / signoff / archive access instructions,
> > > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> > >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
>
>
> --
> Thanks & Regards
> Saurabh Khandelwal
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Example of TSO Test call subcommand

2018-06-22 Thread Jesse 1 Robinson
I'll play Lizette here. There's a TSO-REXX discussion list that you should 
consider as well:

For TSO-REXX subscribe / signoff / archive access instructions,  
send email to lists...@vm.marist.edu with the message: INFO TSO-REXX  

In any case, I think we need more details on your problem. First off, what 
exactly are you trying to do? Give an example of something that does not work. 
You mention multiple problems, but one or two examples should suffice to start 
with. 

.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
323-715-0595 Mobile
626-543-6132 Office ⇐=== NEW
robin...@sce.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Joseph Reichman
Sent: Friday, June 22, 2018 1:02 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Example of TSO Test call subcommand

Would anyone have an example
I am getting all sorts of errors
Would the TSOLIB be good enough
That I just enter the load module name 

Thanks 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Eternal WAIT on un-waited ECB

2018-06-22 Thread Steve Smith
Duh... the cancel almost certainly did the un-wait.  It's easy to forget
that the train wreckage isn't exactly where the track broke.

That brings me back to trying to figure out why VSAM never POSTed me
(besides the fact it hates me).  But clearing the ECB is a good start, and
maybe a STIMERM to stop the madness if that doesn't work.

sas

On Fri, Jun 22, 2018 at 5:17 PM, Jim Mulder  wrote:

>   The x'30' means that the PRB was waiting on that ECB, but then there was
>
> a Post-without-ECB that unwaited the ECB.  RTM would do that in order to
> ABTERM the
> TCB  (possibly for the CANCEL with DUMP  122 abend).

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Two new RFE's to consider supporting

2018-06-22 Thread Frank Swarbrick
I've been utilizing this new "point and shoot" feature in SDSF for about a week 
now.  I like it, but its not perfect, for reasons others have mentioned.

In this particular case it seems to me what would be ideal is if the feature 
did not require the cursor to be placed within the JOBNAME column.  Rather, it 
seems to me that:
- If the cursor is anywhere in a particular row,
- and the NP column for that row is "empty",
- then "pressing enter" would have the same action as if the NP column had '?' 
entered in to it.

Can't think of anything that would break, but who knows.  I believe it would 
eliminate any need to turn on the ISPF "Tab to point-and-shoot fields" option.  
Basically, if not using a mouse, you could simply "newline" to the NP column on 
the desired line (without having to worry about "tabable" column headers) and 
press enter.

I have no idea if this would address the actual reason the RFE was opened.

Frank

From: IBM Mainframe Discussion List  on behalf of 
Jesse 1 Robinson 
Sent: Friday, June 22, 2018 11:08 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Two new RFE's to consider supporting

I voted for the PAS RFE as a user, not considering what I know--or don't 
know--about the underlying technology. A particular ISV product some time ago 
changed a screen to create exactly what Lionel is complaining about. A column 
title on a PDS member list was suddenly tabbable, 'capturing' the cursor on its 
way to the first member entry. I complained and got the answer that some 
customers wanted this behavior so they could (re)sort the list based on that 
column. My objection was that 99% of the time a(ny) user wants to select a 
member entry, not sort the list. ISV gave me some kind of fix.

I recently started a thread here on the new default behavior of SDSF in z/OS 
2.3. PAS, if it's useful at all, should be controllable by the user. I question 
the value of PAS if only because it interrupts the 'finger flow' of an 
application. You have to keep a wary eye peeled on the screen all the time to 
know where you're at. That might be fine for a first-time or occasional user, 
but it compromises productivity for the experienced user. Which most of us are.

.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler
SHARE MVS Program Co-Manager
323-715-0595 Mobile
626-543-6132 Office ⇐=== NEW
robin...@sce.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Seymour J Metz
Sent: Friday, June 22, 2018 9:10 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: Two new RFE's to consider supporting

Given that ISPF already supports point and shoot and that IBM has no control 
over 3rd party 3270 simulators and TN3270 clients, you'll need a strong 
business case. The only solution I know of within the existing 3270 protocol is 
a zero-width field.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List  on behalf of 
Dyck, Lionel B. (RavenTek) 
Sent: Thursday, June 21, 2018 3:08 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Two new RFE's to consider supporting

Please consider supporting these RFE's that I just submitted:

ISPF Point and Shoot Protected Fields

https://secure-web.cisco.com/1eSaRV5UJ3V1J9lFuWduNMNEXKwsjEr0nnYLCdtANa5wcGIytP_p89VwxV76dUYujSzZGvsssoum5dfWf031TCGUtebzzpwdlkSgZJnaqbpOkVLJas5jtys5H1gU8JRFNOD2vMXd3U8abHHyUJFosa64XBfNSgGc5MvffGa_1ZfKyWEpmQAA3kv0sNVrx-whBQbW89l_3pWtg15_7MBLqVtWvke6na3t-Tk6vOswu28yUE4IUe2koNEA8oyONANQER39qJALUqHMLIzs58oysAkIsJcmb1ccODLmdnzKY2gXS9eVRancgDDeqgVBCArpyN5npMA64aVH_B47XdVoSdSV7DtHk5UyIdPlCkMjOI69Dv8kpj0u74ruw1jKi-4U9/https%3A%2F%2Fwww.ibm.com%2Fdeveloperworks%2Frfe%2Fexecute%3Fuse_case%3DviewRfe%26CR_ID%3D121576

And

Improve ISPF 3.17 by allowing CD on the command line

https://secure-web.cisco.com/1xtqTd4IbEpSIeq1S0zeI1IMPcAcWsFuqmZWHpViLukOiAtsG1u7lb2OGbEuJwHffWY-3ICATc1LstgliNG5YJwm_ehvRmlvFVRjp1_ELkgd2iFLph4vBOuNp9wHVtL3RKyceFMRN7yre-njqs_Cp5ejI7zvJhlJ9KQNaY5Uf-3lQTeIfIugyV8IIgCZR8TlawkDi4qZiF7y_zgKvvN0SxF_Xz1oJoLxm35MAsfUGMTUGsbJx4aT3jrANFbnl0DsO_SX5FTaYfjwWwsARjRQPgzrQ3kmz-_4QLdHofUx_xy541tlAJhhYLLpLZ-xJoNkzcA5aQ--sPgP_7WkfCHn9hOLgHD5yzj8m5z4KMY5w5M78ygtsyAV9psRghqfpCT1w/https%3A%2F%2Fwww.ibm.com%2Fdeveloperworks%2Frfe%2Fexecute%3Fuse_case%3DviewRfe%26CR_ID%3D121575


--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Eternal WAIT on un-waited ECB

2018-06-22 Thread Jim Mulder
  The x'30' means that the PRB was waiting on that ECB, but then there was 

a Post-without-ECB that unwaited the ECB.  RTM would do that in order to 
ABTERM the
TCB  (possibly for the CANCEL with DUMP  122 abend). 

  If the TCB is not running now, it should not be because it is waiting on 
that ECB.
Not much more I can tell you without seeing the dump. Is the TCB set 
nondispatchable?   Has parallel detach gotten its fingers in there?

Jim Mulder z/OS Diagnosis, Design, Development, Test  IBM Corp. 
Poughkeepsie NY

"IBM Mainframe Discussion List"  wrote on 
06/22/2018 03:14:34 PM:

> From: "Steve Smith" 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 06/22/2018 05:07 PM
> Subject: Eternal WAIT on un-waited ECB
> Sent by: "IBM Mainframe Discussion List" 
> 
> I have a bad situation where a program is hanging forever in a wait. The
> ECB shows x'30ABFC50'.  The lower 3 bytes are the address of my PRB, and 
I
> read somewhere that x'30' means it was un-waited (something like undead, 
I
> guess).  This happens after some turmoil, and it's probable, not yet
> certain, the ECB looked like that when I waited on it.
> 
> This is actually a VSAM CHECK after an asynchronous POINT.  Looking at 
the
> S122 dump, the RPLACTIV flag is on, RPLFDBK is all 0.
> 
> My question is, would clearing the ECB before the asynch. request fix
> this?  I believe I ought to anyway, but my question is if this could 
cause
> the hang?
> 
> I have no way to re-create the situation.  Unfortunately, my customers
> evidently do.



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Eternal WAIT on un-waited ECB

2018-06-22 Thread Charles Mills
Examples are actually in Authorized Assembler Services Guide.

The fast POST example is unfortunately based on System 370 instructions. 

I would say "clear the ECB sometime before either the WAIT or the POST is 
possible." Keep in mind that in some situations the POST might happen before 
the WAIT.

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Christopher Y. Blaicher
Sent: Friday, June 22, 2018 1:07 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Eternal WAIT on un-waited ECB

At the start of everything, you should clear the ECB. Immediately after the 
WAIT you should clear it.  OK, first pick up the value in the ECB in case it 
has significance and then clear it.
You should also look at the FAST POST and FAST WAIT examples in Appendix A of 
the POP manual.  They can save substantial CPU time if you do this often.

Chris Blaicher
Technical Architect
Syncsort, Inc.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Steve Smith
Sent: Friday, June 22, 2018 3:15 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Eternal WAIT on un-waited ECB

I have a bad situation where a program is hanging forever in a wait.  The ECB 
shows x'30ABFC50'.  The lower 3 bytes are the address of my PRB, and I read 
somewhere that x'30' means it was un-waited (something like undead, I guess).  
This happens after some turmoil, and it's probable, not yet certain, the ECB 
looked like that when I waited on it.

This is actually a VSAM CHECK after an asynchronous POINT.  Looking at the
S122 dump, the RPLACTIV flag is on, RPLFDBK is all 0.

My question is, would clearing the ECB before the asynch. request fix this?  I 
believe I ought to anyway, but my question is if this could cause the hang?

I have no way to re-create the situation.  Unfortunately, my customers 
evidently do.

--
sas

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


AW: Re: 2 possible RFE --- ISPF & SDSF.

2018-06-22 Thread Peter Hunkeler
>Correct. The hex value is the important part. Depending on your codepage 
>and/or keyboard it may look like a completely different character.


>But if you have something that not code-page aware and expects a $ (dollar 
>sign) then it's looking for x'5B'. You have to type whatever character on your 
>keyboard will give you that hex value.



The latter is not generally true. It depends with what code page in mind the 
unaware application has been written. At a former employer, CP 500 was the 
standard. So every application, although code-page unaware, expected data to be 
in CP 500. And so a $ had to be x'5C'.


The x'5B' applies when the unaware application, e.g. MVS, JESx, etc, was 
written with CP 037 in mind.


--
Peter Hunkeler

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Eternal WAIT on un-waited ECB

2018-06-22 Thread Christopher Y. Blaicher
At the start of everything, you should clear the ECB. Immediately after the 
WAIT you should clear it.  OK, first pick up the value in the ECB in case it 
has significance and then clear it.
You should also look at the FAST POST and FAST WAIT examples in Appendix A of 
the POP manual.  They can save substantial CPU time if you do this often.

Chris Blaicher
Technical Architect
Syncsort, Inc.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Steve Smith
Sent: Friday, June 22, 2018 3:15 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Eternal WAIT on un-waited ECB

I have a bad situation where a program is hanging forever in a wait.  The ECB 
shows x'30ABFC50'.  The lower 3 bytes are the address of my PRB, and I read 
somewhere that x'30' means it was un-waited (something like undead, I guess).  
This happens after some turmoil, and it's probable, not yet certain, the ECB 
looked like that when I waited on it.

This is actually a VSAM CHECK after an asynchronous POINT.  Looking at the
S122 dump, the RPLACTIV flag is on, RPLFDBK is all 0.

My question is, would clearing the ECB before the asynch. request fix this?  I 
believe I ought to anyway, but my question is if this could cause the hang?

I have no way to re-create the situation.  Unfortunately, my customers 
evidently do.

--
sas

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Example of TSO Test call subcommand

2018-06-22 Thread Joseph Reichman
Would anyone have an example 
I am getting all sorts of errors
Would the TSOLIB be good enough 
That I just enter the load module name 

Thanks 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: 2 possible RFE --- ISPF & SDSF.

2018-06-22 Thread Walt Farrell
On Fri, 22 Jun 2018 15:02:35 -0400, Steve Smith  wrote:

>I'll grant you have a point... but I thought the national characters were
>defined as x'5B', x'7B', and x'7C', regardless of how displayed.
>

Correct. The hex value is the important part. Depending on your codepage and/or 
keyboard it may look like a completely different character. But if you have 
something that not code-page aware and expects a $ (dollar sign) then it's 
looking for x'5B'. You have to type whatever character on your keyboard will 
give you that hex value.

-- 
Walt

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Eternal WAIT on un-waited ECB

2018-06-22 Thread Steve Smith
I have a bad situation where a program is hanging forever in a wait.  The
ECB shows x'30ABFC50'.  The lower 3 bytes are the address of my PRB, and I
read somewhere that x'30' means it was un-waited (something like undead, I
guess).  This happens after some turmoil, and it's probable, not yet
certain, the ECB looked like that when I waited on it.

This is actually a VSAM CHECK after an asynchronous POINT.  Looking at the
S122 dump, the RPLACTIV flag is on, RPLFDBK is all 0.

My question is, would clearing the ECB before the asynch. request fix
this?  I believe I ought to anyway, but my question is if this could cause
the hang?

I have no way to re-create the situation.  Unfortunately, my customers
evidently do.

-- 
sas

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: 2 possible RFE --- ISPF & SDSF.

2018-06-22 Thread Steve Smith
I'll grant you have a point... but I thought the national characters were
defined as x'5B', x'7B', and x'7C', regardless of how displayed.

sas

On Fri, Jun 22, 2018 at 2:32 PM, Peter Hunkeler  wrote:

>
> >I believe JCL's set of "allowable" characters is only a fraction of any
> code page.  And probably only common code points.
>
>
> The problem with probabilities? They may fool you :-)
>
>
> The famous "national characters" @, #, and $ in some code pages (all hex
> values):
> CP 285 (UK, etc.): 7b, 7c, 4a
> CP 273 (Germany, etc.): b5, 7b, 5b
> CP 500 (International): 7c, 7b, 5c
> CP 280 (Italy, etc.): b5, b0, 5b
>
>
> --
> Peter Hunkeler
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


AW: Re: 2 possible RFE --- ISPF & SDSF.

2018-06-22 Thread Peter Hunkeler

>I believe JCL's set of "allowable" characters is only a fraction of any
code page.  And probably only common code points.


The problem with probabilities? They may fool you :-)


The famous "national characters" @, #, and $ in some code pages (all hex 
values):
CP 285 (UK, etc.): 7b, 7c, 4a
CP 273 (Germany, etc.): b5, 7b, 5b
CP 500 (International): 7c, 7b, 5c
CP 280 (Italy, etc.): b5, b0, 5b


--
Peter Hunkeler










--
Peter Hunkeler

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Two new RFE's to consider supporting

2018-06-22 Thread Steve Smith
Dang it, I wasn't.  From the RFE: " An output field should be protected
while still allowing tabbing to it. "

This is why I hate to admit being wrong.  Just wind up having to do it
again.

sas

On Fri, Jun 22, 2018 at 1:42 PM, Steve Smith  wrote:

> I was off-base with the tabs to protected fields.  I typically use tabs
> for point & shoot, and forgot about the other ways.
>
> ISPF already has an option to allow/disallow tab to point & shoot fields.
> I usually have this set off, as I don't really use point & shoot much.
> Habits developed in the 80s, ya know, on real, heavy-metal 3277s and
> 3278s*.  Is the RFE actually requesting something else?
>
> sas
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Issue WTO message using MVS SEND command

2018-06-22 Thread saurabh khandelwal
Thanks for reply.

I looked at netview command manual and found  "WTO.TEXT" can be used for
this purpose. But I am not sure, how do I incorporate this into this case.

Netview table code.

 IF MSGID = 'SVTM052I' THEN
 EXEC(CMD('FIBREXX')) NETLOG(Y) SYSLOG(Y);



In our rexx we retrieve the full messge via:

/* REXX   */

'PIPE SAFE * | STEM MSG.'

TODataset = Word( Msg.3,3 )
mvs "send 'FIB DATASET NAME IS "TODataset"',CON=CNDVMSTR"

in this rexx, where do I need to add WTO.TEXT to display  TODataset as WTO
message on operator console.

Can anybody suggest to implement this change.



On Fri, Jun 22, 2018 at 5:15 PM, Lucas Rosalen 
wrote:

> Right tool for the right job.
>
> Read about WTO (REXX) command in Netview commands manual.
>
> 
> ---
> *Lucas Rosalen*
> rosalen.lu...@gmail.com / lucas.rosal...@ibm.com
> http://br.linkedin.com/in/lrosalen
>
>
> 2018-06-22 6:31 GMT+02:00 saurabh khandelwal :
>
> > Hello Group,
> >
> >
> >  /*  REXX */
> >
> > 'PIPE SAFE * | STEM MSG.'
> >
> >
> >
> > TODataset = Word( Msg.3,3 )
> >
> > mvs "send 'My console name is  "TODataset"',CN=CNDVMSTR"
> >
> > exit
> >
> >
> > We used CN operand with send command to send message to  operator console
> > and now i receive output as required.
> >
> > But this message is visible in green color which get disappeared as other
> > message comes on console.
> >
> > But, I would like to have these message in white color ( not sure if we
> can
> > say as WTO), so that until operator intervention, these message will be
> on
> > console itself.
> >
> >
> > Can you please suggest, how can i achieve this
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
Thanks & Regards
Saurabh Khandelwal

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: ARC0104I INVALID INITIALIZATION COMMAND

2018-06-22 Thread Steve Smith
How about an RFE to stop doing this:

07:00:04.58 S0002089 0090  ARC0522I SPACE MANAGEMENT STARTING ON VOLUME
783
 783 0090  ARC0522I (CONT.) SMS019(SMS) AT 07:00:04 ON
2018/06/22, SYSTEM DVLP
07:00:04.79 S0002089 0090  ARC0523I SPACE MANAGEMENT ENDED ON VOLUME
SMS019, 784
 784 0090  ARC0523I (CONT.)  DATA SET(S)
MIGRATED/DELETED, 00
 784 0090  ARC0523I (CONT.) TRACK(S) FREED, MINAGE 0,
TIME 07:00:04
07:00:04.79 S0002089 0090  ARC0522I SPACE MANAGEMENT STARTING ON VOLUME
785
 785 0090  ARC0522I (CONT.) SMS018(SMS) AT 07:00:04 ON
2018/06/22, SYSTEM DVLP
07:00:04.81 S0002089 0090  ARC0523I SPACE MANAGEMENT ENDED ON VOLUME
SMS020, 786
 786 0090  ARC0523I (CONT.)  DATA SET(S)
MIGRATED/DELETED, 00
 786 0090  ARC0523I (CONT.) TRACK(S) FREED, MINAGE 0,
TIME 07:00:04
07:00:04.82 S0002089 0090  ARC0522I SPACE MANAGEMENT STARTING ON VOLUME
787
 787 0090  ARC0522I (CONT.) SMS017(SMS) AT 07:00:04 ON
2018/06/22, SYSTEM DVLP
07:00:04.97 S0002089 0090  ARC0523I SPACE MANAGEMENT ENDED ON VOLUME
SMS018, 788
 788 0090  ARC0523I (CONT.)  DATA SET(S)
MIGRATED/DELETED, 00
 788 0090  ARC0523I (CONT.) TRACK(S) FREED, MINAGE 0,
TIME 07:00:04
07:00:04.98 S0002089 0090  ARC0522I SPACE MANAGEMENT STARTING ON VOLUME
789
 789 0090  ARC0522I (CONT.) SMS016(SMS) AT 07:00:04 ON
2018/06/22, SYSTEM DVLP
07:00:05.00 S0002089 0090  ARC0523I SPACE MANAGEMENT ENDED ON VOLUME
SMS017, 790
 790 0090  ARC0523I (CONT.)  DATA SET(S)
MIGRATED/DELETED, 00
 790 0090  ARC0523I (CONT.) TRACK(S) FREED, MINAGE 0,
TIME 07:00:04
07:00:05.01 S0002089 0090  ARC0522I SPACE MANAGEMENT STARTING ON VOLUME
791
 791 0090  ARC0522I (CONT.) SMS015(SMS) AT 07:00:05 ON
2018/06/22, SYSTEM DVLP
07:00:05.08 S0002089 0090  ARC0523I SPACE MANAGEMENT ENDED ON VOLUME
SMS016, 792
 792 0090  ARC0523I (CONT.)  DATA SET(S)
MIGRATED/DELETED, 00
 792 0090  ARC0523I (CONT.) TRACK(S) FREED, MINAGE 0,
TIME 07:00:05
07:00:05.09 S0002089 0090  ARC0522I SPACE MANAGEMENT STARTING ON VOLUME
793
 793 0090  ARC0522I (CONT.) SMS014(SMS) AT 07:00:05 ON
2018/06/22, SYSTEM DVLP
07:00:05.13 S0002089 0090  ARC0523I SPACE MANAGEMENT ENDED ON VOLUME
SMS015, 794
 794 0090  ARC0523I (CONT.)  DATA SET(S)
MIGRATED/DELETED, 00
 794 0090  ARC0523I (CONT.) TRACK(S) FREED, MINAGE 0,
TIME 07:00:05
07:00:05.14 S0002089 0090  ARC0522I SPACE MANAGEMENT STARTING ON VOLUME
795
 795 0090  ARC0522I (CONT.) SMS013(SMS) AT 07:00:05 ON
2018/06/22, SYSTEM DVLP
07:00:05.22 S0002089 0090  ARC0523I SPACE MANAGEMENT ENDED ON VOLUME
SMS014, 796
 796 0090  ARC0523I (CONT.)  DATA SET(S)
MIGRATED/DELETED, 00
 796 0090  ARC0523I (CONT.) TRACK(S) FREED, MINAGE 0,
TIME 07:00:05
07:00:05.23 S0002089 0090  ARC0522I SPACE MANAGEMENT STARTING ON VOLUME
797
 797 0090  ARC0522I (CONT.) SMS012(SMS) AT 07:00:05 ON
2018/06/22, SYSTEM DVLP
07:00:05.27 S0002089 0090  ARC0523I SPACE MANAGEMENT ENDED ON VOLUME
SMS013, 798
 798 0090  ARC0523I (CONT.)  DATA SET(S)
MIGRATED/DELETED, 00
 798 0090  ARC0523I (CONT.) TRACK(S) FREED, MINAGE 0,
TIME 07:00:05
07:00:05.28 S0002089 0090  ARC0522I SPACE MANAGEMENT STARTING ON VOLUME
799
 799 0090  ARC0522I (CONT.) SMS011(SMS) AT 07:00:05 ON
2018/06/22, SYSTEM DVLP
07:00:05.35 S0002089 0090  ARC0523I SPACE MANAGEMENT ENDED ON VOLUME
SMS012, 800
 800 0090  ARC0523I (CONT.)  DATA SET(S)
MIGRATED/DELETED, 00
 800 0090  ARC0523I (CONT.) TRACK(S) FREED, MINAGE 0,
TIME 07:00:05
07:00:05.35 S0002089 0090  ARC0522I SPACE MANAGEMENT STARTING ON VOLUME
801
 801 0090  ARC0522I (CONT.) SMS010(SMS) AT 07:00:05 ON
2018/06/22, SYSTEM DVLP
07:00:05.45 S0002089 0090  ARC0523I SPACE MANAGEMENT ENDED ON VOLUME
SMS011, 802
 802 0090  ARC0523I (CONT.)  DATA SET(S)
MIGRATED/DELETED, 00
 802 0090  ARC0523I (CONT.) TRACK(S) FREED, MINAGE 0,
TIME 07:00:05
07:00:05.46 S0002089 0090  ARC0522I SPACE MANAGEMENT STARTING ON VOLUME
803
 803 0090  ARC0522I (CONT.) SMS009(SMS) AT 07:00:05 ON
2018/06/22, SYSTEM DVLP
07:00:05.53 S0002089 0090  ARC0523I SPACE MANAGEMENT ENDED ON VOLUME
SMS010, 804
 804 0090  ARC0523I (CONT.)  DATA SET(S)
MIGRATED/DELETED, 00
 804 0090  ARC0523I (CONT.) TRACK(S) FREED, MINAGE 0,
TIME 07:00:05

[SPAM] "Vulture Central" reports our IBM documentation cause

2018-06-22 Thread John McKown
I really enjoy the somewhat sarcastic articles on this U.K. site. This one
reviews the, now fixed, brouhaha about the 2.1 docs disappearing. IBM_MAIN
is mentioned by name!

https://www.theregister.co.uk/2018/06/21/ibm_mainframe_docs/

-- 
There is no such thing as the Cloud. It is just somebody else’s computer.

Maranatha! <><
John McKown

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: ARC0104I INVALID INITIALIZATION COMMAND

2018-06-22 Thread Max Smith
Please open an RFE for this, we responded to another RFE to enhance the 
ARC0103I message to be more descriptive in the next release.  We will look at 
doing the same for the ARC0104I message.

Thanks,
Max Smith
DFSMS Development

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Two new RFE's to consider supporting

2018-06-22 Thread Steve Smith
I was off-base with the tabs to protected fields.  I typically use tabs for
point & shoot, and forgot about the other ways.

ISPF already has an option to allow/disallow tab to point & shoot fields.
I usually have this set off, as I don't really use point & shoot much.
Habits developed in the 80s, ya know, on real, heavy-metal 3277s and
3278s*.  Is the RFE actually requesting something else?

sas

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Fwd: Finished, redefined | Computerworld Shark Tank

2018-06-22 Thread Mark Regan
Flashback to the 1980s, when computer-aided software engineering
methodologies are all the rage for major mainframe software projects,
according to a pilot fish in the know.

continued at ...

https://www.computerworld.com/article/3284106/application-development/finished-redefined.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Is TCBSENV propagated to child TCB by ATTACHX

2018-06-22 Thread Rob Scott
TCBSENV is not propagated to the daughter on ATTACH.

My suggestion would be to ATTACH DISP=NO and get the mother task to populate 
the field in the daughter.

Rob Scott
Rocket Software


 Original message 
From: Charles Mills 
Date: 22/06/2018 16:50 (GMT+00:00)
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Is TCBSENV propagated to child TCB by ATTACHX

I am very familiar with TCBSENV and I don't know the answer. My "guess" would 
be that it IS propagated, but that is a guess. Easy to run an experiment if you 
wanted to.

I do know that TCBSENV is "optional" -- it is zero a lot of the time. (That is, 
if you have code that sees a lot of "random" TCB's you will see a lot of 
TCBSENV == 0.) ASXBSENV is often a fallback.

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John McKown
Sent: Friday, June 22, 2018 7:43 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Is TCBSENV propagated to child TCB by ATTACHX

This is strictly a curiosity question. Suppose for some unspecified &
irrelevant to this discussion that my code is running under a TCB which has
a non-zero TCBSENV value. If my code were to do an ATTACHX to create a
subtask, would the new TCB have the same TCBSENV as my code, or would it be
zero? I did RTFM but did not see anything that addresses this. And an IBM
KC search got so many hits that I was completely befuddled.

--
There is no such thing as the Cloud. It is just somebody else’s computer.

Maranatha! <><
John McKown

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Rocket Software, Inc. and subsidiaries ¦ 77 Fourth Avenue, Waltham MA 02451 ¦ 
Main Office Toll Free Number: +1 855.577.4323
Contact Customer Support: 
https://my.rocketsoftware.com/RocketCommunity/RCEmailSupport
Unsubscribe from Marketing Messages/Manage Your Subscription Preferences - 
http://www.rocketsoftware.com/manage-your-email-preferences
Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy


This communication and any attachments may contain confidential information of 
Rocket Software, Inc. All unauthorized use, disclosure or distribution is 
prohibited. If you are not the intended recipient, please notify Rocket 
Software immediately and destroy all copies of this communication. Thank you.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Issue WTO message using MVS SEND command

2018-06-22 Thread Jesse 1 Robinson
I suppose it's rude to advise OP that the goal is of dubious value. It's not 
1978. 

We can however state that the goal is not achievable within the scope of the 
mechanism(s) proposed. Some kind of automation tool is called for. The 
'cheapest' would be an RYO WTO exit that changes the message attributes to 
non-rolling. OTOH if an automation product is already available, it should be 
easy to accomplish the same result with little coding.   

.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
323-715-0595 Mobile
626-543-6132 Office ⇐=== NEW
robin...@sce.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Seymour J Metz
Sent: Friday, June 22, 2018 8:42 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: Issue WTO message using MVS SEND command

 1. The TSO SEND command has very limited control over the WTO; for what you're 
doing,
you should read up on console areas and multi-line WTO, and code a 
REXX-aware
external function in assembler. Or use the support in NetView.

 2. You should seriously consider whether a non-scrollable message is an 
acceptable
solution for your application. The operators have enough to do.

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List  on behalf of 
saurabh khandelwal 
Sent: Friday, June 22, 2018 12:31 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Issue WTO message using MVS SEND command

Hello Group,


 /*  REXX */

'PIPE SAFE * | STEM MSG.'



TODataset = Word( Msg.3,3 )

mvs "send 'My console name is  "TODataset"',CN=CNDVMSTR"

exit


We used CN operand with send command to send message to  operator console and 
now i receive output as required.

But this message is visible in green color which get disappeared as other 
message comes on console.

But, I would like to have these message in white color ( not sure if we can say 
as WTO), so that until operator intervention, these message will be on console 
itself.


Can you please suggest, how can i achieve this


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: THINK (was: IBM shuffles mainframe docs ...)

2018-06-22 Thread Tomasz Rola
On Fri, Jun 22, 2018 at 09:24:25AM -0700, Charles Mills wrote:
> Спасибо.
> 
> Charles

Uhum. The preferable word is "Dziękuję", to which I would say "Nie ma
za co" (roughly, "No problem").

:-)

-- 
Regards,
Tomasz Rola

--
** A C programmer asked whether computer had Buddha's nature.  **
** As the answer, master did "rm -rif" on the programmer's home**
** directory. And then the C programmer became enlightened...  **
** **
** Tomasz Rola  mailto:tomasz_r...@bigfoot.com **

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


TAB (was: Two new RFE's ...)

2018-06-22 Thread Paul Gilmartin
On Fri, 22 Jun 2018 15:53:51 +, Seymour J Metz wrote:

>A TAB is a skip to the beginning of the next unprotected field, with 
>wrap-around. It does not start an unprotected field.
> 
Notoriously, IBM is reported to have obtained a patent on that behavior.

But numerous web pages incorporate that behavior.

Had the patent expired?

Did IBM choose not to defend it?

Or was the patent so specific as not to be applicable to web pages?

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Two new RFE's to consider supporting

2018-06-22 Thread Jesse 1 Robinson
I voted for the PAS RFE as a user, not considering what I know--or don't 
know--about the underlying technology. A particular ISV product some time ago 
changed a screen to create exactly what Lionel is complaining about. A column 
title on a PDS member list was suddenly tabbable, 'capturing' the cursor on its 
way to the first member entry. I complained and got the answer that some 
customers wanted this behavior so they could (re)sort the list based on that 
column. My objection was that 99% of the time a(ny) user wants to select a 
member entry, not sort the list. ISV gave me some kind of fix. 

I recently started a thread here on the new default behavior of SDSF in z/OS 
2.3. PAS, if it's useful at all, should be controllable by the user. I question 
the value of PAS if only because it interrupts the 'finger flow' of an 
application. You have to keep a wary eye peeled on the screen all the time to 
know where you're at. That might be fine for a first-time or occasional user, 
but it compromises productivity for the experienced user. Which most of us are.

.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
323-715-0595 Mobile
626-543-6132 Office ⇐=== NEW
robin...@sce.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Seymour J Metz
Sent: Friday, June 22, 2018 9:10 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: Two new RFE's to consider supporting

Given that ISPF already supports point and shoot and that IBM has no control 
over 3rd party 3270 simulators and TN3270 clients, you'll need a strong 
business case. The only solution I know of within the existing 3270 protocol is 
a zero-width field.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List  on behalf of 
Dyck, Lionel B. (RavenTek) 
Sent: Thursday, June 21, 2018 3:08 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Two new RFE's to consider supporting

Please consider supporting these RFE's that I just submitted:

ISPF Point and Shoot Protected Fields

https://secure-web.cisco.com/1eSaRV5UJ3V1J9lFuWduNMNEXKwsjEr0nnYLCdtANa5wcGIytP_p89VwxV76dUYujSzZGvsssoum5dfWf031TCGUtebzzpwdlkSgZJnaqbpOkVLJas5jtys5H1gU8JRFNOD2vMXd3U8abHHyUJFosa64XBfNSgGc5MvffGa_1ZfKyWEpmQAA3kv0sNVrx-whBQbW89l_3pWtg15_7MBLqVtWvke6na3t-Tk6vOswu28yUE4IUe2koNEA8oyONANQER39qJALUqHMLIzs58oysAkIsJcmb1ccODLmdnzKY2gXS9eVRancgDDeqgVBCArpyN5npMA64aVH_B47XdVoSdSV7DtHk5UyIdPlCkMjOI69Dv8kpj0u74ruw1jKi-4U9/https%3A%2F%2Fwww.ibm.com%2Fdeveloperworks%2Frfe%2Fexecute%3Fuse_case%3DviewRfe%26CR_ID%3D121576

And

Improve ISPF 3.17 by allowing CD on the command line

https://secure-web.cisco.com/1xtqTd4IbEpSIeq1S0zeI1IMPcAcWsFuqmZWHpViLukOiAtsG1u7lb2OGbEuJwHffWY-3ICATc1LstgliNG5YJwm_ehvRmlvFVRjp1_ELkgd2iFLph4vBOuNp9wHVtL3RKyceFMRN7yre-njqs_Cp5ejI7zvJhlJ9KQNaY5Uf-3lQTeIfIugyV8IIgCZR8TlawkDi4qZiF7y_zgKvvN0SxF_Xz1oJoLxm35MAsfUGMTUGsbJx4aT3jrANFbnl0DsO_SX5FTaYfjwWwsARjRQPgzrQ3kmz-_4QLdHofUx_xy541tlAJhhYLLpLZ-xJoNkzcA5aQ--sPgP_7WkfCHn9hOLgHD5yzj8m5z4KMY5w5M78ygtsyAV9psRghqfpCT1w/https%3A%2F%2Fwww.ibm.com%2Fdeveloperworks%2Frfe%2Fexecute%3Fuse_case%3DviewRfe%26CR_ID%3D121575


--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: THINK (was: IBM shuffles mainframe docs ...)

2018-06-22 Thread Pew, Curtis G
On Jun 22, 2018, at 10:49 AM, Tomasz Rola  wrote:
> 
> думать -> "to think", i.e. infinitive, a basic verb form
> 
> думай -> "think!", i.e. imperative mood, a verb in form of a command
> directed to someone

Thanks. After poking around in Google translate a bit more I was starting to 
suspect that.


-- 
Pew, Curtis G
curtis@austin.utexas.edu
ITS Systems/Core/Administrative Services


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: THINK (was: IBM shuffles mainframe docs ...)

2018-06-22 Thread Chris Hoelscher
We have the Harlem shuffle, even the Curley shuffle. Can we now add the 
Poughkeepsie shuffle

Chris Hoelscher
Technology Architect, Database Infrastructure Services
Technology Solution Services
Humana Inc.
123 East Main Street
Louisville, KY 40202
Humana.com
(502) 476-2538 or 407-7266
nd email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

The information transmitted is intended only for the person or entity to which 
it is addressed
and may contain CONFIDENTIAL material.  If you receive this 
material/information in error,
please contact the sender and delete or destroy the material/information.

Humana Inc. and its subsidiaries comply with applicable Federal civil rights 
laws and
do not discriminate on the basis of race, color, national origin, age, 
disability or
sex. Humana Inc. and its subsidiaries do not exclude people or treat them 
differently
because of race, color, national origin, age, disability or sex.

English: ATTENTION: If you do not speak English, language assistance services, 
free
of charge, are available to you. Call 1‐877‐320‐1235 (TTY: 711).

Español (Spanish): ATENCIÓN: Si habla español, tiene a su disposición servicios
gratuitos de asistencia lingüística. Llame al 1‐877‐320‐1235 (TTY: 711).

繁體中文(Chinese):注意:如果您使用繁體中文,您可以免費獲得語言援助
服務。請致電 1‐877‐320‐1235 (TTY: 711)。

Kreyòl Ayisyen (Haitian Creole): ATANSION: Si w pale Kreyòl Ayisyen, gen sèvis 
èd
pou lang ki disponib gratis pou ou. Rele 1‐877‐320‐1235 (TTY: 711).

Polski (Polish): UWAGA: Jeżeli mówisz po polsku, możesz skorzystać z bezpłatnej
pomocy językowej. Zadzwoń pod numer 1‐877‐320‐1235 (TTY: 711).

한국어 (Korean): 주의: 한국어를 사용하시는 경우, 언어 지원 서비스를 무료로
이용하실 수 있습니다. 1‐877‐320‐1235 (TTY: 711)번으로 전화해 주십시오.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: THINK (was: IBM shuffles mainframe docs ...)

2018-06-22 Thread Charles Mills
Спасибо.

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tomasz Rola
Sent: Friday, June 22, 2018 8:49 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: THINK (was: IBM shuffles mainframe docs ...)

On Fri, Jun 22, 2018 at 03:11:11PM +, Pew, Curtis G wrote:
> On Jun 22, 2018, at 9:41 AM, Paul Gilmartin 
> <000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
> > 
> > I knew a man who had been a docent for IBM at an exhibition in Moscow
> > circa 1960.  He proudly displayed a sign he had snagged as a souvenir:
> > 
> > ДУМАТЬ
> 
> When I was a senior in High School (and my father worked for IBM) I
> was given one that says “ДУМАЙ”. I have it here on my desk.
> 
> (Google translate renders both as “THINK”. I don’t have any idea
> what the difference is in Russian.)

думать -> "to think", i.e. infinitive, a basic verb form

думай -> "think!", i.e. imperative mood, a verb in form of a command
directed to someone

-- 
Regards,
Tomasz Rola

--
** A C programmer asked whether computer had Buddha's nature.  **
** As the answer, master did "rm -rif" on the programmer's home**
** directory. And then the C programmer became enlightened...  **
** **
** Tomasz Rola  mailto:tomasz_r...@bigfoot.com **

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: 2 possible RFE --- ISPF & SDSF.

2018-06-22 Thread Seymour J Metz
ITYM "A JCL statement consists of one or more 80-byte records. Each record is 
in the form of an 80-column punched-card image."


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List  on behalf of 
Steve Smith 
Sent: Thursday, June 21, 2018 2:57 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: 2 possible RFE --- ISPF & SDSF.

"... a sequence of 80-byte characters. ".  Is that UTF-640 for true
Universe-al support?

sas

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: ARC0104I INVALID INITIALIZATION COMMAND

2018-06-22 Thread jdoll.a0...@gmail.com IBM-Main

I set up the PDO logs to swap just like the SMF logs,

When HSM would swap from X to Y, Automation would kick off a IEBGENER to 
copy it to a "permanent " dataset with the System & Time stamps as dataset 
name and HSM/SMS Management Class to keep them around for 45 days with No 
backup and 0 days on primary, and go directly to ML2 "Tape".


Jim



- Original Message - 
From: "Gibney, Dave" 

Newsgroups: bit.listserv.ibm-main
To: 
Sent: Thursday, June 21, 2018 5:28 PM
Subject: Re: ARC0104I INVALID INITIALIZATION COMMAND


I have both LOG and PDA files. Never needed them, but the recomenadtion was 
to have them active for IBM if needed.


DFHSM.LOGX
DFHSM.LOGY

DFHSM.PDOX
DFHSM.PDOY



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
On Behalf Of Ed Jaffe
Sent: Thursday, June 21, 2018 2:21 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: ARC0104I INVALID INITIALIZATION COMMAND

On 6/21/2018 2:17 PM, Gibney, Dave wrote:
> Looking some more and remembering. Do you have the HSM PDA
(Problem Determination AID) active?  SETSYS PDS() and a couple datasets.
> I have a vague memory that this data can also be found using IPCS 
> against

the active region. Or something.

Yes. I posted some of that data in response to Carmen Vitullo's query.
No help whatsoever...

--
Phoenix Software International
Edward E. Jaffe
831 Parkview Drive North
El Segundo, CA 90245
https://urldefense.proofpoint.com/v2/url?u=http-
3A__www.phoenixsoftware.com_=DwICaQ=C3yme8gMkxg_ihJNXS06Z
yWk4EJm8LdrrvxQb-Je7sw=u9g8rUevBoyCPAdo5sWE9w=CK-
VATOToJANlm1EWo7JHmZyFP9PKP4GGqo_6Zp6bWs=z41wqfPdr4WHaTk
DTu98jbwgbpdwIkUakMf_lDfl6s8=


This e-mail message, including any attachments, appended messages and the
information contained therein, is for the sole use of the intended
recipient(s). If you are not an intended recipient or have otherwise 
received
this email message in error, any use, dissemination, distribution, 
review,

storage or copying of this e-mail message and the information contained
therein is strictly prohibited. If you are not an intended recipient, 
please

contact the sender by reply e-mail and destroy all copies of this email
message and do not otherwise utilize or retain this email message or any 
or
all of the information contained therein. Although this email message and 
any

attachments or appended messages are believed to be free of any virus or
other defect that might affect any computer system into which it is 
received
and opened, it is the responsibility of the recipient to ensure that it 
is virus
free and no responsibility is accepted by the sender for any loss or 
damage

arising in any way from its opening or use.

--
For IBM-MAIN subscribe / signoff / archive access instructions, send 
email to

lists...@listserv.ua.edu with the message: INFO IBM-MAIN


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Two new RFE's to consider supporting

2018-06-22 Thread Seymour J Metz
Given that ISPF already supports point and shoot and that IBM has no control 
over 3rd party 3270 simulators and TN3270 clients, you'll need a strong 
business case. The only solution I know of within the existing 3270 protocol is 
a zero-width field.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List  on behalf of 
Dyck, Lionel B. (RavenTek) 
Sent: Thursday, June 21, 2018 3:08 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Two new RFE's to consider supporting

Please consider supporting these RFE's that I just submitted:

ISPF Point and Shoot Protected Fields

https://secure-web.cisco.com/1eSaRV5UJ3V1J9lFuWduNMNEXKwsjEr0nnYLCdtANa5wcGIytP_p89VwxV76dUYujSzZGvsssoum5dfWf031TCGUtebzzpwdlkSgZJnaqbpOkVLJas5jtys5H1gU8JRFNOD2vMXd3U8abHHyUJFosa64XBfNSgGc5MvffGa_1ZfKyWEpmQAA3kv0sNVrx-whBQbW89l_3pWtg15_7MBLqVtWvke6na3t-Tk6vOswu28yUE4IUe2koNEA8oyONANQER39qJALUqHMLIzs58oysAkIsJcmb1ccODLmdnzKY2gXS9eVRancgDDeqgVBCArpyN5npMA64aVH_B47XdVoSdSV7DtHk5UyIdPlCkMjOI69Dv8kpj0u74ruw1jKi-4U9/https%3A%2F%2Fwww.ibm.com%2Fdeveloperworks%2Frfe%2Fexecute%3Fuse_case%3DviewRfe%26CR_ID%3D121576

And

Improve ISPF 3.17 by allowing CD on the command line

https://secure-web.cisco.com/1xtqTd4IbEpSIeq1S0zeI1IMPcAcWsFuqmZWHpViLukOiAtsG1u7lb2OGbEuJwHffWY-3ICATc1LstgliNG5YJwm_ehvRmlvFVRjp1_ELkgd2iFLph4vBOuNp9wHVtL3RKyceFMRN7yre-njqs_Cp5ejI7zvJhlJ9KQNaY5Uf-3lQTeIfIugyV8IIgCZR8TlawkDi4qZiF7y_zgKvvN0SxF_Xz1oJoLxm35MAsfUGMTUGsbJx4aT3jrANFbnl0DsO_SX5FTaYfjwWwsARjRQPgzrQ3kmz-_4QLdHofUx_xy541tlAJhhYLLpLZ-xJoNkzcA5aQ--sPgP_7WkfCHn9hOLgHD5yzj8m5z4KMY5w5M78ygtsyAV9psRghqfpCT1w/https%3A%2F%2Fwww.ibm.com%2Fdeveloperworks%2Frfe%2Fexecute%3Fuse_case%3DviewRfe%26CR_ID%3D121575


--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: ARC0104I INVALID INITIALIZATION COMMAND

2018-06-22 Thread Jesse 1 Robinson
My reason for suggesting an APAR is that intrinsic inability to track down the 
source of an error message strikes me as a design failure. Furthermore, an APAR 
tied to a defect may get better (= quicker) resolution than an enhancement RFE. 

In Ed's case, a syntax typo in the initialization options might be difficult 
capture succinctly. Nonetheless there are products that flag errors by 'line 
number' without trying to diagnose the error in depth. ISPF HILITE pointed to 
the problem, which was sufficient to fix it. HSM should be able to provide 
comparable guidance. Other products do. 

.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
323-715-0595 Mobile
626-543-6132 Office ⇐=== NEW
robin...@sce.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Elardus Engelbrecht
Sent: Friday, June 22, 2018 1:50 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: ARC0104I INVALID INITIALIZATION COMMAND

Jesse 1 Robinson wrote:

>I'd say that this is such an egregious oversight that it should be APARable 
>even after all this time. There's no statute of limitations on bad design. 

Or ask for a thing to do Syntax Checking of ARCCMDxx just like the one for 
BPXPRMxx member (SETOMVS SYNTAXCHECK=(??)  ).

Groete / Greetings
Elardus Engelbrecht


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: 2 possible RFE --- ISPF & SDSF.

2018-06-22 Thread Seymour J Metz
I'll take that bet. However, labels, opcodes and unquoted parameters are in a 
very restricted character set

 * // and /* in column 1
 * Upper case alphabetic
 * Digits
 * National characters
 * Punctuation where called for by the syntax, e.g., ().,='


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List  on behalf of 
John McKown 
Sent: Thursday, June 21, 2018 3:12 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: 2 possible RFE --- ISPF & SDSF.

On Thu, Jun 21, 2018 at 1:57 PM Steve Smith  wrote:

> "... a sequence of 80-byte characters. ".  Is that UTF-640 for true
> Universe-al support?
>
>
​If I were a betting man, I'd give 1000:1 odds that JCL must be written in
CP-037 only, any non-CP027 characters would need to be in ' marks, like a
PARM= string, or it is JCL ERROR time.​



> sas
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


--
There is no such thing as the Cloud. It is just somebody else’s computer.

Maranatha! <><
John McKown

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Two new RFE's to consider supporting

2018-06-22 Thread Seymour J Metz
A TAB is a skip to the beginning of the next unprotected field, with 
wrap-around. It does not start an unprotected field.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List  on behalf of 
Steve Smith 
Sent: Thursday, June 21, 2018 5:28 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: Two new RFE's to consider supporting

Isn't #1 impossible?  From what I've retained (or think I have) of 3270
programming, a "tab" is merely the start of an unprotected field.  Catch-22.

sas

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Is TCBSENV propagated to child TCB by ATTACHX

2018-06-22 Thread Charles Mills
I am very familiar with TCBSENV and I don't know the answer. My "guess" would 
be that it IS propagated, but that is a guess. Easy to run an experiment if you 
wanted to.

I do know that TCBSENV is "optional" -- it is zero a lot of the time. (That is, 
if you have code that sees a lot of "random" TCB's you will see a lot of 
TCBSENV == 0.) ASXBSENV is often a fallback.

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John McKown
Sent: Friday, June 22, 2018 7:43 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Is TCBSENV propagated to child TCB by ATTACHX

This is strictly a curiosity question. Suppose for some unspecified &
irrelevant to this discussion that my code is running under a TCB which has
a non-zero TCBSENV value. If my code were to do an ATTACHX to create a
subtask, would the new TCB have the same TCBSENV as my code, or would it be
zero? I did RTFM but did not see anything that addresses this. And an IBM
KC search got so many hits that I was completely befuddled.

-- 
There is no such thing as the Cloud. It is just somebody else’s computer.

Maranatha! <><
John McKown

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: THINK (was: IBM shuffles mainframe docs ...)

2018-06-22 Thread Tomasz Rola
On Fri, Jun 22, 2018 at 03:11:11PM +, Pew, Curtis G wrote:
> On Jun 22, 2018, at 9:41 AM, Paul Gilmartin 
> <000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
> > 
> > I knew a man who had been a docent for IBM at an exhibition in Moscow
> > circa 1960.  He proudly displayed a sign he had snagged as a souvenir:
> > 
> > ДУМАТЬ
> 
> When I was a senior in High School (and my father worked for IBM) I
> was given one that says “ДУМАЙ”. I have it here on my desk.
> 
> (Google translate renders both as “THINK”. I don’t have any idea
> what the difference is in Russian.)

думать -> "to think", i.e. infinitive, a basic verb form

думай -> "think!", i.e. imperative mood, a verb in form of a command
directed to someone

-- 
Regards,
Tomasz Rola

--
** A C programmer asked whether computer had Buddha's nature.  **
** As the answer, master did "rm -rif" on the programmer's home**
** directory. And then the C programmer became enlightened...  **
** **
** Tomasz Rola  mailto:tomasz_r...@bigfoot.com **

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Two new RFE's to consider supporting

2018-06-22 Thread Seymour J Metz
There is no such thing as a point-and-shoot field in the 3270 data stream. 
There are selector-pen detectable fields and fields with triggers, but neither 
provides a protected field that you can tab into.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List  on behalf of 
Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu>
Sent: Thursday, June 21, 2018 9:32 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: Two new RFE's to consider supporting

On Thu, 21 Jun 2018 19:08:53 +, Dyck, Lionel B. (RavenTek) wrote:

>Please consider supporting these RFE's that I just submitted:
>
>ISPF Point and Shoot Protected Fields
>
>https://secure-web.cisco.com/1qa0scHrZZCzewz0ZGv9rseRoltXsYxDmUcaVBGKGLkU28SDq-QLBPl00IFqYP2SRrWVQO0rUMXVTne1U60kp_5sY8gQrjWZQJIDOJo5UxvVQVnIi-sIhFlxsVqrsRrG_u020TCXhQ7VlVYaJu_XcJ0RSMbBUTDFxo7xf643F4zv2dwIfpYjHNAHWd3CHDdOQfShcymSeWETPj39HoClaoeKSb1GXGy03Djt7t1bvz2F-IvLKGFcqvqXGGVN2JOm-VsHAtK8xmcO1B6a-t659MAumV5DCQZtY-wY53gvyqxe1nJ2v_bkUR99dJbA_4c_kCsm_jBQ5odn397JNaQP7Br8jMsrqTq8kBNH09e8TX0nXXToI75D19b6VkwCEsybb3jPNJ2MGOYetGQCLwNV_MPBF7_byqiX1LNLEN7Orj3tg-GOcxsk8GT_MXXX7kBpH/https%3A%2F%2Fwww.ibm.com%2Fdeveloperworks%2Frfe%2Fexecute%3Fuse_case%3DviewRfe%26CR_ID%3D121576


On Thu, 21 Jun 2018 18:13:21 -0400, Phil Smith III wrote:

>Steve Smith wrote:
>
>>Isn't #1 impossible?  From what I've retained (or think I have) of 3270
>>programming, a "tab" is merely the start of an unprotected field.
>Catch-22.
>
>Correct. You cannot tab to a protected field. And I suspect that a request
>for an update to the 3270 protocol is not likely to be fulfilled at this
>point.
>
Reading the RFE, it appears that the submitter does not want to be able to
tab to a PAS field; rather he wants to be able to define a PAS field that
will be skipped by tab.

Does 3270 protocol require that PAS fields be writable, therefore tabbable?
Bad design.  It's perfectly reasonable to want to specify a read-only PAS
menu item.  (Too few bits in the attribute byte?)

I believe many emulators nowadays interpret double-click as "shoot".  Or
provide "shoot" as a pop-up selection.

Long ago, I tried to specify a single-cell PAS field.  The host application 
rejected
this, claiming that a light pen can not resolve a single cell.  Bad Lowest 
Common
Denominator design.  The application should support a possibly hi-res light pen
or other PAS device.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Two new RFE's to consider supporting

2018-06-22 Thread Seymour J Metz
That's because there are no such bits; point-and-shoot is a software construct.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List  on behalf of 
Phil Smith III 
Sent: Thursday, June 21, 2018 9:47 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: Two new RFE's to consider supporting

Gil wrote:

>Does 3270 protocol require that PAS fields be writable, therefore tabbable?
>Bad design.  It's perfectly reasonable to want to specify a read-only PAS
>menu item.  (Too few bits in the attribute byte?)



I've done lots of 3270 programming, but am unaware of what a point-and-shoot
field is. I don't remember any such bits in an attribute byte?


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Issue WTO message using MVS SEND command

2018-06-22 Thread Seymour J Metz
 1. The TSO SEND command has very limited control over the WTO; for what you're 
doing,
you should read up on console areas and multi-line WTO, and code a 
REXX-aware
external function in assembler. Or use the support in NetView.

 2. You should seriously consider whether a non-scrollable message is an 
acceptable
solution for your application. The operators have enough to do.

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List  on behalf of 
saurabh khandelwal 
Sent: Friday, June 22, 2018 12:31 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Issue WTO message using MVS SEND command

Hello Group,


 /*  REXX */

'PIPE SAFE * | STEM MSG.'



TODataset = Word( Msg.3,3 )

mvs "send 'My console name is  "TODataset"',CN=CNDVMSTR"

exit


We used CN operand with send command to send message to  operator console
and now i receive output as required.

But this message is visible in green color which get disappeared as other
message comes on console.

But, I would like to have these message in white color ( not sure if we can
say as WTO), so that until operator intervention, these message will be on
console itself.


Can you please suggest, how can i achieve this

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: THINK (was: IBM shuffles mainframe docs ...)

2018-06-22 Thread Pew, Curtis G
On Jun 22, 2018, at 9:41 AM, Paul Gilmartin 
<000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
> 
> I knew a man who had been a docent for IBM at an exhibition in Moscow
> circa 1960.  He proudly displayed a sign he had snagged as a souvenir:
> 
> ДУМАТЬ

When I was a senior in High School (and my father worked for IBM) I was given 
one that says “ДУМАЙ”. I have it here on my desk.

(Google translate renders both as “THINK”. I don’t have any idea what the 
difference is in Russian.)


-- 
Pew, Curtis G
curtis@austin.utexas.edu
ITS Systems/Core/Administrative Services


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: [EXTERNAL] Re: Two new RFE's to consider supporting

2018-06-22 Thread Dyck, Lionel B. (RavenTek)
You nailed it - it is all in the application and not in the 3270 architecture 
itself.

It's just code - stringing together one's and zero's in the right sequence to 
cause the computer to do the right thing.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer - RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Peter Hunkeler
Sent: Friday, June 22, 2018 9:57 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: AW: Re: [EXTERNAL] Re: Two new RFE's to consider supporting

> Does 3270 protocol require that PAS fields be writable, therefore tabbable? 
Bad design.  It's perfectly reasonable to want to specify a read-only PAS 
menu item.  (Too few bits in the attribute byte?) 


I'm no expert in the 3270 protocol, but I don't think PAS is described in the 
architecture. I'd rather think PAS is purely something a 3270 application has 
to implement: Read the cursor position returned, check if it lies within the 
"PAS field", and if so act accordingly.


--
Peter Hunkeler 
 



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


AW: Re: [EXTERNAL] Re: Two new RFE's to consider supporting

2018-06-22 Thread Peter Hunkeler
> Does 3270 protocol require that PAS fields be writable, therefore tabbable?
Bad design.  It's perfectly reasonable to want to specify a read-only PAS
menu item.  (Too few bits in the attribute byte?)


I'm no expert in the 3270 protocol, but I don't think PAS is described in the 
architecture. I'd rather think PAS is purely something a 3270 application has 
to implement: Read the cursor position returned, check if it lies within the 
"PAS field", and if so act accordingly.


--
Peter Hunkeler




--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Issue WTO message using MVS SEND command

2018-06-22 Thread saurabh khandelwal
Hello All,

We have requirement of displaying dataset name to operator console upon
receiving  SVTM052I  msg id like below.

 SVTM052I message is a multiline message, so the message is 1 message of 4
lines.

In the automationtable you can just code:



 IF MSGID = 'SVTM052I' THEN

 EXEC(CMD('FIBREXX')) NETLOG(Y) SYSLOG(Y);



In your rexx you can retrieve the full messge via:



'PIPE SAFE * | STEM MSG.'



Stem variable Msg.1 to Msg.4 will contain all 4 lines of the SVTM052I
message.

So if you would want the TO-dataset, then you could take the 3th word of
Msg.3:



TODataset = Word( Msg.3,3 )

mvs "send 'FIB DATASET NAME IS "TODataset"',CON=CNDVMSTR"


Now, my problem is, once these dataset name getting displayed on operator
console. He is over looking it because as soon as other message comes, this
dataset message scroll up and then eventually disappear from screen.


My requirement is, once this dataset message display on operator console,
it should be there and  should not be scroll up with other message until
operator press enter on that message which is indication of the looked at
this dataset for further processing.


I hope, i am able to explain my requirement.   Thank you all for reply.


On Fri, Jun 22, 2018 at 5:15 PM, Lucas Rosalen 
wrote:

> Right tool for the right job.
>
> Read about WTO (REXX) command in Netview commands manual.
>
> 
> ---
> *Lucas Rosalen*
> rosalen.lu...@gmail.com / lucas.rosal...@ibm.com
> http://br.linkedin.com/in/lrosalen
>
>
> 2018-06-22 6:31 GMT+02:00 saurabh khandelwal :
>
> > Hello Group,
> >
> >
> >  /*  REXX */
> >
> > 'PIPE SAFE * | STEM MSG.'
> >
> >
> >
> > TODataset = Word( Msg.3,3 )
> >
> > mvs "send 'My console name is  "TODataset"',CN=CNDVMSTR"
> >
> > exit
> >
> >
> > We used CN operand with send command to send message to  operator console
> > and now i receive output as required.
> >
> > But this message is visible in green color which get disappeared as other
> > message comes on console.
> >
> > But, I would like to have these message in white color ( not sure if we
> can
> > say as WTO), so that until operator intervention, these message will be
> on
> > console itself.
> >
> >
> > Can you please suggest, how can i achieve this
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


AW: Re: [EXTERNAL] Re: Two new RFE's to consider supporting

2018-06-22 Thread Peter Hunkeler


> Not all that difficult to do using standard 3270 orders: SBA to the screen 
location; SF to start an unprotected field. Immediately SF to start a 
protected field. I'm fairly certain this will allow TAB to go the the 
0-length unprotected field which precedes the ​protected field. If not, 
then change the SF to say unprotected+dark and make then next data byte a 
simple blank. 


This will surely work, but the cursor will be placed ahead of the PAS text. 
Probably not the desired result.


--
Peter Hunkeler 

 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Is TCBSENV propagated to child TCB by ATTACHX

2018-06-22 Thread John McKown
This is strictly a curiosity question. Suppose for some unspecified &
irrelevant to this discussion that my code is running under a TCB which has
a non-zero TCBSENV value. If my code were to do an ATTACHX to create a
subtask, would the new TCB have the same TCBSENV as my code, or would it be
zero? I did RTFM but did not see anything that addresses this. And an IBM
KC search got so many hits that I was completely befuddled.

-- 
There is no such thing as the Cloud. It is just somebody else’s computer.

Maranatha! <><
John McKown

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


THINK (was: IBM shuffles mainframe docs ...)

2018-06-22 Thread Paul Gilmartin
On Fri, 22 Jun 2018 13:18:19 +, Bill Hitefield wrote:

>In one of the men's rooms at the IBM office in Harford (this would be 
>somewhere between '79 and '81), they had one of the "Think!" signs on the 
>wall. Someone else added a "Thoap!" sign below it.
> 
I knew a man who had been a docent for IBM at an exhibition in Moscow
circa 1960.  He proudly displayed a sign he had snagged as a souvenir:

 ДУМАТЬ

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Issue WTO message using MVS SEND command

2018-06-22 Thread Lucas Rosalen
Right tool for the right job.

Read about WTO (REXX) command in Netview commands manual.

---
*Lucas Rosalen*
rosalen.lu...@gmail.com / lucas.rosal...@ibm.com
http://br.linkedin.com/in/lrosalen


2018-06-22 6:31 GMT+02:00 saurabh khandelwal :

> Hello Group,
>
>
>  /*  REXX */
>
> 'PIPE SAFE * | STEM MSG.'
>
>
>
> TODataset = Word( Msg.3,3 )
>
> mvs "send 'My console name is  "TODataset"',CN=CNDVMSTR"
>
> exit
>
>
> We used CN operand with send command to send message to  operator console
> and now i receive output as required.
>
> But this message is visible in green color which get disappeared as other
> message comes on console.
>
> But, I would like to have these message in white color ( not sure if we can
> say as WTO), so that until operator intervention, these message will be on
> console itself.
>
>
> Can you please suggest, how can i achieve this
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Issue WTO message using MVS SEND command

2018-06-22 Thread Carmen Vitullo
Good point ! I know we have operators, but all our console are in roll mode, 
they watch a GUI that alerts them to 'call someone' :( 



Carmen Vitullo 

- Original Message -

From: "Charles Mills"  
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Friday, June 22, 2018 8:20:08 AM 
Subject: Re: Issue WTO message using MVS SEND command 

Do you actually have "operators" who sit waiting for instructions to appear on 
the console? 

Charles 


-Original Message- 
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Carmen Vitullo 
Sent: Friday, June 22, 2018 5:34 AM 
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Issue WTO message using MVS SEND command 

There is a way to do this, but not by specifying a console name, check the TSO 
HELP on the SEND command and it's options. 
with the fast processors and the amount of work process, and design of your 
complex, being a single system monoplex or a large scale sysplex you should 
take care on how you proceed. my .002 cents 

-- 
For IBM-MAIN subscribe / signoff / archive access instructions, 
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Issue WTO message using MVS SEND command

2018-06-22 Thread Charles Mills
Do you actually have "operators" who sit waiting for instructions to appear on 
the console?

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Carmen Vitullo
Sent: Friday, June 22, 2018 5:34 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Issue WTO message using MVS SEND command

There is a way to do this, but not by specifying a console name, check the TSO 
HELP on the SEND command and it's options. 
with the fast processors and the amount of work process, and design of your 
complex, being a single system monoplex or a large scale sysplex you should 
take care on how you proceed. my .002 cents 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: IBM shuffles mainframe docs leaving customers crying 'sabotage' • The Register

2018-06-22 Thread Bill Hitefield
In one of the men's rooms at the IBM office in Harford (this would be somewhere 
between '79 and '81), they had one of the "Think!" signs on the wall. Someone 
else added a "Thoap!" sign below it.

Bill Hitefield
Dino-Software Corporation
800.480.DINO
423.878.5660
www.dino-software.com

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Vernooij, Kees (ITOPT1) - KLM
Sent: Friday, June 22, 2018 2:52 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IBM shuffles mainframe docs leaving customers crying 'sabotage' • 
The Register

Yes, this all must make then think. 
What was the company again, that years ago had 'THINK!' as a slogan?

Kees.


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
> On Behalf Of Charles Mills
> Sent: 21 June, 2018 22:59
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: IBM shuffles mainframe docs leaving customers crying 
> 'sabotage' • The Register
> 
> SHARE may not have kicked any @ss, but Cheryl got noticed.
> 
> Charles
> 
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
> On Behalf Of Mark Regan
> Sent: Thursday, June 21, 2018 1:50 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Fwd: IBM shuffles mainframe docs leaving customers crying 
> 'sabotage' • The Register
> 
> https://www.theregister.co.uk/2018/06/21/ibm_mainframe_docs/
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

For information, services and offers, please visit our web site: 
http://www.klm.com. This e-mail and any attachment may contain confidential and 
privileged material intended for the addressee only. If you are not the 
addressee, you are notified that no part of the e-mail or any attachment may be 
disclosed, copied or distributed, and that any other action related to this 
e-mail or attachment is strictly prohibited, and may be unlawful. If you have 
received this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message.

Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its 
employees shall not be liable for the incorrect or incomplete transmission of 
this e-mail or any attachments, nor responsible for any delay in receipt.
Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch 
Airlines) is registered in Amstelveen, The Netherlands, with registered number 
33014286



--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: [EXTERNAL] Re: Two new RFE's to consider supporting

2018-06-22 Thread John McKown
On Fri, Jun 22, 2018 at 7:52 AM Dyck, Lionel B. (RavenTek) <
lionel.d...@va.gov> wrote:

> Tom - that is my issue - when you enable tabbing to a PAS field then it is
> now possible to overtype them - that is what I would like to change - to
> make them protected but still allow tabbing to them.
>

​Not all that difficult to do using standard 3270 orders: SBA to the screen
location; SF to start an unprotected field. Immediately SF to start a
protected field. I'm fairly certain this will allow TAB to go the the
0-length unprotected field which precedes the ​protected field. If not,
then change the SF to say unprotected+dark and make then next data byte a
simple blank.



>
> Just trying to make some ISPF applications more 'modern' :-)
> Mainframe Systems Programmer – RavenTek Solution Partners
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Tom Marchant
> Sent: Friday, June 22, 2018 7:48 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: [EXTERNAL] Re: Two new RFE's to consider supporting
>
> On Fri, 22 Jun 2018 12:00:29 +, Dyck, Lionel B. (RavenTek) wrote:
>
> >Those fields in SDSF are probably PAS fields but you don't see that as
> the
> >panels are more than likely dynamic in nature (I don't run SDSF so I
> can't
> >check that).
>
> Similarly, the ISPF Primary Option Menu uses point-and-shoot, and has for
> years. Put your cursor on, for example, "Settings" and press enter, and
> you
> will be taken to the Settings panel. If you enable "Tab to point-and-shoot
> fields", you can tab to those fields and press enter. However, you can now
> overtype those fields.
>
> --
> Tom Marchant
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 
There is no such thing as the Cloud. It is just somebody else’s computer.

Maranatha! <><
John McKown

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: PDS with 1 directory block

2018-06-22 Thread Steve Smith
DS1NOBDB DSXL1 NUMBER OF BYTES USED IN LAST
* DIRECTORY BLOCK (PDS ONLY)

Learned something old today, thanks!  Not sure how bad I needed to know
that, but it makes me curious as to what that field is actually used for
(other than to provide a way to break PDSes).

sas

On Fri, Jun 22, 2018 at 4:07 AM, Greg Price 
wrote:

> On 2018-06-22 7:53 AM, Jesse 1 Robinson wrote:
>
>> I have a dim memory of learning ages ago that a PDS with 1 directory
>> block is somehow 'different', that certain updates to it require fiddling
>> with the VTOC in addition to changing data on a track. Sound familiar?
>>
>
> Once the last directory block has started to be used, its unused capacity
> is maintained in the data set VTOC entry. If there is only one directory
> block then then it is also the last directory block and so any member
> addition or deletion will also require a VTOC entry update.
>
> Cheers,
> Greg

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: [EXTERNAL] Re: Two new RFE's to consider supporting

2018-06-22 Thread Dyck, Lionel B. (RavenTek)
Tom - that is my issue - when you enable tabbing to a PAS field then it is now 
possible to overtype them - that is what I would like to change - to make them 
protected but still allow tabbing to them.

Just trying to make some ISPF applications more 'modern' :-)

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tom Marchant
Sent: Friday, June 22, 2018 7:48 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [EXTERNAL] Re: Two new RFE's to consider supporting

On Fri, 22 Jun 2018 12:00:29 +, Dyck, Lionel B. (RavenTek) wrote:

>Those fields in SDSF are probably PAS fields but you don't see that as the 
>panels are more than likely dynamic in nature (I don't run SDSF so I can't 
>check that).  

Similarly, the ISPF Primary Option Menu uses point-and-shoot, and has for 
years. Put your cursor on, for example, "Settings" and press enter, and you 
will be taken to the Settings panel. If you enable "Tab to point-and-shoot 
fields", you can tab to those fields and press enter. However, you can now 
overtype those fields.

-- 
Tom Marchant

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: [EXTERNAL] Re: Two new RFE's to consider supporting

2018-06-22 Thread Tom Marchant
On Fri, 22 Jun 2018 12:00:29 +, Dyck, Lionel B. (RavenTek) wrote:

>Those fields in SDSF are probably PAS fields but you don't see that as the 
>panels are more than likely dynamic in nature (I don't run SDSF so I can't 
>check that).  

Similarly, the ISPF Primary Option Menu uses point-and-shoot, and has for 
years. Put your cursor on, for example, "Settings" and press enter, and you 
will be taken to the Settings panel. If you enable "Tab to point-and-shoot 
fields", you can tab to those fields and press enter. However, you can now 
overtype those fields.

-- 
Tom Marchant

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Issue WTO message using MVS SEND command

2018-06-22 Thread Carmen Vitullo
There is a way to do this, but not by specifying a console name, check the TSO 
HELP on the SEND command and it's options. 
with the fast processors and the amount of work process, and design of your 
complex, being a single system monoplex or a large scale sysplex you should 
take care on how you proceed. my .002 cents 



Carmen Vitullo 

- Original Message -

From: "saurabh khandelwal"  
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Thursday, June 21, 2018 11:31:38 PM 
Subject: Issue WTO message using MVS SEND command 

Hello Group, 


/* REXX */ 

'PIPE SAFE * | STEM MSG.' 



TODataset = Word( Msg.3,3 ) 

mvs "send 'My console name is "TODataset"',CN=CNDVMSTR" 

exit 


We used CN operand with send command to send message to operator console 
and now i receive output as required. 

But this message is visible in green color which get disappeared as other 
message comes on console. 

But, I would like to have these message in white color ( not sure if we can 
say as WTO), so that until operator intervention, these message will be on 
console itself. 


Can you please suggest, how can i achieve this 

-- 
For IBM-MAIN subscribe / signoff / archive access instructions, 
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Issue WTO message using MVS SEND command

2018-06-22 Thread Tom Marchant
On Fri, 22 Jun 2018 07:31:38 +0300, saurabh khandelwal wrote:

>We used CN operand with send command to send message to  operator console
>and now i receive output as required.

Why do you want to do that?

IMO, on systems today with several dozen to hundreds of jobs running, along 
with thousands of TSO users the operators have plenty to do without seeing 
messages from application programs. Indeed, when I started as an application 
programmer in 1970, on an MVT system with only three regions, I was told not 
to use DISPLAY UPON CONSOLE.

>But this message is visible in green color which get disappeared as other
>message comes on console.

You want your messages to be action messages? What action does the 
operator need to take for your message?

-- 
Tom Marchant

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: [EXTERNAL] Re: Two new RFE's to consider supporting

2018-06-22 Thread Dyck, Lionel B. (RavenTek)
Those fields in SDSF are probably PAS fields but you don't see that as the 
panels are more than likely dynamic in nature (I don't run SDSF so I can't 
check that).  I'm looking at ISPF dialogs where I want to allow PAS fields 
where the user can either TAB or mouse and then click to activate the action. I 
also, in some cases, want the value in the field to be based on a variable. 
When that happens the field must be defined as TYPE(OUTPUT) and for some reason 
a TYPE(OUTPUT) field allows the user to overtype it even if the entered text is 
ignored. That is what I want protected.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tom Marchant
Sent: Friday, June 22, 2018 6:51 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Two new RFE's to consider supporting

On Thu, 21 Jun 2018 20:32:54 -0500, Paul Gilmartin wrote:

>On Thu, 21 Jun 2018 18:13:21 -0400, Phil Smith III wrote:
> 
>>Correct. You cannot tab to a protected field. And I suspect that a request
>>for an update to the 3270 protocol is not likely to be fulfilled at this
>>point.
>>
>Reading the RFE, it appears that the submitter does not want to be able to
>tab to a PAS field; rather he wants to be able to define a PAS field that
>will be skipped by tab.

There is no need that a point-and-shoot field be one that you can tab to. See, 
for example, the changes in SDSF to make the jobname be a point-and-shoot 
field, likewise the DD name after issuing ?, or pointing and shooting on 
jobname.

-- 
Tom Marchant

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Two new RFE's to consider supporting

2018-06-22 Thread Tom Marchant
On Thu, 21 Jun 2018 20:32:54 -0500, Paul Gilmartin wrote:

>On Thu, 21 Jun 2018 18:13:21 -0400, Phil Smith III wrote:
> 
>>Correct. You cannot tab to a protected field. And I suspect that a request
>>for an update to the 3270 protocol is not likely to be fulfilled at this
>>point.
>>
>Reading the RFE, it appears that the submitter does not want to be able to
>tab to a PAS field; rather he wants to be able to define a PAS field that
>will be skipped by tab.

There is no need that a point-and-shoot field be one that you can tab to. See, 
for example, the changes in SDSF to make the jobname be a point-and-shoot 
field, likewise the DD name after issuing ?, or pointing and shooting on 
jobname.

-- 
Tom Marchant

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Would SHARE kindly kick IBM in the ass for what the've done with their web content?

2018-06-22 Thread Tom Marchant
On Fri, 15 Jun 2018 17:18:08 +, Seymour J Metz wrote:

>there are legitimate reasons to search for old manuals.

Indeed. Questions arise on here often enough about when something was 
introduced or changed. I occasionally refer to MVS V4 or V5 documentation, 
and even look for early MVS and OS/360 documentation on bitsavers.org.

IMO, there is absolutely no excuse for deleting documentation for z/OS 2.1, 
a release that has not yet reached end of service.

-- 
Tom Marchant

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: [EXTERNAL] Re: Two new RFE's to consider supporting

2018-06-22 Thread Dyck, Lionel B. (RavenTek)
If you can tab to a PAS field then you don't need the mouse, but using a PAS 
allows those who want to use the mouse to do so.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of David Crayford
Sent: Friday, June 22, 2018 6:28 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Two new RFE's to consider supporting

On 22/06/2018 9:32 AM, Paul Gilmartin wrote:
> On Thu, 21 Jun 2018 18:13:21 -0400, Phil Smith III wrote:
>   
>> Steve Smith wrote:
>>
>>> Isn't #1 impossible?  From what I've retained (or think I have) of 3270
>>> programming, a "tab" is merely the start of an unprotected field.
>> Catch-22.
>>
>> Correct. You cannot tab to a protected field. And I suspect that a request
>> for an update to the 3270 protocol is not likely to be fulfilled at this
>> point.
>>
> I believe many emulators nowadays interpret double-click as "shoot".  Or
> provide "shoot" as a pop-up selection.

But that requires using a mouse which is one of the the biggest 
productivity killers ever invented, especially for text UIs.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Two new RFE's to consider supporting

2018-06-22 Thread David Crayford

On 22/06/2018 9:32 AM, Paul Gilmartin wrote:

On Thu, 21 Jun 2018 18:13:21 -0400, Phil Smith III wrote:
  

Steve Smith wrote:


Isn't #1 impossible?  From what I've retained (or think I have) of 3270
programming, a "tab" is merely the start of an unprotected field.

Catch-22.

Correct. You cannot tab to a protected field. And I suspect that a request
for an update to the 3270 protocol is not likely to be fulfilled at this
point.


I believe many emulators nowadays interpret double-click as "shoot".  Or
provide "shoot" as a pop-up selection.


But that requires using a mouse which is one of the the biggest 
productivity killers ever invented, especially for text UIs.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: [EXTERNAL] Re: Two new RFE's to consider supporting

2018-06-22 Thread Dyck, Lionel B. (RavenTek)
Actually the desire is to tab to the PAS field but not allow the field to be 
over-typed.

--
Lionel B. Dyck (Contractor)  <
Mainframe Systems Programmer – RavenTek Solution Partners

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Thursday, June 21, 2018 8:33 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: Two new RFE's to consider supporting

On Thu, 21 Jun 2018 19:08:53 +, Dyck, Lionel B. (RavenTek) wrote:

>Please consider supporting these RFE's that I just submitted:
>
>ISPF Point and Shoot Protected Fields
>
>https://www.ibm.com/developerworks/rfe/execute?use_case=viewRfe_ID=121576


On Thu, 21 Jun 2018 18:13:21 -0400, Phil Smith III wrote:
 
>Steve Smith wrote:
>
>>Isn't #1 impossible?  From what I've retained (or think I have) of 3270
>>programming, a "tab" is merely the start of an unprotected field.
>Catch-22.
>
>Correct. You cannot tab to a protected field. And I suspect that a request
>for an update to the 3270 protocol is not likely to be fulfilled at this
>point.
>
Reading the RFE, it appears that the submitter does not want to be able to
tab to a PAS field; rather he wants to be able to define a PAS field that
will be skipped by tab.

Does 3270 protocol require that PAS fields be writable, therefore tabbable?
Bad design.  It's perfectly reasonable to want to specify a read-only PAS
menu item.  (Too few bits in the attribute byte?)

I believe many emulators nowadays interpret double-click as "shoot".  Or
provide "shoot" as a pop-up selection.

Long ago, I tried to specify a single-cell PAS field.  The host application 
rejected
this, claiming that a light pen can not resolve a single cell.  Bad Lowest 
Common
Denominator design.  The application should support a possibly hi-res light pen
or other PAS device.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


SV: CBT tape file 321 Cobol Analyzer

2018-06-22 Thread Holger Noach (UHN)
I use the latest version downloaded from CBT tape.
Yes , I have rebuild the version on CBT tape myself

Regards
Holger


On 20 June 2018 at 16:40, Holger Noach (UHN)  wrote:

> I have for several year's used the Cobol Analyzer program from CBT
> tape file 321, www.cbttape.org,
> File # 321 COBOL Analyzer from Roland Schiradin & post processor
> 
>
> It has given me very good and useful information about Cobol programs
> Now , after migrating from Cobol Enterprise 4.2 to Cobol 6.1 the program 
> suffers an Abend S0C4 for certain programs.

> I am fully aware, that all programs on CBT tape are open source and
> with absolutely no guarantee of functionality

That doesn't mean that you cannot possibly get help. If you are able to post 
some detailed information about the abend, perhaps one of us will make the time 
to at least look at it and see what can be discovered. As you say, no guaranty. 
It is likely that you will have to include a sample program that provokes the 
problem, and of course you will need to say exactly which version of COBANAL 
you are using.
Did you build it yourself from the CBT source?

> I have tried to write to the author , but has got no response

The last post I have from Roland Schiradin was on 2017-02-25, so well over a 
year ago. So perhaps he has quietly retired...

> Or do anybody use other utilities with same functionality

I would take up Allan Kielstra on his question. Certainly if anyone knows about 
the innards of LE-compliant code, he does.

Tony H.

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Beskyttelse af dine personlige oplysninger er vigtig for os. Her finder du 
KMD’s Privatlivspolitik, der fortæller, 
hvordan vi behandler oplysninger om dig.

Protection of your personal data is important to us. Here you can read KMD’s 
Privacy Policy outlining how we process your 
personal data.

Vi gør opmærksom på, at denne e-mail kan indeholde fortrolig information. Hvis 
du ved en fejltagelse modtager e-mailen, beder vi dig venligst informere 
afsender om fejlen ved at bruge svarfunktionen. Samtidig beder vi dig slette 
e-mailen i dit system uden at videresende eller kopiere den. Selvom e-mailen og 
ethvert vedhæftet bilag efter vores overbevisning er fri for virus og andre 
fejl, som kan påvirke computeren eller it-systemet, hvori den modtages og 
læses, åbnes den på modtagerens eget ansvar. Vi påtager os ikke noget ansvar 
for tab og skade, som er opstået i forbindelse med at modtage og bruge e-mailen.

Please note that this message may contain confidential information. If you have 
received this message by mistake, please inform the sender of the mistake by 
sending a reply, then delete the message from your system without making, 
distributing or retaining any copies of it. Although we believe that the 
message and any attachments are free from viruses and other errors that might 
affect the computer or it-system where it is received and read, the recipient 
opens the message at his or her own risk. We assume no responsibility for any 
loss or damage arising from the receipt or use of this message.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


SV: CBT tape file 321 Cobol Analyzer

2018-06-22 Thread Holger Noach (UHN)
Analyze Cobol Programs , what Cobol Version used ,  when compiled ,  etc etc
Take a look at www.cbttape.org
And there you find a lot of open source code , which might help you jn dayli 
work

Venlig hilsen

Holger Noach , Ekstern konsulent

KMD Ekstern Konsulent - IBM


E-mail u...@kmd.dk  Web www.kmd.dk
  Mobil +4551639221
-Oprindelig meddelelse-
Fra: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] På vegne 
af R.S.
Sendt: 22. juni 2018 11:12
Til: IBM-MAIN@LISTSERV.UA.EDU
Emne: Re: CBT tape file 321 Cobol Analyzer

Just curious: what does COBOL Analyzer do?
What kind of analysis it performs?

--
Radoslaw Skorupka
Lodz, Poland




==


--
 Treść tej wiadomości może zawierać informacje prawnie chronione Banku 
przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie 
jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem 
niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania 
adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne działanie o podobnym charakterze jest prawnie zabronione i może być 
karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie 
zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość 
włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

 This e-mail may contain legally privileged information of the Bank and is 
intended solely for business use of the addressee. This e-mail may only be 
received by the addressee and may not be disclosed to any third parties. If you 
are not the intended addressee of this e-mail or the employee authorized to 
forward it to the addressee, be advised that any dissemination, copying, 
distribution or any other similar activity is legally prohibited and may be 
punishable. If you received this e-mail by mistake please advise the sender 
immediately by using the reply facility in your e-mail software and delete 
permanently this e-mail including any copies of it either printed or saved to 
hard drive.

 mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa, 
www.mBank.pl, e-mail: kont...@mbank.plsąd Rejonowy dla m. st. Warszawy XII 
Wydział Gospodarczy Krajowego Rejestru Sądowego, nr rejestru przedsiębiorców 
KRS 025237, NIP: 526-021-50-88. Według stanu na dzień 01.01.2018 r. kapitał 
zakładowy mBanku S.A. (w całości wpłacony) wynosi 169.248.488 złotych.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Beskyttelse af dine personlige oplysninger er vigtig for os. Her finder du 
KMD’s Privatlivspolitik, der fortæller, 
hvordan vi behandler oplysninger om dig.

Protection of your personal data is important to us. Here you can read KMD’s 
Privacy Policy outlining how we process your 
personal data.

Vi gør opmærksom på, at denne e-mail kan indeholde fortrolig information. Hvis 
du ved en fejltagelse modtager e-mailen, beder vi dig venligst informere 
afsender om fejlen ved at bruge svarfunktionen. Samtidig beder vi dig slette 
e-mailen i dit system uden at videresende eller kopiere den. Selvom e-mailen og 
ethvert vedhæftet bilag efter vores overbevisning er fri for virus og andre 
fejl, som kan påvirke computeren eller it-systemet, hvori den modtages og 
læses, åbnes den på modtagerens eget ansvar. Vi påtager os ikke noget ansvar 
for tab og skade, som er opstået i forbindelse med at modtage og bruge e-mailen.

Please note that this message may contain confidential information. If you have 
received this message by mistake, please inform the sender of the mistake by 
sending a reply, then delete the message from your system without making, 
distributing or retaining any copies of it. Although we believe that the 
message and any attachments are free from viruses and other errors that might 
affect the computer or it-system where it is received and read, the recipient 
opens the message at his or her own risk. We assume no responsibility for any 
loss or damage arising from the receipt or use of this message.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: CBT tape file 321 Cobol Analyzer

2018-06-22 Thread R.S.

Just curious: what does COBOL Analyzer do?
What kind of analysis it performs?

--
Radoslaw Skorupka
Lodz, Poland




==


   --
Treść tej wiadomości może zawierać informacje prawnie chronione Banku 
przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie 
jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem 
niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania 
adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne działanie o podobnym charakterze jest prawnie zabronione i może być 
karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie 
zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość 
włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is 
intended solely for business use of the addressee. This e-mail may only be 
received by the addressee and may not be disclosed to any third parties. If you 
are not the intended addressee of this e-mail or the employee authorized to 
forward it to the addressee, be advised that any dissemination, copying, 
distribution or any other similar activity is legally prohibited and may be 
punishable. If you received this e-mail by mistake please advise the sender 
immediately by using the reply facility in your e-mail software and delete 
permanently this e-mail including any copies of it either printed or saved to 
hard drive.

mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa, 
www.mBank.pl, e-mail: kont...@mbank.plsąd Rejonowy dla m. st. Warszawy XII 
Wydział Gospodarczy Krajowego Rejestru Sądowego, nr rejestru przedsiębiorców 
KRS 025237, NIP: 526-021-50-88. Według stanu na dzień 01.01.2018 r. kapitał 
zakładowy mBanku S.A. (w całości wpłacony) wynosi 169.248.488 złotych.
   


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Rebuilding IODF

2018-06-22 Thread R.S.

W dniu 2018-06-17 o 14:11, Mainframe Sysprog pisze:

A colleague has run into an issue where the VOLUME where the IODF resided
has been "reclaimed" from another shared system with no recent available
backups of IODF available to restore.

They have a very old backup version from which he would be recovering the
IODF but is not sure how to get it back to the current live environment and
ensure consistency.

Any thoughts?


That's why we do backups.
Second thought is there is nothing which do the job for you, it will be 
manual work.
However you get help using CONFIG command and CONFIGxx member (do you 
have any?).

Just take a sheet of paper and not all the CU's CHPIDs and DEVices.

--
Radoslaw Skorupka
Lodz, Poland




==


   --
Treść tej wiadomości może zawierać informacje prawnie chronione Banku 
przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie 
jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem 
niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania 
adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne działanie o podobnym charakterze jest prawnie zabronione i może być 
karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie 
zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość 
włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is 
intended solely for business use of the addressee. This e-mail may only be 
received by the addressee and may not be disclosed to any third parties. If you 
are not the intended addressee of this e-mail or the employee authorized to 
forward it to the addressee, be advised that any dissemination, copying, 
distribution or any other similar activity is legally prohibited and may be 
punishable. If you received this e-mail by mistake please advise the sender 
immediately by using the reply facility in your e-mail software and delete 
permanently this e-mail including any copies of it either printed or saved to 
hard drive.

mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa, 
www.mBank.pl, e-mail: kont...@mbank.plsąd Rejonowy dla m. st. Warszawy XII 
Wydział Gospodarczy Krajowego Rejestru Sądowego, nr rejestru przedsiębiorców 
KRS 025237, NIP: 526-021-50-88. Według stanu na dzień 01.01.2018 r. kapitał 
zakładowy mBanku S.A. (w całości wpłacony) wynosi 169.248.488 złotych.
   


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: ARC0104I INVALID INITIALIZATION COMMAND

2018-06-22 Thread Elardus Engelbrecht
Jesse 1 Robinson wrote:

>I'd say that this is such an egregious oversight that it should be APARable 
>even after all this time. There's no statute of limitations on bad design. 

Or ask for a thing to do Syntax Checking of ARCCMDxx just like the one for 
BPXPRMxx member (SETOMVS SYNTAXCHECK=(??)  ).

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: The 'Baby' that ushered in modern computer age - BBC News

2018-06-22 Thread Dave Wade
>1,000 instructions per second times 20 to 30 million times faster is
>20 to 30 GHz for a modern laptop?  They got an extra zero in there.

Not sure where that came from. The Baby replica actually does about 700 
instructions per second. Its a 32 bit serial machine and a bit access time is 
10 microseconds. That makes 320 microseconds per store access. There are an 
extra 4 bit times per cycle to allow the beams on the williams tubes to fly 
back so that makes 360 milliseconds per store access. Each instruction takes 
four such cycles making 1.44 milliseconds per instruction. 

To add two numbers and get the results back into store takes five of these 
cycles as there is no add. So we load complement to accumulator, subtract, 
store, load complement, store. That slows us down considerably. In addition no 
multiply or divide. 

It tooks the machine 58 minutes to work out the highest factor of 2**18 (which 
is 2**17). Thats 3480 seconds. Divide that by 10 million gives 384 
microseconds. Can a modern laptop do that same calculation in 384 microseconds?

I am not sure...

Dave

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: PDS with 1 directory block

2018-06-22 Thread Greg Price

On 2018-06-22 7:53 AM, Jesse 1 Robinson wrote:

I have a dim memory of learning ages ago that a PDS with 1 directory block is 
somehow 'different', that certain updates to it require fiddling with the VTOC 
in addition to changing data on a track. Sound familiar?


Once the last directory block has started to be used, its unused 
capacity is maintained in the data set VTOC entry. If there is only one 
directory block then then it is also the last directory block and so any 
member addition or deletion will also require a VTOC entry update.


Cheers,
Greg

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: IBM shuffles mainframe docs leaving customers crying 'sabotage' • The Register

2018-06-22 Thread Vernooij, Kees (ITOPT1) - KLM
Yes, this all must make then think. 
What was the company again, that years ago had 'THINK!' as a slogan?

Kees.


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Charles Mills
> Sent: 21 June, 2018 22:59
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: IBM shuffles mainframe docs leaving customers crying
> 'sabotage' • The Register
> 
> SHARE may not have kicked any @ss, but Cheryl got noticed.
> 
> Charles
> 
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Mark Regan
> Sent: Thursday, June 21, 2018 1:50 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Fwd: IBM shuffles mainframe docs leaving customers crying
> 'sabotage' • The Register
> 
> https://www.theregister.co.uk/2018/06/21/ibm_mainframe_docs/
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

For information, services and offers, please visit our web site: 
http://www.klm.com. This e-mail and any attachment may contain confidential and 
privileged material intended for the addressee only. If you are not the 
addressee, you are notified that no part of the e-mail or any attachment may be 
disclosed, copied or distributed, and that any other action related to this 
e-mail or attachment is strictly prohibited, and may be unlawful. If you have 
received this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message.

Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its 
employees shall not be liable for the incorrect or incomplete transmission of 
this e-mail or any attachments, nor responsible for any delay in receipt.
Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch 
Airlines) is registered in Amstelveen, The Netherlands, with registered number 
33014286



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: PDS with 1 directory block

2018-06-22 Thread Vernooij, Kees (ITOPT1) - KLM
Fwiiw: no, doesn't ring a bell.

Kees.


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Jesse 1 Robinson
> Sent: 21 June, 2018 23:53
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: PDS with 1 directory block
> 
> We recently got a corrupted PO data set after using the PDS command to
> add directory blocks. During the FIXPDS operation we were prompted to
> move members to make room for additional directory blocks. SOP. We have
> done this so often for such a long time that we didn't hesitate.
> Afterwards, however, the PDS was unusable. The only unusual thing about
> this PDS was that it was created (per ISV JCL) with only 1 directory
> block.
> 
> I have a dim memory of learning ages ago that a PDS with 1 directory
> block is somehow 'different', that certain updates to it require
> fiddling with the VTOC in addition to changing data on a track. Sound
> familiar?
> 
> .
> .
> J.O.Skip Robinson
> Southern California Edison Company
> Electric Dragon Team Paddler
> SHARE MVS Program Co-Manager
> 323-715-0595 Mobile
> 626-543-6132 Office <= NEW
> robin...@sce.com
> 
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

For information, services and offers, please visit our web site: 
http://www.klm.com. This e-mail and any attachment may contain confidential and 
privileged material intended for the addressee only. If you are not the 
addressee, you are notified that no part of the e-mail or any attachment may be 
disclosed, copied or distributed, and that any other action related to this 
e-mail or attachment is strictly prohibited, and may be unlawful. If you have 
received this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message.

Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its 
employees shall not be liable for the incorrect or incomplete transmission of 
this e-mail or any attachments, nor responsible for any delay in receipt.
Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch 
Airlines) is registered in Amstelveen, The Netherlands, with registered number 
33014286


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN