Re: Batch Msgid Profile

2014-11-19 Thread Ed Gould

On Nov 19, 2014, at 11:18 AM, Paul Gilmartin wrote:


On Wed, 19 Nov 2014 09:58:57 -0700, Lizette Koehler wrote:


If you create a REXX or CLIST to do your batch work, then you can  
test the prof to see if MSGID and/or WTPMSG are on or off.  Then  
set them as you need them.


Any Application that run under TSO or ISPF can reset these  
entries.  And sometimes they do not set them back.  This is  
strictly a TSO function.  But some ISPF applications will tweak  
the TSO PROF function.



And if two batch IKJ jobs run concurrently, the final state is
indeterminate, even if they attempt to restore the settings.
There ought to be distinct commands to set such options for
the current session and to write them back to the RACF/UADS
data base.  Clearly the TSO designers were ignorant of the
requirements of multiprocessing.


Gil:

I do not know if processing has changed but in the day of UADS,
The UPT was updated and when the user logged off the system updated  
UADS.
I guess I would assume that with a RACF DB the same sequence of  
events are occurring but are going to the RACF DB instead.


Ed

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


Re: AW: Re: What are STC, JOB and TSU?

2014-11-19 Thread Shmuel Metz (Seymour J.)
In , on 11/19/2014
   at 09:51 PM, Peter Hunkeler  said:

>I have not seen an APPC initiator in action, so I can't remember
>whether they will show as Annn or as S

My recollection is APPC and ASCH; that was long before 7 digit
job numbers in JES2.
 
-- 
 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: How declare in C++ a constant in an assembler module?

2014-11-19 Thread Shmuel Metz (Seymour J.)
In <1624998193642608.wa.paulgboulderaim@listserv.ua.edu>, on
11/19/2014
   at 07:41 AM, Paul Gilmartin
<000433f07816-dmarc-requ...@listserv.ua.edu> said:

>PL/I might be more likely,

Too late; it's already been done.

Note: the OP and I don't agree on much, but he's right about the
comparison of C and PL/I.
 
-- 
 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: SMP/E 1 CSI? 3 CSIs? Other?

2014-11-19 Thread Shmuel Metz (Seymour J.)
In <5005802501816556.wa.paulgboulderaim@listserv.ua.edu>, on
11/19/2014
   at 11:08 AM, Paul Gilmartin
<000433f07816-dmarc-requ...@listserv.ua.edu> said:

>We have a product which we suggest to install in 3 CSIs: GLOBAL,
>TARGET, DLIB.  Recently a tester has complained that this is
>cumbersome, particularly when cloning zones for testing and 
>requested the next release be coalesced into a single CSI.

>What do others think?

That he needs to get hands-on experience before he is allowed to make
recommendations. But it's not my dog.
 
-- 
 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: What are STC, JOB and TSU?

2014-11-19 Thread Shmuel Metz (Seymour J.)
In <45fcfbbb8bc8eb4a9dfedc6fa2cc7fdf99ac1...@sdkmbx02.emea.sas.com>,
on 11/19/2014
   at 12:23 PM, Lindy Mayfield  said:

>Are there more than these three? 

Yes, e.g., APPC.
 
-- 
 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: How declare in C++ a constant in an assembler module?

2014-11-19 Thread Bernd Oppolzer
I don't like C++ very much, for several reasons, but I am working with C 
(and PL/1)
for more than 20 years now, and IMHO and in my experience C is a 
wonderful language
where I can create large, secure, reliable and effective software 
products ... of course
it has to be well done, as with every other language, too. C is NO TOY 
language.


More arguments below.

Very respectfully, kind regards

Bernd Oppolzer


Am 19.11.2014 13:53, schrieb John Gilmore:

As I have had occasion to note here before, the traditions of C and
its sequelæ interest me chiefly as illustrations of  one or another
pathology.

The PL/I tradition provides better positive guidance.  From the
beginning, with the PL/I F
compiler, such a construction as

declare hashvcs entry(character(*) varying, binary fixed(15,0))
   returns(binary fixed(15,0)) ;
. . .
declare hashin character(*) varying, hashval binary fixed(15,0) ;

hashval = hashvcs(hashin, 1101b) ;

you can do similar function calls in C; I don't see your problem;
you only have to take the call-by-value paradigm into account
and you need to make all your call-by-reference parameters explicit
by passing pointers.

In C, this would look like

hashval = hashvcs (hashin, 0x0d);   /* hex instead of binary */

the function prototype could look like this:

int hashvcs (char *hashin, int hashval);

there are some possible variations; the int parameter and result type 
could be short
(but I would prefer int, because C promotes parameters to int anyway), 
and the char *hashin
could be something more sophisticated, maybe a structure containing a 
length, or the
length could be passed as another parameter. I don't like the convention 
with the
zero byte at the end very much ... but it's just that: a convention ... 
you can define
your function interfaces without using it. You can even emulate PL/1 
varchars, if you

want.

BTW: at the site I am working we are calling all the time C libraries 
from PL/1; we solved
all the problems with different data representation etc., no problem at 
all. The reason for
us to do this: the C part of the application needs to be present on all 
platforms

(insurance math). I believe I told you already.

resulted in the creation of a halfword temporary initialized  to have
the binary value 1101b (decimal 13).  The address of that temporary,
not that of the (internal/converted) value of the literal 1101b, was
then made available to the entry hashvcs, which was free to mutilate
it without non-local effect.

the call-by-value paradigm also doesn't generate non-local effects.
Sometimes for performance reasons parameters which are not meant to be 
changed
by the function are passed by reference (via pointer). In this case, the 
function
specification tells, that the parameter is not changed by the function. 
If it is changed,
this is an error in the function implementation and can (and must) be 
fixed locally.



Today, one can make corresponding distinctions within a function like
hashvcs, as in

hashvcs: procedure(vcs, modulus)
   returns(signed binary fixed(15,0))
   reorder ;

   declare (vcs character(*) varying2,
  modulus signed binary fixed(15,0))
  nonassignable parameter ;

   . . .
   return(hashval) ;

end hashvcs ;

C and its sequelæ are and now seem likely to remain toys.  They have
achieved all of  the portability of assembly language without its
expressive power.

No. With C, it was for example possible for me to write an XML parser that
works on Windows, Linux, other Unixes, OS/2 and z/OS, with the same 
source, without

platform or opsys dependencies. Validating or non-validating, SAX and DOM,
three times faster than XerCes, a storage management on top of standard
ANSI malloc, that outperforms malloc in most cases for many small 
allocations
of storage (and returns all storage to the system at the end of the XML 
processing).


I see no other language which would make this possible.

I have a lot of other tools written in C, all are running on all the 
platforms above from the start.


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: TS3584 and TS1120 encryption

2014-11-19 Thread Pommier, Rex

Hi List, update on the issues I'm having getting tape encryption working.  I 
got past the IGD306I error.  To save somebody else the headaches, I had 
neglected to rescan the tape drives at the controller level in the library 
after enabling encryption in the drives.  Once I got that done I was able to 
make it a bit further.  Now I'm getting an error in the EKM saying I don't have 
a private key, but RACF says the private key is there.


Error message from the ekmserv audit log:

Runtime event:Ý 

  timestamp=Wed Nov 19 22:04:03 GMT 2014

  ComponentId=ÝthreadId=ThreadÝThread-74,5,KeyManagementServerV2-Processors¨¨   

  event source=com.ibm.keymanager.logic.fb  

  outcome=Ýresult=unsuccessful¨ 

  event type=SECURITY_RUNTIME   

  message= ***Error: No private key found for aliases. ErrorCode=0xEE31 

  resource=Ýname= Drive Serial Number: 07868778 WWN: 500507630F1C1503 Key 
Alias/LabelÝ0¨: EKMS Key Alias/LabelÝ1¨: EKMS;type=file¨   <<< not sure if this 
is an error or not, in my prop file, I’m specifying to use RACF 
  action=stop   

Portions of my KeyManagerConfig.properties:

TransportListener.ssl.port = 1443 
config.keystore.password.obfuscated = 82081903242428181B06
TransportListener.tcp.port = 3801 
Admin.ssl.keystore.type = JCERACFKS   
drive.acceptUnknownDrives = true  
TransportListener.ssl.truststore.name = safkeyring://EKMSERV/EKMRING  
TransportListener.ssl.protocols = SSL_TLS 
config.keystore.type = JCERACFKS  
drive.default.alias2 = EKMS   
drive.default.alias1 = EKMS   


SMS is looking for EKMS as well:

CDS Name  . . . : ACTIVE 
Data Class Name : DC3592E
 
Encryption Management
 Key Label 1: EKMS   
 Encoding for Key Label 1 : L
 
 Key Label 2: EKMS   
 Encoding for Key Label 2 : L
 

EKM is looking for EKMS as well:

(EKMSERV) Keystore entries: 1 
(EKMSERV) Keystore type:JCERACFKS 
(EKMSERV) Keystore provider:IBMJCE
(EKMSERV) 
(EKMSERV) EKMS, Thu Nov 13 17:12:24 GMT 2014, trustedCertEntry
(EKMSERV) 

And RACF knows about EKMS:

