AW: Re: Where is format of Job ID documented?

[Peter Hunkeler]

>Isn't the APPC initiator structure a complete clone of JES2? In other words, 
>it has its own rules and JES2 has no relation whatsoever with APPC jobs or its 
>jobids?




As stated in another post I'm not too familir with APPC, but is there anything 
prohibiting an APPC program from dynamically allocating a SYSOUT file? If not, 
JESx must know about that address space and thus the Annn number would be 
managed by JESx the same way JESx is managing the number for TSU, STC, and 
batch jobs.


--
Peter Hunkeler



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

AW: Re: Where is format of Job ID documented?

[Peter Hunkeler]

>>I guess IBM's thinking is that we should just treat it as a magic cookie. It 
>>is guaranteed to be 8 EBCDIC characters that will identify a job or the like. 
>>End of story.
>>
>Used to be 7, IIRC.




Don't you mix that up with TSO Userids which are restricted to 7 charactrers?


--
Peter Hunkeler



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

AW: Re: Where is format of Job ID documented?

[Peter Hunkeler]

>
>Hmmm.  If a batch job spawns (not forks) a subprocess with _BPX_SHAREAS=YES
wouldn't that subprocess run under the parent's JobID; no BPXAS, no STC?



Local child processes, started via local spawn(), or attach_exec(), or 
attach_execmvs(), are run in the same address space as the parent process. I.e. 
in the TSO, batch job initiator, APPC initiator or STC address space. (Don't 
know much about APPC programs, but I assume there is nothing prohibiting then 
to use UNIX services.) The same applies to the case when an non-UNIX program is 
being dubbed because it is using A UNIX service now, i.e. when it becomes a 
UNIX process.


Jobname and jobid are address space level attributes, not task or process level.


Non-local child processes, started via fork(), or non-local spawn(), *always* 
run in UNIX initiator address space, aka BPXAS.


BPXAS was introduced with OS/390 V1.3 (I seem to remember). Before that, APPC 
initiators were used to provide a home for non-local child processes.


--
Peter Hunkeler




--
Peter Hunkeler

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

Re: What causes a Signal 3?

[David Crayford]

On 17/06/2016 1:12 PM, Jack J. Woehr wrote:

Charles Mills wrote:

But there are no explicit calls to either abort() or
terminate() anywhere in the source code.

abort() is called on an unhandled exception.

http://www.cplusplus.com/reference/exception/set_terminate/



That's the most likely cause, most probably thrown by the standard 
library. It's not a bad idea to setup your own set_terminate handler 
with a ctrace() to

generate a stack trace to see where that's happening.

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

Re: What causes a Signal 3?

[Jack J. Woehr]

Charles Mills wrote:

But there are no explicit calls to either abort() or
terminate() anywhere in the source code.

abort() is called on an unhandled exception.

http://www.cplusplus.com/reference/exception/set_terminate/

--
Jack J. Woehr # Science is more than a body of knowledge. It's a way of
www.well.com/~jax # thinking, a way of skeptically interrogating the universe
www.softwoehr.com # with a fine understanding of human fallibility. - Carl Sagan

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

What causes a Signal 3?

[Charles Mills]

I have a POSIX C++ application running as a started task. At a customer the
code reported a Signal 3. Looking at signal.h I see that Signal 3 is
SIGABRT, and looking at the C library reference I see that SIGABRT is
triggered by a call to abort(), which in turn may be caused by a call to
terminate(). But there are no explicit calls to either abort() or
terminate() anywhere in the source code.

My code is very good about putting out messages for abnormal conditions.
There were no preceding messages.

I'm an MVS guy. I know what a S0C1, S222 or SB37 is but I confess I am not
fully up to speed on signals. What the heck would cause an apparently
spontaneous Signal 3?

Charles 

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

Re: IEBPTPCH (was: Read a PDS ...)

[saul anthony babonas]

Sequential disk



Sent via the Samsung Galaxy Note® 4, an AT 4G LTE smartphone


 Original message 
From: Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu>
Date: 6/16/2016 9:54 PM (GMT-08:00)
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IEBPTPCH (was: Read a PDS ...)

On Fri, 17 Jun 2016 04:26:41 +, saul anthony babonas wrote:

>I've been following this discussion with some belated interest. Years ago I 
>cooked up something dirt simple to turn a PDS into a SD file using the TSO 
>print command. It wasn't very elegant but it got the job done at low cost.
>
SD?  Like a USB flash card?

