Re: STGADMIN.ADR.DUMP.TOLERATE.ENQF

2011-02-04 Thread R.S.

Pinnacle pisze:

- Original Message - From: R.S. r.skoru...@bremultibank.com.pl
Newsgroups: bit.listserv.ibm-main
Sent: Thursday, February 03, 2011 7:13 PM
Subject: Re: STGADMIN.ADR.DUMP.TOLERATE.ENQF



W dniu 2011-02-04 00:33, Frank Swarbrick pisze:

Interesting.
I'm not clear where this is documented, but I'll see what my RACF 
admin has to say.
Basically, I tried in our prod LPAR to backup (DUMP) a file that was 
currently open to CICS; thus the TOLERATE(ENQF).  But I could not 
perform it because...


ICH408I USER(DVFJS   ) GROUP(DEPT9971) NAME(FRANK SWARBRICK )  928
   STGADMIN.ADR.DUMP.TOLERATE.ENQF CL(FACILITY)
   INSUFFICIENT ACCESS AUTHORITY
   FROM STGADMIN.ADR.** (G)
   ACCESS INTENT(READ   )  ACCESS ALLOWED(NONE   )


That's quite obvious.
Some basics: resource is a string STGADMIN.ADR.DUMP.TOLERATE.ENQF
RACF db holds the profiles. In your case your RACF db has no profile 
equal to resource name, but it holds *generic* profile STGADMIN.ADR.** 
which covers required resource.
In your case this profile is to wide in scope. Your RACF admin should 
consider definition of STGADMIN.ADR.STGADMIN.** - this profile is 
powerfule and dangerous. The old profile could be defined with 
UACC(READ) which means available to anyone.


In other words, your RACF admin unnecessarily restricted some functions.



I would disagree with the last statement that the RACF admin 
unnecessarily restricted some functions. I've seen this construct at a 
number of sites, and it makes sense if for no other reason that it 
covers future additions to the STGADMIN.ADR FACILITY class profiles.  
IBM does add new function there from time to time, and having this rule 
in place ensures that no one can get unauthorized access to any new 
profiles in the future.


And I would disagree with the above. Yes, IBM sometimes adds some new 
functions and SAF (RACF) resources for them. Even those with completely 
new name (not prefixed with STGADMIN.ADR). Even new classes for the 
profiles. How do you protect against it? And WHY do want it?


Can you provide any example of *dangerous* function/resource covered by 
STGADMIN.ADR.**, but not STGADMIN.ADR.STGADMIN.** ?


As I wrote I consider STGADMIN.ADR profiles as example of good 
implementation. The most important reason for that is that regular 
functions are permitted by default and powerful functions are restricted 
by default.



--
Radoslaw Skorupka
Lodz, Poland


--
BRE Bank SA
ul. Senatorska 18
00-950 Warszawa
www.brebank.pl

Sd Rejonowy dla m. st. Warszawy 
XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, 
nr rejestru przedsibiorców KRS 025237

NIP: 526-021-50-88
Wedug stanu na dzie 16.07.2010 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.248.328 zotych. 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: LINKLIB in use

2011-02-04 Thread Walter Marguccio
you are c
 I was able to delete the old linklib once I cycled LLA.


you are correct, and I wrote something wrong:

 I doubt you can delete old.linklib which belongs to LNKLST00.

If neither LLA nor XCFAS have their hands on old.linklib, you can delete the 
dataset.
However, I seem to remember that either LLA or XCFAS are not really happy to 
see old.linklib being deleted under their nose.
Did you issue SETPROG LNKLST,ALLOCATE before starting LLA ?
If yes, did you see any error message ?

Just curious.

Walter Marguccio
z/OS Systems Programmer
BELENUS LOB Informatic GmbH
Munich - Germany




--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Remote printers are Drained

2011-02-04 Thread Chokalingam Thangavelu
We are just using NETVIEW and everything was working perfectly until
last week.

There is no timer elements found when I issued the LIST command.

Regards,
Chokalingam


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Barkow, Eileen
Sent: Thursday, February 03, 2011 4:45 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

Are you using SA or just Netview?

I know that with SA, you either have to run the command under the PPT
Or the use a auto-op id or other opid that is logged onto Netview at the
time.
Sometimes it looks like Netview issues the command but MVS never gets it
- in my case
This has been due to incorrect usage of the MVS command or neglecting to
specify MVS first. 

Can you list the relevant timers in Netview?
LIST TIMER=SYS

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Chokalingam Thangavelu
Sent: Thursday, February 03, 2011 11:26 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

I have checked in the Syslog but the start command was not executed and
nothing happened afterwards.

I have manually restarted the printer and afterwards NETVIEW is
restarting the printer whenever it is DRAINED.

I am bit confused why NETVIEW start command was not executed at a
particular time.

Regards,
Chokalingam Thangavelu


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Barkow, Eileen
Sent: Thursday, February 03, 2011 3:57 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

It looks like the $SPRT981 command was issued via Netview timer - check
MVS SYSLOG to see if the command was
Actually executed and what happened afterwards - the printer may have
gone DRAINED again after it was started 
And there was nothing coded in Netview to re-start it.
You probably have Netview coded to issue the start commands only at
certain times of the day
And not when the actual DRAIN occurs. 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Chokalingam Thangavelu
Sent: Thursday, February 03, 2011 10:49 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

I do not see any error message in the NETVIEW log and printer should
have started after the below message but it was started.

DSI208I TIME EXPIRATION - ID= 'SYS47343' - CMD= 'MVS $SPRT981'

Regards,
Chokalingam Thangavelu
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Barkow, Eileen
Sent: Thursday, February 03, 2011 2:11 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

NETVIEW automation (I assume that you are using IBM SA) is probably
chaining off some message in the message table.
You need to look at the messages that are being trapped and compare them
to 
The messages that are being sent to the console at the time the printers
are DRAINED.
There may be some other problems with SA which is why it is not
restarting the printers -
Like timers getting deleted, auotops in use, clist errors, etc.
 You need to check the Netview logs for any errors
 at the time the DRAIN occurs to see why the processing is not getting
done.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Chokalingam Thangavelu
Sent: Thursday, February 03, 2011 8:46 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

We are using PSF software to print mainframe reports to the remote
printers.

The printers will become DRAINED after printing the reports and NETVIEW
automation will restart the printers.

But some printers are not getting restarted by NETVIEW during morning
hours and rest of the time its working fine.
   
Regards,
Chokalingam Thangavelu

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Barkow, Eileen
Sent: Thursday, February 03, 2011 1:27 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

DRAINED is a status used by VPS.
Printers may go into DRAINED/EDRAINED status following an error, which
is
Shown in the VPS log.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Elardus Engelbrecht
Sent: Thursday, February 03, 2011 2:56 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

Chokalingam Thangavelu wrote:
We have got many remote printers are configured to mainframe via TCPIP
address.

With what? Are you using a output writer scraping data from JES2/3 or is
it 
something which accepts output from STCs? 

How are those printers connected via TCP/IP to your system? Via a pool
of IP 
addreses or assigned LUs?

Fort the past 2 weeks we are getting lot of cases that these printers
are 
becoming DRAINED after printing the reports instead of becoming
INACTIVE.

All of them? Some of them? Only after certain 

Re: Remote printers are Drained

2011-02-04 Thread Chokalingam Thangavelu
I have found the below message in the netview log after the printer
start command.

DSI208I TIME EXPIRATION - ID= 'SYS50161' - CMD= 'MVS $SPRT981'

DWO338I CONSOLE NOT OBTAINED FOR TASK AUTO1. CONSOLE AUTO1 IS ALREADY IN
USE.

Regards,
Chokalingam Thangavelu



-Original Message-
From: Thangavelu Chokalingam (WT01 - Energy and Utilities) 
Sent: Friday, February 04, 2011 9:18 AM
To: IBM-MAIN@bama.ua.edu
Subject: RE: Remote printers are Drained

We are just using NETVIEW and everything was working perfectly until
last week.

There is no timer elements found when I issued the LIST command.

Regards,
Chokalingam


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Barkow, Eileen
Sent: Thursday, February 03, 2011 4:45 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

Are you using SA or just Netview?

I know that with SA, you either have to run the command under the PPT
Or the use a auto-op id or other opid that is logged onto Netview at the
time.
Sometimes it looks like Netview issues the command but MVS never gets it
- in my case
This has been due to incorrect usage of the MVS command or neglecting to
specify MVS first. 

Can you list the relevant timers in Netview?
LIST TIMER=SYS

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Chokalingam Thangavelu
Sent: Thursday, February 03, 2011 11:26 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

I have checked in the Syslog but the start command was not executed and
nothing happened afterwards.