Label:EKMS   
Certificate ID:2QiJmZmDhZmjgcXS1OJA  
Status:TRUST 
Start Date:2014/10/19 22:59:58   
End Date:  2024/12/30 22:59:57   
Serial Number:00 
Issuer's Name:CN=TAPE.O=SFG.C=US 
Subject's Name:CN=TAPE.O=SFG.C=US
Key Usage:CERTSIGN  
Key Type:RSA
Key Size:1024   
Private Key:YES  <

Re: Batch Msgid Profile

2014-11-19 Thread Shmuel Metz (Seymour J.)
In <6847167582988560.wa.paulgboulderaim@listserv.ua.edu>, on
11/18/2014
   at 07:09 PM, Paul Gilmartin
<000433f07816-dmarc-requ...@listserv.ua.edu> said:

>There's something wrong with this design: an underlying 
>assumption that no user will have two concurrent instances of 
>the TMP, and probably that the TMP will only be used for 
>interactive TSO sessions.

No, there is no such assumption.

Now, you may dislike the concept of a user profile, but that is a
separate issue.
 
-- 
 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: What are STC, JOB and TSU?

2014-11-19 Thread Charles Mills
"Jobs scheduled by the APPC/MVS transaction scheduler (ASCH) start with an
"A" followed by a seven-digit number."

-- System Management Facilities

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Peter Hunkeler
Sent: Wednesday, November 19, 2014 12:52 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: AW: Re: What are STC, JOB and TSU?

> Don't forget ASCH and OMVS. And for 7-digit Ids expect to see eg J1234567.



I have not seen an APPC initiator in action, so I can't remember whether
they will show as Annn or as S but there definitely is no "OMVS"
type of address space in the sense Lindy was asking.  

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


AW: Re: What are STC, JOB and TSU?

2014-11-19 Thread Peter Hunkeler
> Don't forget ASCH and OMVS. And for 7-digit Ids expect to see eg J1234567.


I have not seen an APPC initiator in action, so I can't remember whether they 
will show as Annn or as S but there definitely is no "OMVS" type of 
address space in the sense Lindy was asking.


Each of STC, TSU and JOB can run UNIX work inside, but only fork() and 
non-local spawn() will create "OMVS" type of WLM work units, and they all run 
as STC in BPXAS STC address spaces.


--
Peter Hunkeler

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


Re: SMP/E 1 CSI? 3 CSIs? Other?

2014-11-19 Thread Thomas Conley

On 11/19/2014 2:06 PM, CM Poncelet wrote:

Yes, but allocating 3 CSIs always requires more DASD storage - and
subsequently cloning these 3 CSIs into a single CSI is no problem at all
(with UCLIN/ENDUCL, ZONEEXPORT, "DEL GZONE ZONEINDEX((DZONE/TZONE))",
"ADD GZONE ZONEINDEX((DZONE/TZONE,.GLOBAL.CSI,DLIB/TARGET))",
ZONEDELETE, ZONEIMPORT, DELs, REPs and ADDs etc.) If you are familiar
with setting up and running native SMP/E batch jobs, then use a single
CSI; else do whatever IBM suggests ... to waste DASD and degrade
performance  CP

Thomas Conley wrote:


On 11/19/2014 12:08 PM, Paul Gilmartin wrote:


This is discussed in:

http://www-01.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.gim3000/orgcsi.htm

 Deciding how to organize CSI data sets
 SMP/E for z/OS User's Guide
 SA23-2277-01

We have a product which we suggest to install in 3 CSIs:
GLOBAL, TARGET, DLIB.  Recently a tester has complained
that this is cumbersome, particularly when cloning zones
for testing and requested the next release be coalesced
into a single CSI.

What do others think?  THis is a modest-sized product, there
should be no space constraints on a single CSI.

I have tested, as PoC, never in application, adding another
TARGET/DLIB pair to the structure to allow multiple service
levels from a single GLOBAL zone.  I believe this could as
well be done with a single CSI, given sufficient initial SPACE
allocation.

I've seen discussion here of connecting multiple TARGET
zones to a single DLIB.  That's frightening.  Why do it?
perhaps so a product could be deployed with an additional
APPLY step rather than a separate IEBCOPY job?

Thanks,
gil

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



Gil,

For me, separate VSAM files for each CSI zone is easier from a cloning
standpoint than multiple ZONECOPYs into a single CSI.  Tastes great,
less filling.  You can definitely have multiple target zones for a
DLIB, but you can only RELATE one of them, so I don't see an issue there.

Regards,
Tom Conley

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




When cloning my SMP/E environment, it's easier and faster for me to 
DFDSS copy the separate target zone I'm cloning to.  Using SMP/E 
ZONECOPY is slower and more confusing, but that's me.  I'll trade DASD 
for speed and ease of use.


Regards,
Tom Conley

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


Re: SMP/E 1 CSI? 3 CSIs? Other?

2014-11-19 Thread CM Poncelet
Yes, but allocating 3 CSIs always requires more DASD storage - and 
subsequently cloning these 3 CSIs into a single CSI is no problem at all 
(with UCLIN/ENDUCL, ZONEEXPORT, "DEL GZONE ZONEINDEX((DZONE/TZONE))", 
"ADD GZONE ZONEINDEX((DZONE/TZONE,.GLOBAL.CSI,DLIB/TARGET))", 
ZONEDELETE, ZONEIMPORT, DELs, REPs and ADDs etc.) If you are familiar 
with setting up and running native SMP/E batch jobs, then use a single 
CSI; else do whatever IBM suggests ... to waste DASD and degrade 
performance  CP


Thomas Conley wrote:


On 11/19/2014 12:08 PM, Paul Gilmartin wrote:


This is discussed in:

 
http://www-01.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.gim3000/orgcsi.htm 


 Deciding how to organize CSI data sets
 SMP/E for z/OS User's Guide
 SA23-2277-01

We have a product which we suggest to install in 3 CSIs:
GLOBAL, TARGET, DLIB.  Recently a tester has complained
that this is cumbersome, particularly when cloning zones
for testing and requested the next release be coalesced
into a single CSI.

What do others think?  THis is a modest-sized product, there
should be no space constraints on a single CSI.

I have tested, as PoC, never in application, adding another
TARGET/DLIB pair to the structure to allow multiple service
levels from a single GLOBAL zone.  I believe this could as
well be done with a single CSI, given sufficient initial SPACE
allocation.

I've seen discussion here of connecting multiple TARGET
zones to a single DLIB.  That's frightening.  Why do it?
perhaps so a product could be deployed with an additional
APPLY step rather than a separate IEBCOPY job?

Thanks,
gil

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



Gil,

For me, separate VSAM files for each CSI zone is easier from a cloning 
standpoint than multiple ZONECOPYs into a single CSI.  Tastes great, 
less filling.  You can definitely have multiple target zones for a 
DLIB, but you can only RELATE one of them, so I don't see an issue there.


Regards,
Tom Conley

--
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: Page Data Set Sizes and Volume Types

2014-11-19 Thread Mike Schwab
http://pic.dhe.ibm.com/infocenter/zos/v1r13/index.jsp?topic=%2Fcom.ibm.zos.r13.ieae100%2Fpagdss.htm
> A 3390 device with 65,520 cylinders contains 11,793,600 slots.

That is 180 4KB slots or 720KB per cylinder.
Page data sets cannot extend past Cylinder 65520 or onto another volume.

> Local page data sets. The local page data sets must be large enough to hold 
> the private area and VIO pages that cannot be contained in real storage.

So the base pagespace needs to be 1X your core.  If you want to take a
stand alone dump, it will need to duplicate your core and your base
pagespace, so you are up to 3X your core.  Then monitor your actual
slots in use, and expand your pagespace if utilization is above 30%.

On Wed, Nov 19, 2014 at 11:15 AM, John Eells  wrote:
> stars...@mindspring.com (Lizette Koehler) wrote:
>>
>> I have been reviewing various documents on how to size the Page Data Sets.
>>
>> I was wondering if there are any guidelines on what can be used today.
>> This
>> should be kept to z/OS V1.12, 1.13 and 2.1 which I think will be the more
>> dominant operating systems in use right now.
>>
>> I know that the number of Slots will drive what I allocate. So I am
>> looking
>> for the following information.  I have not done this in many years so I am
>> very rusty.
>>
>> 1) How to calculate the number of slots per page datasets
>> a)  I need to base this on 3390 Mod 3/9/27/54
>
>
> See the Init & Tuning Guide, starting with 2.2, Page data set sizes.
>
>> 2) What do I need to stay away from when determining where the page
>> datasets
>> go
>> a) For example, if I use a Mod27 and I need to place multiple page
>> datasets on the volume
>> Should they all be for the same LPAR if in a PLEX
>> Should they all be for unique LPARs if in a Plex
>
>
> Some of this can be found in topic: 2.6, Performance recommendations, but it
> could probably stand some updates to account for things like DCM, HyperPAV,
> and the number of concurrent connections supported by modern disk control
> units.  Please submit an RCF for things you think should be there, and are
> not.
>
>> 3) What are the maximum values I can create a page dataset?
>> Can I use a whole Mod3/9/27/54 for ONE page dataset?
>
>
> Access Method Services, under DEFINE PAGESPACE, says: The maximum number of
> paging slots for each page space is 16M.
>
> 
>
> Hope this gets you started...
>
> --
> John Eells
> z/OS Technical Marketing
> IBM Poughkeepsie
> ee...@us.ibm.com
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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


