Re: How tell if have OMVS Segment

[Steve Comstock]

On 9/10/2014 7:35 PM, John McKown wrote:

On Wed, Sep 10, 2014 at 5:22 PM, Charles Mills  wrote:

I am responsible for an LE-enabled program that runs as a conventional STC
but uses various USS services and hence requires an OMVS segment. Currently,
if it does not have one, it fails with a U4093/90 (?) ABEND. I would like it
to be a little neater than that and put out a "No OMVS segment" message and
quit gracefully.

Is there a function or MACRO that will tell me yea/nay on having an OMVS
segment?

Thanks,

Charles


I have never done this because we set up the RACF facility which
automatically creates an OMVS segment if a RACF id which does not have
one attempts to do any UNIX work. But I am fairly sure the magic word
is "querydub". It is documented here:
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/BPXZB1C0/2.145


77 QUERY-DUB PIC X(8) VALUE IS "BPX1QDB'.
77 QD-RETVAL PIC S9(9) BINARY.
77 QD-RETRC PIC S9(9) BINARY.
77 QD-RETRSN PIC S9(9) BINARY.


CALL QUERY-DUB USING QD-RETVAL QD-RETRC QD-RETRSN.
IF QD-RETVAL IS EQUAL TO 4 THEN
 DISPLAY 'UNIX FACILITIES ARE NOT AVAILABLE TO THIS JOB DUE TO RACF
REQUIREMENTS'
UPON SYSOUT
 MOVE +20 TO RETURN-CODE
 STOP RUN
END-IF


I am fairly sure that something like the above will work for you. Oh,
for some reason I think you are using COBOL. But the above manual has
examples in HLASM too. C would be more difficult. You'd need to
declare BPX1QDB as having OS linkage conventions.


Maybe ...

#pragma linkage(BPX1QDB,OS);


int ret_val = 0;
int ret_code = 0;
int ret_reason = 0;

...


void BPX1QDB(int, int, int);

...

   BPX1QDB(ret_val, ret_code, ret_reason);





I don't recall off
hand how to do a "fetch" and "dynamic call" in C.  And I don't have
any examples here at home.




typedef void (*mydnamcl) (int, int, int);

   mydnamcl callptr;

   ...

 callptr = (mydnamcl) fetch("BPX1DQB");

 (callptr) (ret_val, ret_code, ret_reason);



Worth a shot.

-Steve Comstock

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

Re: How tell if have OMVS Segment

[Paul Gilmartin]

On Wed, 10 Sep 2014 17:54:36 -0700, Charles Mills wrote:
>
>I don't know exactly where I fail. My test userid has an OMVS segment. I just 
>saw it fail ugly (U4093/90 I think) at a customer.  ...
>
4093 sounds like -3, which is what Rexx uses for unknown host environment
or unknown host command.

-- gil

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

Re: How tell if have OMVS Segment

[Tony Harminc]

On 10 September 2014 20:54, Charles Mills  wrote:
[...]

>Hopefully LE does not try the dub and fail before my "user" C code gets going, 
>leaving me with no chance to
> diagnose the problem in a user-friendly manner.

That alternative explanation would then be that LE is catching a
return code from a routine you are calling, and turning it into an
abend. That's not nice either.

Tony H.

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

Re: How tell if have OMVS Segment

[John McKown]

On Wed, Sep 10, 2014 at 5:22 PM, Charles Mills  wrote:
> I am responsible for an LE-enabled program that runs as a conventional STC
> but uses various USS services and hence requires an OMVS segment. Currently,
> if it does not have one, it fails with a U4093/90 (?) ABEND. I would like it
> to be a little neater than that and put out a "No OMVS segment" message and
> quit gracefully.
>
> Is there a function or MACRO that will tell me yea/nay on having an OMVS
> segment?
>
> Thanks,
>
> Charles

I have never done this because we set up the RACF facility which
automatically creates an OMVS segment if a RACF id which does not have
one attempts to do any UNIX work. But I am fairly sure the magic word
is "querydub". It is documented here:
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/BPXZB1C0/2.145


77 QUERY-DUB PIC X(8) VALUE IS "BPX1QDB'.
77 QD-RETVAL PIC S9(9) BINARY.
77 QD-RETRC PIC S9(9) BINARY.
77 QD-RETRSN PIC S9(9) BINARY.


CALL QUERY-DUB USING QD-RETVAL QD-RETRC QD-RETRSN.
IF QD-RETVAL IS EQUAL TO 4 THEN
DISPLAY 'UNIX FACILITIES ARE NOT AVAILABLE TO THIS JOB DUE TO RACF
REQUIREMENTS'
   UPON SYSOUT
MOVE +20 TO RETURN-CODE
STOP RUN
END-IF


I am fairly sure that something like the above will work for you. Oh,
for some reason I think you are using COBOL. But the above manual has
examples in HLASM too. C would be more difficult. You'd need to
declare BPX1QDB as having OS linkage conventions. I don't recall off
hand how to do a "fetch" and "dynamic call" in C.  And I don't have
any examples here at home.


-- 
There is nothing more pleasant than traveling and meeting new people!
Genghis Khan

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: How tell if have OMVS Segment

[Charles Mills]

Right. Thanks. I have since looked up the relevant return codes.

QDB_DUB_MAY_FAIL: The task has not been dubbed; an attempt to dub the task may 
fail.  The most likely reason for failure may be a missing or incomplete user 
security profile; or the lack of an OMVS segment. 

I would probably log any "unexpected" return code and proceed, hoping for the 
best. I would rather U4093 than not try in a situation where I might have 
succeeded.

I've never used the BPX1 services that I recall. They seem to be intended 
for assembler programs but I would hope I can find C calling instructions 
somewhere. Worst case I can just code up my own extern "OS" ...

I don't know exactly where I fail. My test userid has an OMVS segment. I just 
saw it fail ugly (U4093/90 I think) at a customer. The customer inexplicably 
(why do customers do these things to themselves?) has his system set up so all 
output from an STC is automatically and instantly purged, so whatever evidence 
of where I was has gone to bit heaven. Hopefully LE does not try the dub and 
fail before my "user" C code gets going, leaving me with no chance to diagnose 
the problem in a user-friendly manner.

I can get a userid set up on my system that does not have an OVMS segment but 
that is obviously a small chore of its own.   

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tony Harminc
Sent: Wednesday, September 10, 2014 5:36 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How tell if have OMVS Segment

On 10 September 2014 19:17, Charles Mills  wrote:
> Am I correct in assuming that "cannot be dubbed ..." == lacking an OMVS 
> segment?