> Original message 
>From: Edward Gould
>Date: 6/16/2016 9:19 PM (GMT-08:00)
>
>There are many peculiarities with IEBPTPCH. Like it doesn�t output in member 
>sequence (I vaguely remember that it is TTR sequence (but could be wrong).
>
Indeed.  While testing, I created a member, AAA* so it would be first.  It
appeared last.  Optimize seek movement.  First read the directory.  Sort
in TTR order.  FIND each member.  Great idea if you're the only job
using the device.

>The control card format is anything but intuitive I am iffy here but IIRC you 
>must specify maxflds (why I have no clue) I hated the damn program myself as I 
>had to relearn the control cards  all the time.
>
IEBGENER has something similar.  I guessed it's to know how much working
storage to GETMAIN.  I just used a big number and suitable REGION.

It should have stayed in the 20th Century.  Today, I think I'd NFS mount my
PDS on Solaris and use "pax".

But IEBGENER will create aliases.  I don't think it would work to NFS mount
on Solaris and use "ln".

-- gil

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

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

Re: IEBPTPCH (was: Read a PDS ...)

[Paul Gilmartin]

On Fri, 17 Jun 2016 04:26:41 +, saul anthony babonas wrote:

>I've been following this discussion with some belated interest. Years ago I 
>cooked up something dirt simple to turn a PDS into a SD file using the TSO 
>print command. It wasn't very elegant but it got the job done at low cost.
>
SD?  Like a USB flash card?

> Original message 
>From: Edward Gould
>Date: 6/16/2016 9:19 PM (GMT-08:00)
>
>There are many peculiarities with IEBPTPCH. Like it doesn�t output in member 
>sequence (I vaguely remember that it is TTR sequence (but could be wrong).
>
Indeed.  While testing, I created a member, AAA* so it would be first.  It
appeared last.  Optimize seek movement.  First read the directory.  Sort
in TTR order.  FIND each member.  Great idea if you're the only job
using the device.

>The control card format is anything but intuitive I am iffy here but IIRC you 
>must specify maxflds (why I have no clue) I hated the damn program myself as I 
>had to relearn the control cards  all the time.
>
IEBGENER has something similar.  I guessed it's to know how much working
storage to GETMAIN.  I just used a big number and suitable REGION.

It should have stayed in the 20th Century.  Today, I think I'd NFS mount my
PDS on Solaris and use "pax".

But IEBGENER will create aliases.  I don't think it would work to NFS mount
on Solaris and use "ln".

-- gil

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

Re: IEBPTPCH (was: Read a PDS ...)

[saul anthony babonas]

I've been following this discussion with some belated interest. Years ago I 
cooked up something dirt simple to turn a PDS into a SD file using the TSO 
print command. It wasn't very elegant but it got the job done at low cost.



Sent via the Samsung Galaxy Note® 4, an AT 4G LTE smartphone


 Original message 
From: Edward Gould 
Date: 6/16/2016 9:19 PM (GMT-08:00)
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IEBPTPCH (was: Read a PDS ...)

Paul:

There are many peculiarities with IEBPTPCH. Like it doesn’t output in member 
sequence (I vaguely remember that it is TTR sequence (but could be wrong).
The control card format is anything but intuitive I am iffy here but IIRC you 
must specify maxflds (why I have no clue) I hated the damn program myself as I 
had to relearn the control cards  all the time.
IEHMOVE was another PITA. The only reason to use IEHMOVE (Memory is shady here 
people) is that it allocated the output file for you.
Ed
> On Jun 14, 2016, at 7:59 PM, Paul Gilmartin 
> <000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Tue, 14 Jun 2016 18:03:02 -0500, wrote:
>
>> I'm not sure why you'd think it may have problems punching/printing PDS 
>> members that happen to contain JCL which happens to contain IEBPTPCH 
>> commands. It's all just data to IEBPTPCH.
>>
> OK.  I tried it.  Members appear to be separated by lines of the form "MEMBER 
> NAME  ".
> (Is this documented?)  What happens if such a line appears in SYSUT1?  I got:
>
> MEMBER NAME  AAAWTF control line
>  Line before   data line
> MEMBER NAME  FOOBAR data line (but how does it know?)
>  Line afterdata line
>
>> It is documented, you could consider giving it a whirl with something else 
>> and lettings us know.
>>
> Wherein I find gems such as:
>
>Both the output data set and the message data set can be written to the
>system output device if it is a printer.
>
> What does that mean?  If it's not a printer, can only one of them be written 
> to it?
>
>If the member card entry is not used, the entire data cell will be printed.
>
> How long has it been since IBM marketed a data cell?  (I'll submit an RCF on 
> that.)
>
> How does one restore a PDS from IEBPTPCH output?  It's probably somewhere.
> I haven't found it.
>
> (Is this good old IBM documentation or sloppy new IBM documentation?)
>
> -- gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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

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

Re: IEBPTPCH (was: Read a PDS ...)

[Edward Gould]

Paul:

There are many peculiarities with IEBPTPCH. Like it doesn’t output in member 
sequence (I vaguely remember that it is TTR sequence (but could be wrong).
The control card format is anything but intuitive I am iffy here but IIRC you 
must specify maxflds (why I have no clue) I hated the damn program myself as I 
had to relearn the control cards  all the time. 
IEHMOVE was another PITA. The only reason to use IEHMOVE (Memory is shady here 
people) is that it allocated the output file for you.
Ed
> On Jun 14, 2016, at 7:59 PM, Paul Gilmartin 
> <000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
> 
> On Tue, 14 Jun 2016 18:03:02 -0500, wrote:
> 
>> I'm not sure why you'd think it may have problems punching/printing PDS 
>> members that happen to contain JCL which happens to contain IEBPTPCH 
>> commands. It's all just data to IEBPTPCH.
>> 
> OK.  I tried it.  Members appear to be separated by lines of the form "MEMBER 
> NAME  ".
> (Is this documented?)  What happens if such a line appears in SYSUT1?  I got:
> 
> MEMBER NAME  AAAWTF control line
>  Line before   data line
> MEMBER NAME  FOOBAR data line (but how does it know?)
>  Line afterdata line
> 
>> It is documented, you could consider giving it a whirl with something else 
>> and lettings us know. 
>> 
> Wherein I find gems such as:
> 
>Both the output data set and the message data set can be written to the
>system output device if it is a printer.
> 
> What does that mean?  If it's not a printer, can only one of them be written 
> to it?
> 
>If the member card entry is not used, the entire data cell will be printed.
> 
> How long has it been since IBM marketed a data cell?  (I'll submit an RCF on 
> that.)
> 
> How does one restore a PDS from IEBPTPCH output?  It's probably somewhere.
> I haven't found it.
> 
> (Is this good old IBM documentation or sloppy new IBM documentation?)
> 
> -- gil
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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

Re: IBM plans for the future - an imaginary tale

[Edward Gould]

Ed:

I thought I had read that NIU was dropping out of the MF ed. I could be wrong.

Ed

> On Jun 14, 2016, at 7:28 PM, Edward Finnell 
> <000248cce9f3-dmarc-requ...@listserv.ua.edu> wrote:
> 
> Dr Robert Rainy and the virtual paddles matriculated from UT Knoxville to  
> NIU several years back. Assembler is still offered,
> 
> http://faculty.cs.niu.edu/~hutchins/csci360/main.htm 
> 
> 
> In a message dated 6/14/2016 6:50:08 P.M. Central Daylight Time,  
> t...@tombrennansoftware.com writes:
> 
> And  you're right about it taking experience and time.  I was lucky 
> enough  to have a UCLA advanced assembler instructor sitting next to me 
> at work  for many years, so I could just yell over the cubicle wall if I 
> needed  help, which was much of the time  :)
> 
> 
> 
> --
> 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: Where is format of Job ID documented?

[Robert A. Rosenberg]

At 15:43 -0700 on 06/16/2016, Charles Mills wrote about Re: Where is 
format of Job ID documented?:



Thanks. Anyone ever see an 'O'? Or a Mount?

Charles


I think Mount is a Started Task and thus is S. OTOH: It might run 
under Master Scheduler not JES.


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

Re: Where is format of Job ID documented?

[Mark Zelden]

On Thu, 16 Jun 2016 19:09:44 -0500, Paul Gilmartin  wrote:

>On Thu, 16 Jun 2016 18:58:56 -0500, Mark Zelden wrote:
>
>>From a JOBID standpoint, mount gets and STCid. OMVS processes
>>also get an STCid as does BPXAS. 
>> 
>Hmmm.  If a batch job spawns (not forks) a subprocess with _BPX_SHAREAS=YES
>wouldn't that subprocess run under the parent's JobID; no BPXAS, no STC?
>

Yes, thanks for catching that.  The STCid I'm seeing in my PS command are 
all because the parents are STCs.  If I submitted one of those STCs as
a batch job I would see JOBn.

Regards,

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS
ITIL v3 Foundation Certified
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html
Systems Programming expert at http://search390.techtarget.com/ateExperts/
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Where is format of Job ID documented?

[Paul Gilmartin]

On Thu, 16 Jun 2016 18:58:56 -0500, Mark Zelden wrote:

>From a JOBID standpoint, mount gets and STCid. OMVS processes
>also get an STCid as does BPXAS. 
> 
Hmmm.  If a batch job spawns (not forks) a subprocess with _BPX_SHAREAS=YES
wouldn't that subprocess run under the parent's JobID; no BPXAS, no STC?

-- gil

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

Re: Where is format of Job ID documented?

[Mark Zelden]

From a JOBID standpoint, mount gets and STCid. OMVS processes
also get an STCid as does BPXAS. If you use the SDSF PS command
you can see the STC number.  So as far as I know there is only 4:

JOBn / Jnnn  
STCn /  Snnn
TSUn / Tnnn
Annn 

I guess the RANGE= parm for JOBDEF in the JES2 manual that was referenced
in another post could / should be updated to include the Annn reference. 

Regards,

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS
ITIL v3 Foundation Certified
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html
Systems Programming expert at http://search390.techtarget.com/ateExperts/





On Thu, 16 Jun 2016 15:43:39 -0700, Charles Mills  wrote:

>Thanks. Anyone ever see an 'O'? Or a Mount?
>
>Charles
>
>-Original Message-
>From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
>Behalf Of Mark Zelden
>Sent: Thursday, June 16, 2016 3:26 PM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Re: Where is format of Job ID documented?
>
>>I wrote some code in 1996 for an SMFACTRT exit. Darned if I can 
>>remember where  I got these, but here's what I coded for:
>> 
>>'J' JOB  
>>'S'STC
>>'T'TSU 
>>'A'ASCH/APPC 
>>'O'OMVS/USS 
>> 
>>After all these years, I'm pretty sure I've never seen 'A' or 'O' even 
>>though we run both APPC/ASCH and OMVS/USS. Never saw or coded for Mount.
>
>The default for seeing APPC in SDSF is "APPC OFF" for performance reasons.  
>Performance of some displays can be poor with APPC ON if you use it.   
>
>My client uses ITIM (IBM Tivoli Identity Manager) and there is a RACF agent on 
>z/OS that uses APPC to communicate with a server.  I just issued "APPC ON" in 
>SDSF and did "H ALL" with a prefix of the jobname I knew was out there.  It 
>took a few minutes to get the display back with 32K results, but you can see 
>the Annn JOBIDs in SDSF.
>
>
>SDSF HELD OUTPUT DISPLAY ALL CLASSES LINES 136,427 LINE 1-54 (32940)
>COMMAND INPUT ===> sysnameSCROLL ===
>PREFIX=IT*  DEST=(ALL)  OWNER=*  SYSNAME=   
>NP   JOBNAME  JobIDOwnerPrty C ODisp Dest   Max-RC  
> ITIMCMD  A0006429 ITIAGNT   144 Y HOLD  LOCAL  CC  
>
>--
>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: Basic CICS Question

[Jim Mulder]

> And why can't Content Supervision be as intelligent about a mixed
> authorized/unauthorized STEPLIB as it is about a mixed link list?
> (I know that if CS were changed to operate that way, programmers
> would lose the ability to force an otherwise authorized program to
> execute unauthorized by including it in STEPLIB.  This ought to
> be a tolerable behavioral change.)

  How useful would that be?  If the jobstep is running APF 
authorized, it cannot load anything from unauthorized libraries.

Jim Mulder   z/OS System Test   IBM Corp.  Poughkeepsie,  NY


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

Re: Where is format of Job ID documented?

[Paul Gilmartin]

On 2016-06-16 16:10, Jesse 1 Robinson wrote:
> I wrote some code in 1996 for an SMFACTRT exit. Darned if I can remember 
> where I got these, but here's what I coded for:
> 
> 'J' JOB 
> 'S'STC   
> 'T'TSU
> 'A'ASCH/APPC
> 'O'OMVS/USS
> 
> After all these years, I'm pretty sure I've never seen 'A' or 'O' even though 
> we run both APPC/ASCH and OMVS/USS. Never saw or coded for Mount.
> 
Well, I just ran the EXEC:
/* Rexx */ signal on novalue;  /*
   test
*/
trace R
parse source O.3
say BPXWDYN( 'alloc rtddn(O.1) sysout(R) msg(2)' )
O.2 = USERID()
address MVS 'EXECIO 3 DISKW' O.1 '(finis stem O.'
say O.1

from a ssh session and from a TSO OMVS session with *different*
userIDs.  Both show JobID = STC04488, which happens to appear
in SYSLOG as a recently started BPXAS task.

(Hey!  They fixed something!  I ran my EXEC from a fully qualified
path when its directory was not in my environment PATH.  That used
not to work.)

-- gil

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

Re: Highest address "below the bar"

[Frank Swarbrick]

Thank you!

Frank
> Date: Thu, 16 Jun 2016 18:57:40 -0400
> From: d10j...@us.ibm.com
> Subject: Re: Highest address "below the bar"
> To: IBM-MAIN@LISTSERV.UA.EDU
> 
> > Is the highest 31-bit address 7FFF or 7FFF?
> > I ask because the largest region size you can request is 2096128K or
> > 2047M, and 2096128 * 1024 = 2,146,435,072 (x7FF0).
> 
>   For diagnostic purposes, then 4K page at 7000 is always
> left invalid in z/OS.
> 
>   2047M is considerably larger than a region size could ever be, since 
> above and below 16M are separate regions.  The maximum region 
> above 16M is constrained by 2048M - 16M - (ENUC + ELPA + ECSA + ESQA). 
> 
> Jim Mulder   z/OS System Test   IBM Corp.  Poughkeepsie,  NY
> 
> 
> --
> 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: Basic CICS Question

[Jim Mulder]

Jim Mulder   z/OS System Test   IBM Corp.  Poughkeepsie,  NY

> >​... Most shops any more use the APFTAB value which indicates that a
> >data set's APF authorization is based on the APF table when a module is
> >accessed via the link list or a STEPLIB.
> >
> Does this mean that STEPLIB may nowadays contain a mixture of
> unauthorized and APFTAB-authorized catenands, and that loading
> a program marked AC=1 from one of the authorized catenands
> will retain authorization notwithstanding the presence of
> unauthorized catenands?  I know a more recent ply has said "No",
> but you seem to be implying "Yes".
 
   No.  LNKAUTH=APFTAB applies only to LNKLST.

> And why can't Content Supervision be as intelligent about a mixed
> authorized/unauthorized STEPLIB as it is about a mixed link list?
> (I know that if CS were changed to operate that way, programmers
> would lose the ability to force an otherwise authorized program to
> execute unauthorized by including it in STEPLIB.  This ought to
> be a tolerable behavioral change.)

  For a Joblib/Steplib/Tasklib, all CSV knows about is the DCB/DEB.
The DEB is flagged as authorized by OPEN if all of the data sets 
are authorized.  CSV does not know anything about the authorization 
of the individual data sets in the concatenation. 

  The LNKLST is built by CSV, so CSV does know about the individual
data sets in the concatenation.

   Jim Mulder 




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

Re: Highest address "below the bar"

[Jim Mulder]

> Is the highest 31-bit address 7FFF or 7FFF?
> I ask because the largest region size you can request is 2096128K or
> 2047M, and 2096128 * 1024 = 2,146,435,072 (x7FF0).

  For diagnostic purposes, then 4K page at 7000 is always
left invalid in z/OS.

  2047M is considerably larger than a region size could ever be, since 
above and below 16M are separate regions.  The maximum region 
above 16M is constrained by 2048M - 16M - (ENUC + ELPA + ECSA + ESQA). 

Jim Mulder   z/OS System Test   IBM Corp.  Poughkeepsie,  NY


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

Re: Where is format of Job ID documented?

[Charles Mills]

Thanks. Anyone ever see an 'O'? Or a Mount?

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Mark Zelden
Sent: Thursday, June 16, 2016 3:26 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Where is format of Job ID documented?

>I wrote some code in 1996 for an SMFACTRT exit. Darned if I can 
>remember where  I got these, but here's what I coded for:
> 
>'J' JOB  
>'S'STC
>'T'TSU 
>'A'ASCH/APPC 
>'O'OMVS/USS 
> 
>After all these years, I'm pretty sure I've never seen 'A' or 'O' even 
>though we run both APPC/ASCH and OMVS/USS. Never saw or coded for Mount.

The default for seeing APPC in SDSF is "APPC OFF" for performance reasons.  
Performance of some displays can be poor with APPC ON if you use it.   

My client uses ITIM (IBM Tivoli Identity Manager) and there is a RACF agent on 
z/OS that uses APPC to communicate with a server.  I just issued "APPC ON" in 
SDSF and did "H ALL" with a prefix of the jobname I knew was out there.  It 
took a few minutes to get the display back with 32K results, but you can see 
the Annn JOBIDs in SDSF.


SDSF HELD OUTPUT DISPLAY ALL CLASSES LINES 136,427 LINE 1-54 (32940)
COMMAND INPUT ===> sysnameSCROLL ===
PREFIX=IT*  DEST=(ALL)  OWNER=*  SYSNAME=   
NP   JOBNAME  JobIDOwnerPrty C ODisp Dest   Max-RC  
 ITIMCMD  A0006429 ITIAGNT   144 Y HOLD  LOCAL  CC  

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

Re: Basic CICS Question

[Lizette Koehler]

If you were not aware, there is a CICS List. If you have not joined, and wish to
do so, go to this URL
CICShttp://www.listserv.uga.edu/archives/cics-l.html

Next, CICS may handle the DFHRPL or STEPLIB a little differently than normal.

There are many internet entries for CICS APF STEPLIB

Basically, if SCEERUN and SCEERUN2 are in the Linklst, then you do not need them
(AFAIK) in the CICS STEPLIB.

Second, I think this trick still works,
If you code SYS1.LINKLIB at the top of the STEPLIB it will keep APF alive.  I am
not sure if you would get an S047 if a library farther down has an issue with
being APF Authorized, but SYS1.LINKLIB will not lose APF Authorization if it is
in a STEPLIB.

You might ask the CICS List about what really needs to be in the STEPLIB if it
is in the LINKLST.

Lizette




> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Adams, Anne (DTI)
> Sent: Thursday, June 16, 2016 12:15 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Basic CICS Question
> 
> Hey friends, this isn't necessarily a z/OS question but I'm hoping someone
> knows.
> 
> Do you have to STEPLIB all libraries for CICS, even if they're in the
> LINKLIST? We're running 5.2 of CICS and z/OS 2.20. For instance, do SCEERUN,
> SCEERUN2, RACF (or ACF2) have to be in the STEPLIB? I'm being told this is
> because they all have to be APF authorized and you lose that with the
> linklist. All the appropriate libraries are APF authorized. I supposed I could
> create a little vanilla system and be certain, but I was sort of hoping
> someone would know.
> 
> ... and if the answer is yes, shame on IBM for making me do that.
> 
> 
> Anne R. Adams, CISSP
> DTI, Systems Engineering
> Sr. Mainframe Services Analyst

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

Apologies to Binyamin and the list

[michealbutz]

Hi

 

I was in some loop and I invoked the SETFRR mltiple times thus when I
percolated I gave control to my own recevoery

 

Sorry :(


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

Re: Where is format of Job ID documented?

[Mark Zelden]

>I wrote some code in 1996 for an SMFACTRT exit. Darned if I can remember where
> I got these, but here's what I coded for: 
> 
>'J' JOB  
>'S'STC
>'T'TSU 
>'A'ASCH/APPC 
>'O'OMVS/USS 
> 
>After all these years, I'm pretty sure I've never seen 'A' or 'O' even though 
>we run
>both APPC/ASCH and OMVS/USS. Never saw or coded for Mount. 

The default for seeing APPC in SDSF is "APPC OFF" for performance reasons.  
Performance of some displays can be poor with APPC ON if you use it.   

My client uses ITIM (IBM Tivoli Identity Manager) and there is a RACF agent on 
z/OS that uses APPC to communicate with a server.  I just issued "APPC ON" in
SDSF and did "H ALL" with a prefix of the jobname I knew was out there.  It 
took a few minutes to get the display back with 32K results, but you can
see the Annn JOBIDs in SDSF.


SDSF HELD OUTPUT DISPLAY ALL CLASSES LINES 136,427 LINE 1-54 (32940)
COMMAND INPUT ===> sysnameSCROLL ===
PREFIX=IT*  DEST=(ALL)  OWNER=*  SYSNAME=   
NP   JOBNAME  JobIDOwnerPrty C ODisp Dest   Max-RC  
 ITIMCMD  A0006429 ITIAGNT   144 Y HOLD  LOCAL  CC  
 ITIMCMD  A0006430 ITIAGNT   144 Y HOLD  LOCAL  CC  
 ITIMCMD  A0006431 ITIAGNT   144 Y HOLD  LOCAL  CC  
 ITIMCMD  A0006432 ITIAGNT   144 Y HOLD  LOCAL  CC  
 ITIMCMD  A0006433 ITIAGNT   144 Y HOLD  LOCAL  CC  
 ITIMCMD  A0006434 ITIAGNT   144 Y HOLD  LOCAL  CC  
 ITIMCMD  A0006435 ITIAGNT   144 Y HOLD  LOCAL  CC  
 ITIMCMD  A0006436 ITIAGNT   144 Y HOLD  LOCAL  CC  
 ITIMCMD  A0006440 ITIAGNT   144 Y HOLD  LOCAL  CC  
 ITIMCMD  A0006439 ITIAGNT   144 Y HOLD  LOCAL  CC  
 ITIMCMD  A0006437 ITIAGNT   144 Y HOLD  LOCAL  CC  
 ITIMCMD  A0006438 ITIAGNT   144 Y HOLD  LOCAL  CC  
 ITIMCMD  A0006441 ITIAGNT   144 Y HOLD  LOCAL  CC  
 ITIMCMD  A0006442 ITIAGNT   144 Y HOLD  LOCAL  CC  
 ITIMCMD  A0006443 ITIAGNT   144 Y HOLD  LOCAL  CC  



Regards,

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS
ITIL v3 Foundation Certified
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html
Systems Programming expert at http://search390.techtarget.com/ateExperts/



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

Re: Where is format of Job ID documented?

[Jesse 1 Robinson]

I wrote some code in 1996 for an SMFACTRT exit. Darned if I can remember where 
I got these, but here's what I coded for:

'J' JOB 
'S'STC   
'T'TSU
'A'ASCH/APPC
'O'OMVS/USS

After all these years, I'm pretty sure I've never seen 'A' or 'O' even though 
we run both APPC/ASCH and OMVS/USS. Never saw or coded for Mount.

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

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Vernooij, CP (ITOPT1) - KLM
Sent: Thursday, June 16, 2016 7:45 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: Where is format of Job ID documented?

Out of interest, I did some research.

The $JBIDBLD macro documents:
JOBTYPE=Specifies a label, or a register that contains the address, of the job 
type flag byte (JOB, STC, TSU) used to construct the job ID. The job type flag 
byte must be defined. 
Valid job types, and the bit settings for each are: 
job typeflag bit settingbatch 
jobxx   00
STCxx   01
TSUxx   10

(no more, no less?)

Other doc only speaks of:
JES2 JOBID such as J12345, JOB12345, S12345, STC12345, T12345, TSU12345

Isn't the APPC initiator structure a complete clone of JES2? In other words, it 
has its own rules and JES2 has no relation whatsoever with APPC jobs or its 
jobids?

Kees.


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Charles Mills
Sent: 16 June, 2016 15:46
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Where is format of Job ID documented?

Annoying that it is not documented.

I guess IBM's thinking is that we should just treat it as a magic cookie. It is 
guaranteed to be 8 EBCDIC characters that will identify a job or the like. End 
of story.

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Robinson, Dave (GE Capital NonGE)
Sent: Thursday, June 16, 2016 1:58 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Where is format of Job ID documented?

I was once told that there were five. One for APPC as you said, and another for 
MOUNT requests.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Charles Mills
Sent: 15 June 2016 22:05
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXT: Re: Where is format of Job ID documented?

I was specifically wondering what could appear in the first position or first 
three positions. Is J(OB), S(TC) and T(SU) the complete set? I thought I seemed 
to remember A-something for APPC transactions? No? Anything else?


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

Highest address "below the bar"

[Frank Swarbrick]

Is the highest 31-bit address 7FFF or 7FFF?
I ask because the largest region size you can request is 2096128K or 2047M, and 
2096128 * 1024 = 2,146,435,072 (x7FF0).

Just curious!


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

Re: Basic CICS Question

[Nims,Alva John (Al)]

From z/OS 1.13 version of "MVS Programming: Authorized Assembler Services 
Guide" Chapter 21: Protecting the System" about page 433, there is a "Note" in 
"APF-authorized libraries":
"Notes: 1. If a JCL DD statement concatenates an authorized library in any 
order with an unauthorized library, the entire set of concatenated libraries is 
treated as unauthorized."

And guess what, in "z/OS V2R2.0 MVS Authorized Assembler Services Guide" same 
chapter, same section, but page 455, it has the same note.

So "No" in STEPLIB, you CANNOT mix APF Authorized and Unauthorized libraries, 
LINKLST, on the other hand, you can mix it up.

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

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Thursday, June 16, 2016 5:08 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Basic CICS Question

On Thu, 16 Jun 2016 14:27:28 -0500, John McKown wrote:
>
>​... Most shops any more use the APFTAB value which indicates that a 
>data set's APF authorization is based on the APF table when a module is 
>accessed via the link list or a STEPLIB.
>
Does this mean that STEPLIB may nowadays contain a mixture of unauthorized and 
APFTAB-authorized catenands, and that loading a program marked AC=1 from one of 
the authorized catenands will retain authorization notwithstanding the presence 
of unauthorized catenands?  I know a more recent ply has said "No", but you 
seem to be implying "Yes".

And why can't Content Supervision be as intelligent about a mixed 
authorized/unauthorized STEPLIB as it is about a mixed link list?
(I know that if CS were changed to operate that way, programmers would lose the 
ability to force an otherwise authorized program to execute unauthorized by 
including it in STEPLIB.  This ought to be a tolerable behavioral change.)

-- gil

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

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

Re: Basic CICS Question

[Paul Gilmartin]

On Thu, 16 Jun 2016 14:27:28 -0500, John McKown wrote:
>
>​... Most shops any more use the APFTAB value which indicates that a
>data set's APF authorization is based on the APF table when a module is
>accessed via the link list or a STEPLIB.
>
Does this mean that STEPLIB may nowadays contain a mixture of
unauthorized and APFTAB-authorized catenands, and that loading
a program marked AC=1 from one of the authorized catenands
will retain authorization notwithstanding the presence of
unauthorized catenands?  I know a more recent ply has said "No",
but you seem to be implying "Yes".

And why can't Content Supervision be as intelligent about a mixed
authorized/unauthorized STEPLIB as it is about a mixed link list?
(I know that if CS were changed to operate that way, programmers
would lose the ability to force an otherwise authorized program to
execute unauthorized by including it in STEPLIB.  This ought to
be a tolerable behavioral change.)

-- gil

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

Re: Basic CICS Question

[Charles Mills]

And there is no error message if you do an ADD and the volser is wrong --
MVS happily accepts it and will authorize the dataset ... if one with that
name ever shows up on that volume.

SMS makes things more foolproof.

FWIW -- not recommending this -- I think a correct volser works even if the
dataset is SMS managed.

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Nims,Alva John (Al)
Sent: Thursday, June 16, 2016 12:29 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Basic CICS Question

Actually, I believe someone has it a little reversed.

If the Data Set is listed in APF list, it is authorized and will be so in
the LINKLST, BUT if you add that same data set to //STEPLIB, then ALL the
data sets listed in //STEPLIB must be APF authorized, if even 1 is not
authorized, then ALL are not.  Remember for APF, both the Data Set Name and
the Volume or SMS if it is SMS managed, MUST MATCH!

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

Re: Basic CICS Question

[Nims,Alva John (Al)]

Actually, I believe someone has it a little reversed.

If the Data Set is listed in APF list, it is authorized and will be so in the 
LINKLST, BUT if you add that same data set to //STEPLIB, then ALL the data sets 
listed in //STEPLIB must be APF authorized, if even 1 is not authorized, then 
ALL are not.  Remember for APF, both the Data Set Name and the Volume or SMS if 
it is SMS managed, MUST MATCH!


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

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Adams, Anne (DTI)
Sent: Thursday, June 16, 2016 3:15 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Basic CICS Question

Hey friends, this isn't necessarily a z/OS question but I'm hoping someone 
knows. 

Do you have to STEPLIB all libraries for CICS, even if they're in the LINKLIST? 
We're running 5.2 of CICS and z/OS 2.20. For instance, do SCEERUN, SCEERUN2, 
RACF (or ACF2) have to be in the STEPLIB? I'm being told this is because they 
all have to be APF authorized and you lose that with the linklist. All the 
appropriate libraries are APF authorized. I supposed I could create a little 
vanilla system and be certain, but I was sort of hoping someone would know. 

... and if the answer is yes, shame on IBM for making me do that.


Anne R. Adams, CISSP
DTI, Systems Engineering
Sr. Mainframe Services Analyst 

--
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: Basic CICS Question

[John McKown]

On Thu, Jun 16, 2016 at 2:15 PM, Adams, Anne (DTI) 
wrote:

> Hey friends, this isn't necessarily a z/OS question but I'm hoping someone
> knows.
>
> Do you have to STEPLIB all libraries for CICS, even if they're in the
> LINKLIST? We're running 5.2 of CICS and z/OS 2.20. For instance, do
> SCEERUN, SCEERUN2, RACF (or ACF2) have to be in the STEPLIB? I'm being told
> this is because they all have to be APF authorized and you lose that with
> the linklist. All the appropriate libraries are APF authorized. I supposed
> I could create a little vanilla system and be certain, but I was sort of
> hoping someone would know.
>
> ... and if the answer is yes, shame on IBM for making me do that.
>

​No, you don't, in general, need those libraries to be in a STEPLIB for
CICS. You do _not_ lose APF authorization just because a data set is in the
​linklist. I don't know who told you that. There is a parameter called
LNKAUTH in the IEASYSnn member of PARMLIB. If it is set to LNKLIST, then
_every_ library on the link list is APF authorized when used via the link
list even if it is not in the APF table (STEPLIB remains dependent on APF
table). Most shops any more use the APFTAB value which indicates that a
data set's APF authorization is based on the APF table when a module is
accessed via the link list or a STEPLIB.

ref:
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.ieae200/ieae200306.htm


*LNKAUTH={LNKLST}|{APFTAB}*

This parameter specifies whether all libraries in the LNKLST concatenation
are to be treated as APF-authorized when accessed as part of the
concatenation, or whether only those libraries that are named in the APF
table are to be treated as APF-authorized.

*Value Range*: Not applicable

*Default Value*: LNKLST, meaning that all libraries in the LNKLST
concatenation are to be treated as APF-authorized when accessed as part of
the concatenation. If the default for the LNKAUTH system parameter is
taken, or is specified in IEASYSxx or by the operator, libraries in the
LNKLST concatenation are APF-authorized when accessed as part of the LNKLST
concatenation.

If a LNKLST library is not listed in the APF table, referencing the library
through a JOBLIB or STEPLIB DD statement causes the library to be
considered unauthorized for the duration of the job or step.




>
> Anne R. Adams, CISSP
> DTI, Systems Engineering
> Sr. Mainframe Services Analyst
>
>

-- 
"Pessimism is a admirable quality in an engineer. Pessimistic people check
their work three times, because they're sure that something won't be right.
Optimistic people check once, trust in Solis-de to keep the ship safe, then
blow everyone up."
"I think you're mistaking the word optimistic for inept."
"They've got a similar ring to my ear."

>From "Star Nomad" by Lindsay Buroker:

Maranatha! <><
John McKown

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

Basic CICS Question

[Adams, Anne (DTI)]

Hey friends, this isn't necessarily a z/OS question but I'm hoping someone 
knows. 

Do you have to STEPLIB all libraries for CICS, even if they're in the LINKLIST? 
We're running 5.2 of CICS and z/OS 2.20. For instance, do SCEERUN, SCEERUN2, 
RACF (or ACF2) have to be in the STEPLIB? I'm being told this is because they 
all have to be APF authorized and you lose that with the linklist. All the 
appropriate libraries are APF authorized. I supposed I could create a little 
vanilla system and be certain, but I was sort of hoping someone would know. 

... and if the answer is yes, shame on IBM for making me do that.


Anne R. Adams, CISSP
DTI, Systems Engineering
Sr. Mainframe Services Analyst 

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

IEBPTPCH (was: Read a PDS ...)

[Bill Woodger]

Sorry, missed this. I recently sat on a bacon-slicer, so I'm getting a little 
behind with everything...

I suspect, but don't know, that the only recent updates to the "manual" have 
been to add the word PDSE.

SYSUT1 members containing data which looks like the data "label" that is 
generated are unproblematic for IEBPTPCH. It's just data.

Then processing the output is a different potential issue. You may have noted 
that 73-80 are blank, which can aid in identification of those generated 
against those members which have "line numbers", but not those which are 
already blank.

However, since I use it for COBOL programs and for JCL (the first being no 
possible problem, the second only a problem if someone has "data" which happens 
to match the format, possible, but not happened yet) I've not encountered a 
problem.

To get stuff then into a PDS, you basically changed the MEMBER card to an 
IEBUPDTE command. I've only ever done it with "add" and only ever to a separate 
PDS, either an "empty" PDS or one guaranteed not to have  conflict of members, 
but it would be possible to try to get more exciting with it and use some of 
the other IEBUPDTE options. Having seen "damaged" PDSs and members with 
unintended updates, I just like to be very careful and systematic. Call me the 
Tortoise of screwi... updating PDSs. Tortoises also do backups. And use IEBCOPY 
to return, updated, data from whence it came.

I have found it extremely useful for program sources and JCL.

There is something about * and ** being used as markers, but I've never seen 
them and never bothered/needed to check why not. Maybe it's on the print output 
(which I don't use)?

I don't know if "library services" existed when I started using this, but if 
they did, I didn't know about them, and just jumped with the first thing I 
found that did what I needed. Perhaps I should "modernise" the approach, but 
I've just not found a need. Yet.

On Wednesday, 15 June 2016 02:59:40 UTC+2, Paul Gilmartin  wrote:
> On Tue, 14 Jun 2016 18:03:02 -0500, wrote:
> 
> >I'm not sure why you'd think it may have problems punching/printing PDS 
> >members that happen to contain JCL which happens to contain IEBPTPCH 
> >commands. It's all just data to IEBPTPCH.
> >
> OK.  I tried it.  Members appear to be separated by lines of the form "MEMBER 
> NAME  ".
> (Is this documented?)  What happens if such a line appears in SYSUT1?  I got:
> 
> MEMBER NAME  AAAWTF control line
>   Line before   data line
> MEMBER NAME  FOOBAR data line (but how does it know?)
>   Line afterdata line
> 
> >It is documented, you could consider giving it a whirl with something else 
> >and lettings us know. 
> >
> Wherein I find gems such as:
> 
> Both the output data set and the message data set can be written to the
> system output device if it is a printer.
> 
> What does that mean?  If it's not a printer, can only one of them be written 
> to it?
> 
> If the member card entry is not used, the entire data cell will be 
> printed.
> 
> How long has it been since IBM marketed a data cell?  (I'll submit an RCF on 
> that.)
> 
> How does one restore a PDS from IEBPTPCH output?  It's probably somewhere.
> I haven't found it.
> 
> (Is this good old IBM documentation or sloppy new IBM documentation?)
> 
> -- gil
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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

Re: Who was the first?

[zMan]

Yeah, it's on Bitsavers...

On Thu, Jun 16, 2016 at 12:21 AM, Edward Gould 
wrote:

> * Boffins decipher manual for 2,000-year-old Ancient Greek computer
>  Antikythera Mechanism inscriptions suggest eclipse, weather
>  prediction and... RTFM
>  http://go.reg.cx/tdml/48a2/578aca7f/139c06f8/2msv <
> http://go.reg.cx/tdml/48a2/578aca7f/139c06f8/2msv>
>
> (bet it didn’t have a manual number)
>
> Ed
>
>
> --
> 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: Recovery Routine not Percolating

[michealbutz]

Binyamin

I move the SDWA to another address space orignally I thought the didn't work
in fact it did it was just that recovery routine was getting called
repeatdly 

MYRECOV CSECT
MYRECOV AMODE 31
MYRECOV RMODE ANY
 YREGS
AR0   EQU  0
AR1   EQU  1
AR2   EQU  2
AR3   EQU  3
AR4   EQU  4
AR5   EQU  5
AR6   EQU  6
AR7   EQU  7
AR8   EQU  8
AR9   EQU  9
AR10  EQU  10
AR11  EQU  11
AR12  EQU  12
AR13  EQU  13
AR14  EQU  14
AR15  EQU  15
**
*   Address Space Recovery Rtn|6
* |7
*  Determine Address Space  and Type of Abend |8
* |9
*  Give user OPtion of Sdump  |   10
*++   34
 LRR3,R15
 USING MYRECOV,R3
 LRR13,R0 Save area
 LRR4,R1  Save Sdwa Address
*
**---*41
** SET ADDRESSABILITY SDWA EXTENSION *42
**---*43
 USING WS_DSECT,R13
 STR14,SAVE14
 STR2,USER_PARM
 USING SDWA,R4  Address SDWA
*
*
*   Get Storage For SDWA
*
 LAR0,((SDWAEND-SDWA)+(SDWASEND-SDWARC1)+(SDWAIEND-SDWARC2)X
   +(SDWALEND-SDWARC3)+(SDWAEEND-SDWARC4)+(SDWAPEND-SDWAPTRX
   S)+(SDWAPTRS-SDWAPEND)+(SDWAREND-SDWANRC1)+(SDWASEN-SDWAX
   NRC2)+(SDWADEND-SDWANRC3))
 STR0,SDWA_LEN
 STORAGE OBTAIN,LENGTH=(R0),ADDR=(R6),SP=0,OWNER=PRIMARY
 STR6,SDWA_ADDRESS
 LAR7,SDWAEND-SDWA
 LRR11,R7
 LRR10,R4
 MVCL  R6,R10
 L R8,SDWAXPAD ADDRESS SDWA EXTENSION PTRS44
 L R10,SDWADSRP-SDWAPTRS(R8)  ADDREESS  RECORDABLE XTNS   45
 MVC   0(SDWAREND-SDWANRC1,R6),0(R10) move
 LAR6,SDWAREND-SDWANRC1(,R6)
 L R10,SDWASRVP-SDWAPTRS(R8)  DDRESS OF RECORDABLE XTNSION45
 LAR11,SDWASEND-SDWARC1
 LRR7,R11
 MVCL  R6,R10
 L R10,SDWAXIOM-SDWAPTRS(R8) ADDRESS OF RECORDERABLE EXT  45
 MVC   0(SDWAIEND-SDWARC2,R6),0(R10) DD CMP
 LAR6,SDWAIEND-SDWARC2(,R6)
 L R10,SDWAXSPL-SDWAPTRS(R8) ADDRESS OF RECORDABLE XTNSION45
 MVC   0(SDWASEN-SDWANRC2,R6),0(R10) DD CMP
 LAR6,SDWASEN-SDWANRC2(,R6)
 L R10,SDWAXLCK-SDWAPTRS(R8) ADDRESS OF RECORDABLE XTNSION45
 MVC   0(SDWALEND-SDWARC3,R6),0(R10) DD CMP
 LAR6,SDWALEND-SDWARC3(,R6)
 L R10,SDWADSPP-SDWAPTRS(R8) ADDRESS OF RECORDABLE XTNSION45
 MVC   0(SDWADEND-SDWANRC3,R6),0(R10) DD CMP
 LAR6,SDWADEND-SDWANRC3(,R6)
 L R10,SDWAXEME-SDWAPTRS(R8) ADDRESS OF RECORDABLE XTNSION45
 LAR11,SDWAEEND-SDWARC4
 LRR7,R11
 MVCL  R6,R10
 L R2,USER_PARMGet Paramter Area Back
 USING ESTPARM,R2
*
 LAR8,1
*
 AXSET AX=(R8)Give us Authority TO MOVE TO SRV
*
 XRR5,R5
*
 ICM   R5,B'0011',SERVASID Get Server asid
*
 SSAR  R5  Set it SASN
*
 LAM   AR0,AR15,=16F'0'Zero it out
*
 ICM   R8,B'',SDWA@ADRGet Server Address
 L R9,SDWA_ADDRESS Get our Address
*
*
 XRR0,R0
 L R0,SDWA_LEN
*
 LAM   AR8,AR8,=F'1'  Secondary alet
*
 SAC   512 Asc Ar mode
*
MVC_LOOP DS0H
 C R0,=F'255'
 BHMOVEIT
 BCTR  R0,0  DOWN BY 1
 EXR0,MOVELAST
 B POSTIT
MOVEIT   DS0H
 MVC   0(256,R8),0(R9)
 S R0,=F'256'
 LAR8,256(,R8) bump out put
 LAR9,256(,R9)
 B MVC_LOOP
POSTIT   DS0H
*
 LAM   R8,R8,=F'0'
 SAC   0 Back to Primary
*
 L R15,CVTPTRR15 -> cvt JOE
 L R15,CVTASVT-CVT(,R15)  R15 -> asvt   JOE
 USING ASVT,R15 JOE
 LAR15,ASVTENTY-ASVT(,R15) Get first asvt slot  JOE
 XRR0,R0
 LHR0,SERVASID   Get asid in question   JOE
 BCTR  R0,0  Down By 1  JOE
 SLL   R0,2  Multiply by 4  JOE
 ARR15,R0Point to ASCB 

Re: Recovery Routine not Percolating

[Binyamin Dissen]

On Thu, 16 Jun 2016 13:51:47 -0400 michealbutz 
wrote:

:>Hi
:>
:> 
:>
:>It seems my Recovery Routine a FRR for a SRB is getting called repeatdly
:>again again for the same abend at the same location.

How many times did you schedule the SRB?

How do you know it is being called repeatedly?

:>I thought if I did SETRP RC=0 it should percolate and go to the next
:>recovery on the Chain I double checked and R1 points to the SDWA.

It should.

:>After the SETRP I do a BSM 0,R14.  

Show the complete code of the FRR.

--
Binyamin Dissen 
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

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

Recovery Routine not Percolating

[michealbutz]

Hi

 

It seems my Recovery Routine a FRR for a SRB is getting called repeatdly
again again for the same abend at the same location.

 

I thought if I did SETRP RC=0 it should percolate and go to the next
recovery on the Chain I double checked and R1 points to the SDWA.

 

After the SETRP I do a BSM 0,R14.  


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

Re: Read a PDS (all members) like PS dataset

[Edward Gould]

> On Jun 15, 2016, at 1:30 AM, Bill Woodger  wrote:
> 
> Perhaps SAS calls IEBPTPCH "under the covers"?
> 
> Don't "buy" SAS just to do this...
> 
> -

But it hurts when I do that:)

Ed

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

Re: Cringely article about more IBM rumors

[Anne & Lynn Wheeler]

john.archie.mck...@gmail.com (John McKown) writes:
> ​Thanks. I was thinking of the CPs used by user software. It's interesting
> that the I/O channels use a Power chip.​

In 1988, I was asked to help LLNL standardize some serial stuff they had
... which quickly becomes the fibre channel standard ... one of the
early implementations was for rs/6000 circa 1991. later some POK channel
engineers become involved and define a heavy-weight protocol running
over fibre-channel standard that drastically reduces the native
throughput ... eventually released as FICON
http://www.garlic.com/~lynn/submisc.html#ficon

-- 
virtualization experience starting Jan1968, online at home since Mar1970

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

Re: Where is format of Job ID documented?

[Vernooij, CP (ITOPT1) - KLM]

That is the clue: 
SMF30JNM is described as:
JES job identifier. Jobs scheduled by the APPC/MVS transaction scheduler (ASCH) 
start with an “A” followed by a seven-digit number.

Ann jobs are no JES2 jobs, but ASCH jobs and do not follow JES2 rules, but 
follow APPC rules.

Kees.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Norbert Friemel
Sent: 16 June, 2016 16:29
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Where is format of Job ID documented?

On Wed, 15 Jun 2016 14:05:09 -0700, Charles Mills wrote:

>I was specifically wondering what could appear in the first position or first 
>three positions. Is J(OB), S(TC) and T(SU) the complete set? I thought I 
>seemed to remember A-something for APPC transactions? No? Anything else?
>
>Charles
>

"A" + seven digits in SMF30JNM? 
https://www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.ieag200/rec30ids.htm

Norbert Friemel

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

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

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




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

Re: Where is format of Job ID documented?

[Vernooij, CP (ITOPT1) - KLM]

Out of interest, I did some research.

The $JBIDBLD macro documents:
JOBTYPE=Specifies a label, or a register that contains the address, of the job 
type flag byte (JOB, STC, TSU) used to construct the job ID. The job type flag 
byte must be defined. 
Valid job types, and the bit settings for each are: 
job typeflag bit settingbatch 
jobxx   00
STCxx   01
TSUxx   10

(no more, no less?)

Other doc only speaks of:
JES2 JOBID such as J12345, JOB12345, S12345, STC12345, T12345, TSU12345

Isn't the APPC initiator structure a complete clone of JES2? In other words, it 
has its own rules and JES2 has no relation whatsoever with APPC jobs or its 
jobids?

Kees.


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Charles Mills
Sent: 16 June, 2016 15:46
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Where is format of Job ID documented?

Annoying that it is not documented.

I guess IBM's thinking is that we should just treat it as a magic cookie. It is 
guaranteed to be 8 EBCDIC characters that will identify a job or the like. End 
of story.

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Robinson, Dave (GE Capital NonGE)
Sent: Thursday, June 16, 2016 1:58 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Where is format of Job ID documented?

I was once told that there were five. One for APPC as you said, and another for 
MOUNT requests.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Charles Mills
Sent: 15 June 2016 22:05
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXT: Re: Where is format of Job ID documented?

I was specifically wondering what could appear in the first position or first 
three positions. Is J(OB), S(TC) and T(SU) the complete set? I thought I seemed 
to remember A-something for APPC transactions? No? Anything else?

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

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

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




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

Re: Where is format of Job ID documented?

[Greg Shirey]

The JES2 Init & Tuna reference notes this in the description of the RANGE 
initialization statement: 

RANGE=n[,m]|1,
Specifies the range of numbers (1 through 99) which JES2 will assign as 
JOBIDs to jobs which originated on the local node. 
The integer n specifies the lowest number (1 through 99) which will be 
assigned as a JES2 job identifier for jobs originating locally.

The integer m specifies the highest number (n+10 through 99) which will be 
assigned as a JES2 job identifier to jobs originating locally. Note that 
setting the upper limit above 99,999 will cause the JOBID format to change from 
CCCN to C0NN where CCC is either JOB, STC, or TSU, and C is J, S, or T. 
  N or NN is a number.

https://www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.hasa400/has2u600110.htm

Greg Shirey
Ben E. Keith Company 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Charles Mills
Sent: Wednesday, June 15, 2016 4:13 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Where is format of Job ID documented?

Thanks. Supports the idea of only three possible prefixes.

Charles

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

Re: Where is format of Job ID documented?

[Norbert Friemel]

On Wed, 15 Jun 2016 14:05:09 -0700, Charles Mills wrote:

>I was specifically wondering what could appear in the first position or first 
>three positions. Is J(OB), S(TC) and T(SU) the complete set? I thought I 
>seemed to remember A-something for APPC transactions? No? Anything else?
>
>Charles
>

"A" + seven digits in SMF30JNM? 
https://www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.ieag200/rec30ids.htm

Norbert Friemel

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

Re: Where is format of Job ID documented?

[Paul Gilmartin]

On Thu, 16 Jun 2016 06:45:40 -0700, Charles Mills  wrote:

>Annoying that it is not documented.
>
>I guess IBM's thinking is that we should just treat it as a magic cookie. It 
>is guaranteed to be 8 EBCDIC characters that will identify a job or the like. 
>End of story.
> 
Used to be 7, IIRC.

And our site now uses JOB0.

-- gil

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

Re: Where is format of Job ID documented?

[Charles Mills]

Annoying that it is not documented.

I guess IBM's thinking is that we should just treat it as a magic cookie. It is 
guaranteed to be 8 EBCDIC characters that will identify a job or the like. End 
of story.

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Robinson, Dave (GE Capital NonGE)
Sent: Thursday, June 16, 2016 1:58 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Where is format of Job ID documented?

I was once told that there were five. One for APPC as you said, and another for 
MOUNT requests.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Charles Mills
Sent: 15 June 2016 22:05
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXT: Re: Where is format of Job ID documented?

I was specifically wondering what could appear in the first position or first 
three positions. Is J(OB), S(TC) and T(SU) the complete set? I thought I seemed 
to remember A-something for APPC transactions? No? Anything else?

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

Re: Cringely article about more IBM rumors

[John McKown]

On Thu, Jun 16, 2016 at 7:20 AM, Tom Marchant <
000a2a8c2020-dmarc-requ...@listserv.ua.edu> wrote:

> On Wed, 15 Jun 2016 15:21:11 -0500, John McKown wrote:
>
> >Interesting. But one glaring mistake. The z series does not have a Power
> >chip inside it.
>
> The z System processor is not a power processor. However, z System machines
> do have Power chips in them. IIRC, each channel has 2 power cores to run
> it.
>

​Thanks. I was thinking of the CPs used by user software. It's interesting
that the I/O channels use a Power chip.​


>
> --
> Tom Marchant
>
>
-- 
"Pessimism is a admirable quality in an engineer. Pessimistic people check
their work three times, because they're sure that something won't be right.
Optimistic people check once, trust in Solis-de to keep the ship safe, then
blow everyone up."
"I think you're mistaking the word optimistic for inept."
"They've got a similar ring to my ear."

>From "Star Nomad" by Lindsay Buroker:

Maranatha! <><
John McKown

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

Re: Cringely article about more IBM rumors

[Tom Marchant]

On Wed, 15 Jun 2016 15:21:11 -0500, John McKown wrote:

>Interesting. But one glaring mistake. The z series does not have a Power
>chip inside it.

The z System processor is not a power processor. However, z System machines 
do have Power chips in them. IIRC, each channel has 2 power cores to run it.

-- 
Tom Marchant

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

Where is format of Job ID documented?

[Robinson, Dave (GE Capital NonGE)]

I was once told that there were five. One for APPC as you said, and another for 
MOUNT requests.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Charles Mills
Sent: 15 June 2016 22:05
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXT: Re: Where is format of Job ID documented?

I was specifically wondering what could appear in the first position or first 
three positions. Is J(OB), S(TC) and T(SU) the complete set? I thought I seemed 
to remember A-something for APPC transactions? No? Anything else?

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John McKown
Sent: Wednesday, June 15, 2016 1:54 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Where is format of Job ID documented?

On Wed, Jun 15, 2016 at 3:38 PM, Charles Mills  wrote:

> Yeah, I know, JOBn or Tnnn.
>
> Is there a formal description somewhere? Where?
>
> Charles
>
> ​I don't know if it is "formal" or not, but here:
https://urldefense.proofpoint.com/v2/url?u=https-3A__www.ibm.com_support_knowledgecenter_SSLTBW-5F2.1.0_com.ibm.zos.v2r1.ieaa600_iea3a6-5FObtaining-5Fa-5Fjob-5Fidentifier.htm=CwIFaQ=IV_clAzoPDE253xZdHuilRgztyh_RiV3wUrLrDQYWSI=e3tYBLyxxv2bm6qKB_Bu6i8laFMVOfQGTujvsDqIvKU=Ol6AFH9voFSUG-AjIuX1EgHHNZPdVs5gOa92TPdmItA=lKgCyJbRe43jKAlLGpqfMXOFIYZHwRkO6go0KlBoq78=
 


...

Issue an ENDREQ macro after writing a complete job to the internal reader.
The job identifier is returned in the RPLRBAR field of the request parameter 
list (RPL). See z/OS JES2 Commands 
  or z/OS JES3 Commands 
 for details about the job identifier.
RPLRBAR is an 8-byte field. The first 3 bytes, xxx, are the characters JOB, TSU 
or STC. The remaining 5 bytes, n, represent the five digits of the job 

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