Re: New LPAR and FTPD & IND$FILE is saying any file we want is used exclusively by someone else

2014-11-19 Thread Mark Regan
Duh, just realized that I was actually FTPing between two LPARS within the same 
plex. So of course you can not use the same DSN name for the source and 
destination. Now between PDS libs of the same name you can as long as the 
member names are different.
Since this new LPAR is a KLPAR, we don't share its volumes with the other LPARs 
in the same plex. But since the data set names are the same, just on different 
volume names, that does get noticed at the plex level. Thanks,
 
Mark Regan, USNR-Ret, 1969-1991
<><
  From: Mark Regan <006f01c0dca1-dmarc-requ...@listserv.ua.edu>
 To: IBM-MAIN@LISTSERV.UA.EDU 
 Sent: Wednesday, November 19, 2014 8:17 AM
 Subject: Re: New LPAR and FTPD & IND$FILE is saying any file we want is used 
exclusively by someone else
   
Disregard, one of our z/OS techs job it fixed. Thanks,
 
Mark Regan, USNR-Ret, 1969-1991
<><
      From: Mark Regan <006f01c0dca1-dmarc-requ...@listserv.ua.edu>
 To: IBM-MAIN@LISTSERV.UA.EDU 
 Sent: Tuesday, November 18, 2014 6:49 PM
 Subject: Fw: New LPAR and FTPD & IND$FILE is saying any file we want is used 
exclusively by someone else
  
Cross posted to IBM-MAIN and IBMTCP-L
As it says, whenever we try to PUT a file to this new LPAR via FTPD, the FTP 
server always says it is "used exclusively by someone else". We've try many 
different DSNs, but end up with the same results.
A 'D GRS,RES=(SYSDSN,dataset) shows that the DSNs are in SHARE status. Example:





-RO IKN1,D GRS,RES=(SYSDSN,SYS1.KLPAR.CMDPROC) 
 ISG343I 16.46.47 GRS STATUS 287 
 S=SYSTEMS SYSDSN SYS1.KLPAR.CMDPROC 
 SYSNAME JOBNAME ASID TCBADDR EXC/SHR STATUS
 IKN1 PJC034 0045 00BFF6F8 SHARE OWN 
 IKN1 REGANM 0046 00BFF6F8 SHARE OWN 
 ITE1 T340226 007D 009FF6F8 SHARE OWN  This system is called IKN1, while ITE1 
is a different LPAR in the plex, but not a part of the MAS.
Note, we also tried TSO's IND$FILE and get the same results, so it's something 
common to both methods of file transfer.

Thanks,
 
Mark Regan, USNR-Ret, 1969-1991
<><


--
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: Batch Msgid Profile

2014-11-19 Thread Tony Harminc
On 19 November 2014 12:18, Paul Gilmartin
<000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
> And if two batch IKJ jobs run concurrently, the final state is
> indeterminate, even if they attempt to restore the settings.

Why do you claim that?

> There ought to be distinct commands to set such options for
> the current session and to write them back to the RACF/UADS
> data base.

Well, in a sense there are distinct commands - PROFILE and LOGOFF. The
PROFILE command updates the settings in an in-storage control block
(the User Profile Table, mapped by IKJUPT), and it's the logoff
processing in the TMP triggered by the LOGOFF command that writes the
UPT back to the security system (or UADS). The in-storage UPT is local
to each TSO session (address space), so the settings won't conflict.
If each session restores everything to the way it was before logoff,
there should be no problem.

Well of course this looks like a bad design, but it doesn't normally
have unpredictable results.

> Clearly the TSO designers were ignorant of the requirements of 
> multiprocessing.

Multiprogramming? No matter; the notion of running batch TSO jobs, and
for that matter of running multiple TSO sessions under the same userid
under any circumstances, long postdates TSO itself (there was no
batch-job TSO prior to MVS). It's hardly fair to fault the designers
of a Time Sharing Option that had at its core the notion of a single
user at an attached terminal for not anticipating these requirements,
certainly when there are so many other details to fault them for...

Tony H.

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


Re: Batch Msgid Profile

2014-11-19 Thread Paul Gilmartin
On Wed, 19 Nov 2014 11:41:33 -0600, John McKown wrote:
>
>​... And IBM has now basically said that
>TSO, but not ISPF or SDSF thankfully, is functionally ​stabilized. Which is
>one reason why I have embraced using a z/OS UNIX shell so much. I _really_
>wish that ISPF could be "ported" to run as a CUA (using curses?) and / or a
>X application on z/OS, likewise SDSF. What is particularly devastating to
>me is that until just a few years ago, SDSF came with source code. I
>remember looking at the terminal I/O code (native vs. ISPF). If I still had
>it, I could probably fake up a curses interface.
> 
Me, too.

How much of your SDSF wish could be satisfied by the Rexx (or other)
API to SDSF driving Curses or X?  As long as SDSF thinks in terms of
screen images, it will never deal with SIGWINCH satisfactorily.

And I wish for finer granularity of TSO functions.  I've often wished
I could do a TRANSMIT or RECEIVE without bringing up a TMP.
BPXWDYN is a boon, allowing (however belatedly) ready access to
DYNALLOC outside the TMP.  Similar independent access to IDCAMS
functions fronted by TSO would be valuable.

I do run ISPF noninteractively from Rexx "address TSO" largely to
use ISPF fine-grained PDS member serialization and to invoke
APF-authorized commands from ssh.  It would be better to have
an interface layer to BPX1EXM to support allocation of data sets.
What can you do with an authorized program with no data sets?

-- gil

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


Re: Batch Msgid Profile

2014-11-19 Thread John McKown
On Wed, Nov 19, 2014 at 11:18 AM, Paul Gilmartin <
000433f07816-dmarc-requ...@listserv.ua.edu> wrote:

> On Wed, 19 Nov 2014 09:58:57 -0700, Lizette Koehler wrote:
> >
> >If you create a REXX or CLIST to do your batch work, then you can test
> the prof to see if MSGID and/or WTPMSG are on or off.  Then set them as you
> need them.
> >
> >Any Application that run under TSO or ISPF can reset these entries.  And
> sometimes they do not set them back.  This is strictly a TSO function.  But
> some ISPF applications will tweak the TSO PROF function.
> >
> And if two batch IKJ jobs run concurrently, the final state is
> indeterminate, even if they attempt to restore the settings.
> There ought to be distinct commands to set such options for
> the current session and to write them back to the RACF/UADS
> data base.  Clearly the TSO designers were ignorant of the
> requirements of multiprocessing.
>

​I don't think so. What the designers of TSO were was constrained by OS/360
memory, I/O, and CPU concerns. They also "wanted it now" and so problems
such as this were not addressed. I don't even know if IKJEFT01 was every
really meant to be run in a batch job. And IBM has now basically said that
TSO, but not ISPF or SDSF thankfully, is functionally ​stabilized. Which is
one reason why I have embraced using a z/OS UNIX shell so much. I _really_
wish that ISPF could be "ported" to run as a CUA (using curses?) and / or a
X application on z/OS, likewise SDSF. What is particularly devastating to
me is that until just a few years ago, SDSF came with source code. I
remember looking at the terminal I/O code (native vs. ISPF). If I still had
it, I could probably fake up a curses interface.



>
> -- gil
>
>

-- 
The temperature of the aqueous content of an unremittingly ogled
culinary vessel will not achieve 100 degrees on the Celsius scale.

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: SMP/E 1 CSI? 3 CSIs? Other?

2014-11-19 Thread Thomas Conley

On 11/19/2014 12:08 PM, Paul Gilmartin wrote:

This is discussed in:

 
http://www-01.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.gim3000/orgcsi.htm
 Deciding how to organize CSI data sets
 SMP/E for z/OS User's Guide
 SA23-2277-01

We have a product which we suggest to install in 3 CSIs:
GLOBAL, TARGET, DLIB.  Recently a tester has complained
that this is cumbersome, particularly when cloning zones
for testing and requested the next release be coalesced
into a single CSI.

What do others think?  THis is a modest-sized product, there
should be no space constraints on a single CSI.

I have tested, as PoC, never in application, adding another
TARGET/DLIB pair to the structure to allow multiple service
levels from a single GLOBAL zone.  I believe this could as
well be done with a single CSI, given sufficient initial SPACE
allocation.

I've seen discussion here of connecting multiple TARGET
zones to a single DLIB.  That's frightening.  Why do it?
perhaps so a product could be deployed with an additional
APPLY step rather than a separate IEBCOPY job?

Thanks,
gil

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



Gil,

For me, separate VSAM files for each CSI zone is easier from a cloning 
standpoint than multiple ZONECOPYs into a single CSI.  Tastes great, 
less filling.  You can definitely have multiple target zones for a DLIB, 
but you can only RELATE one of them, so I don't see an issue there.


Regards,
Tom Conley

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


Re: Page Data Set Sizes and Volume Types

2014-11-19 Thread Thomas Conley

On 11/19/2014 10:41 AM, Lizette Koehler wrote:

I have been reviewing various documents on how to size the Page Data Sets.

I was wondering if there are any guidelines on what can be used today.  This
should be kept to z/OS V1.12, 1.13 and 2.1 which I think will be the more
dominant operating systems in use right now.

