Re: Need to figure out what WEB SERVICE CWXN is trying to access

[michael . tai]

Thanks, I've posted the same to that list.
I think the maint level is not related to my qustion, I am trying to dig out 
something from CICS SO domain in the dump.


 
---Original---
From: "Lizette Koehler"
Date: 2017/8/8 13:13:36
To: "IBM-MAIN";
Subject: Re: Need to figure out what WEB SERVICE CWXN is trying to access


There is a CICS List that may be able to assist you better.

To join, if you have not done so, go to this URL

CICShttp://www.listserv.uga.edu/archives/cics-l.html

Second, it would be helpful to provide more information.

What version of z/OS are you running
 
What version of CICS are you running

What Web services are creating this issue.

What actions have you taken so far to research your issue?

Do you have on all maintenance needed on z/OS, TCPIP, CICS, SOAP?

Does this link help?

https://www.ibm.com/support/knowledgecenter/SSGMGV_3.1.0/com.ibm.cics.ts31.doc/dfhe5/dfhe5zc.htm


Lizette


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Michael Tai
> Sent: Monday, August 07, 2017 9:46 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Need to figure out what WEB SERVICE CWXN is trying to access
> 
> Hi,
> 
> 1. There're a number of CWXN running which led to SOS in ECDSA. A dump was
> taken. Is there a way to figure out the web service a specific CWXN task is
> trying to access from the dump? (CICS internal trace is turned off).
> 
> 2. Is there a way to extract the SOAP message from the dump? Since CICS trace
> is turned off. I can't extract them from SO 02 02 SOCK RECEIVE trace entry.
> 

--
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: Need to figure out what WEB SERVICE CWXN is trying to access

[Lizette Koehler]

There is a CICS List that may be able to assist you better.

To join, if you have not done so, go to this URL

CICShttp://www.listserv.uga.edu/archives/cics-l.html

Second, it would be helpful to provide more information.

What version of z/OS are you running
 
What version of CICS are you running

What Web services are creating this issue.

What actions have you taken so far to research your issue?

Do you have on all maintenance needed on z/OS, TCPIP, CICS, SOAP?

Does this link help?

https://www.ibm.com/support/knowledgecenter/SSGMGV_3.1.0/com.ibm.cics.ts31.doc/dfhe5/dfhe5zc.htm


Lizette


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Michael Tai
> Sent: Monday, August 07, 2017 9:46 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Need to figure out what WEB SERVICE CWXN is trying to access
> 
> Hi,
> 
> 1. There're a number of CWXN running which led to SOS in ECDSA. A dump was
> taken. Is there a way to figure out the web service a specific CWXN task is
> trying to access from the dump? (CICS internal trace is turned off).
> 
> 2. Is there a way to extract the SOAP message from the dump? Since CICS trace
> is turned off. I can't extract them from SO 02 02 SOCK RECEIVE trace entry.
> 

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

Need to figure out what web service CWXN trying to access

[michael . tai]

1. A number of CWXN running in the system led to SOS, a dump was taken. Need to 
figure out what web service is trying to access. (CICS Internal trace was 
turned off)
2. Is there a way to extact SOAP message from the dump, SO 0202 SOCK RECEIVE 
can't be used since internal trace was turned off.

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

Need to figure out what WEB SERVICE CWXN is trying to access

[Michael Tai]

Hi,

1. There're a number of CWXN running which led to SOS in ECDSA. A dump was 
taken. Is there a way to figure out the web service a specific CWXN task is 
trying to access from the dump? (CICS internal trace is turned off).

2. Is there a way to extract the SOAP message from the dump? Since CICS trace 
is turned off. I can't extract them from SO 02 02 SOCK RECEIVE trace entry.

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

Re: z/OS Secure FTP Question

[Brian Westerman]

I agree, HTTPS is much easier to both implement and use.  IBM supplies the 
directions on every order in ShopZSeries (off on the right side).  I think they 
also tell you right in each shipment, but I could be wrong.

Brian

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

Re: Various 052 abends with LINKAGE=SYSTEM calls in SRB

[Joseph Reichman]

Thanks that's what I thought