I have manually restarted the printer and afterwards NETVIEW is
restarting the printer whenever it is DRAINED.

I am bit confused why NETVIEW start command was not executed at a
particular time.

Regards,
Chokalingam Thangavelu


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Barkow, Eileen
Sent: Thursday, February 03, 2011 3:57 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

It looks like the $SPRT981 command was issued via Netview timer - check
MVS SYSLOG to see if the command was
Actually executed and what happened afterwards - the printer may have
gone DRAINED again after it was started 
And there was nothing coded in Netview to re-start it.
You probably have Netview coded to issue the start commands only at
certain times of the day
And not when the actual DRAIN occurs. 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Chokalingam Thangavelu
Sent: Thursday, February 03, 2011 10:49 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

I do not see any error message in the NETVIEW log and printer should
have started after the below message but it was started.

DSI208I TIME EXPIRATION - ID= 'SYS47343' - CMD= 'MVS $SPRT981'

Regards,
Chokalingam Thangavelu
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Barkow, Eileen
Sent: Thursday, February 03, 2011 2:11 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

NETVIEW automation (I assume that you are using IBM SA) is probably
chaining off some message in the message table.
You need to look at the messages that are being trapped and compare them
to 
The messages that are being sent to the console at the time the printers
are DRAINED.
There may be some other problems with SA which is why it is not
restarting the printers -
Like timers getting deleted, auotops in use, clist errors, etc.
 You need to check the Netview logs for any errors
 at the time the DRAIN occurs to see why the processing is not getting
done.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Chokalingam Thangavelu
Sent: Thursday, February 03, 2011 8:46 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

We are using PSF software to print mainframe reports to the remote
printers.

The printers will become DRAINED after printing the reports and NETVIEW
automation will restart the printers.

But some printers are not getting restarted by NETVIEW during morning
hours and rest of the time its working fine.
   
Regards,
Chokalingam Thangavelu

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Barkow, Eileen
Sent: Thursday, February 03, 2011 1:27 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

DRAINED is a status used by VPS.
Printers may go into DRAINED/EDRAINED status following an error, which
is
Shown in the VPS log.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Elardus Engelbrecht
Sent: Thursday, February 03, 2011 2:56 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

Chokalingam Thangavelu wrote:
We have got many remote printers are 

IBMLINK Down?

2011-02-04 Thread Mark Jacobs
Getting an 500 Internal Server Error this morning. Is anyone else 
getting the same error?


--
Mark Jacobs
Time Customer Service
Tampa, FL


Surrounding yourself with dwarfs does not make you a giant

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Ends an ISPF session.

2011-02-04 Thread Schwarz, Barry A
The = only means that the command should be processed at the first primary 
panel up the chain.

The x is just a common command to exit from a panel menu.  It is not hard-coded 
in ISPF but must appear in the zsel=trans logic in the panel.

The ; simply simulates the ENTER key.

If you have nested primary panels (for example, as delivered by ServerPac, the 
ISMF primary panel is invoked form the PDF primary panel), =x will take you out 
of the first primary but simulating ENTER will not take you out of the next one 
(in the cited example, you are still in the PDF primary panel).

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Robbie McCoy
Sent: Wednesday, February 02, 2011 7:40 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Ends an ISPF session.

Good morning.  Once you have set the defaults for log/list (or your user has)
key
=x;; (2 semi-colons)

This will bypass this panel and take them to the TSO ready prompt.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: LINKLIB in use

2011-02-04 Thread Tom Marchant
On Fri, 4 Feb 2011 01:08:38 -0800, Walter Marguccio wrote:

If neither LLA nor XCFAS have their hands on old.linklib, you can 
delete the dataset.

No. You can do a SETPROG LNKLST,UNALLOCATE to free the ENQ that
XCFAS has and you can either stop LLA or otherwise get it to release
the old.linklib data set.  That does *NOT* mean that it is save to 
delete the data set.  That does nothing to remove it from use as a 
LNKLST data set.

In order to make it inactive as a LNKLST data set, a new LNKLST set 
must be activated and all running address spaces that started before 
activating the new LNKLST set must be told to use the new LNKLST 
set using LNKLST UPDATE.  This is somewhat dangerous and should 
only be done if you are prepared to IPL.

Be aware, though, that SYS1.LINKLIB, SYS1.MIGLIB, SYS1.CSSLIB, 
SYS1.SIEALNKE and SYS1.SIEAMIGE are always included in the LNKLST 
concatenation unless specifically overridden by SYSLIB statements.

However, I seem to remember that either LLA or XCFAS are not 
really happy to see old.linklib being deleted under their nose.

XCFAS is not the one using the LNKLST data sets.  It is just a
convenient place to hang the ENQ.  Search the archives.

-- 
Tom Marchant

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: LINKLIB in use

2011-02-04 Thread Veilleux, Jon L
You are not too paranoid. That is good practice. All LINKLIST changes should be 
handled just before an IPL for safety.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Joel C. Ewing
Sent: Thursday, February 03, 2011 11:17 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: LINKLIB in use

As others have mentioned LNKLST UPDATE JOB(*) is required to get all old 
address spaces to switch to a newly activated lnklst and free up all prior 
usage of LNKLST00, but if you search past threads on this topic on ibm-main you 
will find that at least in the past this has involved some element of risk, 
depending on what library has been changed and how it is being used by the 
address space; so the best time to do this may be after making corresponding 
changes to PROGxx just before a scheduled IPL.  The ACTIVATE by itself only 
causes address spaces created in the future to use the new LNKLST definition - 
existing address spaces by default continue to use the same LNKLSTxx that they 
were using before the ACTIVATE.

Maybe I am overly paranoid, but I would never delete a dynamically removed 
lnklist library within the same IPL.  Once it is freed, just rename it and by 
some means insure it is not eligible for migration or other movement, just in 
case there is still some control block somewhere left pointing to the old 
extents.  Save the delete for after the next IPL when the library has never 
been accessed as a lnklist library.
   Joel C Ewing

On 02/03/2011 12:31 PM, Mark Pace wrote:
 I want to change the size of a LINKLIB.  So how I was going to tackle 
 this was, define the new one, copy the contents from the old library 
 to the new library.
 Remove the LINKLIB from the APF list and the LNKLST.  Delete the old 
 dataset, rename the new one, and then add it back to the PAF and LNKLSTs.

 setprog apf,delete,dsname=sys3.prod.linklib,volume=tusr01

 SETPROG LNKLST,DEFINE,NAME=lnklst01,COPYFROM=lnklst00
 SETPROG LNKLST,delete,NAME=lnklst01,dsname=sys3.prod.linklib
 SETPROG LNKLST,ACTIVATE,NAME=lnklst01

 I then went to delete the old dataset, but it still says Dataset In Use.
 What did I miss?



-- 
Joel C. Ewing, Fort Smith, ARjcew...@acm.org

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at 
http://bama.ua.edu/archives/ibm-main.html
This e-mail may contain confidential or privileged information. If
you think you have received this e-mail in error, please advise the
sender by reply e-mail and then delete this e-mail immediately.
Thank you. Aetna   

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: STGADMIN.ADR.DUMP.TOLERATE.ENQF

2011-02-04 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Frank Swarbrick
 
 Interesting.
 I'm not clear where this is documented, but I'll see what my RACF
admin has to say.
 Basically, I tried in our prod LPAR to backup (DUMP) a file that was
currently open to CICS; thus the
 TOLERATE(ENQF).  But I could not perform it because...
 
 ICH408I USER(DVFJS   ) GROUP(DEPT9971) NAME(FRANK SWARBRICK )  928
   STGADMIN.ADR.DUMP.TOLERATE.ENQF CL(FACILITY)
   INSUFFICIENT ACCESS AUTHORITY
   FROM STGADMIN.ADR.** (G)
   ACCESS INTENT(READ   )  ACCESS ALLOWED(NONE   )

What this says to me is that either (1) your user ID (DVFJS) has not
been PERMITted to FACILITY profile STGADMIN.ADR.** (which was defined
with UACC(NONE)), or (2) your user ID has been PERMITted explicitly with
ACCESS(NONE).

-jc-

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: LINKLIB in use

2011-02-04 Thread Walter Marguccio
 If neither LLA nor XCFAS have their hands on old.linklib, you can 
 delete the dataset.

 No. You can do a SETPROG LNKLST,UNALLOCATE to free the ENQ that
 XCFAS has and you can either stop LLA or otherwise get it to release
 the old.linklib data set.  That does *NOT* mean that it is save to 
 delete the data set.  That does nothing to remove it from use as a 
 LNKLST data set.