I know that the number of Slots will drive what I allocate. So I am looking
for the following information.  I have not done this in many years so I am
very rusty.

1) How to calculate the number of slots per page datasets
a)  I need to base this on 3390 Mod 3/9/27/54
2) What do I need to stay away from when determining where the page datasets
go
a) For example, if I use a Mod27 and I need to place multiple page
datasets on the volume
Should they all be for the same LPAR if in a PLEX
Should they all be for unique LPARs if in a Plex
3) What are the maximum values I can create a page dataset?
Can I use a whole Mod3/9/27/54 for ONE page dataset?

I have looked through Hot Flashes (Cheryl Watson) and MXG sourclib.  I have
run through some of the Redbooks and share presentations.

I am now looking for real life thoughts.  I also thought this would be a
good topic for the archives.

Thanks for any information

Lizette

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



My old ROT was 2-3x the real memory on the LPAR.  Now that we can have 
16, 32, 64GB partitions, we're talking some real DASD here.


Regards,
Tom Conley

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


Re: Fw: New LPAR and FTPD & IND$FILE is saying any file we want is used exclusively by someone else

2014-11-19 Thread Mark Regan
We don't have MIM, got rid of it. Anyway, no one is browsing the PDS member in 
question. I can add a member to a PDS via FTP, just not replace an existing 
member. It works when PUTing to the same PDS name, but to a different LPAR in 
the same Sysplex.
 Thanks,
 
Mark Regan, USNR-Ret, 1969-1991
<><
  From: Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu>
 To: IBM-MAIN@LISTSERV.UA.EDU 
 Sent: Tuesday, November 18, 2014 8:01 PM
 Subject: Re: Fw: New LPAR and FTPD & IND$FILE is saying any file we want is 
used exclusively by someone else
   
On Tue, 18 Nov 2014 23:49:12 +, Mark Regan wrote:

>Cross posted to IBM-MAIN and IBMTCP-L
>As it says, whenever we try to PUT a file to this new LPAR via FTPD, the FTP 
>server always says it is "used exclusively by someone else". We've try many 
>different DSNs, but end up with the same results.
>A 'D GRS,RES=(SYSDSN,dataset) shows that the DSNs are in SHARE status. Example:
>
If while I browse a data set and attempt to overwrite it with FTP, I get:

ftp> put GIMFAF.XML temp.test.dataset
200 Port request OK.
125-FTP Server unable to obtain EXCLUSIVE use of user.TEMP.TEST.DATASET which 
is held by: 0063 user    SHR  on SYSDSN
125 Data set user.TEMP.TEST.DATASET is not available
450 Data set user.TEMP.TEST.DATASET is allocated to another job and is 
unavailable for STOR command.
ftp> quit

MIM messages when I exit Browse say:

MIM1098I Contention with user needs EXCL on LSTC3MVS CN(INTERNAL)
MIM1099I user holds SYSDSN user.TEMP.TEST.DATASET SHR CN(INTERNAL)
***

Does this agree with what you see?  It won't overwrite while there's
a SHR ENQ.

>#yiv8320154862 body {margin:0 0 0 0;padding:0 0 0 0;}#yiv8320154862 td, 
>#yiv8320154862 div 
>{font-family:Consolas;font-size:10pt;vertical-align:top;}#yiv8320154862 
>#yiv8320154862 body {margin:0 0 0 0;padding:0 0 0 
>0;overflow:hidden;}#yiv8320154862 .yiv8320154862transcript 
>{background-color:#d2d2d2;}#yiv8320154862 .yiv8320154862messageBlock 
>{padding-left:10px;padding-right:10px;margin-bottom:3px;}#yiv8320154862 
>.yiv8320154862message 
>{padding-left:20px;margin-left:95px;word-wrap:break-word;white-space:pre-
>
Curse you, LISTSERV!

-- 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: Batch Msgid Profile

2014-11-19 Thread Paul Gilmartin
On Wed, 19 Nov 2014 09:58:57 -0700, Lizette Koehler wrote:
>
>If you create a REXX or CLIST to do your batch work, then you can test the 
>prof to see if MSGID and/or WTPMSG are on or off.  Then set them as you need 
>them.
>
>Any Application that run under TSO or ISPF can reset these entries.  And 
>sometimes they do not set them back.  This is strictly a TSO function.  But 
>some ISPF applications will tweak the TSO PROF function.
> 
And if two batch IKJ jobs run concurrently, the final state is
indeterminate, even if they attempt to restore the settings.
There ought to be distinct commands to set such options for
the current session and to write them back to the RACF/UADS
data base.  Clearly the TSO designers were ignorant of the
requirements of multiprocessing.

-- gil

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


Re: Page Data Set Sizes and Volume Types

2014-11-19 Thread John Eells

stars...@mindspring.com (Lizette Koehler) wrote:

I have been reviewing various documents on how to size the Page Data Sets.

I was wondering if there are any guidelines on what can be used today.  This
should be kept to z/OS V1.12, 1.13 and 2.1 which I think will be the more
dominant operating systems in use right now.

I know that the number of Slots will drive what I allocate. So I am looking
for the following information.  I have not done this in many years so I am
very rusty.

1) How to calculate the number of slots per page datasets
a)  I need to base this on 3390 Mod 3/9/27/54


See the Init & Tuning Guide, starting with 2.2, Page data set sizes.


2) What do I need to stay away from when determining where the page datasets
go
a) For example, if I use a Mod27 and I need to place multiple page
datasets on the volume
Should they all be for the same LPAR if in a PLEX
Should they all be for unique LPARs if in a Plex


Some of this can be found in topic: 2.6, Performance recommendations, 
but it could probably stand some updates to account for things like DCM, 
HyperPAV, and the number of concurrent connections supported by modern 
disk control units.  Please submit an RCF for things you think should be 
there, and are not.



3) What are the maximum values I can create a page dataset?
Can I use a whole Mod3/9/27/54 for ONE page dataset?


Access Method Services, under DEFINE PAGESPACE, says: The maximum number 
of paging slots for each page space is 16M.




Hope this gets you started...

--
John Eells
z/OS Technical Marketing
IBM Poughkeepsie
ee...@us.ibm.com

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


SMP/E 1 CSI? 3 CSIs? Other?

2014-11-19 Thread Paul Gilmartin
This is discussed in:


http://www-01.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.gim3000/orgcsi.htm
Deciding how to organize CSI data sets
SMP/E for z/OS User's Guide
SA23-2277-01 

We have a product which we suggest to install in 3 CSIs:
GLOBAL, TARGET, DLIB.  Recently a tester has complained
that this is cumbersome, particularly when cloning zones
for testing and requested the next release be coalesced
into a single CSI.

What do others think?  THis is a modest-sized product, there
should be no space constraints on a single CSI.

I have tested, as PoC, never in application, adding another
TARGET/DLIB pair to the structure to allow multiple service
levels from a single GLOBAL zone.  I believe this could as
well be done with a single CSI, given sufficient initial SPACE
allocation.

I've seen discussion here of connecting multiple TARGET
zones to a single DLIB.  That's frightening.  Why do it?
perhaps so a product could be deployed with an additional
APPLY step rather than a separate IEBCOPY job? 

Thanks,
gil

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


Re: Batch Msgid Profile

2014-11-19 Thread Lizette Koehler
There are a couple of other Lists that you might also like to join, if you have 
not done so, that might have some answers

TSO REXXhttp://www2.marist.edu/htbin/wlvindex?TSO-REXX
ISPFhttps://listserv.nd.edu/cgi-bin/wa?A0=ispf-l

I am not sure but I think this info maybe contained inside the SAF TSO Segment. 
 But that is just a guess.

If you create a REXX or CLIST to do your batch work, then you can test the prof 
to see if MSGID and/or WTPMSG are on or off.  Then set them as you need them.

Any Application that run under TSO or ISPF can reset these entries.  And 
sometimes they do not set them back.  This is strictly a TSO function.  But 
some ISPF applications will tweak the TSO PROF function.

I find it simpler to just add it to my SYSTSIN process.

Lizette


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Murawski,Joseph
> Sent: Wednesday, November 19, 2014 9:48 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Batch Msgid Profile
> 
> Is there a Default table or exit that is/can be set for all batch submits, so 
> it would
> work without entering the 'PROF MSGID WTPMSG'?
> 
> Thanks, Joe
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Lizette Koehler
> Sent: Tuesday, November 18, 2014 6:51 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Batch Msgid Profile
> 
> The PROFILE you are looking for is the TSO PROF command.  Anything you use
> for TSO can turn this on or off.  The easiest thing is to just make it part 
> of the job.
> 
> In the SYSTSIN DD *  section, add this
> 
> 
> //SYSTSIN  DD *
>   PROF MSGID WTPMSG
>   FCQUERY 
> 
> Hope this helps.
> 
> Lizette
> 
> 
> -Original Message-
> >From: "Murawski,Joseph" 
> >Sent: Nov 18, 2014 3:41 PM
> >To: IBM-MAIN@LISTSERV.UA.EDU
> >Subject: Batch Msgid Profile
> >
> >When I submit a job and do a 'fcquery devn()' or any command using
> >IKJEFT01 it does not show the msgid in the output(sysout).
> >But when I do the 'Profile MSGID' and then resubmit the job it will
> >show the msgid in the sysout.
> >I was wondering were is the default changed to update this for all batch 
> >submits?
> >
> >Thanks Joe
> >
> >

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