Close, but not exactly. There are several more subtle reasons that may cause a 
dub to fail. What I've done (in assembler code, but it could be in C and 
probably others) is to call a harmless and fast UNIX service (I use sysconf() 
BPX1SYC) early in startup that will fail with return and reason codes if UNIX 
services in general won't work. Then I put out a message, rather than have 
TCP/IP or some other service I need fail later on.

But there is a chicken & egg problem, in that the UNIX kernel service to 
retrieve message text from return and/or reason codes itself requires that your 
process be dubbed. (I complained about this years ago, but at least back then 
IBM had no plans to change this
behaviour.) So I have a short list of hardcoded return and reason codes taken 
from the book, and I issue a hopefully useful message to explain the detailed 
reason rather then a generic "dub failed"
message. You can look up return code EMVSINITIAL and see what the possible 
reason codes are - things like:
JRSAFNOUSER: The user ID is not defined to the security product
JRSAFNOGID: The user ID is in a group that has no GID and so on. EMVSINITIAL is 
the common problem, but there might also be other return codes that indicate 
startup problems: EMVSNOTUP, EMVSERR, EMVSSAF2ERR, and maybe others.

Of course you'll want to show the actual return and reason codes so that if IBM 
has added one since you checked, the end user can look it up.

Your situation may well have a different chicken & egg issue; I don't know what 
provokes LE to issue its U4093 abend, but it may be that it tries to get dubbed 
on its own initiative and that's its polite way of saying that the attempt 
failed. In which case you may be too late to do what I suggested, or even to 
use querydub() as Bob did.

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

Re: How tell if have OMVS Segment

[Tony Harminc]

On 10 September 2014 19:17, Charles Mills  wrote:
> Am I correct in assuming that "cannot be dubbed ..." == lacking an OMVS 
> segment?

Close, but not exactly. There are several more subtle reasons that may
cause a dub to fail. What I've done (in assembler code, but it could
be in C and probably others) is to call a harmless and fast UNIX
service (I use sysconf() BPX1SYC) early in startup that will fail with
return and reason codes if UNIX services in general won't work. Then I
put out a message, rather than have TCP/IP or some other service I
need fail later on.

But there is a chicken & egg problem, in that the UNIX kernel service
to retrieve message text from return and/or reason codes itself
requires that your process be dubbed. (I complained about this years
ago, but at least back then IBM had no plans to change this
behaviour.) So I have a short list of hardcoded return and reason
codes taken from the book, and I issue a hopefully useful message to
explain the detailed reason rather then a generic "dub failed"
message. You can look up return code EMVSINITIAL and see what the
possible reason codes are - things like:
JRSAFNOUSER: The user ID is not defined to the security product
JRSAFNOGID: The user ID is in a group that has no GID
and so on. EMVSINITIAL is the common problem, but there might also be
other return codes that indicate startup problems: EMVSNOTUP, EMVSERR,
EMVSSAF2ERR, and maybe others.

Of course you'll want to show the actual return and reason codes so
that if IBM has added one since you checked, the end user can look it
up.

Your situation may well have a different chicken & egg issue; I don't
know what provokes LE to issue its U4093 abend, but it may be that it
tries to get dubbed on its own initiative and that's its polite way of
saying that the attempt failed. In which case you may be too late to
do what I suggested, or even to use querydub() as Bob did.

Tony H.

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

Re: How tell if have OMVS Segment

[Bob Rutledge]

Charles Mills wrote:
Bob 


I suspect it is!

"The following code obtains the dub status information for 
 the current task. The status indicates whether the current

 task has already been dubbed, is ready to be dubbed, or cannot
 be dubbed as a process (or thread)." 


Yes, that's the sort of thing I was looking for: call foo() and get a return
code.

Am I correct in assuming that "cannot be dubbed ..." == lacking an OMVS
segment?


Not "==", but look at QDB_DUB_MAY_FAIL.


Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Bob Rutledge
Sent: Wednesday, September 10, 2014 4:01 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How tell if have OMVS Segment

Charles Mills wrote:
I am responsible for an LE-enabled program that runs as a conventional 
STC but uses various USS services and hence requires an OMVS segment. 
Currently, if it does not have one, it fails with a U4093/90 (?) 
ABEND. I would like it to be a little neater than that and put out a 
"No OMVS segment" message and quit gracefully.


Is there a function or MACRO that will tell me yea/nay on having an 
OMVS segment?


Is BPX1QDB what you're really looking for?


Bob

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

Re: How tell if have OMVS Segment

[Charles Mills]

Bob 

I suspect it is!

"The following code obtains the dub status information for 
 the current task. The status indicates whether the current
 task has already been dubbed, is ready to be dubbed, or cannot
 be dubbed as a process (or thread)." 

Yes, that's the sort of thing I was looking for: call foo() and get a return
code.

Am I correct in assuming that "cannot be dubbed ..." == lacking an OMVS
segment?

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Bob Rutledge
Sent: Wednesday, September 10, 2014 4:01 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How tell if have OMVS Segment

Charles Mills wrote:
> I am responsible for an LE-enabled program that runs as a conventional 
> STC but uses various USS services and hence requires an OMVS segment. 
> Currently, if it does not have one, it fails with a U4093/90 (?) 
> ABEND. I would like it to be a little neater than that and put out a 
> "No OMVS segment" message and quit gracefully.
> 
> Is there a function or MACRO that will tell me yea/nay on having an 
> OMVS segment?

Is BPX1QDB what you're really looking for?

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

Re: How tell if have OMVS Segment

[Bob Rutledge]

Charles Mills wrote:

I am responsible for an LE-enabled program that runs as a conventional STC
but uses various USS services and hence requires an OMVS segment. Currently,
if it does not have one, it fails with a U4093/90 (?) ABEND. I would like it
to be a little neater than that and put out a "No OMVS segment" message and
quit gracefully.

Is there a function or MACRO that will tell me yea/nay on having an OMVS
segment?


Is BPX1QDB what you're really looking for?

Bob

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

Re: How tell if have OMVS Segment

[Scott Ford]

Todd is right that's another way. Check the ACEE used by STC and see if it has 
the OMVS seg.






Regards,

Scott





From: Burrell, C. Todd (CDC/OCOO/OCIO/ITSO) (CTR)
Sent: ‎Wednesday‎, ‎September‎ ‎10‎, ‎2014 ‎6‎:‎34‎ ‎PM
To: IBM Mainframe Discussion List





Can't you make a call to RACF (or other security package) to check this?  

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Charles Mills
Sent: Wednesday, September 10, 2014 6:22 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: How tell if have OMVS Segment