I agree 100%. I didn't say it is safe, I only said you can delete it, because
neither LLA not XCFAS use/ENQue it.

 In order to make it inactive as a LNKLST data set, a new LNKLST set 
 must be activated and all running address spaces that started before 
 activating the new LNKLST set must be told to use the new LNKLST 
 set using LNKLST UPDATE.  This is somewhat dangerous and should 
 only be done if you are prepared to IPL.

I agree 100%. So If I were the OP, I would activate a new LNKLST01 (as he did)
and leave old.linklib where it is. 


Walter Marguccio
z/OS Systems Programmer
BELENUS LOB Informatic GmbH
Munich - Germany





--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: IBMLINK Down?

2011-02-04 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Mark Jacobs
 
 Getting an 500 Internal Server Error this morning. Is anyone else
 getting the same error?

Same error in Chicagoland.  I'm SO-O-O surprised.  :-|

   -jc-

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: IBMLINK Down?

2011-02-04 Thread Veilleux, Jon L
Here in CT also

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Chase, John
Sent: Friday, February 04, 2011 8:16 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: IBMLINK Down?

 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Mark Jacobs
 
 Getting an 500 Internal Server Error this morning. Is anyone else 
 getting the same error?

Same error in Chicagoland.  I'm SO-O-O surprised.  :-|

   -jc-

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at 
http://bama.ua.edu/archives/ibm-main.html
This e-mail may contain confidential or privileged information. If
you think you have received this e-mail in error, please advise the
sender by reply e-mail and then delete this e-mail immediately.
Thank you. Aetna   

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Remote printers are Drained

2011-02-04 Thread Barkow, Eileen
You can use the Netview EXCMD command to assign the MVS command to a different 
auto operator or autotask assigned to 
Another console. To make it simple, leave the current command in place and add 
another one to the other
Operator - at most duplicate start commands will be issued.

EXCMD   
 
 -EXCMD -+-opid--+-- command--   
   +-*-+ 
   '-?func-' 
 

opid   
Specifies any active operator ID or task. Operators and tasks   
defined as active are:  
*  Operators logged on in this domain   
*  Operator IDs used by operators in other domains for  
   cross-domain routing to this domain (using the ROUTE or  
   RMTCMD commands) 
*  Autotasks
*  The primary program operator interface task (PPT)
*  Data services tasks (DSTs), but only with type D and RD  
   commands 
*  Other optional tasks that provide support for issuing


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Chokalingam Thangavelu
Sent: Friday, February 04, 2011 5:24 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

I have found the below message in the netview log after the printer
start command.

DSI208I TIME EXPIRATION - ID= 'SYS50161' - CMD= 'MVS $SPRT981'

DWO338I CONSOLE NOT OBTAINED FOR TASK AUTO1. CONSOLE AUTO1 IS ALREADY IN
USE.

Regards,
Chokalingam Thangavelu



-Original Message-
From: Thangavelu Chokalingam (WT01 - Energy and Utilities) 
Sent: Friday, February 04, 2011 9:18 AM
To: IBM-MAIN@bama.ua.edu
Subject: RE: Remote printers are Drained

We are just using NETVIEW and everything was working perfectly until
last week.

There is no timer elements found when I issued the LIST command.

Regards,
Chokalingam


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Barkow, Eileen
Sent: Thursday, February 03, 2011 4:45 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

Are you using SA or just Netview?

I know that with SA, you either have to run the command under the PPT
Or the use a auto-op id or other opid that is logged onto Netview at the
time.
Sometimes it looks like Netview issues the command but MVS never gets it
- in my case
This has been due to incorrect usage of the MVS command or neglecting to
specify MVS first. 

Can you list the relevant timers in Netview?
LIST TIMER=SYS

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Chokalingam Thangavelu
Sent: Thursday, February 03, 2011 11:26 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

I have checked in the Syslog but the start command was not executed and
nothing happened afterwards.

I have manually restarted the printer and afterwards NETVIEW is
restarting the printer whenever it is DRAINED.

I am bit confused why NETVIEW start command was not executed at a
particular time.

Regards,
Chokalingam Thangavelu


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Barkow, Eileen
Sent: Thursday, February 03, 2011 3:57 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

It looks like the $SPRT981 command was issued via Netview timer - check
MVS SYSLOG to see if the command was
Actually executed and what happened afterwards - the printer may have
gone DRAINED again after it was started 
And there was nothing coded in Netview to re-start it.
You probably have Netview coded to issue the start commands only at
certain times of the day
And not when the actual DRAIN occurs. 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Chokalingam Thangavelu
Sent: Thursday, February 03, 2011 10:49 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

I do not see any error message in the NETVIEW log and printer should
have started after the below message but it was started.

DSI208I TIME EXPIRATION - ID= 'SYS47343' - CMD= 'MVS $SPRT981'

Regards,
Chokalingam Thangavelu
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of Barkow, Eileen
Sent: Thursday, February 03, 2011 2:11 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Remote printers are Drained