Re: Batch Msgid Profile

2014-11-19 Thread Murawski,Joseph
Is there a Default table or exit that is/can be set for all batch submits, so
it would work without entering the 'PROF MSGID WTPMSG'?

Thanks, Joe

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Lizette Koehler
Sent: Tuesday, November 18, 2014 6:51 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Batch Msgid Profile

The PROFILE you are looking for is the TSO PROF command.  Anything you use for 
TSO can turn this on or off.  The easiest thing is to just make it part of the 
job.

In the SYSTSIN DD *  section, add this


//SYSTSIN  DD *
  PROF MSGID WTPMSG
  FCQUERY 

Hope this helps.

Lizette


-Original Message-
>From: "Murawski,Joseph" 
>Sent: Nov 18, 2014 3:41 PM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Batch Msgid Profile
>
>When I submit a job and do a 'fcquery devn()' or any command using
>IKJEFT01 it does not show the msgid in the output(sysout).
>But when I do the 'Profile MSGID' and then resubmit the job it will
>show the msgid in the sysout.
>I was wondering were is the default changed to update this for all batch 
>submits?
>
>Thanks Joe
>
>

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

This communication, including attachments, is confidential, may be subject to 
legal privileges, and is intended for the sole use of the addressee. Any use, 
duplication, disclosure or dissemination of this communication, other than by 
the addressee, is prohibited. If you have received this communication in error, 
please notify the sender immediately and delete or destroy this communication 
and all copies.

TRVDiscDefault::1201

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


Re: Page Data Set Sizes and Volume Types

2014-11-19 Thread Jousma, David
I should have added that sizing was a SWAG.   Went from 4 mod-9 (8 local page) 
to 3 mod-27's(6 local page).   About 2.5 times more slots.

_
Dave Jousma
Assistant Vice President, Mainframe Engineering
david.jou...@53.com
1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H
p 616.653.8429
f 616.653.2717



-Original Message-
From: Jousma, David 
Sent: Wednesday, November 19, 2014 11:22 AM
To: 'IBM Mainframe Discussion List'
Subject: RE: Page Data Set Sizes and Volume Types

Good luck.  I asked this question about 6 months ago.  Got many different 
responses, not many general rules-of-thumb it seems.  I ended up with 3 
mod-27's per lpar, with two local page datasets on each volume.  Seems to be 
working ok.   I do not share same volume with multiple lpars.

IEE200I 11.16.56 DISPLAY ASM 809
 TYPE FULL STAT   DEV  DATASET NAME  
 LOCAL 10%   OK  7312  PAGE.SYS1.LOCAL1  
 
 VOLSER  DEVTYPSIZEUSED   AVAIL  ERRORS  
 PAGS11  3390P2,702,879 292,178   2,410,701   0  


 PAGE.SYS1.LOCAL1   *VSAM*
VS
  CATALOG.VREZ138 
--
 PAGE.SYS1.LOCAL1.DATA  PAGS11
  225240   ? 1 3390 VS   ? ? ? 2014/04/24 2014/04/24  
  CATALOG.VREZ138 
_
Dave Jousma
Assistant Vice President, Mainframe Engineering david.jou...@53.com
1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H p 616.653.8429 f 616.653.2717


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Lizette Koehler
Sent: Wednesday, November 19, 2014 10:42 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Page Data Set Sizes and Volume Types

I have been reviewing various documents on how to size the Page Data Sets.

I was wondering if there are any guidelines on what can be used today.  This 
should be kept to z/OS V1.12, 1.13 and 2.1 which I think will be the more 
dominant operating systems in use right now.

I know that the number of Slots will drive what I allocate. So I am looking for 
the following information.  I have not done this in many years so I am very 
rusty.

1) How to calculate the number of slots per page datasets
a)  I need to base this on 3390 Mod 3/9/27/54
2) What do I need to stay away from when determining where the page datasets go
a) For example, if I use a Mod27 and I need to place multiple page 
datasets on the volume
Should they all be for the same LPAR if in a PLEX
Should they all be for unique LPARs if in a Plex
3) What are the maximum values I can create a page dataset?
Can I use a whole Mod3/9/27/54 for ONE page dataset?

I have looked through Hot Flashes (Cheryl Watson) and MXG sourclib.  I have run 
through some of the Redbooks and share presentations.

I am now looking for real life thoughts.  I also thought this would be a good 
topic for the archives.

Thanks for any information

Lizette

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

This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.

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


Re: Page Data Set Sizes and Volume Types

2014-11-19 Thread Jousma, David
Good luck.  I asked this question about 6 months ago.  Got many different 
responses, not many general rules-of-thumb it seems.  I ended up with 3 
mod-27's per lpar, with two local page datasets on each volume.  Seems to be 
working ok.   I do not share same volume with multiple lpars.

IEE200I 11.16.56 DISPLAY ASM 809
 TYPE FULL STAT   DEV  DATASET NAME  
 LOCAL 10%   OK  7312  PAGE.SYS1.LOCAL1  
 
 VOLSER  DEVTYPSIZEUSED   AVAIL  ERRORS  
 PAGS11  3390P2,702,879 292,178   2,410,701   0  


 PAGE.SYS1.LOCAL1   *VSAM*
VS
  CATALOG.VREZ138 
--
 PAGE.SYS1.LOCAL1.DATA  PAGS11
  225240   ? 1 3390 VS   ? ? ? 2014/04/24 2014/04/24  
  CATALOG.VREZ138 
_
Dave Jousma
Assistant Vice President, Mainframe Engineering
david.jou...@53.com
1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H
p 616.653.8429
f 616.653.2717


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Lizette Koehler
Sent: Wednesday, November 19, 2014 10:42 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Page Data Set Sizes and Volume Types

I have been reviewing various documents on how to size the Page Data Sets.

I was wondering if there are any guidelines on what can be used today.  This 
should be kept to z/OS V1.12, 1.13 and 2.1 which I think will be the more 
dominant operating systems in use right now.

I know that the number of Slots will drive what I allocate. So I am looking for 
the following information.  I have not done this in many years so I am very 
rusty.

1) How to calculate the number of slots per page datasets
a)  I need to base this on 3390 Mod 3/9/27/54
2) What do I need to stay away from when determining where the page datasets go
a) For example, if I use a Mod27 and I need to place multiple page 
datasets on the volume
Should they all be for the same LPAR if in a PLEX
Should they all be for unique LPARs if in a Plex
3) What are the maximum values I can create a page dataset?
Can I use a whole Mod3/9/27/54 for ONE page dataset?

I have looked through Hot Flashes (Cheryl Watson) and MXG sourclib.  I have run 
through some of the Redbooks and share presentations.

I am now looking for real life thoughts.  I also thought this would be a good 
topic for the archives.

Thanks for any information

Lizette

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

This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.

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


Re: Page Data Set Sizes and Volume Types

2014-11-19 Thread Barry Merrill
MXG Dataset TYPE75 contains these slot statistics for
each paging dataset for each RMF interval:

  AVGUSED ='AVERAGE*SLOTS*USED'
  MAXUSED ='MAXIMUM*SLOTS*USED'
  MINUSED ='MINIMUM*SLOTS*USED'
  SLOTS   ='NUMBER*OF SLOTS*DEFINED'
  UNUSLOTS='UNUSABLE*SLOTS'


Barry Merrill


Herbert W. "Barry" Merrill, PhD
President-Programmer
MXG Software
Merrill Consultants
10717 Cromwell Drive
Dallas, TX 75229
ba...@mxg.com

http://www.mxg.com - FAQ has Most Answers 
ad...@mxg.com  - invoices/PO/Payment
supp...@mxg.com- technical
tel: 214 351 1966  - expect slow reply, use email 
fax: 214 350 3694  - prefer email, still works


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Lizette Koehler
Sent: Wednesday, November 19, 2014 9:42 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Page Data Set Sizes and Volume Types

I have been reviewing various documents on how to size the Page Data Sets.

I was wondering if there are any guidelines on what can be used today.  This 
should be kept to z/OS V1.12, 1.13 and 2.1 which I think will be the more 
dominant operating systems in use right now.

I know that the number of Slots will drive what I allocate. So I am looking for 
the following information.  I have not done this in many years so I am very 
rusty.

1) How to calculate the number of slots per page datasets
a)  I need to base this on 3390 Mod 3/9/27/54
2) What do I need to stay away from when determining where the page datasets go
a) For example, if I use a Mod27 and I need to place multiple page 
datasets on the volume
Should they all be for the same LPAR if in a PLEX
Should they all be for unique LPARs if in a Plex
3) What are the maximum values I can create a page dataset?
Can I use a whole Mod3/9/27/54 for ONE page dataset?

I have looked through Hot Flashes (Cheryl Watson) and MXG sourclib.  I have run 
through some of the Redbooks and share presentations.

I am now looking for real life thoughts.  I also thought this would be a good 
topic for the archives.

Thanks for any information

Lizette

--
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: HSM ML2 on disk

2014-11-19 Thread Glenn Wilcock
Hi,

