Re: What programmer's fear (not IBM specific)

[Martin Packer]

If that's true in Another World I wonder what it'd take to make it true in 
THIS one.

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:   "Shmuel Metz (Seymour J.)" 
To: IBM-MAIN@listserv.ua.edu, 
Date:   07/05/2013 12:25 AM
Subject:Re: What programmer's fear (not IBM specific)
Sent by:IBM Mainframe Discussion List 



In
,
on 07/04/2013
   at 05:54 AM, Phil Smith  said:

>In an alternate universe, Rexx had the equivalent of CPAN created by
>the community, and we all use it instead...and are much happier.

In an alternate universe the standard REXX for CMS and TSO is OREXX
with full block structuring, ranges, regexen and some control
structures stolen from Icon and Perl.

-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 Atid/2
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








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

Re: Announcing PCRE 8.33 for native z/OS

[Ze'ev Atlas]

>Which Perl?
I am using v5.14.2

>7. I contemplated interfacing with Rexx, but I cannot come with
>specific well defined API that would agree with that language.

>The obvious way is to return, e.g., capture buffers, %+ and %- in REXX
>variables.

I will look into that when I get to it.  Thank you.

>I've written REXX-callable functions for CMS and TSO; I don't have a
>system to test on.

If and when you could, your help would be welcome

>written in, you guessed, Perl

>Will they work in 5.8.7? That's currently the last Perl for z/OS.

Sorry for that situation.  I heard that some people are working on bringing a 
later version and I think IBM should have done better, bt that's not in my 
hands.  I use Windows 7 machine with ActiveState Perl.

ZA

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

Re: Question on how to debug S0C7 (data exception) abend

[zMan]

Ah. So it was really a comment on topic drift--I'm with ya there!


On Thu, Jul 4, 2013 at 5:54 PM, Ted MacNEIL  wrote:

> I don't like the Friday digressions!
>
>
> Sheesh. Insensitive Americans...
>
> -
> Ted MacNEIL
> eamacn...@yahoo.ca
> Twitter: @TedMacNEIL
>
> -Original Message-
> From: zMan 
> Sender:   IBM Mainframe Discussion List 
> Date: Thu, 4 Jul 2013 16:30:43
> To: 
> Reply-To: IBM Mainframe Discussion List 
> Subject: Re: Question on how to debug S0C7 (data exception) abend
>
> Ted, that would be locality of reference. I suppose you'd complain if
> someone in Australia said "It's Friday", because many on the list aren't
> Australian?
>
> Sheesh. Over-sensitive Canadians...
>
>
> On Thu, Jul 4, 2013 at 3:57 PM, Ted MacNEIL  wrote:
>
> > >It's a bona fide US holiday, which trumps even Friday.
> >
> > I disagree. Many on the list are not Americans.
> > You didn't hear any of we Canadians trumpeting our holiday on July 1st.
> > -
> > Ted MacNEIL
> > eamacn...@yahoo.ca
> > Twitter: @TedMacNEIL
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
>
>
> --
> zMan -- "I've got a mainframe and I'm not afraid to use it"
>
> --
> 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
>



-- 
zMan -- "I've got a mainframe and I'm not afraid to use it"

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

Re: I am getting a wait state during IPL

[Gerhard Postpischil]

On 7/4/2013 2:07 PM, Shmuel Metz (Seymour J.) wrote:

When did you start considering typos to be benign?


Probably when it is obviously a typo. Now on the other hand, if someone 
mentions 32-bit addressing in relation to MVS/XA, the statement is 
ambiguous.


Gerhard Postpischil
Bradford, Vermont

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

Re: What programmer's fear (not IBM specific)

[Shmuel Metz (Seymour J.)]

In
,
on 07/04/2013
   at 05:54 AM, Phil Smith  said:

>In an alternate universe, Rexx had the equivalent of CPAN created by
>the community, and we all use it instead...and are much happier.

In an alternate universe the standard REXX for CMS and TSO is OREXX
with full block structuring, ranges, regexen and some control
structures stolen from Icon and Perl.

-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 Atid/2
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: I am getting a wait state during IPL

[Shmuel Metz (Seymour J.)]

In
,
on 07/04/2013
   at 07:20 AM, John Gilmore  said:

>Nor is there is any 65-bit support 'in' z/OS.  I suspect that what 
>we have here is not a dubious, heterodox hardware notion but 
>something much more benign, a typo.

When did you start considering typos to be benign?

-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 Atid/2
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: Announcing PCRE 8.33 for native z/OS

[Shmuel Metz (Seymour J.)]

In <2097080765646466.wa.zatlas1yahoo@listserv.ua.edu>, on
07/03/2013
   at 08:36 PM, "Ze'ev Atlas"  said:

>compatible with Perl

Which Perl?

>7. I contemplated interfacing with Rexx, but I cannot come with
>specific well defined API that would agree with that language.

The obvious way is to return, e.g., capture buffers, %+ and %- in REXX
variables.

>And, in the end of the day, while I could read IBM manuals, I do 
>not have the expertise to interface with that language.  If 
>anybody wants to help, this is where help is needed.

I've written REXX-callable functions for CMS and TSO; I don't have a
system to test on.

>written in, you guessed, Perl

Will they work in 5.8.7? That's currently the last Perl for z/OS.
 
-- 
 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: Announcing PCRE 8.33 for native z/OS

[Frank Swarbrick]

I was talking about SCEELKED at run time, no compile time.  It's (or SCEELKEX 
for lower-case entry points) definitely required at compile time for static 
calls, and that works.  But when I tried dynamic calls, even with SCEERUN in 
the linklist, it said it couldn't find the REG* modules.