NETVIEW automation (I assume that you are 

Re: IBMLINK Down?

2011-02-04 Thread Stan Weyman
  MA down as well...

Stan Weyman 
Senior Software Engineer
stan.wey...@emc.com
EMC²  (508)249-3966
where information lives
It is wise to keep in mind that neither
success nor failure is ever final...

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Veilleux, Jon L
Sent: Friday, February 04, 2011 8:33 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: IBMLINK Down?

Here in CT also

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Chase, John
Sent: Friday, February 04, 2011 8:16 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: IBMLINK Down?

 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Mark Jacobs
 
 Getting an 500 Internal Server Error this morning. Is anyone else 
 getting the same error?

Same error in Chicagoland.  I'm SO-O-O surprised.  :-|

   -jc-

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at 
http://bama.ua.edu/archives/ibm-main.html
This e-mail may contain confidential or privileged information. If
you think you have received this e-mail in error, please advise the
sender by reply e-mail and then delete this e-mail immediately.
Thank you. Aetna   

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


accesing output from jes spool

2011-02-04 Thread Larry Macioce
WE are having a problem with our printer(wont name the brand), but we have
all of last nights processing in the spool and need to get it out and print
some of the standard report.
We have CA-Dispatch but only a few jobs are setup with online viewing.
Is there a way to retrieve the output from jes get it to a dataset so we
could ftp to a network printer?
Thanks
Mace

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: IBMLINK Down?

2011-02-04 Thread Staller, Allan
Don't have access to IBM link, however try 

http://www-947.ibm.com/support/entry/portal/Troubleshooting

for normal research.

ETR's, etc. of course will require IBMLINK.


snip

Getting an 500 Internal Server Error this morning. Is anyone else 
getting the same error?
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: accesing output from jes spool

2011-02-04 Thread Roberto Halais
Larry:

You can use FTP to retrieve reports from JES spool. See this link:

http://www.lbdsoftware.com/Submitting_Jobs_using_FTP.pdf

http://www.lbdsoftware.com/Submitting_Jobs_using_FTP.pdfThere is a section
for retrieving from JES spool.

Roberto

On Fri, Feb 4, 2011 at 9:58 AM, Larry Macioce mace1...@gmail.com wrote:

 WE are having a problem with our printer(wont name the brand), but we have
 all of last nights processing in the spool and need to get it out and print
 some of the standard report.
 We have CA-Dispatch but only a few jobs are setup with online viewing.
 Is there a way to retrieve the output from jes get it to a dataset so we
 could ftp to a network printer?
 Thanks
 Mace

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html




-- 
Those who can make you believe religious absurdities, can make you commit
atrocities.  Voltaire

The philosopher has never killed any priests, whereas the priest has
killed a great many philosophers.
~ Denis Diderot

I am as you, in you, for you. One as you in all, as all, forever. My call
is your call.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: accessing output from jes spool

2011-02-04 Thread Larry Macioce
Roberto,
 I saw something simular to this before I asked the question.
 In that and this example it looks as if the jobname you want to retreive must 
by the users name +1 character (much like sdsf 3.8) . 
Or am I reading too much into it??
Thanks
mace  

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: accesing output from jes spool

2011-02-04 Thread Roberto Halais
http://www.workers.com.br/manuais/pdfs/tcpacces/tcptn05.pdf

On Fri, Feb 4, 2011 at 9:58 AM, Larry Macioce mace1...@gmail.com wrote:

 WE are having a problem with our printer(wont name the brand), but we have
 all of last nights processing in the spool and need to get it out and print
 some of the standard report.
 We have CA-Dispatch but only a few jobs are setup with online viewing.
 Is there a way to retrieve the output from jes get it to a dataset so we
 could ftp to a network printer?
 Thanks
 Mace

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html




-- 
Those who can make you believe religious absurdities, can make you commit
atrocities.  Voltaire

The philosopher has never killed any priests, whereas the priest has
killed a great many philosophers.
~ Denis Diderot

I am as you, in you, for you. One as you in all, as all, forever. My call
is your call.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: accessing output from jes spool

2011-02-04 Thread Ted MacNEIL
(much like sdsf 3.8)

ISPF 3.8

SDSF has no such option.

-
Ted MacNEIL
eamacn...@yahoo.ca

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: STCK vs TIMUSED

2011-02-04 Thread john gilmore
Tom Marchant wrote:
 
begin snippet
BLSUXTOD is an IPCS exit service routine that seems to pass back
mm/dd/ hh:mm:ss.ff

Not something I'd want to do arithmetic with.
/end snippet

He is right on both counts.  This is the formatted character-string output that 
BLSUXTOD produces, and it is wholly unsuitable  for arithmetic.
 
I have now reviewed this entire thread looking for clues as to how I and others 
could have gone so wrong: We thought Micheal Butz was trying to work with STCK 
values, and he was not.  
 
Exactly what he was/is doing is still not entirely clear, but it seems most 
likely that he was using the 'ff' portions of pairs of these values for his 
arithmetic.  Now he was not of course actually doing arithmetic with them.  
zArchitecture does not permit such arithmetic.  Implicitly---as with COBOL 
display values, on which it is possible to appear to be doing arithmetic---or 
explicitly they must be converted at least into packed-decimal values before 
arithmetic can be done on them.
 
The discrepancies that troubled him are an obvious outgrowth of his use of only 
these 'ff' values, in a way that several of us explained to him, but his 
reactions remain puzzling.  
 
He does  not appear really to have understood these explanations.  Moreover, 
while he is concerned about the [trivial] path lengths of the arithmetic 
operations on STCK values proper that Edward Jaffe outlined for him, he is not 
concerned about---does not even appear to be aware of---the hundreds of times 
greater overheads of all these conversions.  He appears to be thinking 
magically:  What he writes incurs overheads; what he uses does not.
 
What is most interesting about all of this is not Mr. Butz's problem or the 
time we wasted on it.  It is our failure to find out sooner what he was doing 
(if we have indeed done so).  
 
Without discouraging people from presenting problems---and certainly without 
making rules or otherwise bureaucratizing the process---we need to be more 
insistent that they set out their problems fully and coherently, and we need to 
question them until they do.  
 
This is a hard balance to strike, but not perhaps an impossible one.

John Gilmore Ashland, MA 01721-1817 USA


  
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: accessing output from jes spool

2011-02-04 Thread Larry Macioce
A 1000 pardons option 3.8 in ispf
Mace

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


TIMEUSED versus TCBTTIME

2011-02-04 Thread Charles Mills
The discussion of the ECT parameter of TIMEUSED on the thread STCK vs
TIMUSED got me to wondering. I am currently using TCBTTIME in a product
rather than TIMEUSED. The advantages of TCBTTIME as I see it are (1) has to
be very low overhead and (2) I can do it directly in C without linking to
assembler:

psa* psaPtr = NULL;
tcb* tcbPtr = (tcb *)psaPtr-psatold;
long long ttimer = *(long long *)tcbPtr-tcbttime;

What are the disadvantages? I would guess that TCBTTIME is only updated now
and then -- is that right? My product is not a profiler -- it's a
long-running STC and the CPU time is for my general information. How out of
date (out of time?) is TCBTTIME? The last the task was dispatched?

Charles

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: accesing output from jes spool

2011-02-04 Thread McKown, John
If you are on z/OS 1.10 or above and have SDSF installed, the following REXX 
program copies SPOOL output to sequential disk datasets (or UNIX files).

/* REXX */
PARSE ARG JOBNAME HLQ .
IF JOBNAME='' THEN JOBNAME='*'
HLQ=STRIP(HLQ,'B',')
IF HLQ='' THEN HLQ='SYSJO'
XX=ISFCALLS('ON')
ISFSORT='JOBID'
ISFPREFIX=JOBNAME
IF XX  0 THEN DO
   SAY 'ISFCALLS RC='XX
   RETURN XX
END
ADDRESS SDSF 'ISFEXEC ST  (DELAYED)'
IF RC  0 THEN DO
   SAY 'ISFEXEC RC='RC
   RETURN RC
END
DO IX=1 TO JNAME.0
   IF QUEUE.IX  'PRINT'  ,
  QUEUE.IX  'OUTPUT'  ,
   THEN ITERATE
   SAY 'JBN='JNAME.IX' JOBNUMBER='JOBID.IX' QUEUE='QUEUE.IX
   IF '/' = LEFT(HLQ,1) THEN DO
  SAY ,
  'CC=BPXWDYN(ALLOC DD(SYSJO) FILEDATA(TEXT) '||,
 PATH('HLQ/JNAME.IX.JOBID.IX.txt')  ||,
  PATHMODE(SIRWXU) PATHOPTS(OEXCL,OCREAT,OWRONLY)  ||,
  MSG(WTP)
  CC=BPXWDYN(ALLOC DD(SYSJO) FILEDATA(TEXT) ,
 PATH('HLQ/JNAME.IX.JOBID.IX.txt') ,
  PATHMODE(SIRWXU) PATHOPTS(OEXCL,OCREAT,OWRONLY) ,
  MSG(WTP))
   END
   ELSE DO
  SAY ,
  ALLOC DDN(SYSJO) DSN('HLQ.JNAME.IX.JOBID.IX'),
 RECFM(V B A) LRECL(255) BLKSIZE(27998) ,
 NEW CATALOG SPACE(10,50) CYLINDERS RELEASE
  ALLOC DDN(SYSJO) DSN('HLQ.JNAME.IX.JOBID.IX'),
 RECFM(V B A) LRECL(255) BLKSIZE(27998) ,
 NEW CATALOG SPACE(10,50) CYLINDERS RELEASE
  CC=RC
   END
   IF CC  0 THEN DO
  SAY FAILED TO ALLOCATE JNAME.IX.JOBID.IX
  ITERATE
   END
   ADDRESS SDSF ISFACT ST TOKEN('TOKEN.IX') PARM(NP SA)
   DO JX=1 TO ISFDDNAME.0
  DO FOREVER
 EXECIO 1 DISKR ISFDDNAME.JX(STEM LINE. 
 LINES = LINE.0
 IF RC=2 THEN RC=0
 IF RC  0 THEN DO
SAY LINES READ=LINES RC=RC
EXIT 12;
 END
 EXECIO * DISKW SYSJO (STEM LINE.
 DROP LINE.
 IF LINES1 THEN LEAVE
  END
  EXECIO 0 DISKR ISFDDNAME.JX(FINIS
   END
   DROP ISFDDNAME.
   EXECIO 0 DISKW SYSJO (FINIS
   FREE DDN(SYSJO)
END

Job would look like:

//STEP010  EXEC  PGM=IKJEFT01,
// REGION=4K,
// DYNAMNBR=60
//SYSEXEC  DD  DISP=SHR,DSN=pds.containing.above.rexx
// DD  DISP=SHR,DSN=SYS1.SBPXEXEC
//SYSTSPRT DD  SYSOUT=*
//SYSTSIN  DD  *
%JES2DISK prefix* hlq.of.dsns
/*

John McKown 

Systems Engineer IV

IT

 

Administrative Services Group

 

HealthMarkets(r)

 

9151 Boulevard 26 * N. Richland Hills * TX 76010

(817) 255-3225 phone * 

john.mck...@healthmarkets.com * www.HealthMarkets.com

 

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM

 

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Larry Macioce
 Sent: Friday, February 04, 2011 7:59 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: accesing output from jes spool
 
 WE are having a problem with our printer(wont name the 
 brand), but we have
 all of last nights processing in the spool and need to get it 
 out and print
 some of the standard report.
 We have CA-Dispatch but only a few jobs are setup with online viewing.
 Is there a way to retrieve the output from jes get it to a 
 dataset so we
 could ftp to a network printer?
 Thanks
 Mace
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html
 
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: STCK vs TIMUSED

2011-02-04 Thread Tom Marchant
On Fri, 4 Feb 2011 14:39:37 +, john gilmore wrote:

Tom Marchant wrote:
 
begin snippet
BLSUXTOD is an IPCS exit service routine that seems to pass back
mm/dd/ hh:mm:ss.ff

Not something I'd want to do arithmetic with.
/end snippet

He is right on both counts.  This is the formatted character-string output 
that BLSUXTOD produces, and it is wholly unsuitable  for arithmetic.
 
I have now reviewed this entire thread looking for clues as to how I and 
others could have gone so wrong: We thought Micheal Butz was trying 
to work with STCK values, and he was not.  

He didn't tell us that he was using BLSUXTOD until his fourth post.

-- 
Tom Marchant

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: accesing output from jes spool

2011-02-04 Thread McKown, John
Oh! I forgot to mention that you can ftp directly from the JES SPOOL to a 
desktop, but you need all the JESSPOOL profiles set up correctly. On your 
desktop:

ftp zos
userid
password
ascii
quote site filetype=jes jesowner=* jesjobname=
dir
get Jnnn output.file.name

===

transcript below:

C:\Documents and Settings\john.mckownftp zos
Connected to zos.
220-FTP 09:23:54 on 2011-02-04.
220-This is HealthMarkets.
220-Unauthorized access is strictly prohibited.
220 Connection will close if idle for more than 50 minutes.
User (zos:(none)): myid
331 Send password please.
Password:
230-You have successfully logged on to the LIH1 ftp server.
230 TSH009 is logged on.  Working directory is MYID..
ftp ascii
200 Representation type is Ascii NonPrint
ftp quote site filetype=jes jesowner=* jesjobname=PC7*
200 SITE command was accepted
ftp dir
200 Port request OK.
125 List started OK for JESJOBNAME=PC7*, JESSTATUS=ALL and JESOWNER=*
JOBNAME  JOBIDOWNERSTATUS CLASS
PC7IABND JOB51431 MSTRLI   OUTPUT PRC= 5 spool files
PC7H900W JOB50522 MSTRLI   OUTPUT PRC= 20 spool files
PC7IABND JOB50031 MSTRLI   OUTPUT PRC= 5 spool files
PC7IDR2M JOB49337 MSTRLI   OUTPUT ERC= 1 spool files
PC7IABND JOB48484 MSTRLI   OUTPUT HRC= 5 spool files
PC7IDR1M JOB48211 MSTRLI   OUTPUT ERC= 5 spool files
PC7IABND JOB46866 MSTRLI   OUTPUT PRC= 5 spool files
PC7HUSRM JOB46609 MSTRLI   OUTPUT ERC= 1 spool files
PC7IABND JOB46185 MSTRLI   OUTPUT PRC= 5 spool files
PC7IABND JOB45739 MSTRLI   OUTPUT PRC= 5 spool files
PC7IABND JOB3 MSTRLI   OUTPUT PRC= 5 spool files
PC7HFOM2 JOB43483 MSTRLI   OUTPUT PRC= 5 spool files
PC7IABND JOB42713 MSTRLI   OUTPUT PRC= 5 spool files
PC7HFOM1 JOB42514 MSTRLI   OUTPUT PRC= 5 spool files
PC7H900W JOB41756 MSTRLI   OUTPUT PRC= 20 spool files
PC7IABND JOB41212 MSTRLI   OUTPUT PRC= 5 spool files
PC7HUSRM JOB40938 MSTRLI   OUTPUT ERC= 1 spool files
PC7IABND JOB39732 MSTRLI   OUTPUT PRC= 5 spool files
PC7H900W JOB33507 MSTRLI   OUTPUT PRC= 20 spool files
PC7H900W JOB25263 MSTRLI   OUTPUT PRC= 20 spool files
PC7H900W JOB16570 MSTRLI   OUTPUT PRC= 20 spool files
PC7H900W JOB09737 MSTRLI   OUTPUT PRC= 20 spool files
PC7HFOM2 JOB08597 MSTRLI   OUTPUT PRC= 1 spool files
PC7HFOM1 JOB07711 MSTRLI   OUTPUT PRC= 1 spool files
PC7HUSRM JOB06261 MSTRLI   OUTPUT ERC= 1 spool files
PC7H900W JOB03312 MSTRLI   OUTPUT PRC= 20 spool files
250 List completed successfully.
ftp: 1790 bytes received in 1.17Seconds 1.53Kbytes/sec.
ftp get j3312 pc7h900w.output.txt
200 Port request OK.
125 Sending all spool files for requested Jobid
250 Transfer completed successfully.
ftp: 81870 bytes received in 1.83Seconds 44.79Kbytes/sec.
ftp

===

At this point, I have pc7h900w.output.txt on my desktop drive. I can bring it 
up in Word or Notepad or ??? and print it like normal. Well, usually.

ref: 
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/f1a1b990/4.14.8.1


--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * 
john.mck...@healthmarkets.com * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM

 

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Larry Macioce
 Sent: Friday, February 04, 2011 7:59 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: accesing output from jes spool
 
 WE are having a problem with our printer(wont name the 
 brand), but we have
 all of last nights processing in the spool and need to get it 
 out and print
 some of the standard report.
 We have CA-Dispatch but only a few jobs are setup with online viewing.
 Is there a way to retrieve the output from jes get it to a 
 dataset so we
 could ftp to a network printer?
 Thanks
 Mace
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html
 
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu 

Re: IBMLINK Down?

2011-02-04 Thread Mark Jacobs

Looks like its back up.

On 02/04/11 09:14, Staller, Allan wrote:

Don't have access to IBM link, however try

http://www-947.ibm.com/support/entry/portal/Troubleshooting

for normal research.

ETR's, etc. of course will require IBMLINK.


snip

Getting an 500 Internal Server Error this morning. Is anyone else
getting the same error?
/snip

   


--
Mark Jacobs
Time Customer Service
Tampa, FL


Surrounding yourself with dwarfs does not make you a giant

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TIMEUSED versus TCBTTIME

2011-02-04 Thread Rob Scott
TCBTTIME is *not* updated when task is actually dispatched and executing on a 
CPU, only when it gets interrupted by something like WAIT.

TCBTTIME will not include any fancy CPU stats either (Enclave SRB, zIIP and 
zAAP).

Also, I do not believe that TCBTTIME is a GUPI field.

However, for a quick and dirty sniff at how a normal program is executing, I 
see little risk for an in-house utility if the limitations are known.

Rob Scott
Lead Developer
Rocket Software
275 Grove Street * Newton, MA 02466-2272 * USA
Tel: +1.617.614.2305
Email: rsc...@rs.com
Web: www.rocketsoftware.com 


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Charles Mills
Sent: 04 February 2011 14:53
To: IBM-MAIN@bama.ua.edu
Subject: TIMEUSED versus TCBTTIME

The discussion of the ECT parameter of TIMEUSED on the thread STCK vs
TIMUSED got me to wondering. I am currently using TCBTTIME in a product
rather than TIMEUSED. The advantages of TCBTTIME as I see it are (1) has to
be very low overhead and (2) I can do it directly in C without linking to
assembler:

psa* psaPtr = NULL;
tcb* tcbPtr = (tcb *)psaPtr-psatold;
long long ttimer = *(long long *)tcbPtr-tcbttime;

What are the disadvantages? I would guess that TCBTTIME is only updated now
and then -- is that right? My product is not a profiler -- it's a
long-running STC and the CPU time is for my general information. How out of
date (out of time?) is TCBTTIME? The last the task was dispatched?

Charles

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: LINKLIB in use / Darwin

2011-02-04 Thread Arthur Gutowski
On Thu, 3 Feb 2011 15:21:31 -0800, Donnelly, John P 
john.p.donne...@nsc.com wrote:

...we need to start the IBM-MAIN equivalent of the Darwin Awards...

Tom M. once told me a story about the DD DUMMY of the Day/Week/Year 
awards at a past shop.  I think there was a plaque or a trophy that went 
along with it...

Cheers,
Art Gutowski

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TIMEUSED versus TCBTTIME

2011-02-04 Thread Chris Craddock
On Fri, Feb 4, 2011 at 9:38 AM, Rob Scott rsc...@rocketsoftware.com wrote:

 TCBTTIME is *not* updated when task is actually dispatched and executing on
 a CPU, only when it gets interrupted by something like WAIT.

 TCBTTIME will not include any fancy CPU stats either (Enclave SRB, zIIP
 and zAAP).

 Also, I do not believe that TCBTTIME is a GUPI field.

 However, for a quick and dirty sniff at how a normal program is
 executing, I see little risk for an in-house utility if the limitations are
 known.
 http://bama.ua.edu/archives/ibm-main.html




All true and good sensible stuff too. For a quick and dirty (and fairly
light weight) way to coerce the system into updating it there's always this
old trick...

 WAIT ECB=PHONY

 (do stuff)

 DS 0F
PHONY DC  X'4000'

the system sees PHONY as a posted ECB and gets the flock out of there PDQ,
updating all of its relevant dispatch counters and accounting fields on the
way.

:-)

-- 
This email might be from the
artist formerly known as CC
(or not) You be the judge.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TIMEUSED versus TCBTTIME

2011-02-04 Thread Kirk Wolf
Charles,

Related to your comment: have you looked at the new assembler gcc-style
inlining in xlc on z/OS?

I'm starting to have some fun with it;  in some cases it eliminates the need
for Metal-C and in many it can replace writing XPLINK assembler leaf
routines.

Kirk Wolf
Dovetailed Technologies

On Fri, Feb 4, 2011 at 8:52 AM, Charles Mills charl...@mcn.org wrote:

 The discussion of the ECT parameter of TIMEUSED on the thread STCK vs
 TIMUSED got me to wondering. I am currently using TCBTTIME in a product
 rather than TIMEUSED. The advantages of TCBTTIME as I see it are (1) has to
 be very low overhead and (2) I can do it directly in C without linking to
 assembler:

 psa* psaPtr = NULL;
 tcb* tcbPtr = (tcb *)psaPtr-psatold;
 long long ttimer = *(long long *)tcbPtr-tcbttime;

 What are the disadvantages? I would guess that TCBTTIME is only updated
 now
 and then -- is that right? My product is not a profiler -- it's a
 long-running STC and the CPU time is for my general information. How out of
 date (out of time?) is TCBTTIME? The last the task was dispatched?

 Charles

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: LINKLIB in use / Darwin

2011-02-04 Thread David Andrews
On Fri, 2011-02-04 at 11:02 -0500, Arthur Gutowski wrote:
 Tom M. once told me a story about the DD DUMMY of the Day/Week/Year 
 awards at a past shop.  I think there was a plaque or a trophy that went 
 along with it...

We have a trophy that gets passed around, and which the recipient is
required to prominently display in his office until someone else
deserves it.  An eagle bears a target on its wings, and the placard
below reads: Nice shooting Tex

-- 
David Andrews
A. Duda  Sons, Inc.
david.andr...@duda.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: LINKLIB in use

2011-02-04 Thread Shmuel Metz (Seymour J.)
In 269952.46594...@web114720.mail.gq1.yahoo.com, on 02/04/2011
   at 01:08 AM, Walter Marguccio walter_marguc...@yahoo.com said:

see old.linklib being deleted under their nose.

They're perfectly happy; it's not their dog. OTOH, *you* might not be
happy with the results. I wouldn't do it unless it was an emergency
with no other way out.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
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...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: LINKLIB in use

2011-02-04 Thread Shmuel Metz (Seymour J.)
In 47594.94673...@web114719.mail.gq1.yahoo.com, on 02/03/2011
   at 01:24 PM, Walter Marguccio walter_marguc...@yahoo.com said:

However, even if you purge LLA and issue SETPROG LNKLST,UNALLOCATE 
(freeing the dataset from the XCFAS), I don't think you can delete 
your old.linklib.

You can; it will leave you with a DEB pointing to free space. It's not
a problem on somebody else's system as long as they don't claim that I
said it was safe. It is, however, against my religous principles: I'm
a devout coward.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
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...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: LINKLIB in use / Darwin

2011-02-04 Thread Donnelly, John P
...we had a Boyd Award that was rotated among the group based on the last one 
to @$%up...an ugly little dinosaur thing...
...HR heard about it(?) and we had to discontinue the practice...
...a ceremony was conducted at the local watering hole and I was selected as 
the permanent custodian...What an Honor; I was so pleased...
 
John Donnelly
National Semiconductor Corporation
2900 Semiconductor Drive
Santa Clara, CA 95051

408-721-5640 
408-470-8364 Cell
cjp...@nsc.com



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
David Andrews
Sent: Friday, February 04, 2011 8:23 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: LINKLIB in use / Darwin

On Fri, 2011-02-04 at 11:02 -0500, Arthur Gutowski wrote:
 Tom M. once told me a story about the DD DUMMY of the Day/Week/Year 
 awards at a past shop.  I think there was a plaque or a trophy that went 
 along with it...

We have a trophy that gets passed around, and which the recipient is
required to prominently display in his office until someone else
deserves it.  An eagle bears a target on its wings, and the placard
below reads: Nice shooting Tex

-- 
David Andrews
A. Duda  Sons, Inc.
david.andr...@duda.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TIMEUSED versus TCBTTIME

2011-02-04 Thread Charles Mills
@Kirk: I looked at it. I played a little with the in-line TRT to replace an
strchr() or similar. I did not see any performance improvement and backed it
out. (Note *I did not see* a performance improvement; not there was no ...
It may have been below my threshold of measurement.) 

@Rob: It's not an in-house program, but the CPU time measure is a hidden
development-only feature. I'm not using any zIIPs or zAAPs and I am just
interested in some general guidance: is CPU time for this version in line
with CPU time for the last version when the so-and-so feature is turned on?
My granularity is CPU time used over hours spent 99% in a wait state.
Nothing I am hearing persuades me that TCBTTIME is inappropriate. (I'm not
avoiding an assembler call to save CPU overhead; I'm avoiding an assembler
call to avoid unnecessary complexity. You could argue the point, but I think
the code I quoted is more obvious and more maintainable than an external
call, especially since I am in a situation where there is more C talent than
assembler talent.)

@Chris: Interesting. Do you suppose the technique you describe is cheaper
than TIMEUSED with ECT?

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf
Of Kirk Wolf
Sent: Friday, February 04, 2011 8:14 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: TIMEUSED versus TCBTTIME

Charles,

Related to your comment: have you looked at the new assembler gcc-style
inlining in xlc on z/OS?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TIMEUSED versus TCBTTIME

2011-02-04 Thread Chris Craddock
On Fri, Feb 4, 2011 at 10:38 AM, Charles Mills charl...@mcn.org wrote:

 @Chris: Interesting. Do you suppose the technique you describe is cheaper
 than TIMEUSED with ECT?



Hard to tell without benchmarking it and I wouldn't offer a
prediction. *HOWEVER* if you are of a mind to sample relevant fields from
various control blocks yourself, then this dirty trick gives you a point in
time consistency and the cost is essentially a type 1 SVC entry and exit
linkage plus a tiny amount of processing in the wait logic until it notices
the ecb has already been posted.


-- 
This email might be from the
artist formerly known as CC
(or not) You be the judge.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: LINKLIB in use / Darwin

2011-02-04 Thread Tom Marchant
On Fri, 4 Feb 2011 10:02:50 -0600, Arthur Gutowski wrote:

Tom M. once told me a story about the DD DUMMY of the Day/Week/Year
awards at a past shop.  I think there was a plaque or a trophy that went
along with it...

It was called the axe.  A very light weight black plastic tube about four 
feet long with a slot in the end and a cardboard axe head with DD DUMMY 
written on it.  When someone did something really stupid, they would get 
the axe.  It would hang outside their office until the next deserving deed 
by someone else.

-- 
Tom Marchant

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TIMEUSED versus TCBTTIME

2011-02-04 Thread Tom Marchant
On Fri, 4 Feb 2011 08:38:12 -0800, Charles Mills wrote:

My granularity is CPU time used over hours spent 99% in a wait state.

@Chris: Interesting. Do you suppose the technique you describe is cheaper
than TIMEUSED with ECT?

Maybe the TCBTTIME as of the last time you were dispatched is sufficient.

-- 
Tom Marchant

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: LINKLIB in use / Darwin

2011-02-04 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of David Andrews
 
 On Fri, 2011-02-04 at 11:02 -0500, Arthur Gutowski wrote:
  Tom M. once told me a story about the DD DUMMY of the Day/Week/Year
  awards at a past shop.  I think there was a plaque or a trophy that went
  along with it...
 
 We have a trophy that gets passed around, and which the recipient is
 required to prominently display in his office until someone else
 deserves it.  An eagle bears a target on its wings, and the placard
 below reads: Nice shooting Tex

At a former shop we had an award called Bum Steer, which originated before my 
tenure there allegedly because of a wrong answer to a support question that 
turned out to be not only right, but brilliant.  The Bum Steer award 
evolved into that shop's equivalent of a Nobel Prize.

-jc-

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Does ROUND dataset allocation mean cylinder boundary?

2011-02-04 Thread J R
From: hobbitt druidl...@gmail.com
Date: Fri, 4 Feb 2011 08:43:48 -0800 (PST)
Local: Fri, Feb 4 2011 11:43 am 

 

 On Feb 1, 10:41 pm, jayare...@hotmail.com (J R) wrote: 


  The JCL User's Guide is more specific on this.  It explicitly states:   

  if you code ROUND as the last subparameter in the SPACE parameter, the 
  system allocates the smallest number of cylinders needed to contain the 
  request.   

  Cylinder allocation (and therefore ROUND used with average block or 
  average record) allows faster input/output of sequential data sets than 
  does track allocation.   

  If you request space in terms of average block length, the system will 
  compute and allocate the smallest number of tracks (or cylinders if ROUND 
  is specified)   

  if you specify the secondary quantity in cylinders, in blocks, or in 
  records with the ROUND subparameter, then the secondary space allocated to 
  the data set starts at the beginning of a cylinder.   

 Thanks, J R - I've gotten used to only checking the Reference and not 
 the User guide, so I didn't see that thwack on the head.  The 
 section on secondary allocations has this statement: 

 [...] if you specify [...] the ROUND subparameter, then the secondary 
 space allocated to the data set starts at the beginning of a 
 cylinder. 

 But I don't see any similar explicit declaration about primary space 
 boundaries. 

 ++hobbitt 

 
I don't know why they spelled it out for secondary allocation and not primary 
allocation.  They didn't neeed to do it for either.  

Cylinder allocation means whole cylinders.  Whole cylinders start on cylinder 
boundaries.  

ROUND requests the smallest cylinder allocation that has at least the amount of 
space requested by other terminology.  


  
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Sloppy alignment in D M=CPU legend

2011-02-04 Thread Edward Jaffe
Anyone ever notice the sloppy column alignment in the legend following a D 
M=CPU command. Is there a technical reason they couldn't line things up? They 
didn't notice it was wrong during testing? I know this is a nit. But stuff 
like this bugs me. OK. Thanks for listening to my pedantic rant. :-D


IINTEGRATED INFORMATION PROCESSOR (zIIP)
CPC ND  CENTRAL PROCESSING COMPLEX NODE DESCRIPTOR ---here
CPC SI  SYSTEM INFORMATION FROM STSI INSTRUCTION ---and here
CPC ID  CENTRAL PROCESSING COMPLEX IDENTIFIER ---and here
CPC NAME CENTRAL PROCESSING COMPLEX NAME
LP NAME  LOGICAL PARTITION NAME
LP IDLOGICAL PARTITION IDENTIFIER
CSS ID   CHANNEL SUBSYSTEM IDENTIFIER
MIF ID   MULTIPLE IMAGE FACILITY IMAGE IDENTIFIER

should be:

IINTEGRATED INFORMATION PROCESSOR (zIIP)
CPC ND   CENTRAL PROCESSING COMPLEX NODE DESCRIPTOR
CPC SI   SYSTEM INFORMATION FROM STSI INSTRUCTION
CPC ID   CENTRAL PROCESSING COMPLEX IDENTIFIER
CPC NAME CENTRAL PROCESSING COMPLEX NAME
LP NAME  LOGICAL PARTITION NAME
LP IDLOGICAL PARTITION IDENTIFIER
CSS ID   CHANNEL SUBSYSTEM IDENTIFIER
MIF ID   MULTIPLE IMAGE FACILITY IMAGE IDENTIFIER

--
Edward E Jaffe
Phoenix Software International, Inc
831 Parkview Drive North
El Segundo, CA 90245
310-338-0400 x318
edja...@phoenixsoftware.com
http://www.phoenixsoftware.com/

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Sloppy alignment in D M=CPU legend

2011-02-04 Thread Patrick Lyon
On Fri, 4 Feb 2011 10:03:26 -0800, Edward Jaffe 
edja...@phoenixsoftware.com wrote:

Anyone ever notice the sloppy column alignment in the legend following a D
M=CPU command. Is there a technical reason they couldn't line things up? 
They
didn't notice it was wrong during testing? I know this is a nit. But stuff
like this bugs me. OK. Thanks for listening to my pedantic rant. :-D



Interesting that bothers you but the LP NAME and LP ID do not?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Ñ(X'69') character and SYSLOG display

2011-02-04 Thread Tony Harminc
On 2 February 2011 09:50, W. Kevin Kelley wkkel...@optonline.net wrote:

 WTOs, WTORs and WTLs have always been restricted to a subset of code-
 page 037 character set 697. Specifically, the following characters:

 A through Z
 0 through 9
 characters + * / , .  ( ) ' - = :  %   ? ; and blank

 Some additional code-points are not translated to blanks. Here is the
complete
 translate table:

   x0 x1 x2 x3 x4 x5 x6 x7 x8 x9 xA xB xC xD xE xF
 -
 0x | 40 40 40 40 40 40 40 40 40 40 40 40 40 40 4C 6E ..
 1x | 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 
 2x | 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 
 3x | 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 
 4x | 40 40 40 40 40 40 40 40 40 40 4A 4B 4C 4D 4E 4F ..?.(+|
 5x | 50 40 40 40 40 40 40 40 40 40 5A 5B 5C 5D 5E 5F .!$*);^
 6x | 60 61 40 40 40 40 40 40 40 40 40 6B 6C 6D 6E 6F -/.,%_?
 7x | 40 40 40 40 40 40 40 40 40 40 7A 7B 7C 7D 7E 7F ..:#@'=
 8x | 40 81 82 83 84 85 86 87 88 89 40 40 40 40 40 40 .abcdefghi..
 9x | 40 91 92 93 94 95 96 97 98 99 40 40 40 40 40 40 .jklmnopqr..
 Ax | 40 40 A2 A3 A4 A5 A6 A7 A8 A9 40 40 40 40 40 40 ..stuvwxyz..
 Bx | 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 
 Cx | 40 C1 C2 C3 C4 C5 C6 C7 C8 C9 40 40 40 40 40 40 .ABCDEFGHI..
 Dx | 40 D1 D2 D3 D4 D5 D6 D7 D8 D9 40 40 40 40 40 40 .JKLMNOPQR..
 Ex | 40 40 E2 E3 E4 E5 E6 E7 E8 E9 40 40 40 40 40 40 ..STUVWXYZ..
 Fx | F0 F1 F2 F3 F4 F5 F6 F7 F8 F9 40 40 40 40 40 40 0123456789..

Unfortunately the characters you list don't quite match those in the table,
and a few in the table have suffered from ASCII-ism, and not survived
correctly into my browser. Notably, the character at position 4A is a cent
sign, and that at 5F is a logical NOT sign.

This table is otherwise a very close match for IBM CS 101, which adds only
the broken vertical bar at 6A, the back quote at 79, and the tilde at A1.

Tony H.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: STCK vs TIMUSED

2011-02-04 Thread michealbutz
You are correct sir 


I am going to implement the code the way you described in the previous e-mail


Critical piece of code 

So It would interesting to see time usage thankx for your help 


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Hardee,
Charles H
Sent: Thursday, February 03, 2011 3:30 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: STCK vs TIMUSED

At the risk of assuming something, I suspect that the 26 character TOD is a 
formatted
string like this  /MM/DD.HH:MM:SS.XX
The XX on the end would be microseconds.

Chuck

Charles Hardee
CA technologies
Sr Sustaining Engineer
Tel:  +1-952-838-1039
charles.har...@ca.com



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Tony
Harminc
Sent: Thursday, February 03, 2011 2:08 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: STCK vs TIMUSED

On 3 February 2011 13:11, Micheal Butz michealb...@optonline.net wrote:
 I am doing this in Rexx exec processing a SVC dump after calling
 BLSUXTOD. To convert the double word to a 26 character string I use the last
 6 digits

I don't understand what this means, and I'm not at all sure how you
get 26 characters from an 8-byte value. Even if you convert it to a
decimal number, the largest value X'' is 20 decimal
digits. Are you putting in commas or something?


 I understand I can bypass this conversion and just do the
 subtraction as you said on the double word regardless wouldn't the results
 be the same. ???

It rather depends on what this 26-character thing is, I think.

Also keep in mind that all TOD values since May 11, 1971 at about noon
have their high bit on, and so can lead to trouble if you or your
programming language insists on treating the whole thing as a signed
binary integer. Shifting the value(s) right by 12 bits addresses this
potential problem at the same time as it converts to microseconds,
which are usually both accurate enough for most purposes, and easier
to understand and sanity check than are the raw numbers.

Tony H.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: accesing output from jes spool

2011-02-04 Thread Schwarz, Barry A
You can also use the SDSF XDC line command at least as far back as OS/390 2.10 
to get the data into a dataset.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Larry Macioce
Sent: Friday, February 04, 2011 5:59 AM
To: IBM-MAIN@bama.ua.edu
Subject: accesing output from jes spool

WE are having a problem with our printer(wont name the brand), but we have
all of last nights processing in the spool and need to get it out and print
some of the standard report.
We have CA-Dispatch but only a few jobs are setup with online viewing.
Is there a way to retrieve the output from jes get it to a dataset so we
could ftp to a network printer?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TIMEUSED versus TCBTTIME

2011-02-04 Thread Robert A. Rosenberg
At 10:13 -0600 on 02/04/2011, Chris Craddock wrote about Re: TIMEUSED 
versus TCBTTIME:



All true and good sensible stuff too. For a quick and dirty (and fairly
light weight) way to coerce the system into updating it there's always this
old trick...

 WAIT ECB=PHONY

 (do stuff)

 DS 0F
PHONY DC  X'4000'

the system sees PHONY as a posted ECB and gets the flock out of there PDQ,
updating all of its relevant dispatch counters and accounting fields on the
way.


I might be mistaken but for some reason I have the impression that 
there was a sanity check added to the WAIT macro to bypass the SVC 
(and thus the wasted overhead) if the ECB has been posted already.


IOW:

TM   0(1),x'40'
JO   *+6
SVC

If true, the phony WAIT will not work since you never get to the WAIT 
routine. OTOH: I may be thinking of a private better WAIT Macro 
(IMO: There is no reason why this type of check is NOT in the macro).


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TIMEUSED versus TCBTTIME

2011-02-04 Thread Edward Jaffe

On 2/4/2011 1:52 PM, Robert A. Rosenberg wrote:

I may be thinking of a private better WAIT Macro


You must be.

--
Edward E Jaffe
Phoenix Software International, Inc
831 Parkview Drive North
El Segundo, CA 90245
310-338-0400 x318
edja...@phoenixsoftware.com
http://www.phoenixsoftware.com/

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TIMEUSED versus TCBTTIME

2011-02-04 Thread Edward Jaffe

On 2/4/2011 8:13 AM, Chris Craddock wrote:

All true and good sensible stuff too. For a quick and dirty (and fairly
light weight) way to coerce the system into updating it there's always this
old trick...

  WAIT ECB=PHONY

  (do stuff)

  DS 0F
PHONY DC  X'4000'

the system sees PHONY as a posted ECB and gets the flock out of there PDQ,
updating all of its relevant dispatch counters and accounting fields on the
way.


You have something against CALLDISP? ;-)

--
Edward E Jaffe
Phoenix Software International, Inc
831 Parkview Drive North
El Segundo, CA 90245
310-338-0400 x318
edja...@phoenixsoftware.com
http://www.phoenixsoftware.com/

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Access to wiki.linuxvm.org

2011-02-04 Thread Mark Post
Cross-posted to Linux-390, IBMVM, and IBM-Main

All,

wiki.linuxvm.org has been under attack for about the last week from spammers 
and vandals.  I think I've got it largely under control for now.  The attackers 
seemed to be using a zombie net, so a _lot_ of IP addresses are now blocked at 
the firewall.  If you or someone you know cannot get to wiki.linuxvm.org, 
please contact me off list with the IP address being used.  It may have been 
part of the zombie net, or an innocent bystander.  If the former, you _really_ 
want that to get fixed.  If the latter, I can fix it for you.


Thanks,

Mark Post

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TIMEUSED versus TCBTTIME

2011-02-04 Thread Bob Rutledge

Edward Jaffe wrote:

On 2/4/2011 8:13 AM, Chris Craddock wrote:

All true and good sensible stuff too. For a quick and dirty (and fairly
light weight) way to coerce the system into updating it there's always 
this

old trick...

  WAIT ECB=PHONY

  (do stuff)

  DS 0F
PHONY DC  X'4000'

the system sees PHONY as a posted ECB and gets the flock out of 
there PDQ,
updating all of its relevant dispatch counters and accounting fields 
on the

way.


You have something against CALLDISP? ;-)



He did say it was an _old_ trick!

Bob

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TIMEUSED versus TCBTTIME

2011-02-04 Thread David Crayford

On 5/02/2011 12:38 AM, Charles Mills wrote:

@Kirk: I looked at it. I played a little with the in-line TRT to replace an
strchr() or similar. I did not see any performance improvement and backed it
out. (Note *I did not see* a performance improvement; not there was no ...
It may have been below my threshold of measurement.)


Charles,

I've noticed quite surprising performance improvements using Metal/C. An 
interesting optimziation
is the HGRP compiler option which tells the compiler to use 64-bit 
instructions in 31-bit code. A
recent whitepaper I read states it almost always produces faster code 
http://www-03.ibm.com/support/techdocs/atsmastr.nsf/WebIndex/WP101796
and profiling has proved that to be correct by about 2%. On new hardware 
the compiler can use the PFD instruction to
pre-fetch data into a cache line, thus preventing cache misses. You 
would have to be a very good assembler programmer

and have in-depth knowledge of the hardware to hand crank that kind of code.

With the explosion of open source code written in C Metal/C can be used 
to compile C code into assembler that can be
then called from assembler routines. For example grab this code 
http://adtinfo.org/index.html compile it with the Metal/C compiler and
you have a very good balanced binary tree library that can be called 
from any language - assembler, COBOL, PL/1 etc.
You might just want to use the malloc()/calloc()/free() memory alloctor 
from the Metal/C runtime in your assembler.


To make Metal/C more useful IBM need to provide header files with C 
struct equivilents of SYS1.MACLIB/MODGEN.



@Rob: It's not an in-house program, but the CPU time measure is a hidden
development-only feature. I'm not using any zIIPs or zAAPs and I am just
interested in some general guidance: is CPU time for this version in line
with CPU time for the last version when the so-and-so feature is turned on?
My granularity is CPU time used over hours spent 99% in a wait state.
Nothing I am hearing persuades me that TCBTTIME is inappropriate. (I'm not
avoiding an assembler call to save CPU overhead; I'm avoiding an assembler
call to avoid unnecessary complexity. You could argue the point, but I think
the code I quoted is more obvious and more maintainable than an external
call, especially since I am in a situation where there is more C talent than
assembler talent.)

@Chris: Interesting. Do you suppose the technique you describe is cheaper
than TIMEUSED with ECT?

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf
Of Kirk Wolf
Sent: Friday, February 04, 2011 8:14 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: TIMEUSED versus TCBTTIME

Charles,

Related to your comment: have you looked at the new assembler gcc-style
inlining in xlc on z/OS?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


REXX signal

2011-02-04 Thread john gilmore
The REXX signal statement is a VARIANT of the PL/I signal statement.  A 
typical,  trivial, traditional  example of its use of in PL/I is
 
On endpage(outfile) begin ; /* start new page: eject, increment page number, 
   put title block at top of new page */
  . . .
end ;
 
open file(outfile) stream output pagesize(50) ; 
 
signal endpage(outfile) ;  /* put title at top of first page */
 
do while(more) ;
  . . . 
  put file(outfile) . . . ;
  . . . 
end ;
 
which is of no great intellectual interest but does simplify report writing.
 
What happens in PL/I or REXX when a SIGNAL statement is executed depends upon 
how it is used.  Its use may be, often is, virtuous; or again it can be 
misused, just as can assignment or IF-THEN-ELSE statements.  The idea that a 
statement sucks because novices can misuse it is absurd, and making it is 
irresponsible.
 
Mr. Gilmartin's statements about exits from DO groups in REXX (and PL/I) are 
also without merit.  Consider
 
outer: do . . . ;
  . . .
  inner: do . . . ;
. . .
   innermost: do . . . ;
 . . .
 leave ;  /* leaves innermost */
 . . .
 leave outer ;
 . . .
   end innermost ;
   . . .
  end inner ;
  . . .
end outer ;
 
It provides very fine-grained control, much better control than its primitive C 
analogue, the break statement.
 
I conjecture that Mr. Gilmartin was frightened by a GOTO in infancy and that he 
therefore objects to labels because they can be the targets of GOTOs.  
 
He is welcome to this view.  His caricatures of REXX are not so defensible.  In 
particular, and here I repeat myself, the notion that a language construct 
should be avoided because novices can misuse it is a footling one that smacks 
too much of Big Brother to be allowed to go unremarked here.   
 
John Gilmore Ashland, MA 01721-1817 USA

  
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: REXX signal

2011-02-04 Thread David Crayford

On 5/02/2011 10:56 AM, john gilmore wrote:

outer: do . . . ;
   . . .
   inner: do . . . ;
 . . .
innermost: do . . . ;
  . . .
  leave ;  /* leaves innermost */
  . . .
  leave outer ;
  . . .
end innermost ;
. . .
   end inner ;
   . . .
end outer ;


Syntactic suger (although very nice)! Some might prefer to break heavily 
nested loops into subroutines because they're easier to grok.




It provides very fine-grained control, much better control than its primitive C 
analogue, the break statement.




Show me how to do this in REXX or PL/1 
http://en.wikipedia.org/wiki/Duff%27s_device.




I conjecture that Mr. Gilmartin was frightened by a GOTO in infancy and that he 
therefore objects to labels because they can be the targets of GOTOs.

He is welcome to this view.  His caricatures of REXX are not so defensible.  In 
particular, and here I repeat myself, the notion that a language construct 
should be avoided because novices can misuse it is a footling one that smacks 
too much of Big Brother to be allowed to go unremarked here.

John Gilmore Ashland, MA 01721-1817 USA


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html