I am responsible for an LE-enabled program that runs as a conventional STC but 
uses various USS services and hence requires an OMVS segment. Currently, if it 
does not have one, it fails with a U4093/90 (?) ABEND. I would like it to be a 
little neater than that and put out a "No OMVS segment" message and quit 
gracefully.

Is there a function or MACRO that will tell me yea/nay on having an OMVS 
segment?

Thanks,

Charles

--
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: Symbols in SYSIN syntax -- IEB351I I/O ERROR

[Paul Gilmartin]

In:

//*.+|+|+|+|+|+|+|+|
//  SET X='This is a long symbol value.'
//STEP1EXEC  PGM=IEBGENER
//SYSPRINT  DD  SYSOUT=(,)
//SYSIN DD  DUMMY
//SYSUT2DD  SYSOUT=(,)
//SYSUT1DD  *,SYMBOLS=CNVTSYS,DCB=LRECL=222
Lots of data to fill up a line, followed by a long symbol to see &X.
//*.+|+|+|+|+|+|+|+|
//STEP2EXEC  PGM=IEBGENER
//SYSPRINT  DD  SYSOUT=(,)
//SYSIN DD  DUMMY
//SYSUT2DD  SYSOUT=(,)
//SYSUT1DD  *,SYMBOLS=CNVTSYS,DCB=LRECL=222
Lots of data to fill up a line, followed by a long symbol to see &X.

//*.+|+|+|+|+|+|+|+|

... STEP1 gets RC=12 with SYSPRINT:
* TOP OF DATA 
*
DATA SET UTILITY - GENERATE
IEB352I WARNING: ONE OR MORE OF THE OUTPUT DCB PARMS COPIED FROM INPUT

IEB351I I/O ERROR ,JCLSYM  ,STEP1   ,JES ,I,SYSUT1  ,READ  ,WRONG LEN 
RECRD,**,BSAM
 BOTTOM OF DATA 
***

... STEP2 gets RC=0 with SYSUT2 as expected:
* TOP OF DATA 

Lots of data to fill up a line, followed by a long symbol to see This is a long 
symbol value.

 BOTTOM OF DATA 
**

Why?  I have an RCF in (ID service item number 25975) which might
incidentally clarify this.  It was accepted as a clarification.
I asked if I might get a preview, since it's quite a while until
the next doc update.  The request seems to be bouncing around IBM
with considerable finger pointing.

Is it possible that the Interpreter is ignoring my "LRECL=222"?

-- gil

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

Re: How tell if have OMVS Segment

[Burrell, C. Todd (CDC/OCOO/OCIO/ITSO) (CTR)]

Can't you make a call to RACF (or other security package) to check this?  

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Charles Mills
Sent: Wednesday, September 10, 2014 6:22 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: How tell if have OMVS Segment

I am responsible for an LE-enabled program that runs as a conventional STC but 
uses various USS services and hence requires an OMVS segment. Currently, if it 
does not have one, it fails with a U4093/90 (?) ABEND. I would like it to be a 
little neater than that and put out a "No OMVS segment" message and quit 
gracefully.

Is there a function or MACRO that will tell me yea/nay on having an OMVS 
segment?

Thanks,

Charles

--
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: How tell if have OMVS Segment

[Scott Ford]

Charles:


Are you using TCPIP ? If so when you init the stack, if no OMVS segment exists 
it will fail with a bad return code.

We run under LE also.






Regards,

Scott





From: charl...@mcn.org
Sent: ‎Wednesday‎, ‎September‎ ‎10‎, ‎2014 ‎6‎:‎22‎ ‎PM
To: IBM Mainframe Discussion List





I am responsible for an LE-enabled program that runs as a conventional STC
but uses various USS services and hence requires an OMVS segment. Currently,
if it does not have one, it fails with a U4093/90 (?) ABEND. I would like it
to be a little neater than that and put out a "No OMVS segment" message and
quit gracefully.

Is there a function or MACRO that will tell me yea/nay on having an OMVS
segment?

Thanks,

Charles

--
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: How tell if have OMVS Segment

[Paul Gilmartin]

On 2014-09-10 16:22, Charles Mills wrote:
> 
> Is there a function or MACRO that will tell me yea/nay on having an OMVS
> segment?
>  
A WAG, since I haven't an OMVS-challenged ID to test.

What about the Rexx function, SYSCALLS('ON')?

-- gil

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

How tell if have OMVS Segment

[Charles Mills]

I am responsible for an LE-enabled program that runs as a conventional STC
but uses various USS services and hence requires an OMVS segment. Currently,
if it does not have one, it fails with a U4093/90 (?) ABEND. I would like it
to be a little neater than that and put out a "No OMVS segment" message and
quit gracefully.

Is there a function or MACRO that will tell me yea/nay on having an OMVS
segment?

Thanks,

Charles

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

Re: CICS help finding books?

[Hansen, Dave L - Eagan, MN]

Thank you.  I was looking all over for publication numbers.


   Thanks again,  Dave


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Sri h Kolusu
Sent: Wednesday, September 10, 2014 3:30 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: CICS help finding books?

Dave,

Both links you referred are hyper links and if I click on them I get to the 
respective manuals

Q1 links to
http://pic.dhe.ibm.com/infocenter/cicsts/v5r1/index.jsp?topic=%2Fcom.ibm.cics.ts.systemprogramming.doc%2Ftopics%2Fdfha7mc.html

Q2 links to
http://pic.dhe.ibm.com/infocenter/cicsts/v5r1/index.jsp?topic=%2Fcom.ibm.cics.ts.resourcedefinition.doc%2Fcsdup%2FentryParameters.html


Thanks,
Kolusu

IBM Mainframe Discussion List  wrote on 
09/10/2014 01:15:53 PM:

> From: "Hansen, Dave L - Eagan, MN" 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 09/10/2014 01:16 PM
> Subject: CICS help finding books?
> Sent by: IBM Mainframe Discussion List 
> 
> Dear Group,
> 
>I am getting back into CICS.  I did try to subscribe to the CICS-
> L group, but haven't heard back yet.  I looked at the CICS TS for z/
> OS 5.1: System Definition Guide (SC34-2871-00).  This book 
> references a few books I can't find.
> 
>   In Chapter 34 "Processing system initialization parameters" on 
> page 294 under "END of CICS startup" it says: "see Administering 
> with CICS supplied transactions in Administering."  I did find 
> "CICSPlex SM Administration" (SC34-2880-00).
> Q).  What CICS TS for z/OS 5.1 book is "Administering"?
> 
>   In Chapter 10 "Sharing the CSD between different releases of CICS"
> on page 21 at the end of the last paragraph it says: 'see Entry 
> parameters for the DFHCSDUP program in Configuring".
> Q).  What CICS TS for z/OS 5.1 book is "Configuring"?
> 
>This is what I tried to send to CICS-L:
>   In the CICS TS V5R1 book under: "Other CICS publications" is a 
> listing of more CICS publications.  One listed is Designing and 
> Programming CICS Applications, SR23-9692.  I looked at IBM Pubs and 
> Red Books but could not find it.
>I may have found it on Amazon:  http://www.amazon.com/Designing-
> Programming-CICS-Applications-Horswill/dp/1565926765
> Q).  Is SR23-9692 an O'Reilly book and not an IBM book?
> 
> 
>Many thanks in advance,  Dave
> 
> 
> 
> --
> 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: CICS help finding books?