>
> From: "Farley, Peter x23353" 
>To: IBM-MAIN@LISTSERV.UA.EDU 
>Sent: Wednesday, July 3, 2013 10:09 PM
>Subject: Re: Announcing PCRE 8.33 for native z/OS
> 
>
>Sorry, application programmers here are not allowed ANY operator functions 
>(including "/D").
>
>And I realized after I wrote my prior reply that SCEELKED was required in your 
>case because you used NODYNAM, thus needing static bind-time merging of the 
>modules from SCEELKED.  I didn't need it because apparently DYNAM generates 
>the correct call to the SCEERUN* library(ies) at runtime or to the in-core C 
>runtime modules under the LE covers.  Or maybe our automated compile scripts 
>already included SCEELKED.  I have to check on that, just in case I am wrong.  
> If they do automatically include SCEEKLED I'll report back.
>
>In any case, thanks once again for the terrific POC (proof of concept) code.
>
>Peter
>
>-Original Message-
>From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
>Behalf Of Frank Swarbrick
>Sent: Wednesday, July 03, 2013 6:41 PM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Re: Announcing PCRE 8.33 for native z/OS
>
>Hmm, perhaps underscores did come with COBOL 4.2.  I don't recall.
>
>Can you do "/D PROG,LNKLST" in SDSF?  That will get you the active linklist.  
>The only CEE libraries we have there are CEE.SCEERUN and CEE.SCEERUN2.  I 
>though that CEE.SCEELKED was a link/bind-time library only, but I could be 
>wrong!
>
>(What possible harm could it be for an applications programmer to look at the 
>system PARMLIBs...)
>
>Not sure why my use of CP1140 didn't work.  Maybe I'll fool around with it 
>later.
>
>
>Frank
>
>>
>> From: "Farley, Peter x23353" 
>>To: IBM-MAIN@LISTSERV.UA.EDU 
>>Sent: Wednesday, July 3, 2013 4:20 PM
>>Subject: Re: Announcing PCRE 8.33 for native z/OS
>> 
>>
>>Yes, it did execute just fine in batch from JCL with DYNAM, and our default 
>>COBOL code page is 1140 as well, and it still worked fine.  However, I did 
>>not need to add SCEELKED to the STEPLIB so our systems folk probably have it 
>>in the linklist.  No way for me to confirm that though, PARMLIB here is 
>>security protected against reads by ordinary people.
>>
>>Thanks for the note about using "value" for the length parameter to 
>>"regerror", I'll change that in my test program.
>>
>>We are running Enterprise COBOL 4.1 here, and I cannot seem to get it to 
>>accept underscores.  Maybe that was added via PTF or APAR and we don't have 
>>it applied?  Or maybe that was only introduced in 4.2?  I'll have to go look 
>>that up in the FM's later.
>>
>>Have a happy and safe Independence Day.
>>
>>Peter
>>
>>-Original Message-
>>From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
>>Behalf Of Frank Swarbrick
>>Sent: Wednesday, July 03, 2013 4:55 PM
>>To: IBM-MAIN@LISTSERV.UA.EDU
>>Subject: Re: Announcing PCRE 8.33 for native z/OS
>>
>>1) Did you actually get it to work (execute) with DYNAM?  That is our shop 
>>standard as well, but when I try it I get a "program not found" error (S806), 
>>or if I add CEE.SCEELKED to the JOBLIB I get an S0C1(?!?!).  Also, do you use 
>>codepage 1047 by default?  I didn't expect it to work with codepage 1140 (our 
>>default) and it in fact did not work.  (No errors given, but no matches 
>>either.
>>2) Underscores are allowed in COBOL data names as of COBOL 4, I believe.
>>3) Oops!  Forgot to code that.  You need to pass the length by value, though. 
>> I used "...value length of msgbuf", but you can use your "...value lmsgbuf' 
>>if you want.
>>4) I won't ask.  :-)
>>
>>Frank
>>
>>
>>
>>
>>>
>>> From: "Farley, Peter x23353" 
>>>To: IBM-MAIN@LISTSERV.UA.EDU 
>>>Sent: Wednesday, July 3, 2013 1:20 PM
>>>Subject: Re: Announcing PCRE 8.33 for native z/OS
>>> 
>>>
>>>Frank,
>>>
>>>First let me say: "Very cool, man!"  I was inspired by your 30 minutes to 
>>>take a few of my own to see if I could duplicate your experiment in our 
>>>somewhat more staid (i.e., no PDSE's for application COBOL load modules) 
>>>environment, and sure enough I can.  I had to make a couple of small changes 
>>>to your code to accomplish my test:
>>>
>>>1.    Remove PROCESS cards and default to shop-standard PGMNAME(COMPAT) and 
>>>DYNAM
>>>2.    Change underscores to hyphens in the data names
>>>3.    Add "using" and "returning" parameters to the "regerror" call, which I 
>>>guess never caused you a problem due to no errors happening at execution time
>>>4.    Use double-quotes instead of apostrophes around the called program 
>>>names due to an internal application standard requirement (don't ask, 

Re: Question on how to debug S0C7 (data exception) abend

[Ted MacNEIL]

I don't like the Friday digressions!


Sheesh. Insensitive Americans...

-
Ted MacNEIL
eamacn...@yahoo.ca
Twitter: @TedMacNEIL

-Original Message-
From: zMan 
Sender:   IBM Mainframe Discussion List 
Date: Thu, 4 Jul 2013 16:30:43 
To: 
Reply-To: IBM Mainframe Discussion List 
Subject: Re: Question on how to debug S0C7 (data exception) abend

Ted, that would be locality of reference. I suppose you'd complain if
someone in Australia said "It's Friday", because many on the list aren't
Australian?

Sheesh. Over-sensitive Canadians...


On Thu, Jul 4, 2013 at 3:57 PM, Ted MacNEIL  wrote:

> >It's a bona fide US holiday, which trumps even Friday.
>
> I disagree. Many on the list are not Americans.
> You didn't hear any of we Canadians trumpeting our holiday on July 1st.
> -
> Ted MacNEIL
> eamacn...@yahoo.ca
> Twitter: @TedMacNEIL
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
zMan -- "I've got a mainframe and I'm not afraid to use it"

--
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: Announcing PCRE 8.33 for native z/OS

[Farley, Peter x23353]

Ze'ev,

I would if I could.  I used our shop-standard SCLM system to store and compile 
the test program, and most of that translate process is driven by a complex 
series of Rexx exec's, not JCL.

I do have some compile-and-link-outside-the-SCLM JCL though, so when I get a 
chance I will retest the program with just plain JCL and share my results.

Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Ze'ev Atlas
Sent: Thursday, July 04, 2013 4:09 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Announcing PCRE 8.33 for native z/OS

Frank and Peter
Would you be so kind to share the JCL needed to compile it in any flavor please.

I do not mind whether somebody use PCRE or opting to use the Posix compliant 
IBM supplied modules, both are fine for any simple (or even semi-complex) regex 
(if you know what to expect from Posix vs. Perl compliance.)  I'd like people 
to familirize ith the concept and use it.
ZA

--


This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.


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

Re: Announcing PCRE 8.33 for native z/OS

[Farley, Peter x23353]

[Replying again from my work account since my Google Groups reply did not make 
it to the list - I forgot that is a one-way gateway]

Based on a brief review, this text of the pcre man pages says yes to all of 
those: 

http://www.pcre.org/pcre.txt 

Though not, of course, the Perl-only pattern features that interpret Perl code 
dynamically. 

Peter 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Shmuel Metz (Seymour J.)
Sent: Wednesday, July 03, 2013 10:37 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Announcing PCRE 8.33 for native z/OS

In <7859492443392344.wa.zatlas1yahoo@listserv.ua.edu>, on
07/03/2013
   at 05:58 PM, "Ze'ev Atlas"  said:

>In any case, PCRE is mature and working library with most all (even
>esoteric) options.

Branch reset? Conditional patterns? Named backreferences? Recursive
patterns?
 
-- 

This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.

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

Re: PDSE Issue

[Robert Hahne]

There is a share presentation out there for PDSE best practices 

https://www.google.co.in/url?sa=t&rct=j&q=&esrc=s&source=web&cd=5&cad=rja&ved=0CD8QFjAE&url=https%3A%2F%2Fshare.confex.com%2Fshare%2F120%2Fwebprogram%2FHandout%2FSession12981%2FSHARE%2520PDSE%2520Best%2520Practices.pdf&ei=YtzVUc2_N4jGrAfU6IDYBw&usg=AFQjCNGf3snjN_m-Xaa9kgTeyhwp048rxw&bvm=bv.48705608,d.bmk

Regards,
Bob




> Date: Wed, 3 Jul 2013 07:18:59 +0200
> From: nitz-...@gmx.net
> Subject: Re: PDSE Issue
> To: IBM-MAIN@LISTSERV.UA.EDU
> 
> Matt,
> 
> > V SMS,PDSE,ANALYSIS
> > IGW031I PDSE ANALYSIS  Start of Report(SMSPDSE ) 879
> > ++ Unable to latch ASRBULCH:7FF94DC0
> >Latch:7FF94DD8 Holder(006A:00AFF208)
> >Holding Started Task:TECHCICS
> > -data set name-- -vsgt---
> > SYSVIEW.R137.CNM4BLOD.SYS1   01-SYS002-000614
> > ++ Unable to latch HL1b:7FF67600
> >Latch:7FF67610 Holder(006A:00AFF208) IGWLHPRG
> >Holding Started Task:TECHCICS
> 
> Good old ASRBULCH latch. First of all, make sure you have all the required 
> maintenance for PDSE on (there are several apars involving ASRBULCH out 
> there, and this appears to be an ongoing bug that IBM seems unable to fix). 
> 
> > VARY SMS,PDSE1,FREELATCH(7FF67610,006A,00AFF208),RETRIES(5)
> > IGW032I PDSE FREELATCH  Start of Report 889
> > ++ Free latch failed latch:7FF94DD8 is either broken or not a latch
> > PDSE FREELATCH  End of Report
> 
> In my case (we had it twice) it was not obvious which latch to free (there 
> were tons of ASRBULCH ones). So I went through all of them and eventually 
> found the one that was left and had caused everyone else to back up. In that 
> process, I also generated some PDSE abends complaining about freed latches. 
> 
> By the way, even forcing the address spaces will not clear the contention!
> 
> Admittedly, I have never seen the response of 'either broken or not a latch'. 
> That sounds like something went ahead and freed the storage where the latch 
> is situated.
> 
> I have heard from our customers (who were also affected for a library that is 
> NOT in linklist) that restarting SMSPDSE1 did not free the latches. The 
> customers affected by it were also able (with trial and error) to use 
> freelatch.
> 
> If that library SYSVIEW.R137.CNM4BLOD.SYS1 is not a load library (or anthing 
> else that *requires* it to be a PDSE) then I suggest to make it a PDS to 
> avoid hitting PDSE code.
> 
> If you have the appropriate contract with IBM, when this hits next, then take 
> a dump of the address spaces involved in the latch contention and SMSPDSE/1 
> and report the bug to IBM.
> 
> Regards, Barbara Nitz
> 
> --
> 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: Question on how to debug S0C7 (data exception) abend

[zMan]

Ted, that would be locality of reference. I suppose you'd complain if
someone in Australia said "It's Friday", because many on the list aren't
Australian?

Sheesh. Over-sensitive Canadians...


On Thu, Jul 4, 2013 at 3:57 PM, Ted MacNEIL  wrote:

> >It's a bona fide US holiday, which trumps even Friday.
>
> I disagree. Many on the list are not Americans.
> You didn't hear any of we Canadians trumpeting our holiday on July 1st.
> -
> Ted MacNEIL
> eamacn...@yahoo.ca
> Twitter: @TedMacNEIL
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
zMan -- "I've got a mainframe and I'm not afraid to use it"

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

Re: Announcing PCRE 8.33 for native z/OS

[Ze'ev Atlas]

As far as I can tell virtually all that is supported by Perl is supported by 
PCRE, including all what Shmuel had mentioned.
ZA

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

Re: Announcing PCRE 8.33 for native z/OS

[Ze'ev Atlas]

Frank and Peter
Would you be so kind to share the JCL needed to compile it in any flavor please.

I do not mind whether somebody use PCRE or opting to use the Posix compliant 
IBM supplied modules, both are fine for any simple (or even semi-complex) regex 
(if you know what to expect from Posix vs. Perl compliance.)  I'd like people 
to familirize ith the concept and use it.
ZA

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

Re: Question on how to debug S0C7 (data exception) abend

[Ted MacNEIL]

>It's a bona fide US holiday, which trumps even Friday.

I disagree. Many on the list are not Americans.
You didn't hear any of we Canadians trumpeting our holiday on July 1st.
-
Ted MacNEIL
eamacn...@yahoo.ca
Twitter: @TedMacNEIL

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

Re: What programmer's fear (not IBM specific)

[Rich Greenberg]

In article <20130704194045.f3e3824...@panix5.panix.com> you write:
>In article
> you
>write:
>
>>In an alternate universe, Rexx had the equivalent of CPAN created by the
>>community, and we all use it instead...and are much happier.
>
>Hi Phil,
>I have been following this thread wondering if someone would mention
>Rexx.  My favorite language.  Thanks.

My apologies to the group.  The above was intended to be a private email
to phil, but I sed it up.

-- 
Rich Greenberg  Sarasota, FL, USA richgr atsign panix.com  + 1 941 378 2097
Eastern time.  N6LRT  I speak for myself & my dogs only.VM'er since CP-67
Canines: Val,Red,Shasta,Zero,Casey & Cinnar (At the bridge)   Owner:Chinook-L
Canines: Red & Max (Siberians) Retired at the beach  Asst Owner:Sibernet-L

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

Re: What programmer's fear (not IBM specific)

[Rich Greenberg]

In article  
you write:

>In an alternate universe, Rexx had the equivalent of CPAN created by the
>community, and we all use it instead...and are much happier.

Hi Phil,
I have been following this thread wondering if someone would mention
Rexx.  My favorite language.  Thanks.

-- 
Rich Greenberg  Sarasota, FL, USA richgr atsign panix.com  + 1 941 378 2097
Eastern time.  N6LRT  I speak for myself & my dogs only.VM'er since CP-67
Canines: Val,Red,Shasta,Zero,Casey & Cinnar (At the bridge)   Owner:Chinook-L
Canines: Red & Max (Siberians) Retired at the beach  Asst Owner:Sibernet-L

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

Re: Future of COBOL based on RDz policies was Re: RDz or RDzEnterprise developers

[Clark Morris]

On 21 Jun 2013 11:26:53 -0700, in bit.listserv.ibm-main you wrote:

>On Fri, 2013-06-21 at 15:18 -0300, Clark Morris wrote:
>> And IBM thinks COBOL is the language of the future.  Right and I sell
>> bridges.
>
>Well... that's what Tom Ross says anyway.  You'd dispute Tom?


I realize that this is belated but yes I would vigorously dispute him.
Mike Cowlishaw of Rexx renown worked diligently on defining decimal
floating point and the standard for it.  The z series has had decimal
floating point for a number of years.  It has been supported in PL1,
C/C++ and Java.  To date it has NOT been implemented in COBOL despite
the claim for Java interoperability and the fact that decimal floating
point natively supports 6 types of rounding.  Java uses IEEE floating
point and instead of adding the IEEE floating point types to COBOL as
DEFINED in the 2002 standard and leaving the COMP-1 and COMP-2 type
for hex floating point thus keeping upward compatibility, there is a
conversion to or from hex floating point when dealing with Java. USAGE
BIT and logical operations which are in the 2002 standard have not
been implemented.  There are OO classes for CICS in C/C++ and PL1. Are
there any for COBOL?  COBOL as defined in the 2002 standard can handle
the SMF 14 and 30 records without going through contortions to handle
the bit switches.  COBOL 2002 finally has EXIT PERFORM and EXIT
PARAGRAPH.  Granted that a sales job would be needed to explain why
management should care about the improvements made available in that
standard but if it were the language of the future, it would be worth
the expenditure.

On the other hand, given many of the tales told here and probably the
stories told about all of the features in the 1985 standard that have
remained unused in many or most shops, IBM could well question whether
it would be worth the effort.  If the long term is movement to
packages that are implemented in other languages anyway, improvement
is money wasted.  I believe that a lot less work is being done by
COBOL programs than was done ten or fifteen years ago.  Every SAP
installation reduces the workload on COBOL by that much more.  On
other platforms the native COBOL file systems (there is no equivalent
of VSAM for example) don't exist and the run-time costs can be high.
From my following of comp.lang.cobol and what I see in the market
place, COBOL is in its final years.

Clark Morris  

   

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

Re: What programmer's fear (not IBM specific)

[Scott Ford]

Working most of these..RPG was a bit of challenge ..easytrieve wasn't too , but 
I have In SAS..now MarkIV, haven't heard of that one. I also learned Assembler, 
Cobol and the PL/1 ...like several of the guys I liked PL/1 ...

Scott ford
www.identityforge.com
from my IPAD

'Infinite wisdom through infinite means'


On Jul 4, 2013, at 1:28 PM, Tony Babonas  wrote:

> Wow!  Never heard of the language but I'm envious.
> 
> On 7/4/2013 5:59 AM, Wayne Bickerdike wrote:
>> Mark IV had a ruler too...
>> 
>> On Thu, Jul 4, 2013 at 1:19 PM, Anthony Babonas  
>> wrote:
>>> Rising to the defense of RPG, what other language had its own ruler? Talk 
>>> about ease of coding! Ah the nostalgia.sigh.
>>> 
>>> Sent from Tony's iPhone.
>>> 
>>> On Jul 3, 2013, at 9:50 PM, John McKown  
>>> wrote:
>>> 
 I've not run across many languages that I considered "ugly". RPG II was
 one. EasyTrieve Plus is not "ugly", but I don't much like it. The newest
 IBM COBOL is rather nice, albeit still wordy. The first COBOL that I
 learned: ANSI COBOL back in the 1970s made me puke, after learning PL/I of
 the same era.
 
 The main thing that I hate is a manager saying "use xyz, but refrain from
 using the new omega facilities". The reason being that everybody in the
 shop knows the basic xyz language, but is not familiar with the omega
 features. So I am chained down to the least common denominator for "ease of
 understanding" by those who simply won't learn new stuff. Case in point in
 my current shop, at least in the past, was not using any z/OS UNIX
 facilities because they were "just too esoteric and complicated".
 
 
 On Wed, Jul 3, 2013 at 8:59 PM, Shmuel Metz (Seymour J.) <
 shmuel+ibm-m...@patriot.net> wrote:
 
> In
> ,
> on 07/03/2013
>   at 07:10 AM, John McKown  said:
> 
> http://www.itworld.com/it-management/363424/only-thing-programmers-have-fear-all-these-things
> 
>> I say "yes" to most. #4 is being forced to learn or use some specific
>> technology
> 
> What if you consider a language to be ugly but also consider it to be
> the best tool for the job? I don't care for Perl syntax, but between
> the expressive power of the language and the modules available in
> CPAN, I find myself using it regardless. That's not a boss telling me
> that I have to - it's my own decision.
> 
> --
> 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
 
 
 
 --
 This is a test of the Emergency Broadcast System. If this had been an
 actual emergency, do you really think we'd stick around to tell you?
 
 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
>> 
>> 
>> 
> 
> --
> 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: Question on how to debug S0C7 (data exception) abend

[Gerhard Postpischil]

On 7/4/2013 1:43 PM, Skip Robinson wrote:

Definite article 'der' changes adjective from marked masculine 'alter' to
'alte'. As opposed to indefinite article as in 'ein alter Mann'.


That's why I put the definite articles in parenthesis. In Kirk's 
original post, he used the indefinite article, which would have 
translated as Ein alter Kacker.



Gerhard Postpischil
Bradford, Vermont

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

Re: Question on how to debug S0C7 (data exception) abend

[Skip Robinson]

It's a bona fide US holiday, which trumps even Friday. I should not take 
on someone with a bona fide Germanic name, but German happens to be the 
closest thing I have to a (distant) second language. 

"(Der) alter Kacker is the masculine singular."

Definite article 'der' changes adjective from marked masculine 'alter' to 
'alte'. As opposed to indefinite article as in 'ein alter Mann'. 

If you're old enough to remember the venerable statesman Konrad Adenauer, 
he was referred to 'Der Alte', 

.
.
JO.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
626-302-7535 Office
323-715-0595 Mobile
jo.skip.robin...@sce.com



From:   Gerhard Postpischil 
To: IBM-MAIN@LISTSERV.UA.EDU, 
Date:   07/03/2013 11:44 PM
Subject:Re: Question on how to debug S0C7 (data exception) abend
Sent by:IBM Mainframe Discussion List 



> On 7/3/2013 12:11 PM, Kirk Talman wrote:
> As a certified alte kacker, I would like to comment on what this tells 
us
> about the state of mainframe IT.

Somewhat off topic, but if that was supposed to be German, it's wrong. I 
only have a rudimentary knowledge of Yiddish, but I believe it's wrong 
there, too.

(Die) alte Kacker is the valid masculine plural.
(Der) alter Kacker is the masculine singular.
(Die) alte Kackerin is the feminine singular.

I assume you meant the second form, unless you are suffering from 
multiple personality disorder 

Gerhard Postpischil
Bradford, Vermont



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

Re: What programmer's fear (not IBM specific)

[Tony Babonas]

Wow!  Never heard of the language but I'm envious.

On 7/4/2013 5:59 AM, Wayne Bickerdike wrote:

Mark IV had a ruler too...

On Thu, Jul 4, 2013 at 1:19 PM, Anthony Babonas  wrote:

Rising to the defense of RPG, what other language had its own ruler? Talk about 
ease of coding! Ah the nostalgia.sigh.

Sent from Tony's iPhone.

On Jul 3, 2013, at 9:50 PM, John McKown  wrote:


I've not run across many languages that I considered "ugly". RPG II was
one. EasyTrieve Plus is not "ugly", but I don't much like it. The newest
IBM COBOL is rather nice, albeit still wordy. The first COBOL that I
learned: ANSI COBOL back in the 1970s made me puke, after learning PL/I of
the same era.

The main thing that I hate is a manager saying "use xyz, but refrain from
using the new omega facilities". The reason being that everybody in the
shop knows the basic xyz language, but is not familiar with the omega
features. So I am chained down to the least common denominator for "ease of
understanding" by those who simply won't learn new stuff. Case in point in
my current shop, at least in the past, was not using any z/OS UNIX
facilities because they were "just too esoteric and complicated".


On Wed, Jul 3, 2013 at 8:59 PM, Shmuel Metz (Seymour J.) <
shmuel+ibm-m...@patriot.net> wrote:


In
,
on 07/03/2013
   at 07:10 AM, John McKown  said:

http://www.itworld.com/it-management/363424/only-thing-programmers-have-fear-all-these-things


I say "yes" to most. #4 is being forced to learn or use some specific
technology


What if you consider a language to be ugly but also consider it to be
the best tool for the job? I don't care for Perl syntax, but between
the expressive power of the language and the modules available in
CPAN, I find myself using it regardless. That's not a boss telling me
that I have to - it's my own decision.

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




--
This is a test of the Emergency Broadcast System. If this had been an
actual emergency, do you really think we'd stick around to tell you?

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






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

Re: Question on how to debug S0C7 (data exception) abend

[Bernd Oppolzer]

If you have an LE Dump (CEEDUMP, CEESNAP),
it's still easier, because LE gives you the traceback of the function
or procedure calls, where you find all the information including
the offsets I mentioned in my previous post, and you don't even
need to do any calculations. If you compiled your programs
using the GONUMBER options (which makes them larger,
but not - much - slower), the LE Dump will even tell you
the source line numbers at every call level.

Again: ask for classes in German (or English) covering all those subjects;
I do classes customized esspecially to the needs of your installation.

Kind regards

Bernd



Am 04.07.2013 17:28, schrieb John Gilmore:

Bernd has summarized this situation more than adequately.

Norma Mowry did not provide us with full information about the COBOL
compiler that produced the offending program, but if it is a fairly
recent Enterprise COBOL compiler it would, given the right compiler
options, almost certainly be possible to shoot this 0c7 at the
source-program level.

That said, it is clear that the applications staff here lacks some
skills it should have.  If COBOL is itsr development language, there
must be someone who can read LE dumps available.  Not all system
ABENDs are so easy to deal with as 0c7's.

Let me also note that another implicit assumption has figured in these
discussions.  If the ABEND occurred in SYNCHSORT code, it would almost
certainly have provided diagnostic information that was identifiable
as such.  It is still possible, albeit very unlikely,  that the error
is in the record/sort-field description provided to SYNCHSORT; and
that description should be checked.

John Gilmore, Ashland, MA 01721 - USA

--
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: Question on how to debug S0C7 (data exception) abend

[Elardus Engelbrecht]

Richard Pinion wrote:

>B37s.

222 is easier to handle ;-D

Ok, perhaps 322, 722, 822 or 878 are also easy. 622 is somewhat difficult to 
explain to an angry TSO user, but manageable.

My users don't like 722 for obvious reasons. I wonder why, oh, why? ;-D

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

Orphaned ICF catalog in the VVDS

[Rouse, Willie]

I have run an IDCAMS diagnose on a volume to find non-existent catalog entries .
I tried  DELETE VVR/NVR/TRUENAME to no avail. How can I get rid of the stranded 
catalog references in the VVDS?

Respectfully,
Willie C. Rouse
Senior Mainframe Consultant
Prince George's County, Maryland
Office of Information Technology
9201 Basil Court/ Room B8
Largo, MD 20774
Voice: 301-883-7189
Fax: 301-883-3790





This E-mail and any of its attachments may contain Prince George’s
County Government or Prince George's County 7th Judicial Circuit
Court proprietary information or Protected Health Information,
which is privileged and confidential.  This E-mail is intended
solely for the use of the individual or entity to which it is
addressed.  If you are not the intended recipient of this E-mail,
you are hereby notified that any dissemination, distribution,
copying, or action taken in relation to the contents of and
attachments to this E-mail is strictly prohibited by federal law
and may expose you to civil and/or criminal penalties. If you have
received this E-mail in error, please notify the sender immediately
and permanently delete the original and any copy of this E-mail and
any printout.

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

Re: Question on how to debug S0C7 (data exception) abend

[Steve Comstock]

On 7/4/2013 9:21 AM, Bernd Oppolzer wrote:

Ok. In this case you need no dump analysis;
the error message is sufficient (as is the case with
many system errors, for example S806 - system cannot
find module XYZ ...).

One of the first statements in my dump analysis handout:
we normally only cover S0Cx errors - for most other errors
we don't need no dump analysis. Simply look into
"MVS System Codes".

Kind regards

Bernd


Right. In our courses we take a similar approach:

1. Debug at the highest level possible
   (messages, codes, application outputs, source code, dump)

2. Always assume the error is in software (not hardware)
   unless definite proof to the contrary exists

3. Always assume the error is in your software (you are
   not likely to debug system errors), unless proof to
   the contrary exists

4. Use only the relevant information (keep it simple.
   Watch out for 'rapture of the dump'.)

Still, for 1) above, one mustn't be afraid of diving
into a dump if it's called for.


--

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-355-2752
http://www.trainersfriend.com

* To get a good Return on your Investment, first make an investment!
  + Training your people is an excellent investment

* Try our tool for calculating your Return On Investment
for training dollars at
  http://www.trainersfriend.com/ROI/roi.html




Am 04.07.2013 17:03, schrieb Richard Pinion:

B37s.



--- bernd.oppol...@t-online.de wrote:

From: Bernd Oppolzer 
To:   IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Question on how to debug S0C7 (data exception) abend
Date: Thu, 4 Jul 2013 17:01:29 +0200

S0C7 is the most simple cause of abend I can imagine.



--
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: Question on how to debug S0C7 (data exception) abend

[John Gilmore]

Bernd has summarized this situation more than adequately.

Norma Mowry did not provide us with full information about the COBOL
compiler that produced the offending program, but if it is a fairly
recent Enterprise COBOL compiler it would, given the right compiler
options, almost certainly be possible to shoot this 0c7 at the
source-program level.

That said, it is clear that the applications staff here lacks some
skills it should have.  If COBOL is itsr development language, there
must be someone who can read LE dumps available.  Not all system
ABENDs are so easy to deal with as 0c7's.

Let me also note that another implicit assumption has figured in these
discussions.  If the ABEND occurred in SYNCHSORT code, it would almost
certainly have provided diagnostic information that was identifiable
as such.  It is still possible, albeit very unlikely,  that the error
is in the record/sort-field description provided to SYNCHSORT; and
that description should be checked.

John Gilmore, Ashland, MA 01721 - USA

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

Re: Question on how to debug S0C7 (data exception) abend

[Bernd Oppolzer]

Ok. In this case you need no dump analysis;
the error message is sufficient (as is the case with
many system errors, for example S806 - system cannot
find module XYZ ...).

One of the first statements in my dump analysis handout:
we normally only cover S0Cx errors - for most other errors
we don't need no dump analysis. Simply look into
"MVS System Codes".

Kind regards

Bernd



Am 04.07.2013 17:03, schrieb Richard Pinion:

B37s.



--- bernd.oppol...@t-online.de wrote:

From: Bernd Oppolzer 
To:   IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Question on how to debug S0C7 (data exception) abend
Date: Thu, 4 Jul 2013 17:01:29 +0200

S0C7 is the most simple cause of abend I can imagine.



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

Re: Question on how to debug S0C7 (data exception) abend

[Richard Pinion]

B37s.



--- bernd.oppol...@t-online.de wrote:

From: Bernd Oppolzer 
To:   IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Question on how to debug S0C7 (data exception) abend
Date: Thu, 4 Jul 2013 17:01:29 +0200

S0C7 is the most simple cause of abend I can imagine.

The only problem is to find the position in the program (that is: the 
source line)
where the error occured. If you have this, you know the name of the 
variable causing
the error, and the rest is a piece of cake.

To get this, you need no tool.

Simply look at reg 13 at the time of abend. This is the address of the 
current
save area. The word 2 after the word at which reg 13 points to contains the
address of the higher save area. There at position 16 (word 5) you find the
address of the entry of the current procedure or function (which should be
a little lower than the content of the current PSW at the time of error).

Subtracting this from the PSW, you get the error offset - related to the 
beginning
of the procedure or function. And, by looking at the PPA1 control block 
(which
you can find by adding the content of EPA + 12 to the EPA address), you 
will get
the name of the procedure (at PPA1 + X'38'), at least this is true for the
current PL/1 and C compilers (maybe COBOL, too).

Then you have the function name and the offset; now it's time to look at
the compile listing. Of course you have it at hand, because it's 
production run,
so the compile listing must have been archived during the deployment of the
program.

If you need classes for your mainframe developers to do dump analysis
in Germany, Austria or Switzerland (or other countries), please contact 
me offline.

Kind regards

Bernd




Am 03.07.2013 20:11, schrieb Kirk Talman:
> There have been several various good answers to this problem.
>
> As a certified alte kacker, I would like to comment on what this tells us
> about the state of mainframe IT.
>
> - Apparently one can be in "Operating Systems Support" w/o having been an
> application programmer.  One of the advantages many of us older persons on
> this list and in the industry have is that we have "seen it before".  The
> idea that a person working in any technical job on a mainframe would not
> know what a S0C7 is and how to go after it is amazing to me.  At one time
> there were machines w/o packed arithmetic, but now, apparently, training
> in system administration functions is considered adequate.  Who on this
> list learned the majority of what they know via instruction?  Most people
> learned most things by doing.  The work we do is a craft, part art, part
> science.
>
> - The idea in this day and age of not having a tool to give diagnostic
> information when an abend occurs may indicate a lack of understanding by
> management, but is still amazing.  IBMs Fault Analuzer is not, I think,
> expensive but is quite adequate to the task even in complex
> CICS/DB2/IMS/MQ environments.  If I were told there were less expensive
> products available, I would not be surprised.
>
> - On the other hand, I recently had to modify a program older than the
> company.  In code and macros I saw names of persons now high level
> managers.  The code had a S0C7 recovery section that was miscoded because
> invalid assumptions were made about the effect of ignoring records causing
> the abend.  And the people who "own' the code were reluctant to fix the
> root cause even when the fix was spelled out for them.  They finally did
> so only when embarrassed publicly.
>
> - The best education comes while acquiring scars and observing same in
> ones peers.
>
> IBM Mainframe Discussion List  wrote on
> 07/03/2013 07:10:18 AM:
>
>> From: "Mowry, Norma E CIV DISA ESB (US)" 
>> To: IBM-MAIN@LISTSERV.UA.EDU,
>> Date: 07/03/2013 07:11 AM
>> Subject: Question on how to debug S0C7 (data exception) abend
>> Sent by: IBM Mainframe Discussion List 
>>
>> We have a production job that is abending with S0C7 reason 0007.
>> I set a slip to capture a dump but I can't seem to find the input
>> record that is causing the S0C7 in this dump.  I also have a CEEDUMP
>> but that's not real helpful in diagnosing the issue.  I looked a
>> setting a slip with a trace but don't think that will do any good to
>> get to the problem record.
>>
>> Norma Mowry
>

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




_
Netscape.  Just the Net You Need.

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

Re: Question on how to debug S0C7 (data exception) abend

[Bernd Oppolzer]

S0C7 is the most simple cause of abend I can imagine.

The only problem is to find the position in the program (that is: the 
source line)
where the error occured. If you have this, you know the name of the 
variable causing

the error, and the rest is a piece of cake.

To get this, you need no tool.

Simply look at reg 13 at the time of abend. This is the address of the 
current

save area. The word 2 after the word at which reg 13 points to contains the
address of the higher save area. There at position 16 (word 5) you find the
address of the entry of the current procedure or function (which should be
a little lower than the content of the current PSW at the time of error).

Subtracting this from the PSW, you get the error offset - related to the 
beginning
of the procedure or function. And, by looking at the PPA1 control block 
(which
you can find by adding the content of EPA + 12 to the EPA address), you 
will get

the name of the procedure (at PPA1 + X'38'), at least this is true for the
current PL/1 and C compilers (maybe COBOL, too).

Then you have the function name and the offset; now it's time to look at
the compile listing. Of course you have it at hand, because it's 
production run,

so the compile listing must have been archived during the deployment of the
program.

If you need classes for your mainframe developers to do dump analysis
in Germany, Austria or Switzerland (or other countries), please contact 
me offline.


Kind regards

Bernd




Am 03.07.2013 20:11, schrieb Kirk Talman:

There have been several various good answers to this problem.

As a certified alte kacker, I would like to comment on what this tells us
about the state of mainframe IT.

- Apparently one can be in "Operating Systems Support" w/o having been an
application programmer.  One of the advantages many of us older persons on
this list and in the industry have is that we have "seen it before".  The
idea that a person working in any technical job on a mainframe would not
know what a S0C7 is and how to go after it is amazing to me.  At one time
there were machines w/o packed arithmetic, but now, apparently, training
in system administration functions is considered adequate.  Who on this
list learned the majority of what they know via instruction?  Most people
learned most things by doing.  The work we do is a craft, part art, part
science.

- The idea in this day and age of not having a tool to give diagnostic
information when an abend occurs may indicate a lack of understanding by
management, but is still amazing.  IBMs Fault Analuzer is not, I think,
expensive but is quite adequate to the task even in complex
CICS/DB2/IMS/MQ environments.  If I were told there were less expensive
products available, I would not be surprised.

- On the other hand, I recently had to modify a program older than the
company.  In code and macros I saw names of persons now high level
managers.  The code had a S0C7 recovery section that was miscoded because
invalid assumptions were made about the effect of ignoring records causing
the abend.  And the people who "own' the code were reluctant to fix the
root cause even when the fix was spelled out for them.  They finally did
so only when embarrassed publicly.

- The best education comes while acquiring scars and observing same in
ones peers.

IBM Mainframe Discussion List  wrote on
07/03/2013 07:10:18 AM:


From: "Mowry, Norma E CIV DISA ESB (US)" 
To: IBM-MAIN@LISTSERV.UA.EDU,
Date: 07/03/2013 07:11 AM
Subject: Question on how to debug S0C7 (data exception) abend
Sent by: IBM Mainframe Discussion List 

We have a production job that is abending with S0C7 reason 0007.
I set a slip to capture a dump but I can't seem to find the input
record that is causing the S0C7 in this dump.  I also have a CEEDUMP
but that's not real helpful in diagnosing the issue.  I looked a
setting a slip with a trace but don't think that will do any good to
get to the problem record.

Norma Mowry




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

Re: What programmer's fear (not IBM specific)

[Phil Smith]

David Crayford wrote:
>Perl is definately ugly. It has a very large and cryptic grammar which makes 
>it difficult to learn. I find it unpleasant to
>program in but I also dislike most shell scripting languages. The best thing 
>about perl is the command line hacks.

This is why I always say I have "angry Perl skillz" - because every time I have 
to use the language it pes me off!

In an alternate universe, Rexx had the equivalent of CPAN created by the 
community, and we all use it instead...and are much happier.

...phsiii

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

Re: Announcing PCRE 8.33 for native z/OS

[Don Imbriale]

If things haven't been locked down too much, you might try ISPF command
DDLIST, then subcommand LI to display linklist.

Other tools such as PDSMAN also provide similar functions to display system
components such as linklist.

- Don Imbriale


On Thu, Jul 4, 2013 at 12:09 AM, Farley, Peter x23353 <
peter.far...@broadridge.com> wrote:

> Sorry, application programmers here are not allowed ANY operator functions
> (including "/D").
>
>

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

Re: Installing HSM or rather: DFHSM woes

[Lizette Koehler]

There are a couple of Share presentations on DFHSM

Best Practises
Setting Up DFHSM 

And so forth.  If you like some of them, email me offlist

Lizette

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of nitz-...@gmx.net
Sent: Thursday, July 04, 2013 5:19 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Installing HSM or rather: DFHSM woes

> Is this in the ARCCMDxx member? Or is it being issued as a command?
Doesn't matter. Doesn't work either way, gets the same error message.

> If in the ARCCMDxx can you post a few lines above and below the 
> Tapemigration line?
SETSYS -  
  OBJECTNAMES(OBJ,OBJECT,LOAD,LOADLIB,LOADMODS,LINKLIB) - 
  SOURCENAMES(ASM,COBOL,FORT,PLI,SOURCE,SRC,SRCLIB,SRCE,CNTL,JCL) 
SETSYS TAPEMIGRATION(NONE)
SETSYS PRIMARYSPMGMTSTART ( ) 

> Also, do you have an OCDS present? Or is it dummy?
Dummy, or rather it gets a message that it isn't specified.

> Note:  From the STG Admin Guide:   If you do not intent to use Tape, do
not
> specify TAPEMIGRATION.  If you do, an Offline control dataset is required.
That might be the (non-intuitive) reason. There are no tapes in our
environment, and specifying TAPEMIGRATION(NONE) should be valid, since we
don't intend to use tapes. In other words, I'd better remove the line
(although I am unhappy with the default) since it will not be set to NONE,
anyway.

And I must have overlooked that line, although I have been over all the HSM
books for more than two weeks now...

Thanks, Barbara

--
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: Question on how to debug S0C7 (data exception) abend

[Steve Comstock]

On 7/3/2013 10:26 PM, Farley, Peter x23353 wrote:

Assuming that IPCS is available to the application staff.  In some shops it is 
not generally available, but reserved for the systems staff.  And there is the 
issue of training in the product, which isn't always available either (outside 
of reading the FM's).

Personally I have no problem using SYSUDUMP, but these days I most frequently 
use an interactive debugger to solve application errors.

Not all production application dump analyzers are created equal.  I haven't had 
the privilege of using recent versions of ABEND-AID, but I can personally vouch 
for the effectiveness of Macro4's Dumpmaster product.  I have found that LE 
dumps are somewhat less than useful when interrupted or circumvented by the 
locally installed dump analyzer and/or poorly chosen installation defaults.

In my experience, lack of training and training updates is the most frequent root cause 
of loss of knowledge of "how to debug this simple issue".


Thanks, Peter.

Ahem. For example

  http://www.trainersfriend.com/Assembler_courses/C414descrpt.htm

  http://www.trainersfriend.com/COBOL_Courses/D732descr.htm
  http://www.trainersfriend.com/COBOL_Courses/D735descr.htm

  http://www.trainersfriend.com/PL_I_courses/E732descr.htm
  http://www.trainersfriend.com/PL_I_courses/E735descr.htm

  http://www.trainersfriend.com/Language_Environment_courses/M735descr.htm


--

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-355-2752
http://www.trainersfriend.com

* To get a good Return on your Investment, first make an investment!
  + Training your people is an excellent investment

* Try our tool for calculating your Return On Investment
for training dollars at
  http://www.trainersfriend.com/ROI/roi.html





Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Shmuel Metz (Seymour J.)
Sent: Wednesday, July 03, 2013 9:46 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Question on how to debug S0C7 (data exception) abend

In
,
on 07/03/2013
at 07:16 AM, John McKown  said:


Being old, I have occasionally turned off LE's abend handling and
just "gone for the throat" using a recent compile (with generated
assembler shown) and a SYSUDUMP.


SYSMDUMP, TYVM.


The programmers have forgotten how to do this entirely.


Some things are best forgotten. IPCS isn't perfect, but it's better
than highlighters and paper clips, or the electronic equivalent.



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

Re: Installing HSM or rather: DFHSM woes

[nitz-...@gmx.net]

> Is this in the ARCCMDxx member? Or is it being issued as a command?
Doesn't matter. Doesn't work either way, gets the same error message.

> If in the ARCCMDxx can you post a few lines above and below the
> Tapemigration line?
SETSYS -  
  OBJECTNAMES(OBJ,OBJECT,LOAD,LOADLIB,LOADMODS,LINKLIB) - 
  SOURCENAMES(ASM,COBOL,FORT,PLI,SOURCE,SRC,SRCLIB,SRCE,CNTL,JCL) 
SETSYS TAPEMIGRATION(NONE)
SETSYS PRIMARYSPMGMTSTART ( ) 

> Also, do you have an OCDS present? Or is it dummy?
Dummy, or rather it gets a message that it isn't specified.

> Note:  From the STG Admin Guide:   If you do not intent to use Tape, do not
> specify TAPEMIGRATION.  If you do, an Offline control dataset is required.
That might be the (non-intuitive) reason. There are no tapes in our 
environment, and specifying TAPEMIGRATION(NONE) should be valid, since we don't 
intend to use tapes. In other words, I'd better remove the line (although I am 
unhappy with the default) since it will not be set to NONE, anyway.

And I must have overlooked that line, although I have been over all the HSM 
books for more than two weeks now...

Thanks, Barbara

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

Re: Installing HSM or rather: DFHSM woes

[Lizette Koehler]

Barbara,

Is this in the ARCCMDxx member? Or is it being issued as a command?

If in the ARCCMDxx can you try doing a F dfhsmtaskname,SETSYS
TAPEMIGRATION(NONE) and let us know what happens?

If in the ARCCMDxx can you post a few lines above and below the
Tapemigration line?

DFHSM was not meant to be intuitive.  So it takes some digging and reviewing
the DFHSM Storage Admin Guide to try and figure out why things are not
working.

Also, do you have an OCDS present? Or is it dummy?

Note:  From the STG Admin Guide:   If you do not intent to use Tape, do not
specify TAPEMIGRATION.  If you do, an Offline control dataset is required.


Lizette


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of nitz-...@gmx.net
Sent: Wednesday, July 03, 2013 11:13 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Installing HSM or rather: DFHSM woes

Alan,

> You can issue F DFHSM,RELEASE MIGRATION, but it will most likely be held
again immediately when the  first migration is attempted.  

I got up the nerve to issue the command this morning (after all, the cycle
is still defined to not start by itself).
HSM said: ARC0100I RELEASE COMMAND COMPLETED

Now I manually migrated one data set. It works! Recall also worked. (I'm
happy.)

Now I need to get up the nerve to have everything start automatically...

Can anybody tell me why
SETSYS TAPEMIGRATION(NONE)
gets
ARC0103I INVALID SETSYS PARAMETER TAPEMIGRATION ?

Barbara

--
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: I am getting a wait state during IPL

[John Gilmore]

Nor is there is any 65-bit support 'in' z/OS.  I suspect that what we
have here is not a dubious, heterodox hardware notion but something
much more benign,  a typo.

John Gilmore, Ashland, MA 01721 - USA

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

Re: What programmer's fear (not IBM specific)

[Wayne Bickerdike]

Mark IV had a ruler too...

On Thu, Jul 4, 2013 at 1:19 PM, Anthony Babonas  wrote:
> Rising to the defense of RPG, what other language had its own ruler? Talk 
> about ease of coding! Ah the nostalgia.sigh.
>
> Sent from Tony's iPhone.
>
> On Jul 3, 2013, at 9:50 PM, John McKown  wrote:
>
>> I've not run across many languages that I considered "ugly". RPG II was
>> one. EasyTrieve Plus is not "ugly", but I don't much like it. The newest
>> IBM COBOL is rather nice, albeit still wordy. The first COBOL that I
>> learned: ANSI COBOL back in the 1970s made me puke, after learning PL/I of
>> the same era.
>>
>> The main thing that I hate is a manager saying "use xyz, but refrain from
>> using the new omega facilities". The reason being that everybody in the
>> shop knows the basic xyz language, but is not familiar with the omega
>> features. So I am chained down to the least common denominator for "ease of
>> understanding" by those who simply won't learn new stuff. Case in point in
>> my current shop, at least in the past, was not using any z/OS UNIX
>> facilities because they were "just too esoteric and complicated".
>>
>>
>> On Wed, Jul 3, 2013 at 8:59 PM, Shmuel Metz (Seymour J.) <
>> shmuel+ibm-m...@patriot.net> wrote:
>>
>>> In
>>> ,
>>> on 07/03/2013
>>>   at 07:10 AM, John McKown  said:
>>>
>>> http://www.itworld.com/it-management/363424/only-thing-programmers-have-fear-all-these-things
>>>
 I say "yes" to most. #4 is being forced to learn or use some specific
 technology
>>>
>>> What if you consider a language to be ugly but also consider it to be
>>> the best tool for the job? I don't care for Perl syntax, but between
>>> the expressive power of the language and the modules available in
>>> CPAN, I find myself using it regardless. That's not a boss telling me
>>> that I have to - it's my own decision.
>>>
>>> --
>>> 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
>>
>>
>>
>> --
>> This is a test of the Emergency Broadcast System. If this had been an
>> actual emergency, do you really think we'd stick around to tell you?
>>
>> 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



-- 
Wayne V. Bickerdike

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