> On Aug 7, 2017, at 9:30 PM, Jim Mulder  wrote:
> 
>It should not be possible to get a 052 abend from VSMLOC,
> unless some rogue code on your system has messed with the
> System Function Table so that the wrong PC number is being issued,
> or some rogue code on your system has messes with the Entry Table Entry 
> for the VSMLOC PC so that something other than the VSMLOC service
> routine is being invoked by the VSMLOC PC.
> 
> Jim Mulder z/OS Diagnosis, Design, Development, Test  IBM Corp. 
> Poughkeepsie NY
> 
>> From: Joe Reichman 
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Date: 08/07/2017 09:24 PM
>> Subject: Various 052 abends with LINKAGE=SYSTEM calls in SRB
>> Sent by: IBM Mainframe Discussion List 
> 
>> I am getting intermittent abends with a couple of macros that use
>> linkage=system in a SRB
> 
>> The first is with AXSET macro
>> 
>>LAR2,1  Give us the  
>>AXSET AX=(R2)   Power  
>>XRR8,8  Clear r8  
>>ICM   R8,B'0011',NOW.HASID Get Server Asid 
>>SSAR  R8Set secondary Asid
>> 
>> The reason code for the AXSET is 0101
>> 
>> The Abends happens (sometimes) after the PC  0(14) call in the AXSET
>> 
>> To other is in the VSMLOC macro again after the PC  0(14) The reason 
> code in
>> the VSMLOC is 0103
>> 
>> From my understanding there is no restriction using LINKAGE=SYSTEM in a 
> SRB
> 
> 
> 
> --
> 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: Various 052 abends with LINKAGE=SYSTEM calls in SRB

[Jim Mulder]

It should not be possible to get a 052 abend from VSMLOC,
unless some rogue code on your system has messed with the
System Function Table so that the wrong PC number is being issued,
or some rogue code on your system has messes with the Entry Table Entry 
for the VSMLOC PC so that something other than the VSMLOC service
routine is being invoked by the VSMLOC PC.

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

> From: Joe Reichman 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 08/07/2017 09:24 PM
> Subject: Various 052 abends with LINKAGE=SYSTEM calls in SRB
> Sent by: IBM Mainframe Discussion List 

> I am getting intermittent abends with a couple of macros that use
> linkage=system in a SRB

> The first is with AXSET macro
> 
> LAR2,1  Give us the  
> AXSET AX=(R2)   Power  
> XRR8,8  Clear r8  
> ICM   R8,B'0011',NOW.HASID Get Server Asid 
> SSAR  R8Set secondary Asid
> 
> The reason code for the AXSET is 0101
> 
> The Abends happens (sometimes) after the PC  0(14) call in the AXSET
> 
> To other is in the VSMLOC macro again after the PC  0(14) The reason 
code in
> the VSMLOC is 0103
> 
> From my understanding there is no restriction using LINKAGE=SYSTEM in a 
SRB



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

Re: How to find the Global zone names in SMP/E via REXX

[Paul Gilmartin]

On Mon, 7 Aug 2017 16:13:01 -0700, Lizette Koehler wrote:

>I have a requirement to create a process that is dependent on knowing the
>TLIB/DLIB zone names from the Global CSI.
>
>At this time, I do not see any type of ADDRESS SMPEXEC or other API process to
>do the extract.
> 
Alas, the API supports Assembler, Cobol, C, ... (I've modified and used the C
sample in SAMPLIB), but not Rexx.  The problem concerns a requirement that
that the caller supply pointers in control blocks whereas Rexx is 
pointer-challenged.
RFE opportunity?  Compare ICSF, which has a Rexx-friendly API.

>So I am guessing I will need to run an SMPE Process to do a listzone then parse
>the output for the names I need.
>
I can only suggest running an ADDRESS LINKMVS and scraping the SMPLIST,
as you guess.

>Unless someone has an easier way to do this, this is the process I will take.
>
>This process will eventually do a copyzone or mergezone.  Just trying to
>automate the process so the user does not need to tell the REXX that much
>information other than the GLOBAL CSI.

-- gil

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

Various 052 abends with LINKAGE=SYSTEM calls in SRB

[Joe Reichman]

Hi

 