The HSM ML2 Disk support is very basic with no plans to enhance it.  For 
clients who don't want physical tape anymore (for whatever reason), they 
generally select either a disk-only VTS ML2 or implement all ML1.  If you go 
all ML1, I would recommend implementing ML1 Overflow volumes to help ensure 
that you have space for larger data sets.  For ML1 Overflow volumes, the 
selection algorithm selects the volume with the least amount of freespace that 
will contain the data set, in order to maximize the most amount of freespace on 
the volumes.  (Standard ML1 selection chooses the volume with the most 
freespace which results in volumes getting filled evenly but not leaving any 
volume with a significant amount of freespace for larger data sets).

Evey client that I have talked to that has implemented a large disk-cache VTS 
is very pleased with the HSM improvements.  For large customers and those who 
need to minimize storage costs, the VTS also has backend physical tape.

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


Page Data Set Sizes and Volume Types

2014-11-19 Thread Lizette Koehler
I have been reviewing various documents on how to size the Page Data Sets.

I was wondering if there are any guidelines on what can be used today.  This
should be kept to z/OS V1.12, 1.13 and 2.1 which I think will be the more
dominant operating systems in use right now.

I know that the number of Slots will drive what I allocate. So I am looking
for the following information.  I have not done this in many years so I am
very rusty.

1) How to calculate the number of slots per page datasets
a)  I need to base this on 3390 Mod 3/9/27/54
2) What do I need to stay away from when determining where the page datasets
go
a) For example, if I use a Mod27 and I need to place multiple page
datasets on the volume
Should they all be for the same LPAR if in a PLEX
Should they all be for unique LPARs if in a Plex
3) What are the maximum values I can create a page dataset?
Can I use a whole Mod3/9/27/54 for ONE page dataset?

I have looked through Hot Flashes (Cheryl Watson) and MXG sourclib.  I have
run through some of the Redbooks and share presentations.

I am now looking for real life thoughts.  I also thought this would be a
good topic for the archives.

Thanks for any information

Lizette

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


Re: PKI Services for z/OS

2014-11-19 Thread Dazzo, Matt
Thanks Ken

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Ken Smith
Sent: Monday, November 17, 2014 5:01 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: PKI Services for z/OS

PKI
"allows you to establish a PKI infrastructure and serve as a *certificate
authority* for your internal and external users, *issuing and administering
digital certificates* in accordance with your own organization’s policies.
Your users can use a PKI Services application to request and obtain
certificates through their own Web browsers, while your authorized PKI
administrators approve, modify, or reject these requests through their own
Web browsers."

http://www-03.ibm.com/systems/z/os/zos/features/pki/

ISKLM

delivers keys to Disk and Tape devices for encryption / decryption.  No
other purpose I know of.

I run ISKLM for tape encryption.  Have not used PKI.

Ken

On Mon, Nov 17, 2014 at 10:41 AM, Dazzo, Matt  wrote:

> Does anyone know what the difference is between IBM(r) Security Key
> Lifecycle Manager for z/OS and the free PKI Services for z/OS?
>
> Thanks Matt
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Donald J.
> Sent: Friday, October 31, 2014 8:11 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: PKI Services for z/OS
>
> LDAP would be required if you want to check
> for revoked certificates from PAGENT or CICS.
> LDAP could be somewhere besides z/os though.
>
> --
>   Donald J.
>   dona...@4email.net
>
> On Thu, Oct 30, 2014, at 12:18 PM, Dazzo, Matt wrote:
> > We are starting to look at certificate management, I was wondering how
> many folks were using PKI Services for z/OS?
> > 1. How is the install of PKI and setup to do, I read that LDAP is
> required how is that to install?
>
>
> --
> http://www.fastmail.fm - One of many happy users:
>   http://www.fastmail.fm/help/overview_quotes.html
>
> --
> 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: What are STC, JOB and TSU?

2014-11-19 Thread Barry Merrill
And SUBSYS helps; this is the MXG Software logic to define the TYPETASK
and extract the JESNR from the JCTJOBID and SUBSYS fields
in the job-related SMF records.


 /* COPYRIGHT (C) 2002,2013 MERRILL CONSULTANTS, DALLAS, TEXAS, USA */
 /* LAST UPDATED: JUN  4, 2013.  CHANGE 31.106. */
 /* THIS ROUTINE EXPECTS JCTJOBID AND JOB AS 8-BYTE CHARACTERS, */
 /* AND SUBSYS AS A 4-BYTE CHARACTER AS INPUT.  */

 /* IT CREATES THE 4-BYTE CHARACTER TYPETASK AND NUMERIC JESNR  */
 /* VARIABLES TYPETASK AND JESNR NEED TO BE LABELED IN INVOKER. */

 TYPETASK='';
 JESNR=.;
 IF SUBSYS=''  THEN SUBSYS=''; /*EARLY ASIDS,TMNT */
 IF JCTJOBID=JOB OR (JCTJOBID LE ' ' AND SUBSYS='STC') THEN DO;
   JESNR=.;
   TYPETASK='STC';
 END;
 ELSE DO;
   IF INPUT(SUBSTR(JCTJOBID,2,7),?? 7.) GT . THEN DO;
 JESNR=INPUT(SUBSTR(JCTJOBID,2,7),?? 7.);
 TYPETASK=SUBSTR(JCTJOBID,1,1);
   END;
   ELSE IF INPUT(SUBSTR(JCTJOBID,3,6),?? 6.) GT . THEN DO;
 JESNR=INPUT(SUBSTR(JCTJOBID,3,6),?? 6.);
 TYPETASK=SUBSTR(JCTJOBID,1,2);
   END;
   ELSE IF INPUT(SUBSTR(JCTJOBID,4,5),?? 5.) GT . THEN DO;
 JESNR=INPUT(SUBSTR(JCTJOBID,4,5),?? 5.);
 TYPETASK=SUBSTR(JCTJOBID,1,3);
   END;
   ELSE IF INPUT(SUBSTR(JCTJOBID,5,4),?? 4.) GT . THEN DO;
 JESNR=INPUT(SUBSTR(JCTJOBID,5,4),?? 4.);
 TYPETASK=SUBSTR(JCTJOBID,1,4);
   END;
   IF SUBSYS='TCP ' THEN TYPETASK='TCP ';
   ELSE IF SUBSYS='PSF ' THEN TYPETASK='PSF ';
   ELSE IF SUBSYS='VPS ' THEN TYPETASK='VPS ';
   ELSE IF TYPETASK=:'J' THEN DO;
 IF  SUBSYS='TSO ' THEN TYPETASK='TSU ';
 ELSE IF SUBSYS='JES2' THEN TYPETASK='JOB ';
 ELSE IF SUBSYS='JES3' THEN TYPETASK='JOB ';
 ELSE IF SUBSYS='STC ' THEN TYPETASK='STC ';
 ELSE IF SUBSYS='OMVS' THEN TYPETASK='OMVS';
 ELSE   TYPETASK='JOB ';
   END;
   ELSE IF TYPETASK=:'O' OR SUBSYS='OMVS' THEN TYPETASK='OMVS';
   ELSE IF TYPETASK=:'S' THEN TYPETASK='STC ';
   ELSE IF TYPETASK=:'A' THEN TYPETASK=SUBSYS;
   ELSE IF TYPETASK=:'T' THEN TYPETASK='TSU ';
   ELSE IF TYPETASK=:'I' AND SUBSYS='STC' THEN TYPETASK='STC  ';
   ELSE DO;
 IF  SUBSYS='STC ' THEN TYPETASK='STC ';
 ELSE IF SUBSYS='TSO ' THEN TYPETASK='TSU ';
 ELSE IF SUBSYS='JES2' THEN TYPETASK='JOB ';
 ELSE IF SUBSYS='JES3' THEN TYPETASK='JOB ';
 ELSE IF SUBSYS='STC ' THEN TYPETASK='STC ';
 ELSE IF SUBSYS='OMVS' THEN TYPETASK='OMVS';
 ELSE DO;
   IF PRODUCT='' THEN PRODUCT='';;
   IF SUBTYPE=.  THEN SUBTYPE=.;
   IF PRODUCT='PERFMON ' AND SUBTYPE=3 THEN DO;
 TYPETASK='STC';
 SUBSYS='PERFMON';
   END;
 END;
   END;
   IF TYPETASK=' ' THEN DO;
 BADVJESN+1;
 IF BADVJESN LE 2 THEN
   PUT '*** WARNING - TYPETASK NOT DECODED: ' /  +10
   _N_= SYSTEM= ID= SUBTYPE= JOB=
   JCTJOBID= SUBSYS= TYPETASK= JESNR= ;
   END;
 END;
  /* END OF MEMBER VGETJESN - GET JESNR AND TYPETASK FROM JCTJOBID */


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Martin Packer
Sent: Wednesday, November 19, 2014 8:38 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: What are STC, JOB and TSU?

Don't forget ASCH and OMVS. And for 7-digit Ids expect to see eg J1234567.

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:   Lindy Mayfield 
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   19/11/2014 12:24
Subject:What are STC, JOB and TSU?
Sent by:IBM Mainframe Discussion List 



Hi group,

I'm having a bit of a problem identifying what classification those names are.

I know what started tasks and TSO users and batch jobs are, but if I were to 
say:

"On MVS there are three   (or three types of ) which can be 
derived from the JES job ID.  J or JOB means batch, S or STC means started task 
and T or TSU means a TSO user."

(My best guess was 'job type')