[Sri h Kolusu]

Dave,

Both links you referred are hyper links and if I click on them I get to 
the respective manuals

Q1 links to 
http://pic.dhe.ibm.com/infocenter/cicsts/v5r1/index.jsp?topic=%2Fcom.ibm.cics.ts.systemprogramming.doc%2Ftopics%2Fdfha7mc.html

Q2 links to 
http://pic.dhe.ibm.com/infocenter/cicsts/v5r1/index.jsp?topic=%2Fcom.ibm.cics.ts.resourcedefinition.doc%2Fcsdup%2FentryParameters.html


Thanks,
Kolusu

IBM Mainframe Discussion List  wrote on 
09/10/2014 01:15:53 PM:

> From: "Hansen, Dave L - Eagan, MN" 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 09/10/2014 01:16 PM
> Subject: CICS help finding books?
> Sent by: IBM Mainframe Discussion List 
> 
> Dear Group,
> 
>I am getting back into CICS.  I did try to subscribe to the CICS-
> L group, but haven't heard back yet.  I looked at the CICS TS for z/
> OS 5.1: System Definition Guide (SC34-2871-00).  This book 
> references a few books I can't find.
> 
>   In Chapter 34 "Processing system initialization parameters" on 
> page 294 under "END of CICS startup" it says: "see Administering 
> with CICS supplied transactions in Administering."  I did find 
> "CICSPlex SM Administration" (SC34-2880-00).
> Q).  What CICS TS for z/OS 5.1 book is "Administering"?
> 
>   In Chapter 10 "Sharing the CSD between different releases of CICS"
> on page 21 at the end of the last paragraph it says: 'see Entry 
> parameters for the DFHCSDUP program in Configuring".
> Q).  What CICS TS for z/OS 5.1 book is "Configuring"?
> 
>This is what I tried to send to CICS-L:
>   In the CICS TS V5R1 book under: "Other CICS publications" is a 
> listing of more CICS publications.  One listed is Designing and 
> Programming CICS Applications, SR23-9692.  I looked at IBM Pubs and 
> Red Books but could not find it.
>I may have found it on Amazon:  http://www.amazon.com/Designing-
> Programming-CICS-Applications-Horswill/dp/1565926765
> Q).  Is SR23-9692 an O'Reilly book and not an IBM book?
> 
> 
>Many thanks in advance,  Dave
> 
> 
> 
> --
> 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: CICS help finding books?

[Paul Peplinski]

http://pic.dhe.ibm.com/infocenter/cicsts/v5r1/index.jsp

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

CICS help finding books?

[Hansen, Dave L - Eagan, MN]

Dear Group,

   I am getting back into CICS.  I did try to subscribe to the CICS-L group, 
but haven't heard back yet.  I looked at the CICS TS for z/OS 5.1: System 
Definition Guide (SC34-2871-00).  This book references a few books I can't find.

  In Chapter 34 "Processing system initialization parameters" on page 294 under 
"END of CICS startup" it says: "see Administering with CICS supplied 
transactions in Administering."  I did find "CICSPlex SM Administration" 
(SC34-2880-00).
Q).  What CICS TS for z/OS 5.1 book is "Administering"?

  In Chapter 10 "Sharing the CSD between different releases of CICS" on page 21 
at the end of the last paragraph it says: 'see Entry parameters for the 
DFHCSDUP program in Configuring".
Q).  What CICS TS for z/OS 5.1 book is "Configuring"?

   This is what I tried to send to CICS-L:
  In the CICS TS V5R1 book under: "Other CICS publications" is a listing of 
more CICS publications.  One listed is Designing and Programming CICS 
Applications, SR23-9692.  I looked at IBM Pubs and Red Books but could not find 
it.
   I may have found it on Amazon:  
http://www.amazon.com/Designing-Programming-CICS-Applications-Horswill/dp/1565926765
Q).  Is SR23-9692 an O'Reilly book and not an IBM book?


   Many thanks in advance,  Dave



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

Re: Rexx Idiom (was: FTP of EBCDIC file)

[Scott Ford]

Darth:


Personally, I believe everyone has their own techniques  in writing computer 
code. Where you cloned someone’s code and made changes or created it or read 
manuals and did one of the above. 






Sent from Windows Mail





From: Darth Keller
Sent: ‎Wednesday‎, ‎September‎ ‎10‎, ‎2014 ‎12‎:‎19‎ ‎PM
To: IBM Mainframe Discussion List





-->  he *cannot* write good REXX.

So what is "good" REXX?   Or did we mean 'he cannot write REXX well'? 
Isn't the point of the statement to describe how he writes?  Or is it to 
discuss what constitutes 'good' REXX?

Even those of us whose native language is English have problems with it 
and I freely admit I are one of those.

ddk






**
This e-mail message and all attachments transmitted with it may contain legally 
privileged and/or confidential information intended solely for the use of the 
addressee(s). If the reader of this message is not the intended recipient, you 
are hereby notified that any reading, dissemination, distribution, copying, 
forwarding or other use of this message or its attachments is strictly 
prohibited. If you have received this message in error, please notify the 
sender immediately and delete this message and all copies and backups thereof. 
Thank you.

--
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: Rexx Idiom (was: FTP of EBCDIC file)

[Darth Keller]

-->  he *cannot* write good REXX.

So what is "good" REXX?   Or did we mean 'he cannot write REXX well'? 
Isn't the point of the statement to describe how he writes?  Or is it to 
discuss what constitutes 'good' REXX?

Even those of us whose native language is English have problems with it 
and I freely admit I are one of those.

ddk






**
This e-mail message and all attachments transmitted with it may contain legally 
privileged and/or confidential information intended solely for the use of the 
addressee(s). If the reader of this message is not the intended recipient, you 
are hereby notified that any reading, dissemination, distribution, copying, 
forwarding or other use of this message or its attachments is strictly 
prohibited. If you have received this message in error, please notify the 
sender immediately and delete this message and all copies and backups thereof. 
Thank you.

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