I am getting intermittent abends with a couple of macros that use
linkage=system in a SRB

 

 

The first is with AXSET macro

 

LAR2,1  Give us the

AXSET AX=(R2)   Power  



XRR8,8  Clear r8   

ICM   R8,B'0011',NOW.HASID Get Server Asid  

SSAR  R8Set secondary Asid

 

The reason code for the AXSET is 0101

 

The Abends happens (sometimes) after the PC  0(14) call in the AXSET

 

To other is in the VSMLOC macro again after the PC  0(14) The reason code in
the VSMLOC is 0103

 

>From my understanding there is no restriction using LINKAGE=SYSTEM in a SRB

 

Thanks

 


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

How to find the Global zone names in SMP/E via REXX

[Lizette Koehler]

I have a requirement to create a process that is dependent on knowing the
TLIB/DLIB zone names from the Global CSI.

At this time, I do not see any type of ADDRESS SMPEXEC or other API process to
do the extract.

So I am guessing I will need to run an SMPE Process to do a listzone then parse
the output for the names I need.

Unless someone has an easier way to do this, this is the process I will take.

This process will eventually do a copyzone or mergezone.  Just trying to
automate the process so the user does not need to tell the REXX that much
information other than the GLOBAL CSI.

Any thoughts or suggestions are appreciated.


Lizette Koehler
statistics: A precise and logical method for stating a half-truth inaccurately

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

Need referral - Websphere script w/o passwords

[Linda Hagedorn]

This is regarding Websphere.  I've inherited a WAS platform with scripts 
containing passwords in clear text.  I have to remediate this, and came to 
ibm-main for advice.  This is on AIX.  I normally manage DB2 on Z, and just 
accepted the WAS area.  

Can anyone refer me to a manual, Redbook, or best practice for options?  
Encrypted pw file? System parm for NOPASSWORD?  Any information or referral is 
appreciated.  Thanks, Linda

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

Re: base64 encoding (was Curse you, L-Soft!)

[π]

On Mon, Aug 07, 2017 at 03:45:08PM -0500, Joel C. Ewing wrote:
>
>   As an experiment, I will try adding some "unusual" characters (like
> degree ° and check__✔)  to force Content-Transfer-Encoding: 8bit and see
> what the list does to this message.__
>
(antiquated) MacOS Mail.app seems to force Q-P.  On Linux, mutt seems
nicer, and e...@univie.ac.at respects and echoes that.  I'll try:
Cc: e...@univie.ac.at
Content-Transfer-Encoding: 8bit
and see what happens.

Apologies for all the tests,
gil

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

Re: base64 encoding (was Curse you, L-Soft!)

[Paul Gilmartin]

On Mon, 7 Aug 2017 15:45:08 -0500, Joel C. Ewing wrote:
>
>  As an experiment, I will try adding some "unusual" characters (like
>degree ° and check__✔)  to force Content-Transfer-Encoding: 8bit and see
>what the list does to this message.__
>
It came to me as: 
Content-Type: text/plain; charset=utf-8
...
Content-Transfer-Encoding: quoted-printable
Don't know which M?A did me the "favor".  Pervasive timidity, almost phobic.

[How] does it appear in your outbox?  Do you have REPRO ON?
how did it get reflected to you?

And when I mail something to a mainframe, it often arrives as:
charset=USASCII
when it has clearly been translated to EBCDIC.  If a MTA/MDA is going
to perform such a conversion, it ought to adjust the MIME headers to
agree.

-- gil

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

Re: base64 encoding (was Curse you, L-Soft!)

[Joel C. Ewing]