Are there more than these three?  I'm simply writing some high-level 
documentation, and I've already used up my quota of writing "thingy" when I 
don't know what it is.  MVS has a lot of thingies.

Thanks for your help.
Lindy


--
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: JES/328X Installation Manual

2014-11-19 Thread Lizette Koehler
Sometimes you need to go to www.ibm.com to find some manuals.

Lizette


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Jose Munoz
> Sent: Wednesday, November 19, 2014 12:21 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: JES/328X Installation Manual
> 
> Dear all,
> 
> Who can send me electronic copy for 5785-BAZ JES/328X Print Facility Program
> Description and Operators Manual , SH20-7174. I cannot find on internet.
> 
> Regards
> Jose Munoz
> 

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


Re: What are STC, JOB and TSU?

2014-11-19 Thread Martin Packer
Don't forget ASCH and OMVS. And for 7-digit Ids expect to see eg J1234567.

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:   Lindy Mayfield 
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   19/11/2014 12:24
Subject:What are STC, JOB and TSU?
Sent by:IBM Mainframe Discussion List 



Hi group,

I'm having a bit of a problem identifying what classification those names 
are.

I know what started tasks and TSO users and batch jobs are, but if I were 
to say:

"On MVS there are three   (or three types of ) which can be 
derived from the JES job ID.  J or JOB means batch, S or STC means started 
task and T or TSU means a TSO user."

(My best guess was 'job type')

Are there more than these three?  I'm simply writing some high-level 
documentation, and I've already used up my quota of writing "thingy" when 
I don't know what it is.  MVS has a lot of thingies.

Thanks for your help.
Lindy


--
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: How declare in C++ a constant in an assembler module?

2014-11-19 Thread Steve Comstock

On 11/19/2014 6:41 AM, Paul Gilmartin wrote:

On Wed, 19 Nov 2014 07:53:56 -0500, John Gilmore wrote:


C and its sequelæ are and now seem likely to remain toys.  They have
achieved all of  the portability of assembly language without its
expressive power.


An amusing aphorism, about 1/3 true.

The preponderance of expressive power of HLASM rests in its
preprocessor, but that shouldn't be discounted.

"[P]ortability"?  Be serious.  I can compile and execute"

#include 
int  main( void ) { printf("Hello, world!\n"); }

... on z, x86, ARM, Sparc, undoubtedly others I haven't access
to test.  Please exhibit a HLASM program of comparable complexity
and portability.  I don't believe even:

  START
  END

... will compile on most of those architectures (barring Hercules
or z390 which I shall call "toys").

Entire operating systems which support great enterprises are
implemented in C on those platforms and others.  How many
in HLASM?  There are candidates to supersede C.  I don't
count HLASM among them.  PL/I might be more likely, but
a very long shot.