Re: Symbols in SYSIN syntax

[Paul Gilmartin]

I think LISTSERV screwed over your ampersands as it did mine.  I'll
try to reply by email and repair them.

On 2014-09-10, at 09:28, Tom Wasik wrote: 
> 
> As for the ['&&'] being converted to '&' that was a long internal debate.  
> The concern was that the instream data is being fed to a service that may 
> also be doing substitution.  We were thinking of things like the high level 
> assembler.  The intent may be that the double [&&] was intended for that 
> service.  The instream process removing that could cause problems later down 
> the line.  So it was decided that the instream substitution service would NOT 
> un-double the &.
>  
I think I side with the losers here, even though long ago I wished
I could subsitute symbols in assembler instream SYSIN.  There's
significant value in using consistent conventions.

Is all this documented?  Is an RCF required?

I'd be mollified by an example in the JCL Reference of how one could
achieve in PARMDD with substitution enabled the equivalent of:

//X  EXEC PGM=WHATEVER,PARM='The value of &&SYSUID is &SYSUID..'

(You concoct the example; I'll supply the RCF.)  I'm thinking of
such as:

// EXPORT ...
//SET A=&&  (Is that right?)
   ...
//PARMDD  DD  *,SYMBOLS=JCLSYM
The value of &A.SYSUID is &SYSUID..

(But that might let unwanted spaces sneak into my text.)

> Also note that there is another oversight that was pointed out.  The &SYSUID 
> symbol is not being substituted in the instream data.  That should have been 
> done.  OA45995 was
>  
I stumbled into that; I thought it was a feature.  I know &SYSUID is
somehow sui generis -- it seems to be neither a static system symbol,
nor a dynamic system symbol, nor a JCL symbol, nor ...  What is it,
anyway?

> created to correct that oversight.  I mention this because you happened to 
> use &USER in your JCL.  Until the APAR is available, you could set 
> USER=&SYSUID or even SYSUID=&SYSUID
>  
I discovered the first of those.  In the end, I used WOMBAT in
order not to broadcast my userID on the Web (though I have slipped
on occasion).

But are your circumventions in violation of a statement in the JCL
Reference that symbols should not be defined in terms of other
symbols?  An RCF for examples of what's allowed or discouraged
might be proper.  And, dammit, the Converter should issue warnings
on any use of deprecated constructs.

Thanks,
gil

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

Re: Rexx Idiom (was: FTP of EBCDIC file)

[Tony Harminc]

On 10 September 2014 10:30, Paul Gilmartin
<000433f07816-dmarc-requ...@listserv.ua.edu> wrote:

> One can speak German in English:  "I have been writing Rexx since ten years."

Or French, and probably Spanish:  "I am writing Rexx since ten years."

And another French giveaway: "It's not because he knows FORTRAN that
he can write good REXX."  Which doesn't sound like bad English until
you realize that it's intended to mean that he *cannot* write good
REXX.

Tony H.

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

Re: Symbols in SYSIN syntax

[Tom Wasik]

The removal of the '.' is inappropriate.  If the symbol is not recognized, it 
should be left alone (and the '.' not removed).  This only seems to occur when 
you specify CNVTSYS or EXECSYS.  It is related to how the instream substitution 
service interacts with the system symbol service.

If you can open a PMR against JES2, the JES2 team will investigate changing 
this behavior.  

As for the '&&' being converted to '&' that was a long internal debate.  
The concern was that the instream data is being fed to a service that may also 
be doing substitution.  We were thinking of things like the high level 
assembler.  The intent may be that the double && was intended for that 
service.  The instream process removing that could cause problems later down 
the line.  So it was decided that the instream substitution service would NOT 
un-double the &.

Also note that there is another oversight that was pointed out.  The &SYSUID 
symbol is not being substituted in the instream data.  That should have been 
done.  OA45995 was created to correct that oversight.  I mention this because 
you happened to use &USER in your JCL.  Until the APAR is available, you could 
set USER=&SYSUID or even SYSUID=&SYSUID

Tom Wasik
JES2 Development

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

Re: z/OS IEASYSxx memory parameter values

[P. Mukhopadhyay]

Thank you for the reply.

I have setup a new sysplex and I am seeing following error in the syslog 
(generated by Healthchecker)

The sysplex is just running the basic jobs and STCs. No transaction/application 
servers, DB or middleware is running.

IGVH100E ESQA has exceeded the threshold percentage of 80% 
Current allocation is 121% of 12760K. Allocation exceeds 100% because  
1093 (E)CSA pages were converted to (E)SQA.
Unallocated amount is 0 bytes. 

5GB RAM is allocated for this LPAR and following values are present in IEASYSxx

CSA=(2500,15)
SQA=(8,30)

I am going to enable SMF recording for type 78 as suggested. But would it be a 
good idea to bump up the ESQA values?

Thanks,
P.Mukhopadhyay

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

Re: FTP of EBCDIC file

[Shmuel Metz (Seymour J.)]

In <2490004486696175.wa.paulgboulderaim@listserv.ua.edu>, on
09/09/2014
   at 03:08 PM, Paul Gilmartin
<000433f07816-dmarc-requ...@listserv.ua.edu> said:

>True.  But utilities invoked under such environments are free to 
>use the interfaces provided by Rexx.  Does ISPEXEC count as 
>"such ... as TSO"?

I would have to say no, because in general commands in the ISPEXEC
environment expect variable names in parentheses rather than the
contents of those variable.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see  
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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

Re: Another shop that has -- no, wait, what?

[Shmuel Metz (Seymour J.)]

In
,
on 09/09/2014
   at 11:24 AM, John McKown  said:

>And the "venerable" BBC just said that VPN technology should be
>restricted by ISPs because "heavy" users are probably pirates.

The same highly clued BBC that provides "public" access requiring
proprietary software?
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see  
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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

Re: Rexx Idiom (was: FTP of EBCDIC file)

[Steve Comstock]

On 9/10/2014 8:30 AM, Paul Gilmartin wrote:

On Wed, 10 Sep 2014 08:26:53 -0400, Hobart Spitz wrote:


How about something like:

/* REXX */
"pipe < input.dsn | split after str x0D25 | joincont not trailing x0D25 | >
output.dsn"
exit RC


Looks like Batchpipes.  How prevalent is BatchPipes?


On Wed, Sep 10, 2014 at 3:07 AM, Martin Packer wrote:


Not knowing who the authors were, is it possible they were explaining REXX
to (what they thought to be) a CLIST-literate audience? TSO/E 2.1 would've
  been a shock to some. :-)