On 08/07/2017 01:54 PM, David W Noon wrote:
> On Mon, 7 Aug 2017 13:08:20 -0500, Elardus Engelbrecht
> (elardus.engelbre...@sita.co.za) wrote about "Re: Curse you, L-Soft!"
> (in <6156763411207138.wa.elardus.engelbrechtsita.co...@listserv.ua.edu>):
>
>> Paul Gilmartin wrote:
>>
>>> I can neither submit an SR to L-Soft nor rant on the L-Soft mailing list 
>>> because I'm not a registered L-Soft customer.
>> I feel your pain. I also wanted to moan and b*tch about base 64 encoding 
>> amongst other things, but ...
> Sometimes Base64 or other binary-safe encoding is required by RFC.
E.g, base64 can be required for the message body when message headers
say it is encoded with "charset=UTF-8" or some other 8-bit encoding and
it gets sent to a recipient mail server that responds it is unable to
support 8bitMIME.  For that to happen implies some system in the chain
of servers handling the email is running software that is over a decade
old, or for some  reason has deliberately been configured to disable
8bitMIME support.  Then again maybe it's really a header of
"Content-Transfer-Encoding: 8bit" (some characters contain non-zero 8th
bit) that triggers the problem rather than just charset UTF-8, which
might  explain the rareness of the problem despite common usage of UTF-8
these days.

It is highly unlikely the end user "submitted" the email using a base64
encoding of the message text, but rather that it was just submitted with
UTF-8 and some server in the path taken by the email to the ibm-main
list forced the usage of base64 to constrain the message to 7-bit
characters. 

My email client (Thunderbird under Fedora Linux) sends charset UTF-8 by
default, but the headers also contain "Content-Transfer-Encoding: 7bit",
unless I actually include some UTF-8 characters that require a non-zero
8th bit, in which case it sends "Content-Transfer-Encoding: 8bit".  I
know the messages I send to another of my email accounts with UTF-8 and
Transfer-Encoding 8bit do not get transformed to base64, nor do my
normal posts to IBM-main with charset UTF-8 and Transfer-Encoding 7bit.
  As an experiment, I will try adding some "unusual" characters (like
degree ° and check__✔)  to force Content-Transfer-Encoding: 8bit and see
what the list does to this message.__
Joel C. Ewing
...

-- 
Joel C. Ewing,Bentonville, AR   jcew...@acm.org 

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

Re: Vector processing instructions

[Paul Gilmartin]

On Mon, 7 Aug 2017 15:03:00 -0400, Steve Smith wrote:

>Maybe you could show your code.  MP and DP can be tricky, but when you
>CVDG the high D-word, you'd then multiply it by
>9,223,372,036,854,775,808, then by 2 (or something equivalent).  Add
>to what you CVDG from the low D-word.
>
>Of course, this will overflow if the value is too large for 31 digits,
>and may get PD multiply exceptions for much less.  You may have to do
>some weaseling to make it work.  Brute force would be multiplying the
>converted high D-word by 2 64 times.
>
... which still overflows.  Need to break the converted high D-word (which
can not exceed 20 digits) into two 10-bit chunks; multiply each by 2**64
(at most 30 digits), break the bottom one into tswo 10-digit pieces;
add the top 10 dights to the converted top half; and string everything
together.

This is simulating long multiplication.

-- gil

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

Re: Vector processing instructions

[Steve Smith]

Maybe you could show your code.  MP and DP can be tricky, but when you
CVDG the high D-word, you'd then multiply it by
9,223,372,036,854,775,808, then by 2 (or something equivalent).  Add
to what you CVDG from the low D-word.

Of course, this will overflow if the value is too large for 31 digits,
and may get PD multiply exceptions for much less.  You may have to do
some weaseling to make it work.  Brute force would be multiplying the
converted high D-word by 2 64 times.

sas

On Mon, Aug 7, 2017 at 12:51 PM, Paul Gilmartin
<000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
> On Mon, 7 Aug 2017 11:17:05 -0500, Todd Arnold wrote:
>
>>I got this answer from someone else at IBM, who is an expert in the vector 
>>instructions:
>>"Currently to convert a 128-bit singed/unsigned integer in a vector register 
>>to a packed decimal value you must store the value to memory and use the 
>>standard integer conversion instruction CVBG to convert 64-bits at a time.  
>>...
>>
> Does "someone else" suggest working right-to-left or left-to-right?  And 
> there's
> a trick needed to cross the boundary since 2**64 is not a power of 10.  Would 
> I
> find an example if I RTFM PoOps?
>
>>... A full 128-bit value will not fit into a 31-digit decimal number."
>>
> ... a tautology, since
> 2**127: 170141183460469231731687303715884105728
> ... is greater than
> 10**31:1000
>
> -- gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



-- 
sas

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