Paul: it was humor / sarcasm. [At least that's how I read it.]

-Steve Comstock



-- gil

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



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


Re: Does CPOOL use the first few bytes of a free cell for its own purposes?

2014-11-19 Thread Mike Myers

Jim:

Thanks for the update. Yes, I was referring to the old quickcell 
functions that I wrote for the first release of MVS. And on thinking it 
over, there would have been no mapping macro for the cell, as the 
unpredictable size would (chosen by the pool creator) would not motivate 
one. There would only be a requirement to set a location and length for 
the link field in free elements.


Mike

On 11/18/2014 11:49 PM, Jim Mulder wrote:

Thanks for letting me know that my memory still works. I hadn't found
the mapping macro for the quickcell element yet and was going on
memories dating back to what I coded in 1973. Thank you very much for
the corroboration.

An old system programmer...

   CPOOL was a new service in MVS/XA.  By "quickcell", you
may be referring to the services provided by the CETCELL/FREECELL
macros (modules IEAVGTCL/IEAVFRCL), and BLDCPOOL and DELCPOOL
macros.  These macros and code are still in the system,
although no longer documented.
   SYS1.MODGEN(IHACPAB) is the mapping for the pool anchor.
There was no mapping macro for the pool element - the
link field offset of 0 is coded as an EQU in each module
that needs it.

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: [ANN] Lua4z: the Lua programming language on z/OS, with batteries

2014-11-19 Thread Kirk Wolf
I'm a bit late to the party, but I finally got around to installing Lua4z.

The installer and ivp worked fine.   For a first release, I think that it
is extremely well done.

I also wanted to mention a presentation that David did in SHARE this summer
which I believe demonstrates some of the potential of LUA:
https://share.confex.com/share/123/webprogram/Session15892.html

This is not a comment about the LUA4Z port, but at first glance I find the
module system a little confusing.

For example:   I was trying to find the lua code that implements the "io"
module, and how that links into stdio - IOW how does "io.open()" get to the
C library fopen() ?

Kirk Wolf
Dovetailed Technologies
http://dovetail.com

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


Re: How declare in C++ a constant in an assembler module?

2014-11-19 Thread Paul Gilmartin
On Wed, 19 Nov 2014 07:53:56 -0500, John Gilmore wrote:
>
>C and its sequelæ are and now seem likely to remain toys.  They have
>achieved all of  the portability of assembly language without its
>expressive power.
> 
An amusing aphorism, about 1/3 true.

The preponderance of expressive power of HLASM rests in its
preprocessor, but that shouldn't be discounted.

"[P]ortability"?  Be serious.  I can compile and execute"

#include 
int  main( void ) { printf("Hello, world!\n"); }

... on z, x86, ARM, Sparc, undoubtedly others I haven't access
to test.  Please exhibit a HLASM program of comparable complexity
and portability.  I don't believe even:

 START
 END

... will compile on most of those architectures (barring Hercules
or z390 which I shall call "toys").

Entire operating systems which support great enterprises are
implemented in C on those platforms and others.  How many
in HLASM?  There are candidates to supersede C.  I don't
count HLASM among them.  PL/I might be more likely, but
a very long shot.

-- gil

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


Re: New LPAR and FTPD & IND$FILE is saying any file we want is used exclusively by someone else

2014-11-19 Thread Mark Regan
Disregard, one of our z/OS techs job it fixed. Thanks,
 
Mark Regan, USNR-Ret, 1969-1991
<><
  From: Mark Regan <006f01c0dca1-dmarc-requ...@listserv.ua.edu>
 To: IBM-MAIN@LISTSERV.UA.EDU 
 Sent: Tuesday, November 18, 2014 6:49 PM
 Subject: Fw: New LPAR and FTPD & IND$FILE is saying any file we want is used 
exclusively by someone else
   
Cross posted to IBM-MAIN and IBMTCP-L
As it says, whenever we try to PUT a file to this new LPAR via FTPD, the FTP 
server always says it is "used exclusively by someone else". We've try many 
different DSNs, but end up with the same results.
A 'D GRS,RES=(SYSDSN,dataset) shows that the DSNs are in SHARE status. Example:





-RO IKN1,D GRS,RES=(SYSDSN,SYS1.KLPAR.CMDPROC) 
 ISG343I 16.46.47 GRS STATUS 287 
 S=SYSTEMS SYSDSN SYS1.KLPAR.CMDPROC 
 SYSNAME JOBNAME ASID TCBADDR EXC/SHR STATUS
 IKN1 PJC034 0045 00BFF6F8 SHARE OWN 
 IKN1 REGANM 0046 00BFF6F8 SHARE OWN 
 ITE1 T340226 007D 009FF6F8 SHARE OWN  This system is called IKN1, while ITE1 
is a different LPAR in the plex, but not a part of the MAS.
Note, we also tried TSO's IND$FILE and get the same results, so it's something 
common to both methods of file transfer.

Thanks,
 
Mark Regan, USNR-Ret, 1969-1991
<><


--
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: What are STC, JOB and TSU?

2014-11-19 Thread Vernooij, CP (ITOPT1) - KLM
This answer 'clarifies' the situation?

Kees.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John McKown
Sent: 19 November, 2014 14:08
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: What are STC, JOB and TSU?

On Wed, Nov 19, 2014 at 6:23 AM, Lindy Mayfield 
wrote:

> Hi group,
>
> I'm having a bit of a problem identifying what classification those 
> names are.
>
> I know what started tasks and TSO users and batch jobs are, but if I 
> were to say:
>
> "On MVS there are three   (or three types of ) which can 
> be derived from the JES job ID.  J or JOB means batch, S or STC means 
> started task and T or TSU means a TSO user."
>

I would probably say something like: "On z/OS there are four classifications of 
address spaces. Three of them are controlled by the Job Entry Subsystem (JES), 
and the type can be derived from the JES job id.
Those three types are J, S, and T; for JOB (batch work), STC (started task), 
and TSU (TSO users) respectively. The fourth type of address space is called a 
system address space. This type of address space runs outside of the control of 
the JES and so, normally, does do any SPOOL activity.
This type of address space can be started with an operator command by adding 
the SUB=MSTR parameter to the START. It can also be created programmatically 
using internal facilities such as the ASCRE system service. Since they run 
outside the control of JES, they do not normally have a JES job id. There are 
facilities whereby such an address space can register itself with JES, at which 
time it is given an STC job id."

I.e. substitute "address space" for "". I am fairly sure that when the 
CPU is not in a WAIT, that there is a value in the PSAAOLD which, IMO, makes 
that ASID the "current" ASID. Hum, is this true? The only thing I'm not sure of 
is a global SRB. Can PSAAOLD be zero while a global SRB is running? The STO 
control register has to have _something_ valid in it unless you are somehow 
running DAT OFF. Which is _extremely_ rare in z/OS.

Depending on the level of detail you want, you might not want to even mention 
the system address space in such detail. But you might want to mention it 
briefly because such will show up in SDSF, but without a JES assigned id.

I also don't know if you want to inject anything about the "weird and 
wonderful" way that z/OS UNIX works. I.e. a batch job, with a JOBn assigned 
to it, can be a UNIX process. But a child process, created with fork()/spawn(), 
runs as a separate STCn type address space (ignoring local spawn(), of 
course). But that may be too much information. I couldn't even make it clear to 
other experienced sysprogs (one of whom had been a vendor developer) very well. 
But that may be a personal (me) issue. 


> (My best guess was 'job type')
>
> Are there more than these three?  I'm simply writing some high-level 
> documentation, and I've already used up my quota of writing "thingy" 
> when I don't know what it is.  MVS has a lot of thingies.
>
> Thanks for your help.
> Lindy
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



--
The temperature of the aqueous content of an unremittingly ogled culinary 
vessel will not achieve 100 degrees on the Celsius scale.

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 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: What are STC, JOB and TSU?

2014-11-19 Thread Vernooij, CP (ITOPT1) - KLM
A different view:
From my first MVS courses: there a 3 ways to create an address space: Start, 
Logon and Mount.
Mount is a special case, not seen often.
Logon creates a TSO address space, with a T* jobid.
Start creates an STC address space, with a S* jobid, which can nowadays also be 
created by more ways.
One of the STCs you can start is the INIT STC, which runs the initiator task, 
which gets a job from JES and runs it. It then transforms its address space to 
a J* jobid.

HTH,
Kees.


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Klaus Stanislawiak
Sent: 19 November, 2014 14:01
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: What are STC, JOB and TSU?

Hi Lindy,

This is what I find on the related SDSF help panel (ISFJDF2):

TypeType of address space: job, started task,
TSO user, or initiator

And there are address spaces that run under the master subsystem and do not 
have a JES job id.
And in JES3 you cannot derive the <...> type from the job id as it will always 
begin with a 'J'.

HTH (a little)
Klaus

--
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: What are STC, JOB and TSU?

2014-11-19 Thread John McKown
On Wed, Nov 19, 2014 at 6:23 AM, Lindy Mayfield 
wrote:

> Hi group,
>
> I'm having a bit of a problem identifying what classification those names
> are.
>
> I know what started tasks and TSO users and batch jobs are, but if I were
> to say:
>
> "On MVS there are three   (or three types of ) which can be
> derived from the JES job ID.  J or JOB means batch, S or STC means started
> task and T or TSU means a TSO user."
>

I would probably say something like: "On z/OS there are four
classifications of address spaces. Three of them are controlled by the Job
Entry Subsystem (JES), and the type can be derived from the JES job id.
Those three types are J, S, and T; for JOB (batch work), STC (started
task), and TSU (TSO users) respectively. The fourth type of address space
is called a system address space. This type of address space runs outside
of the control of the JES and so, normally, does do any SPOOL activity.
This type of address space can be started with an operator command by
adding the SUB=MSTR parameter to the START. It can also be created
programmatically using internal facilities such as the ASCRE system
service. Since they run outside the control of JES, they do not normally
have a JES job id. There are facilities whereby such an address space can
register itself with JES, at which time it is given an STC job id."

I.e. substitute "address space" for "". I am fairly sure that when
the CPU is not in a WAIT, that there is a value in the PSAAOLD which, IMO,
makes that ASID the "current" ASID. Hum, is this true? The only thing I'm
not sure of is a global SRB. Can PSAAOLD be zero while a global SRB is
running? The STO control register has to have _something_ valid in it
unless you are somehow running DAT OFF. Which is _extremely_ rare in z/OS.

Depending on the level of detail you want, you might not want to even
mention the system address space in such detail. But you might want to
mention it briefly because such will show up in SDSF, but without a JES
assigned id.

I also don't know if you want to inject anything about the "weird and
wonderful" way that z/OS UNIX works. I.e. a batch job, with a JOBn
assigned to it, can be a UNIX process. But a child process, created with
fork()/spawn(), runs as a separate STCn type address space (ignoring
local spawn(), of course). But that may be too much information. I couldn't
even make it clear to other experienced sysprogs (one of whom had been a
vendor developer) very well. But that may be a personal (me) issue. 


> (My best guess was 'job type')
>
> Are there more than these three?  I'm simply writing some high-level
> documentation, and I've already used up my quota of writing "thingy" when I
> don't know what it is.  MVS has a lot of thingies.
>
> Thanks for your help.
> Lindy
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
The temperature of the aqueous content of an unremittingly ogled
culinary vessel will not achieve 100 degrees on the Celsius scale.

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: What are STC, JOB and TSU?

2014-11-19 Thread Klaus Stanislawiak
Hi Lindy,

This is what I find on the related SDSF help panel (ISFJDF2):

TypeType of address space: job, started task,
TSO user, or initiator

And there are address spaces that run under the master subsystem and do not 
have a JES job id.
And in JES3 you cannot derive the <...> type from the job id as it will always 
begin with a 'J'.

HTH (a little)
Klaus

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


Re: How declare in C++ a constant in an assembler module?

2014-11-19 Thread John Gilmore
As I have had occasion to note here before, the traditions of C and
its sequelæ interest me chiefly as illustrations of  one or another
pathology.

The PL/I tradition provides better positive guidance.  From the
beginning, with the PL/I F
compiler, such a construction as

declare hashvcs entry(character(*) varying, binary fixed(15,0))
  returns(binary fixed(15,0)) ;
. . .
declare hashin character(*) varying, hashval binary fixed(15,0) ;

hashval = hashvcs(hashin, 1101b) ;

resulted in the creation of a halfword temporary initialized  to have
the binary value 1101b (decimal 13).  The address of that temporary,
not that of the (internal/converted) value of the literal 1101b, was
then made available to the entry hashvcs, which was free to mutilate
it without non-local effect.

Today, one can make corresponding distinctions within a function like
hashvcs, as in

hashvcs: procedure(vcs, modulus)
  returns(signed binary fixed(15,0))
  reorder ;

  declare (vcs character(*) varying2,
 modulus signed binary fixed(15,0))
 nonassignable parameter ;

  . . .
  return(hashval) ;

end hashvcs ;

C and its sequelæ are and now seem likely to remain toys.  They have
achieved all of  the portability of assembly language without its
expressive power.

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


What are STC, JOB and TSU?

2014-11-19 Thread Lindy Mayfield
Hi group,

I'm having a bit of a problem identifying what classification those names are.

I know what started tasks and TSO users and batch jobs are, but if I were to 
say:

"On MVS there are three   (or three types of ) which can be 
derived from the JES job ID.  J or JOB means batch, S or STC means started task 
and T or TSU means a TSO user."

(My best guess was 'job type')

Are there more than these three?  I'm simply writing some high-level 
documentation, and I've already used up my quota of writing "thingy" when I 
don't know what it is.  MVS has a lot of thingies.

Thanks for your help.
Lindy


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


Re: JES/328X Installation Manual

2014-11-19 Thread George Young

On 11/19/2014 2:21 AM, Jose Munoz wrote:

Dear all,

Who can send me electronic copy for 5785-BAZ JES/328X Print Facility
Program Description and Operators Manual , SH20-7174. I cannot find on
internet.

Regards
Jose Munoz

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



If you go to the IBM Publications Center and search for SH20-7174 you'll 
find a copy you can download.


http://www-05.ibm.com/e-business/linkweb/publications/servlet/pbi.wss

George

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


Re: STGINDEX definition (UNCLASSIFIED)

2014-11-19 Thread Richards, Robert B.
The DEFSTGIX member I have laying around also had this as the last line:

INDEX ( CONTROLINTERVALSIZE(4096) )

For the record, I am running VIODSN=IGNORE and have been for quite a while now.

Bob

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John Eells
Sent: Tuesday, November 18, 2014 4:25 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: STGINDEX definition (UNCLASSIFIED)

You're quite welcome.  I also belatedly dug into my old JCL data set and found 
this:

   DEFINE CLUSTER -
(NAME(SYS1.STGINDEX) -
KEYS(12 8) -
CYLINDERS(1) -
BUFFERSPACE(20480) -
RECORDSIZE(2041 2041) -
VOLUME(VOLSER) -
REUSE) -
   DATA (CONTROLINTERVALSIZE(2048))

I have absolutely NO idea whether the values above are appropriate or 
recommended today, if indeed they were ever recommended.  In the MVS/XA 
timeframe, however, I believe they worked.  I likely lifted this from a CBIPO 
at the time (smile).

lon.a.storr@mail.mil (Storr, Lon A CTR USARMY HRC , US) wrote:
> Classification: UNCLASSIFIED
> Caveats: NONE
>
> John,
>
> Thank you for a pertinent, clear and precise answer to my query. I am 
> quite content to use VIODSN=IGNORE but, because STGINDEX is still 
> utilized at many of the shops I visit, I was looking for (and unable 
> to find) the documentation.

--
John Eells
z/OS Technical Marketing
IBM Poughkeepsie
ee...@us.ibm.com

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

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