I suggested as much, perhaps sarcastically.  But it's a flawed pedagogic
practice.  Whether in a natural language or in a computer language, a
student becomes fluent by immersion, learning to think in the target
language, not by composing in a previously known language and
translating to the target language.

"One can write FORTRAN in any language."  Symptoms include:
o not exploiting compound symbols as associative arrays
o not using boolean values as first class data objects
o misuse of SIGNAL as if it were GOTO.

One can speak German in English:  "I have been writing Rexx
since ten years."

One can speak Hindi in English: "Please answer my doubt about
Rexx syntax."


Aww geez! Now I got coffee everywhere.

-Steve Comstock




-- 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: Rexx Idiom (was: FTP of EBCDIC file)

[Nims,Alva John (Al)]

I wish it was move prevalent than it is, I do not have it at my current JOB, 
but when I worked as a contractor to IBM in one of their GDF's, I used it quite 
HEAVILY to accomplish some very complicated tasks.  I did not use every "Stage" 
from BatchPipes, but I managed to use several.

Al Nims
Systems Admin/Programmer 3
Information Technology
University of Florida
(352) 273-1298

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Wednesday, September 10, 2014 10:31 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Rexx Idiom (was: FTP of EBCDIC file)

On Wed, 10 Sep 2014 08:26:53 -0400, Hobart Spitz wrote:

>How about something like:
>
>/* REXX */
>"pipe < input.dsn | split after str x0D25 | joincont not trailing x0D25 
>| > output.dsn"
>exit RC
>
Looks like Batchpipes.  How prevalent is BatchPipes?

>On Wed, Sep 10, 2014 at 3:07 AM, Martin Packer wrote:
>
>> Not knowing who the authors were, is it possible they were explaining 
>> REXX to (what they thought to be) a CLIST-literate audience? TSO/E 
>> 2.1 would've  been a shock to some. :-)
>>
I suggested as much, perhaps sarcastically.  But it's a flawed pedagogic 
practice.  Whether in a natural language or in a computer language, a student 
becomes fluent by immersion, learning to think in the target language, not by 
composing in a previously known language and translating to the target language.

"One can write FORTRAN in any language."  Symptoms include:
o not exploiting compound symbols as associative arrays o not using boolean 
values as first class data objects o misuse of SIGNAL as if it were GOTO.

One can speak German in English:  "I have been writing Rexx since ten years."

One can speak Hindi in English: "Please answer my doubt about Rexx syntax."

-- 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

Rexx Idiom (was: FTP of EBCDIC file)

[Paul Gilmartin]

On Wed, 10 Sep 2014 08:26:53 -0400, Hobart Spitz wrote:

>How about something like:
>
>/* REXX */
>"pipe < input.dsn | split after str x0D25 | joincont not trailing x0D25 | >
>output.dsn"
>exit RC
>
Looks like Batchpipes.  How prevalent is BatchPipes?

>On Wed, Sep 10, 2014 at 3:07 AM, Martin Packer wrote:
>
>> Not knowing who the authors were, is it possible they were explaining REXX
>> to (what they thought to be) a CLIST-literate audience? TSO/E 2.1 would've
>>  been a shock to some. :-)
>>
I suggested as much, perhaps sarcastically.  But it's a flawed pedagogic
practice.  Whether in a natural language or in a computer language, a
student becomes fluent by immersion, learning to think in the target
language, not by composing in a previously known language and
translating to the target language.

"One can write FORTRAN in any language."  Symptoms include:
o not exploiting compound symbols as associative arrays
o not using boolean values as first class data objects
o misuse of SIGNAL as if it were GOTO.

One can speak German in English:  "I have been writing Rexx
since ten years."

One can speak Hindi in English: "Please answer my doubt about
Rexx syntax."

-- gil

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

Re: FTP of EBCDIC file

[Hobart Spitz]

How about something like:

/* REXX */
"pipe < input.dsn | split after str x0D25 | joincont not trailing x0D25 | >
output.dsn"
exit RC

The SPLIT here restores the intended record breaks.  The JOINCONT brings
together record parts that were separated by unintended record breaks and
discards the x'0D25'.

On Wed, Sep 10, 2014 at 3:07 AM, Martin Packer 
wrote:

> Not knowing who the authors were, is it possible they were explaining REXX
> to (what they thought to be) a CLIST-literate audience? TSO/E 2.1 would've
>  been a shock to some. :-)
>
> Cheers, Martin
>
> Martin Packer,
> zChampion, Principal Systems Investigator,
> Worldwide Banking Center of Excellence, IBM
>
> +44-7802-245-584
>
> email: martin_pac...@uk.ibm.com
>
> Twitter / Facebook IDs: MartinPacker
> Blog:
> https://www.ibm.com/developerworks/mydeveloperworks/blogs/MartinPacker
>
>
>
> From:   Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu>
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date:   09/09/2014 21:09
> Subject:Re: FTP of EBCDIC file
> Sent by:IBM Mainframe Discussion List 
>
>
>
> On Tue, 9 Sep 2014 10:54:34 -0400, Shmuel Metz (Seymour J.) wrote:
>
> >on 09/08/2014
> >   at 02:23 PM, Paul Gilmartin said:
> >
> >>Remember that a host command argument is always a single string.
> > ]
> >Don't confuse a REXX expression with its value.
> >
> I know that well.  It appears that the authors of the TSO/E Rexx
> reference know it less well and are trying to share their bewilderment
> with their readers.  They repeatedly state as local rules what should
> be instances of global principles.  I suspect their minds have been
> rotted by excessive exposure to CLIST.
>
> >>I suspect the TMP parser might be uncomfortable with:
> >>address TSO 'EXECIO 1 DISKW' FileID '(string  ))) ((( )))'
> >
> >The TMP passes the operand to the command processor as is. The only
> >code changes needed would be in EXECIO itself.
> >
> I stand corrected.  Empirically errors are reported by EXECIO, not by the
> TMP.
>
> >>EXECIO is among very few command environments that uses the Direct
> >>rather than Symbolic interface to Rexx variables.
> >
> >First, such environments as TSO don't have any interface to REXX
> >
> True.  But utilities invoked under such environments are free to use
> the interfaces provided by Rexx.  Does ISPEXEC count as "such ...
> as TSO"?
>
> >variables. Second, the only interface to REXX variables is symbolic.
> >
> No.  Long ago the CMS Rexx reference explained the difference between
> the Direct interface and the symbolic.  Now I can find merely a vestige:
>
>
>
> http://pic.dhe.ibm.com/infocenter/zos/v2r1/topic/com.ibm.zos.v2r1.ikja300/shvblk.htm
>
> The shared variable (request) block - SHVBLOCK
> z/OS TSO/E REXX Reference
> SA32-0972-00
>
> * Function Codes (Placed in SHVCODE):
> *
> * (Note that the symbolic name codes are lowercase)
> SHVFETCH EQU   C'F'  Copy value of variable to buffer
> SHVSTORE EQU   C'S'  Set variable from given value
> SHVDROPV EQU   C'D'  Drop variable
> SHVSYSET EQU   C's'  Symbolic name Set variable
> SHVSYFET EQU   C'f'  Symbolic name Fetch variable
> SHVSYDRO EQU   C'd'  Symbolic name Drop variable
> SHVNEXTV EQU   C'N'  Fetch "next" variable
> SHVPRIV  EQU   C'P'  Fetch private information
>
> Formerly the (uppercase) non-symbolic name codes were identified
> as "direct".  The documentation has largely evaporated; the function
> remains.  Documentation of which functions use the respective
> interfaces is sorely largely lacking.  Empiricism reigns.
>
> >In the statement
> >
> > address TSO 'EXECIO 1 DISKW' FileID
> >
> >the TSO environment does not see the name "FileID"; it sees the value
> >of the expression
> >
> > 'EXECIO 1 DISKW' FileID
> >
> Agreed.  The TSO/E reference instead makes local statments to
> the effect that quotes must be used here, but not there, failing
> to rely on the distinction between names and values.
>
> -- gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
>
> Unless stated otherwise above:
> IBM United Kingdom Limited - Registered in England and Wales with number
> 741598.
> Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
OREXXMan

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