Re: Curse you, L-Soft!

[David W Noon]

On Mon, 7 Aug 2017 13:08:20 -0500, Elardus Engelbrecht
(elardus.engelbre...@sita.co.za) wrote about "Re: Curse you, L-Soft!"
(in <6156763411207138.wa.elardus.engelbrechtsita.co...@listserv.ua.edu>):

> Paul Gilmartin wrote:
> 
>> I can neither submit an SR to L-Soft nor rant on the L-Soft mailing list 
>> because I'm not a registered L-Soft customer.
> 
> I feel your pain. I also wanted to moan and b*tch about base 64 encoding 
> amongst other things, but ...

Sometimes Base64 or other binary-safe encoding is required by RFC.

>> o When I attempt to reply to a submitter rather than to the  list, my 
>> message is usually bounced by Rules at the recipients MTA.  It might help 
>> greatly if LISTSERV added  a proper "Sender:" header.
> 
> Uh, I'm not understanding you? What is MTA? I only respond via web-page, not 
> via my own e-mail client software like Outlook. Else, I just copy and paste 
> the sender's address manually, a real PITA, but there is not really an 
> alternative AFAIK.

MTA = Mail Transfer Agent

This is/are the SMTP server(s) used to move email around.

[snip]
> But I have a gut feeling it is about the poster own e-mail attributes to 
> L-Soft which causes much grief to you and perhaps others too.
> 
> I don't blame them too. Perhaps my OWN (and yours too) posting is causing 
> trouble to them too...

Using a fully RFC-compliant MUA can cause many problems for those who
use "cowboy coded" MUAs.

And to complete the email glossary:

MUA = Mail User Agent (your mail reader)

MDA = Mail Delivery Agent (the server from which your MUA downloads mail)
-- 
Regards,