Re: EZANS

[גדי בן אבי]

Me too.
The version I have does not work under z/OS 1.13
Gadi

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Roberto Halais
Sent: Wednesday, September 10, 2014 2:49 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: EZANS

Count me in.

It's very useful for us.

On Wed, Sep 10, 2014 at 7:13 AM, Lizette Koehler 
wrote:

> Saw this posting and response on the TCPIP list.
>
> I thought I would share this with you.  If the EZANS tool is
> important, maybe we all need to send in requests to see its support continue.
>
> Lizette
>
>
> > -Original Message-
> > From: IBM TCP/IP List [mailto:ibmtc...@vm.marist.edu] On Behalf Of
> > Kristine Adamson
> > Sent: Wednesday, September 10, 2014 3:06 AM
> > To: ibmtc...@vm.marist.edu
> > Subject: Re: EZANS
> >
> >
> > Alan,
> >I'm work on the IBM z/OS Communications Server product.  Alfred
> Christensen
> > did retire from IBM a couple years ago.  At this time, there are no
> > plans
> to maintain
> > his EZANS tool but, you could submit a Request for Enhancement to
> > IBM to
> show
> > your interest in the having the tool maintained.
> >
> > Regards,
> >
> > Kristine Adamson
> > IBM z/OS Communications Server: TCP/IP Development
> > Phone: (919) 254-7911   T/L 444-7911
> > Internet e-mail:adam...@us.ibm.com
> >
> >
> >
> >
> > From: Alan Watthey 
> > To:   ibmtc...@vm.marist.edu
> > Date: 09/10/2014 03:09 AM
> > Subject:  [IBMTCP-L] EZANS
> > Sent by:  IBM TCP/IP List 
> >
> >
> >
> > Hi,
> >
> >
> >
> > We've been running the above for many years.  It's called 'The IBM
> > z/OS Communications Server Network Utility Assistant' nowadays of course.
> >
> >
> >
> > Does anyone know if there is a new version to go with V2R1?  I can
> > only
> seem to
> > find an old version for V1R12 on the IBM websites which is the one
> > we
> already
> > have.  Confusingly, the site does say it applies to software level
> > V1R13 as well although the page was updated only in February 2011.
> >
> >
> >
> > http://www-01.ibm.com/support/docview.wss?uid=swg24029203
> >
> >
> >
> > Has Alfred Christensen (who used to support it) left IBM now?
> >
> >
> >
> > Regards,
> >
> > Alan
> >
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



--

"There are 10 types of people in the world; those that understand binary and 
those that don't"

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

לשימת לבך, בהתאם לנהלי חברת מלם מערכות בע"מ ו/או כל חברת בת ו/או חברה קשורה שלה 
(להלן : "החברה") וזכויות החתימה בהן, כל הצעה, התחייבות או מצג מטעם החברה, 
מחייבים מסמך נפרד וחתום על ידי מורשי החתימה של החברה, הנושא את לוגו החברה או 
שמה המודפס ובצירוף חותמת החברה. בהעדר מסמך כאמור (לרבות מסמך סרוק) המצורף 
להודעת דואר אלקטרוני זאת, אין לראות באמור בהודעה אלא משום טיוטה לדיון, ואין 
להסתמך עליה לביצוע פעולה עסקית או משפטית כלשהי.

Please note that in accordance with Malam and/or its subsidiaries (hereinafter 
: "Malam") regulations and signatory rights, no offer, agreement, concession or 
representation is binding on the Malam, unless accompanied by a duly signed 
separate document (or a scanned version thereof), affixed with the Malam seal.

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

Re: FW: EZANS

[Roberto Halais]

Count me in.

It's very useful for us.

On Wed, Sep 10, 2014 at 7:13 AM, Lizette Koehler 
wrote:

> Saw this posting and response on the TCPIP list.
>
> I thought I would share this with you.  If the EZANS tool is important,
> maybe we all need to send in requests to see its support continue.
>
> Lizette
>
>
> > -Original Message-
> > From: IBM TCP/IP List [mailto:ibmtc...@vm.marist.edu] On Behalf Of
> > Kristine Adamson
> > Sent: Wednesday, September 10, 2014 3:06 AM
> > To: ibmtc...@vm.marist.edu
> > Subject: Re: EZANS
> >
> >
> > Alan,
> >I'm work on the IBM z/OS Communications Server product.  Alfred
> Christensen
> > did retire from IBM a couple years ago.  At this time, there are no plans
> to maintain
> > his EZANS tool but, you could submit a Request for Enhancement to IBM to
> show
> > your interest in the having the tool maintained.
> >
> > Regards,
> >
> > Kristine Adamson
> > IBM z/OS Communications Server: TCP/IP Development
> > Phone: (919) 254-7911   T/L 444-7911
> > Internet e-mail:adam...@us.ibm.com
> >
> >
> >
> >
> > From: Alan Watthey 
> > To:   ibmtc...@vm.marist.edu
> > Date: 09/10/2014 03:09 AM
> > Subject:  [IBMTCP-L] EZANS
> > Sent by:  IBM TCP/IP List 
> >
> >
> >
> > Hi,
> >
> >
> >
> > We've been running the above for many years.  It's called 'The IBM z/OS
> > Communications Server Network Utility Assistant' nowadays of course.
> >
> >
> >
> > Does anyone know if there is a new version to go with V2R1?  I can only
> seem to
> > find an old version for V1R12 on the IBM websites which is the one we
> already
> > have.  Confusingly, the site does say it applies to software level
> > V1R13 as well although the page was updated only in February 2011.
> >
> >
> >
> > http://www-01.ibm.com/support/docview.wss?uid=swg24029203
> >
> >
> >
> > Has Alfred Christensen (who used to support it) left IBM now?
> >
> >
> >
> > Regards,
> >
> > Alan
> >
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 