Dave  [RLU #314465]
*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
david.w.n...@googlemail.com (David W Noon)
*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*

 

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

Re: Curse you, L-Soft!

[Elardus Engelbrecht]

Paul Gilmartin wrote:

>I can neither submit an SR to L-Soft nor rant on the L-Soft mailing list 
>because I'm not a registered L-Soft customer.

I feel your pain. I also wanted to moan and b*tch about base 64 encoding 
amongst other things, but ...


>o When I attempt to reply to a submitter rather than to the  list, my message 
>is usually bounced by Rules at the recipients MTA.  It might help greatly if 
>LISTSERV added  a proper "Sender:" header.

Uh, I'm not understanding you? What is MTA? I only respond via web-page, not 
via my own e-mail client software like Outlook. Else, I just copy and paste the 
sender's address manually, a real PITA, but there is not really an alternative 
AFAIK.


>o A "&" digraph is always escaped incorrectly.

This is news to me. Hmmm interesting.


>o When I Reply and Quote a message submitted with base64 encoding, the quoted 
>text appears in unrendered base64.  Sad!

I copy the text in a web page, then go to the page where I can compose a 
message and paste text and then finish my composing work. There is a IBM-MAIN 
member which text I always copy and paste, because of base64 encoding. You also 
complained about him in the past.


>o There's no option to compose using a monospaced font, making composing 
>tabular information such as code fragments needlessly difficult.

I usually use a Notepad to compose text with monospaced font in Notepad, then I 
paste that text in the compose window on the IBM-MAIn webpage composing page. 
The same goes for text in my 3270 emulator.

I agree all of above is a real PITA! But no complaining about that will help 
you or me or others Grrr...

But I have a gut feeling it is about the poster own e-mail attributes to L-Soft 
which causes much grief to you and perhaps others too.

I don't blame them too. Perhaps my OWN (and yours too) posting is causing 
trouble to them too...

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

Curse you, L-Soft!

[Paul Gilmartin]

I can neither submit an SR to L-Soft nor rant on the L-Soft
mailing list because I'm not a registered L-Soft customer.
And no owner of a LISTSERV to which I subscribe seems interested
in championing my cause.  So, I'll vent here (again).

Mostly about composing or replying via the Web interface.

o When I attempt to reply to a submitter rather than to the
  list, my message is usually bounced by Rules at the
  recipients MTA.  It might help greatly if LISTSERV added
  a proper "Sender:" header.

o A "&&" digraph is always escaped incorrectly.

o When I Reply and Quote a message submitted with base64 encoding,
  the quoted text appears in unrendered base64.  Sad!

o There's no option to compose using a monospaced font, making
  composing tabular information such as code fragments needlessly
  difficult.

G,
gil

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

Re: Vector processing instructions

[Paul Gilmartin]

On Mon, 7 Aug 2017 11:17:05 -0500, Todd Arnold wrote:

>I got this answer from someone else at IBM, who is an expert in the vector 
>instructions:
>"Currently to convert a 128-bit singed/unsigned integer in a vector register 
>to a packed decimal value you must store the value to memory and use the 
>standard integer conversion instruction CVBG to convert 64-bits at a time.  ...
>
Does "someone else" suggest working right-to-left or left-to-right?  And there's
a trick needed to cross the boundary since 2**64 is not a power of 10.  Would I
find an example if I RTFM PoOps?

>... A full 128-bit value will not fit into a 31-digit decimal number."
>
... a tautology, since
2**127: 170141183460469231731687303715884105728
... is greater than 
10**31:1000

-- gil

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

Re: Vector processing instructions

[Amrith]

Thanks Todd. I think you are referring to CVDG which is what I had used but 
didn't yield the expected  results. Splitting a 128bit binary integer into 2 
64bits and then a CVDG didn't convert it as expected. I will probably try that 
out again. I used Java Big Integer for a simple 128bit arithmetic  and the 
outputs from z13 and Java did not match.  



On Mon, 8/7/17, Todd Arnold  wrote:

 Subject: Re: Vector processing instructions
 To: IBM-MAIN@LISTSERV.UA.EDU
 Date: Monday, August 7, 2017, 4:17 PM
 
 I got this answer from someone else at IBM,
 who is an expert in the vector instructions:
 "Currently to convert a 128-bit
 singed/unsigned integer in a vector register to a packed
 decimal value you must store the value to memory and use the
 standard integer conversion instruction CVBG to convert
 64-bits at a time. A full 128-bit value will not fit into a
 31-digit decimal number."
 
 --
 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: Vector processing instructions

[Todd Arnold]

I got this answer from someone else at IBM, who is an expert in the vector 
instructions:
"Currently to convert a 128-bit singed/unsigned integer in a vector register to 
a packed decimal value you must store the value to memory and use the standard 
integer conversion instruction CVBG to convert 64-bits at a time. A full 
128-bit value will not fit into a 31-digit decimal number."

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

Re: z/OS Secure FTP Question

[Kurt Quackenbush]

On 8/7/2017 9:13 AM, Veryl Ellis wrote:

I'm attempting to setup a secure FTP so I get PUT/RSU maintenance
via FTP and move away from requesting tape.



Can someone tell me if I should use;
GeoTrust Global CA
Or
GeoTrust Global CA 2


You want GeoTrust Global CA (serial number 02 34 56).  I suggest you 
refer to the following for more help:

https://www.ibm.com/support/knowledgecenter/SSLTBW_2.3.0/com.ibm.zos.v2r3.gim3000/dsetups.htm

I also suggest you use HTTPS instead of FTPS.

Kurt Quackenbush -- IBM, SMP/E Development

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

Re: IEC026I - 637-BC

[Elardus Engelbrecht]

Buckton, T. (Theo) wrote:

>We have 40 mod-54s and 90 mod-27s - all sms managed. The program tool is 
>ICETOOL.  The volumes are most of the time empty only in use by temp data 
>sets. I might have to monitor the usage during execution.

This is totally different from your QA system with only mod-54.

I would concur with Sri and also suggest that you try to avoid concatenation 
with referback. This problem is not limited to ICETOOL but with any tool / 
program.

Alternatively, it would be interesting what ICETOOL statement you have, perhaps 
a more elegant solution is available for you.

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: list of cobol load modules and their cobol version

[Nick]

I can offer you a utility type program
It "reads" in a PDS/PDSE containing load modules/program objects and it uses 
the DESERV and IEWBIND API"s to list all csects in the objects and what 
compiler/product was used to build it.

This what your looking for? Shout if it is and I can mail you either source and 
or load offline.

Should be easy to wrap in a REXX.
again input is a loadlib 
output is written to a DD (FB80) in format 

first line for a program is LMODNAME datetime and userid amode rmode
Followed by one line for each csect it contains and it compiler product.

The utility program just contains an array of IBM product numbers - I dont 
cater for all!
it also contains a list of exclusion csects you dont want  reported on
see below

Example output.
 
MAXSTOR 160926160926ABNB529J  31ANY
MAXSTOR MAXSTOR 160926160926HL ASM V2 31 24
MYCODE  160302160302ABNB529Y  31ANY
MYCODE  160302160302C Z/OS   R2  MIN 24
MYCODE  TIEB160302160302C Z/OS   R2  MIN 24
MYCODE  EDCINPL 110318160302HL ASM V2MIN 24
NEILTIME170724170724ABNB529J  31ANY
NEILTIMENEILTIME170724170724HL ASM V2 31 24
NHM997D 170203170203ABNB529J  31ANY
NHM997D NHM997D 170203170203Ent Cobol V6 MIN 24
NHM997D DLM010  120514170203HL ASM V2MIN 24
NHM997D DLM010170203 .DLM010 MIN 24
NHM997DE170130170130ABNB529J  31ANY
NHM997DENHM997DE170130170130Ent Cobol V6 MIN 24
NICKTEST170504170504ABNB529N  31ANY
NICKTESTNICKTEST170504170504Ent Cobol V4 MIN 24
NICKTESTNICKTEST  170504ä.NICKTEST   MIN 24
NICKTSTA170504170504ABNB529N  31ANY
NICKTSTANICKTSTA170504170504Ent Cobol V4 MIN 24
NICKTSTANICKTSTA  170504ä.NICKTSTA   MIN 24
NICKTSTB170504170504ABNB529N  31ANY
NICKTSTBNICKTSTB170504170504Ent Cobol V4 MIN 24
NICKTSTBNICKTSTB  170504ä.NICKTSTB   MIN 24

Product codes and exclusion arrays

000468 PROD_MAX DCF'24' LUCKY FOR SOME   
000469 PROD_IDS DCCL28'360SAS037 FORTRAN   ' 1   
000470  DCCL28'40CB1 COBOL ' 2   
000471  DCCL28'566528408 HEWLH096  ' 3   
000472  DCCL28'566895801 COBOL II  ' 4   
000473  DCCL28'566896201 ASM H V2  ' 5   
000474  DCCL28'569623400 HL ASM V2 ' 6   
000475  DCCL28'5734-F02  FORTRAN   ' 7   
000476  DCCL28'5734-PL1  PL/I  ' 8   
000477  DCCL28'5734AS100 ASM H  V1.5   ' 9   
000478  DCCL28'5740CB103 OS/VS COBOL   ' 10  
000479  DCCL28'5741SC103 ASM F ' 11  
000480  DCCL28'5752SC104 IEWL  ' 12  
000481  DCCL28'5655G5300 ENT COBOL FOR Z/0S' 13  
000482  DCCL28'566895807 COBOL/370 ' 14  
000483  DCCL28'5648A2500 COBOL FOR OS/390  ' 15  
000484  DCCL28'5688040   C/370 COMPILER V1 ' 16  
000485  DCCL28'5688187   C/370 COMPILER V2 ' 17  
000486  DCCL28'5688216   SAA AD/CYCLE C/370' 18  
000487  DCCL28'5645001   C/C++ OS/390 R2   ' 19  
000488  DCCL28'5647A01   C/C++ OS/390 R4   ' 20  
000489  DCCL28'5694A01   C Z/OS   R2   ' 21  
000490  DCCL28'5655G5300 Ent Cobol V3  ' 22  
000491  DCCL28'5655S7100 Ent Cobol V4  ' 23  
000492  DCCL28'5655EC6   Ent Cobol V6  ' 24  
000493 EXCL_MAX DCF'4'   
000494 EXCL_LIS DCXL2'0003',CL3'CEE' 
000495  DCXL2'0003',CL3'IGZ' 
000496  DCXL2'0004',CL4'IEWB'
000497  DCXL2'0002',CL2'@@'  



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