"There are 10 types of people in the world; those that understand
binary and those that don't"

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

FW: EZANS

[Lizette Koehler]

Saw this posting and response on the TCPIP list.

I thought I would share this with you.  If the EZANS tool is important,
maybe we all need to send in requests to see its support continue.

Lizette


> -Original Message-
> From: IBM TCP/IP List [mailto:ibmtc...@vm.marist.edu] On Behalf Of
> Kristine Adamson
> Sent: Wednesday, September 10, 2014 3:06 AM
> To: ibmtc...@vm.marist.edu
> Subject: Re: EZANS
> 
> 
> Alan,
>I'm work on the IBM z/OS Communications Server product.  Alfred
Christensen
> did retire from IBM a couple years ago.  At this time, there are no plans
to maintain
> his EZANS tool but, you could submit a Request for Enhancement to IBM to
show
> your interest in the having the tool maintained.
> 
> Regards,
> 
> Kristine Adamson
> IBM z/OS Communications Server: TCP/IP Development
> Phone: (919) 254-7911   T/L 444-7911
> Internet e-mail:adam...@us.ibm.com
> 
> 
> 
> 
> From: Alan Watthey 
> To:   ibmtc...@vm.marist.edu
> Date: 09/10/2014 03:09 AM
> Subject:  [IBMTCP-L] EZANS
> Sent by:  IBM TCP/IP List 
> 
> 
> 
> Hi,
> 
> 
> 
> We've been running the above for many years.  It's called 'The IBM z/OS
> Communications Server Network Utility Assistant' nowadays of course.
> 
> 
> 
> Does anyone know if there is a new version to go with V2R1?  I can only
seem to
> find an old version for V1R12 on the IBM websites which is the one we
already
> have.  Confusingly, the site does say it applies to software level
> V1R13 as well although the page was updated only in February 2011.
> 
> 
> 
> http://www-01.ibm.com/support/docview.wss?uid=swg24029203
> 
> 
> 
> Has Alfred Christensen (who used to support it) left IBM now?
> 
> 
> 
> Regards,
> 
> Alan
> 
> 

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

Re: FTP of EBCDIC file

[Martin Packer]

Not knowing who the authors were, is it possible they were explaining REXX 
to (what they thought to be) a CLIST-literate audience? TSO/E 2.1 would've 
 been a shock to some. :-)

Cheers, Martin

Martin Packer,
zChampion, Principal Systems Investigator,
Worldwide Banking Center of Excellence, IBM

+44-7802-245-584

email: martin_pac...@uk.ibm.com

Twitter / Facebook IDs: MartinPacker
Blog: 
https://www.ibm.com/developerworks/mydeveloperworks/blogs/MartinPacker



From:   Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu>
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   09/09/2014 21:09
Subject:Re: FTP of EBCDIC file
Sent by:IBM Mainframe Discussion List 



On Tue, 9 Sep 2014 10:54:34 -0400, Shmuel Metz (Seymour J.) wrote:

>on 09/08/2014
>   at 02:23 PM, Paul Gilmartin said:
>
>>Remember that a host command argument is always a single string.
> ]
>Don't confuse a REXX expression with its value.
> 
I know that well.  It appears that the authors of the TSO/E Rexx
reference know it less well and are trying to share their bewilderment
with their readers.  They repeatedly state as local rules what should
be instances of global principles.  I suspect their minds have been
rotted by excessive exposure to CLIST.

>>I suspect the TMP parser might be uncomfortable with:
>>address TSO 'EXECIO 1 DISKW' FileID '(string  ))) ((( )))'
>
>The TMP passes the operand to the command processor as is. The only
>code changes needed would be in EXECIO itself.
> 
I stand corrected.  Empirically errors are reported by EXECIO, not by the 
TMP.

>>EXECIO is among very few command environments that uses the Direct
>>rather than Symbolic interface to Rexx variables.
>
>First, such environments as TSO don't have any interface to REXX
>
True.  But utilities invoked under such environments are free to use
the interfaces provided by Rexx.  Does ISPEXEC count as "such ...
as TSO"?

>variables. Second, the only interface to REXX variables is symbolic.
> 
No.  Long ago the CMS Rexx reference explained the difference between
the Direct interface and the symbolic.  Now I can find merely a vestige:


http://pic.dhe.ibm.com/infocenter/zos/v2r1/topic/com.ibm.zos.v2r1.ikja300/shvblk.htm
 

The shared variable (request) block - SHVBLOCK
z/OS TSO/E REXX Reference
SA32-0972-00 

* Function Codes (Placed in SHVCODE):
*
* (Note that the symbolic name codes are lowercase)
SHVFETCH EQU   C'F'  Copy value of variable to buffer
SHVSTORE EQU   C'S'  Set variable from given value
SHVDROPV EQU   C'D'  Drop variable
SHVSYSET EQU   C's'  Symbolic name Set variable
SHVSYFET EQU   C'f'  Symbolic name Fetch variable
SHVSYDRO EQU   C'd'  Symbolic name Drop variable
SHVNEXTV EQU   C'N'  Fetch "next" variable
SHVPRIV  EQU   C'P'  Fetch private information

Formerly the (uppercase) non-symbolic name codes were identified
as "direct".  The documentation has largely evaporated; the function
remains.  Documentation of which functions use the respective
interfaces is sorely largely lacking.  Empiricism reigns.

>In the statement
>
> address TSO 'EXECIO 1 DISKW' FileID
>
>the TSO environment does not see the name "FileID"; it sees the value
>of the expression
>
> 'EXECIO 1 DISKW' FileID
> 
Agreed.  The TSO/E reference instead makes local statments to
the effect that quotes must be used here, but not there, failing
to rely on the distinction between names and values.

-- gil

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



Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number 
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU

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