Re: The quantum computer comes of age

[Richard Tsujimoto]

Einstein regarded quantum (physics) as "spooky action at a distance".




"Jeffrey D. Smith" <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
02/06/2007 11:54 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: The quantum computer comes of age






> -Original Message-
> From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
> Behalf Of Paul Gilmartin
> Sent: Tuesday, February 06, 2007 9:23 AM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Re: The quantum computer comes of age
> 
> This is the sort of hype to potential investors and customers that
> I take cum grano salis.
> 
> But it might be real.
> 
> -- gil
> --
> StorageTek

I was thinking they should've scheduled it on April 1.


Jeffrey D. Smith
Principal Product Architect
Farsight Systems Corporation
700 KEN PRATT BLVD. #204-159
LONGMONT, CO 80501-6452
303-774-9381 direct
303-484-6170 FAX
http://www.farsight-systems.com/
see my résumé at my website (yes, I am looking for employment)

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Kristine Harper's blog

[Richard Tsujimoto]

I used structured macros when I consulted at the Federal Reserve Bank 
around 1981.  It was used for a custom-built messaging system running on 
CICS.  It was a new thing then and it was fun to use.  But, assembler is 
assembler, and you still have to keep track of the registers you use.  To 
make it readable, don't expand the macros.




Skip Robinson <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
01/25/2007 06:39 PM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Kristine Harper's blog






(This time with content.)

Here's the URL for Kristine Harper's blog. Kristine is the SHARE zNextGen 
Project Manager. She's probably too modest to blow her own horn, but this 
is fine stuff. 

http://www.neonesoft.com/blog/blogs/kharper/default.aspx

.
.
JO.Skip Robinson
Southern California Edison Company
SHARE MVS Program Co-Manager
626-302-7535 Office
323-715-0595 Mobile
[EMAIL PROTECTED]

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

CSI question

[Richard Tsujimoto]

I was looking at the info that could be retrieved using the Catalog Search 
Interface (CSI) and noticed that there wasn't a bit setting that can be 
tested to see if the VSAM data set is an ESDS or not.  There are bit 
settings for KSDS, RRDS, LDS, AIX, pagespace and so forth.  Anyone know 
how I test for an ESDS using CSI?

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

Re: CICS interface to CA-7

[Richard Tsujimoto]

Issuing any sort of SVC from a CICS task was always something that was 
discouraged (nothing like putting the region into a wait to make you 
popular with your users), but I suspect most (if not all) shops violate 
that rule.  Given that you don't know how long the CA code will take, it 
might be prudent to use an OS subtask.




"Chase, John" <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
01/17/2007 04:36 PM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: CICS interface to CA-7






> -Original Message-
> From: IBM Mainframe Discussion List On Behalf Of Alan C. Field
> 
> We have a CICS program that builds the parameter list and 
> then issues the CA-7 SVC to Demand jobs. 
> 
> This worked on CA-7 Rel 3.3,
> 
> We have just tried (and had to fall back) to upgrade to CA-7 
> 11.0 because this technique No longer works. 
> 
> CA's response id that the parameter list format changed and 
> they no longer document it. 
> 
> We'll pursue this further with them.
> 
> They suggest doing a LINK EP=U7SVC but this isn't allowed under CICS. 

One thing you CAN do in CICS nowadays is ATTACHX a subtask, passing it
the address of an ECB it can post (along with whatever other parms it
will need) when it's done, then EXEC CICS WAIT ECBLIST (but NOT an MVS
WAIT) for it to POST.  Alternatively, you could write a TRUE to link the
U7SVC (a little more complex, but saves the overhead of multiple ATTACHX
/ DETACH sequences).

But wouldn't you still need a correct parmlist to LINK EP=U7SVC anyway?

-jc-

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Just another example of mainframe costs.

[Richard Tsujimoto]

Here's an old article that describes how SIAC took the reverse route.  It 
doesn't mention the cost-savings, but you can be assured that SIAC didn't 
take this route to spend more money.

http://www.hpcwire.com/hpc-bin/artread.pl?direction=Current&articlenumber=101483

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

Re: VTAMSWITCH and muliple " MSwindows" of CICS screens.

[Richard Tsujimoto]

We use a product called CICS-Windows from Unicom Systems, Inc. which 
allows a user connected to a given CICS region to have multiple windows 
for that session.  The user can toggle through each screen, or they can 
split the physical screen into multiple logical views.

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

Re: Grammar (was RE: MB to Cyl Conversion)

[Richard Tsujimoto]

-jc- wrote:

>Well, you've been doing it wrong, then.  The subject of the sentence is
>NUMBER, not TRACKS.  NUMBER is singular; therefore IS is grammatically
>correct.

As noted in the reference below, the treating certains nouns as singular, 
or plural can be confusing (personally, I slept through most of the 
grammer lessons in grade school).  But, it seems that jc is correct.

http://www.staff.rice.edu/staff/Grammar1.asp

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

Re: Effi[ci]ency of branch table vs individual compare & branch

[Richard Tsujimoto]

John Gilmore wrote:

>Mr. Marchant does, however, play a useful role here.,  It is indeed so 
>useful that if he did not exist it would be necessary to invent him.

>His contributions are predictable, but they exemplify a practically 
>important point of view that, borrowing a useful term from C Wright 
Mills, I 
>shall call Crackpot Realism; and CR needs representation here.  We need 
to 
>be reminded, often, that those who identify the hard-to-maintain with 
>'complexity', with the use of any but ad hoc schemes, are numerous out 
there 
>in the boondocks.

Okay listers, it sounds like John needs a group hug.  I sense a lot of 
hostility there.
I've seen this happen before, usually with those who had a rough time in
the A/V squad.

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

Re: Effi[ci]ency of branch table vs individual compare & branch

[Richard Tsujimoto]

In general, I agree that a branch table works better than BDT, but I 
question the comparison of the two methods.  In the first case, you could 
be testing for anything, such as a string or a numeric value.  In the TR 
case you are testing for a single character.  If value in question were 
anything but a character, the usefulness of TR breaks down.  But, then 
again, if you were developing a syntax checker for a compiler, you would 
have to some sort of balanced tree data structure.

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

Re: Assembler question

[Richard Tsujimoto]

Right.  Given that we only have 8 bits to represent 1-256 bytes, it would 
be represented as X'00'-X'FF' in the instruction.  I see the discontinuity 
in design.  But, given the coding example where the target is 1 byte in 
length, a warning by the assembler might be nice, but IMHO, the 
responsibility lies with the programmer using (stylistically, or 
otherwise) his
knowledge of the tools as he/she fits.




Tom Marchant <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
11/07/2006 10:31 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: Assembler question






On Tue, 7 Nov 2006 10:14:38 -0500, Richard Tsujimoto 
<[EMAIL PROTECTED]> wrote:

>Is *discontinuity in assembler design* a nice way of saying, it's a bad
>design?  I would think a length of 1 and 0 are different,
>and MVC should perform accordingly, e.g. if length=0, do nothing.
>

No.  The assembler decrements the specified length by 1 and stores the 
value in the MVC instruction.  Read the POO.  MVC is designed to move from 

1 to 256 bytes using an 8 bit length.

If the instruction is coded with a length of zero, that length is not 
decremented, but stored in the MVC instruction.  I believe that's the 
discontinuity to which Gil refers.

Length of zero is frequently coded on a MVC that is to be used as the 
target of EXecute.

-- 
Tom Marchant

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Assembler question

[Richard Tsujimoto]

Is *discontinuity in assembler design* a nice way of saying, it's a bad 
design?  I would think a length of 1 and 0 are different,
and MVC should perform accordingly, e.g. if length=0, do nothing.




Paul Gilmartin <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
11/07/2006 10:02 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: Assembler question






In a recent note, Staller, Allan said:

> Date: Tue, 7 Nov 2006 08:47:19 -0600
> 
> 
> > flagged.
> >
> >  MVI MOZ,C'Z'
> >  MVC MOZ+1(255),MOZ
> 
> 
> Should't that be:
> 
>MVI MOZ,C'Z'
>MVC MOZ+1(L'MOZ-1),MOZ
> 
And, by a discontinuity in assembler design, if L'MOZ=1,
this clobbers one byte after MOZ rather than generating an
assembler error as I feel it should.

-- gil
-- 
StorageTek
INFORMATION made POWERFUL

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Assembler question

[Richard Tsujimoto]

Wouldn't that be:

MVS MOZ+1(L'MOZ-1),MOZ

Ah, to fan the flames of a holy war... ;-))




Ed Finnell <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
11/07/2006 09:36 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: Assembler question






 
In a message dated 11/7/2006 8:26:38 A.M. Central Standard Time, 
[EMAIL PROTECTED] writes:

Might be  nice if it generated a warning if target length was
*different* than the  literal.



Well you don't want to get too restrictive, then the old tricks
get flagged.
 
 MVI MOZ,C'Z'
 MVC MOZ+1(255),MOZ

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: CA-Spool Banner Page

[Richard Tsujimoto]

>I suspect that this was done to try to improve 
>security.  I also suspect that it will have the opposite 
>effect. 

I have no idea if what you fear will come to pass, but it sure sounds 
funny.  It's
reminiscent of the days when you (or a clerk) down to the output room to 
pickup the
printouts.  The surly person in the window would ask "whaddya want?" and 
eventually
toss you the output.  Only, in your case, it's a virtual person in the 
output window.

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

Re: EBCDIC to ASCII OPTCD=Q? (JCL)

[Richard Tsujimoto]

What happens if the tape label is AL and you code LABEL=(1,NL)?




Bruce Black <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
09/19/2006 11:15 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: EBCDIC to ASCII OPTCD=Q? (JCL)






>
> even if you code LABEL=(1,NL), OPEN checks to see if a label does in 
> fact exist.  And, if it does, OPEN will do some verfication of the 
> content, which could still lead to problems.
If you say NL but the tape that is mounted has labels (standard or ANSI) 
the mount is rejected

-- 
Bruce A. Black
Senior Software Developer for FDR
Innovation Data Processing 973-890-7300
personal: [EMAIL PROTECTED]
sales info: [EMAIL PROTECTED]
tech support: [EMAIL PROTECTED]
web: www.innovationdp.fdr.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: EBCDIC to ASCII OPTCD=Q? (JCL)

[Richard Tsujimoto]

IIRC, even if you code LABEL=(1,NL), OPEN checks to see if a label does in 
fact exist.  And, if it does, OPEN will do some verfication of the 
content, which could still lead to problems.  It's been a long time since 
I messed with tape labels, so I could be mistaken.



John Kington <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
09/19/2006 10:21 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: EBCDIC to ASCII OPTCD=Q? (JCL)






Howard,

Try adding LABEL=(1,AL) or LABEL=(1,NL). I think you are getting the
default of 1,SL which
does not work with OPTCD=Q.

Regards,
John

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Possible employment opportunity

[Richard Tsujimoto]

I'm posting this with the permission of my customer.

They are seeking to fill a sysprog spot (full-time employee) who, 
initially, will help out the other M/F sysprog and the MQ admin (me). 
Since the M/F is suppose to go away in the future, the MQ responsibility 
will shift to the distributed side.  The customer's current location is in 
Lake Success, New York but there's a strong possibility they will relocate 
to Melville, New York in the next couple of years.

The candidate should have a M/F sysprog background, with some M/F MQ (and 
CICS) experience, and be willing to provide 24x7 on-call support.  They 
should be able to code/understand assembler.  Since the MQ 
responsibilities will shift from the M/F to the distributed side (e.g. 
Windows, *IX, some AS/400), the candidate should be willing to learn MQ on 
those platforms.  Some C and shell coding experience would be nice.

The M/F environment (H/W and S/W) is backlevel (since it was suppose to be 
phased out for some time now), so we're running software that has been out 
of support for some time. 

I can't comment on the salary (because I'm not privy to it), but if anyone 
has any other interests/questions, please email me directly.  Also, this 
notice has been posted on the MQ listserver.

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

Re: sysrexx

[Richard Tsujimoto]

Yeah, I saw that too.  But, according to this resume I saw, the candidate 
claimed to have worked on a product, within IBM.  If it was a 
non-disclosure sort of thing, he wouldn't (shouldn't?) have listed it.




Paul Gilmartin <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
09/05/2006 11:08 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: sysrexx






In a recent note, Richard Tsujimoto said:

> Date: Tue, 5 Sep 2006 09:44:45 -0400
> 
> Does anyone know anything about this?  I think it's an IBM product,
> possibly still under development.
> 
In the only document containing "SYSREXX" found by a Google search,
it appears to be a DDNAME used by an ISV.

-- gil
-- 
StorageTek
INFORMATION made POWERFUL

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Terminal Status Block(TSB) - where to find its description

[Richard Tsujimoto]

You're right, the TSB is chained off the ASCB, not the extension.  I had 
to schedule an SRB to obtain the programmer's information via the JSCB. 
Like I said, I wrote it many years ago.




Binyamin Dissen <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
09/05/2006 09:54 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: Terminal Status Block(TSB) - where to find its description






On Tue, 5 Sep 2006 08:59:06 -0400 Richard Tsujimoto
<[EMAIL PROTECTED]> wrote:

:>I wrote a similar program (many years ago - I actually still have the 
:>source code).  If all you needs is the userid, then take it from 
ASCBJBNS. 
:> But, you need to confirm whether or not the ASCB is for a TSO user. You 

:>can determine that by looking at the CSCB (CHTRKID).  If you want to 
look 
:>at the description of the TSB, look at IKJTSB (which is in SYS1.MACLIB). 

:>If want to look at it via a program, you're going to have to do some 
:>cross-address processing, e.g. SRB.  I have some source code if you want 

:>it...email me off-line.

The TSB used to be in common. When was it moved to private?

--
Binyamin Dissen <[EMAIL PROTECTED]>
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel


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

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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

sysrexx

[Richard Tsujimoto]

Does anyone know anything about this?  I think it's an IBM product, 
possibly still under development.

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

Re: Terminal Status Block(TSB) - where to find its description

[Richard Tsujimoto]

I wrote a similar program (many years ago - I actually still have the 
source code).  If all you needs is the userid, then take it from ASCBJBNS. 
 But, you need to confirm whether or not the ASCB is for a TSO user.  You 
can determine that by looking at the CSCB (CHTRKID).  If you want to look 
at the description of the TSB, look at IKJTSB (which is in SYS1.MACLIB). 
If want to look at it via a program, you're going to have to do some 
cross-address processing, e.g. SRB.  I have some source code if you want 
it...email me off-line.

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

Re: IBMLink

[Richard Tsujimoto]

That URL actually resolves to:

https://www-304.ibm.com/usrsrvc/account/userservices/jsp/login.jsp?persistPage=true

which is the URL that worked originally.  That did work for me, but when 
you sign-out, and click on sign-in, you get a different URL and get a 
screen that asks you to update your profile.




Mark Zelden <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
08/28/2006 12:20 PM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: IBMLink






This is what I have bookmarked, and it just worked for me:

(sorry for any URL wrap)

http://www-306.ibm.com/ibmlink/link2/servicelink/servicelinkPage.jsp?lc=en&cc=US


Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group
mailto: [EMAIL PROTECTED]
z/OS and OS390 expert at http://searchDataCenter.com/ateExperts/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: IBMLink

[Richard Tsujimoto]

Very confusing.  If I follow the link http://www.ibm.com/ibmlink and 
select Unitied States>SIS>login, then I get my normal IBMLink page.  But, 
if I take that link directly to the login screen, I get the *apology*.

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

Re: IBMLink

[Richard Tsujimoto]

The new URL you posted worked for me.

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

Re: mqseries log problem ....urgent ..

[Richard Tsujimoto]

The better way to log is to use disk.  Anybody using tape logging is just 
asking for it.  And, as I mentioned earlier, with a little work, the disk 
logs can be copied to tape (note: the BSDS needs to be modified to reflect 
the tape volsers) for D/R purposes.

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

Re: mqseries log problem

[Richard Tsujimoto]

Jacky,

I suspect MQ was trying to capture critical logging info and needed to 
ensure the integrity of the data, causing a *freeze* of the environment. 
It doesn't matter how many logging tapes are available during this period 
if MQ is unable to safestore this data.

I would suggest changing the logging from tape to disk.  You could also 
copy the disk files to tape if you need them to go offsite for D/R 
purposes.


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

Re: Old product tapes

[Richard Tsujimoto]

Wow, SNOBOL.  That brings back some old memories.  I remember using it for 
a class assignment to create magic squares.

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

Re: S99RBXLN "Head's Up"

[Richard Tsujimoto]

I think Paul made a good point about not creating labels that are similar 
in format as the ones IBM distributes with their code.  I quickly checked 
my code and was relieved to see that I avoided that trap.  Nevertheless, 
thanks for the warning Ed.

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

Re: COBOL Working Storage being reset

[Richard Tsujimoto]

It's been a while, but I thought there were global options that get set 
when the product is installed, one of which affects how to treat working 
storage.  I also thought that you could create a separate set of options 
that could be used to override the global ones (on a per job basis).

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

Re: Number of Postings on IBM-Main

[Richard Tsujimoto]

It could be due to the *may-tag* repairman syndrome.  The m/f just keeps 
on chugging and doesn't need as much help anymore.  I subscribed to this 
listserver several years ago, but I also subscribed to the CICS and MQ 
listservers as well.  I got inundated with the postings and dropped out of 
this one.  Since I'm doing very little CICS, I dropped that one and 
resubscribed to this one.  Musical chairs.

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

Re: Using different storage key's

[Richard Tsujimoto]

Bruce wrote:
>Modern processor designers face a dilemma.  Instructions in hardware 
>(Bob R uses the term "in silicon") can be fast but once the processor is 
>released they are immutable; you can't change their operation without 
>replacing the chip at some fantastic expense.  Instructions in millicode 
>are essentially software, loaded when the processor is PORed, so they 
>can be changed by an EC (Engineering Change) by replacing the millicode 
>disk.  So the silicon instructions tend to be the more basic and most 
>frequently executed instructions, and others are in millicode.

Are customers given the option of paying more, for less millicode, sort of 
like
paying more for the luxury features of a car?

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

Re: LinkList Space issue?

[Richard Tsujimoto]

> IEW4000I FETCH FOR MODULE EZBTIINI FROM DDNAME -LNKLST- 
> FAILED BECAUSE
> INSUFFICIENT STORAGE WAS AVAILABLE.
> CSV031I LIBRARY ACCESS FAILED FOR MODULE EZBTIINI, RETURN CODE 14,
> REASON CODE 26110021, DDNAME *LNKLST*
> CSV028I ABEND106-14 JOBNAME=TCPIP STEPNAME=TCPIP

Is it possible that the restore clobbered something, e.g. PDS directory 
entry for EZBTINI?  Does the module length match the old lenght prior to 
the restore?

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

Re: Curiosity

[Richard Tsujimoto]

Chris wrote:
>If salaries and job opportunities really depended on core skills it
>might be different but industry just takes the crap they get and ends up
>doing OJT anyway.

I fully understand this point of view.  After all, when accounting 
students graduate, they can immediately use what they learned, e.g. 
balance a corp's books.  When a med student graduates, they can apply what 
their learned as well (although, I'd rather be worked on by a seasoned 
doc).  But, when a CS person graduates, he/she is better suited to simply 
go on to grad school, or go work for a vendor (e.g. IBM).  I'm a product 
of the system (CS puke), but I recognized that I needed marketable skills 
(SNOBOL was fun, but it doesn't pay the bills).  So, I went outside the 
university and took classes on BAL, and other like subjects.  Actually, I 
got my first job because I had learned Mark IV during my summer job.

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

publications

[Richard Tsujimoto]

Occasionally, I like to write articles on technical topics and have 
written for Technical Support and Xephon in the past.  I would like to 
write for other publications as well.  All suggestions welcomed.

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

Re: avgrec/avgblk history ?

[Richard Tsujimoto]

DYNALLOC is older thatn the 80's.  I remember writing my first DYNALLOC 
call in 1975-76.




Tony Harminc <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
06/26/2006 02:49 PM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: avgrec/avgblk history ?






I don't know about AVGREC, but AVBLOCK on TSO ALLOCATE (and the underlying
DYNALLOC) is very old - maybe early 1980s? It is there because there was
previously no DYNALLOC equivalent of the JCL allocation by blocks without
also setting the DCB BLKSIZE value.

Tony H.

> Hello: Does anyone know when (as in year/mvs level/dfp level) 
> that AVGREC space allocations and AVGBLK allocations became available?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: zLinux Experience

[Richard Tsujimoto]

Jim wrote:
>I took very conservative costs for the Intel machines ($2K per server)...

I assume you also factored in the staffing cost differences, which can be 
huge.

Unfortunately, those in power usually "manage by perception, or magazine". 
 There was an early case where SIAC replaced many Sun servers with Linux 
on zSeries, but it got barely a raised eye brow.

http://www-03.ibm.com/servers/eserver/zseries/os/linux/zseries_stock.html

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

Re: Mainframe Limericks...

[Richard Tsujimoto]

Lily said:
>Very well said indeed.  And by the way, I dare any of the so-called-real 
>american sysprogs on this list to say in french, or any other language 
>besides english, what Bruno said so eloquently.

Would it make you happy if we beat up Bruno in the school yard?  Grow up 
Lily.

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

Re: Old Hashing Routine

[Richard Tsujimoto]

Charles Mills wrote:
>There is nothing about an older program that necessarily means it will 
not
run AMODE 31.

A common practice used by older programs is using LA to clear the how 
order byte, which is a problem if it's a 31-bit address.

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

Re: What's your favorite ASCII and EBCDIC code pages?

[Richard Tsujimoto]

Kirk wrote:

>We'll have to wait for the votes to know the results, but
>in the meantime you might want to look at  Cp1047 (aka IBM-1047; Latin 
>Ebcdic US)  for
>taming those nasty brackets and braces :-)


>>I tried 1047 first and ran into some problems, although they escape me 
at this point (will have to research my notes). 

I checked my notes and 1047 did work, but I opened an ETR with IBM last 
September, asking what CCSID I should use.  They responded with 924.

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

Re: What's your favorite ASCII and EBCDIC code pages?

[Richard Tsujimoto]

Kirk wrote:

>We'll have to wait for the votes to know the results, but
>in the meantime you might want to look at  Cp1047 (aka IBM-1047; Latin 
>Ebcdic US)  for
>taming those nasty brackets and braces :-)

I tried 1047 first and ran into some problems, although they escape me at 
this point (will have to research my notes). 

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

Re: What's your favorite ASCII and EBCDIC code pages?

[Richard Tsujimoto]

David Cole wrote:

>Trying to come up with a "decent" (whatever that means) EBCDIC to 
>ASCII translation is a bit like trying to decide the length of the 
>coastline of Maine. It's all a matter of opinion.

>So... I am asking your opinions ...


I ran into some conversion annoyances when I sent data to/from *ix and 
Windows to MVS.  I think the problems were with square brackets.  Using 
037 for MVS didn't work, but I noticed that FTP didn't have a problem. So, 
I switched to CCSID 924, which is what FTP used on MVS.

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

Re: DYNALLOC with (Kilo)bytes

[Richard Tsujimoto]

Doug,

You got the wrong poster.  I'm not the original poster.  It was Beate 
Kawelke.




Doug Henry <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
06/09/2006 02:58 PM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: DYNALLOC with (Kilo)bytes






On Fri, 9 Jun 2006 10:24:04 -0400, Richard Tsujimoto 
<[EMAIL PROTECTED]> wrote:

>>I use DYNALLOC to allocate a dataset. I know the size of each record and
>the number of records, so I can compute the >number of bytes necessary.
  
 
DALAVGR (key is 8010) specifies the allocation unit to be used when the 
data set is allocated. 
 
If you do code DALAVGR (with SMS), DALBLKLN specifies the average record  
length in bytes of the data. The system computes the block size and the  
number of tracks to allocate.  
 
Doug 
  
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: DYNALLOC with (Kilo)bytes

[Richard Tsujimoto]

>I use DYNALLOC to allocate a dataset. I know the size of each record and 
the number of records, so I can compute the >number of bytes necessary.
 
>However, the only DYNALLOC text units for a space unit seem to be TRKS 
and CYLS. Did I overlook something ? Or do I >need to do the math myself, 
converting the # of bytes to the appropriate # of tracks ? Is this what 
ISPF 3.2 does >internally, too ? Is there a service to do the computation 
?

DALBLKLN - specifies tehaverage data block length

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

Re: Reading Variable record with bad BDW/RDW?

[Richard Tsujimoto]

JR wrote:

>The DCB has different layouts for different DSORGs;
>hence the reason that it is required.  If you clear
>the DSORG before OPEN, there may not be sufficient
>information for OPEN to work with.  (I didn't try this.)

I'm not sure why you couldn't code multiple DCBs, but that's another 
story.  The whole point of zapping the DSORG field prior to OPEN is to see 
if the DCB merge fills it in or not.

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

Re: Reading Variable record with bad BDW/RDW?

[Richard Tsujimoto]

You could simply code the DCB with DSORG, and at run-time, reinitialize 
the DSORG field.  Why would you want to hand-craft a control block?




Gerhard Postpischil <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
04/25/2006 08:58 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: Reading Variable record with bad BDW/RDW?






Binyamin Dissen wrote:
> :>>OPEN will not set DCBDSORG.
> :>If it's 0?
> No such thing. DCB macro requires it.
> It and the MACRF are required to properly build the DCB and to get the 
correct
> access methods loaded.

Just to be a bit pedantic, he could build his own DCB without using the 
macro. In the past I've committed a few programs that build their own 
control blocks, e.g., DCB/DEB/IOB combinations. Would be interesting to 
try this without a DSORG.

Gerhard Postpischil
Bradford, VT

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Reading Variable record with bad BDW/RDW?

[Richard Tsujimoto]

You could trying getting the FMT1DSCB for the data set and looking at the 
organization.




Thomas David Rivers <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
04/24/2006 03:18 PM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: Reading Variable record with bad BDW/RDW?






Hi John,

  Yeah... I know the directory portion isn't VB.  But, the program
  doesn't know that.. it "thinks" it's simply been given the name
  of a sequential VB file that it wants to process

  So - it stumbles blindly into the directory - and *whamo* - gets
  this "bad" data.

  So - I suppose - what's the best way to ask "Hey - is this at
  all a reasonable thing to be trying a VB-read on?"

 - Thanks -
 - Dave Rivers -


McKown, John wrote:

> 
> The directory of a PDS is not VB. It is
> RECFM=F,LRECL=256,BLKSIZE=256,KEYLEN=8. You can ignore the key, if you
> want. You must read all 256 bytes and "deblock" the "logical records"
> yourself. They are not compatable with RECFM=VB, but they are "close".
> "Close" only counts in horse shoes and nuclear weapons.
> 
> I have code, which I got from somewhere, that I can share. I also sure
> that there is some available on http://cbttape.org somewhere, but I
> don't know where.
> 
> --
> John McKown
> Senior Systems Programmer
> HealthMarkets

-- 
[EMAIL PROTECTED]Work: (919) 676-0847
Get your mainframe programming tools at http://www.dignus.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Fw: Anquish of JCL (Was: Migrating me from linux/bsd to zOS)

[Richard Tsujimoto]

On a few of our unix boxes, we actually have ISPF installed for a few 
crippled mainframers who have to do work on unix.  Personally, I feel 
*when in Rome, ...*

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

Re: Another fine mess

[Richard Tsujimoto]

Is it possible that someone isn't using the front-end?

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

Re: A very basic question

[Richard Tsujimoto]

So, it seems that this package is used to perform some sort of computation 
based on zip codes, or something along those lines.  If this is the 
primary (or part of) application on this CICS region, then it's quite 
conceivable that during a peak period, the region is, in effect, doing a 
lot of computations, which effectively prevents 
other CICS tasks from running.  There are a limited number of TCBs used to 
run CICS tasks, and if these tasks start doing a lot of computational 
work, the end-users will be looking slow R/T.  I don't see 2K I/O's per 
sec. being the culprit.  It's the package, how it's architected and how it 
really isn't designed to play nice in CICS if it becomes the primary 
workload.  But, I'm not answering the question, because I'm one of those 
who doesn't want to answer it.

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

Re: A very basic question

[Richard Tsujimoto]

>Hence, the question on cost for an I/O.
>Since we are in an out-sourced arrangement, MIPS have a real cost.

>So, does anybody have an answer?
>Or, do we just continue to dance?

Assuming all things equal in an ideal world, the cpu usage by this app 
would be constant, the R/T would be constant, the I/O overhead would be 
constant.  Given that performance is erratic, but cpu usage is 
consistently less than 5%, then it would seem it's more a question of I/O 
waits, not I/O processing.  I would look at resource contention, e.g. 
channel, device, etc.

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

Re: A very basic question

[Richard Tsujimoto]

>"What does it cost, in instructions (approximately) to do a VSAM I/O?"

I think you need to expand that question to:
1. what does it cost to do a VSAM I/O to real disk (or cache in your case, 
since the hit ratio is almost 100%)?
2. what does it cost to do a VSAM I/O but finds a hit in a memory buffer?
3. what does it cost to do a VSAM I/O but finds a hit in memory, e.g. 
CMDT?

If this region uses less than 5% of cpu, and the end-users do not complain 
about R/T, then do you really have problem?

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

Re: A very basic question

[Richard Tsujimoto]

What was the CPU utilization after the cache hit ration was 98%?




Ted MacNEIL <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
04/09/2006 08:00 PM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
A very basic question






This may sound like a CICS question, but it is about the cost of doing 
I/O.

We have a CICS application that is doing upwards of 2000 I/O's per second 
to a single VSAM file.
The entire CICS region is using 4.5% of a z/990 2084-309.
The CICS buffer hit ratio is around 60%, after we doubled the number of 
buffers (can't do that too many times).

The cache hit ratio is over 98%.

We have run out of all tuning options, save one.
Replace or remove the application.

In order to do that, our management wants to know what the cost (MIPS) of 
processing.
This is an almost real cost because our billing from our service provider 
is based on MIPS (rightly or wrongly).


-
-teD

O-KAY! BLUE! JAYS!
Let's PLAY! BALL!

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Migrating me from linux/bsd to zOS

[Richard Tsujimoto]

Understanding the hardware and software architecture of zOS is all well 
and fine but, from a conceptual viewpoint, these are subtleties that are 
not essential for starting down the road to technical support.  If you 
understand the hardware and software architecture of x86 and Windows, then 
it's not such a great leap to other architectures.  I think it's more 
important to learn the more mundane, practical things that every sysprog 
trainee goes through.  The biggest difference between the OSes you're used 
to and zOS is JCL. 

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

Re: Reading a Load Module

[Richard Tsujimoto]

try superzap




"JONES, CHARLIE" <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
03/29/2006 02:03 PM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Reading a Load Module






I would like to convert a loadlib module to a format that I can read
with a REXX Exec.  Is this

possible?  Can VPSPRINT copy a sequential datasets with the FOLD option?
Any suggestions

would be a great help.

 

Charlie


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Systems Programmer Levels Justification

[Richard Tsujimoto]

On the back of the machine, there's an off switch .




Desi de la Garza <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
03/28/2006 03:43 PM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Systems Programmer Levels Justification






MVS Listers,

We are in the process of justifying the requirement of having multiple
levels of SysProg job titles depending on experience and knowledge.

At the same time provide management with information as to why SysProgs 
are
higher salaried than application programmers. They are at a loss as to why
that is. Weird that they do not question why a network tech makes more 
than
the applications also.

Can someone guide me to where I may be able to locate such info? 

Thanks,
 
Desi de la Garza
Systems Programmer
Bexar County Information Services
[EMAIL PROTECTED]
 


--

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Wonder why IBM code quality is suffering?

[Richard Tsujimoto]

Based on the recent cost-saving activities at GM, it was revealed that for 
a worker making $30/hr, the actual cost to the company (which includes 
pensions) is $60/hr.




Ted MacNEIL <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
03/27/2006 07:00 PM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: Wonder why IBM code quality is suffering?






>take your quoted salary and add 33% to
get what you really cost to a company.

It's actually just over 40% in Ontario.
And, that's with me paying Ontario Health Premiums, which used to be 
covered by my employer.
-
-teD

I?m an enthusiastic proselytiser of the universal panacea I believe in!

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Home Depot Looking for MVS - Lead Systems Engineer in Austin TX

[Richard Tsujimoto]

Jim wrote:
>I commute 88 miles one way to work each day.

I hate to see what your weekly gas bill looks like.

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

Re: Wonder why IBM code quality is suffering?

[Richard Tsujimoto]

Sorry, that wasn't me who said it was a PL/1 compiler.




Anne & Lynn Wheeler <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
03/27/2006 10:29 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: Wonder why IBM code quality is suffering?






[EMAIL PROTECTED] wrote:
> No, PL/C was Cornell University's student PL/1 compiler.
> (I remember it, too; Waterloo had it as one of their batch compilers, as
> did ISU and many other colleges and universities around the world.)
>
> The PL/X genealogy included PL/S and PL/AS, but not PL/C.

posting in pl/s, et al thread in this n.g. from a couple years ago
http://www.garlic.com/~lynn/2004g.html#46 PL/? History

wikipedia entry for pl/c
http://en.wikipedia.org/wiki/PL/C

another pl/i subset was pl.8 developed as part of 801/risc project.
cp.r was written in pl.8. misc. posts mentioning 801, pl.8, cp.r, romp,
rios, power, power/pc, etc
http://www.garlic.com/~lynn/subtopic.html#801

and for some drift, a recent post mentioning wikipedia and power/pc
http://www.garlic.com/~lynn/2006f.html#6 64-bit architectures & 32-bit
instructions

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Wonder why IBM code quality is suffering?

[Richard Tsujimoto]

Right. Right.  It was PL/S.




Tom Schmidt <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
03/26/2006 11:12 PM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: Wonder why IBM code quality is suffering?






On Sun, 26 Mar 2006 19:33:18 -0500, Richard Tsujimoto wrote:

>Jeez, (IIRC) I still remember it being PL/C.


No, PL/C was Cornell University's student PL/1 compiler.
(I remember it, too; Waterloo had it as one of their batch compilers, as
did ISU and many other colleges and universities around the world.)

The PL/X genealogy included PL/S and PL/AS, but not PL/C.

--
Tom Schmidt
Madison, WI

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Wonder why IBM code quality is suffering?

[Richard Tsujimoto]

Jeez, (IIRC) I still remember it being PL/C. 

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

Re: CICS down after transaction exec wait macro.

[Richard Tsujimoto]

Jorge coded:

>A test of transaction(SUPX) under CICS V2.2.0, in instructions wait coded
>below, down the CICS.

>289  WAIT  5,ECBLIST=LISTECBS
>290+*MACDATE  10/20/88
>292+ LA0,5(0,0)LOAD PARAMETER REG 0
>294+ LA1,LISTECBSLOAD PARAMETER R
>295+ LCR   1,1 INDICATE ECBLIST USED
>296+ SVC   1   LINK TO WAIT ROUTINE

>LISTECBS DSA
>  DCX'80',AL3(WAITECB)
>WAITECB  DCF'0'

Does LISTECBS actually have an address of an ECB, or did you mean:

LISTECBS DS 0A

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

Re: (fwd) RE: Contractor vs. employee was RE: 3380-3390 Conversion

[Richard Tsujimoto]

Clark wrote:
>Having read Bob Shannon's comment about contractors breaking the
>watch, have I been elevated to the lofty category of consultant
>because I normally didn't break the programs or system?  If it weren't
>for Bob's great service to SHARE and to the field, I might really get
>annoyed.

Having been a consultant/contractor for over 26 years (I did try being an 
employee for about 8 yrs), I've learned to accept the sniping - it goes 
with the territory.  It's pointless to get into a pissing match.  In 
truth, there's incompetency on both sides of the fence, as well as some 
very good people.  But, I do take exception to that comment about the 
difference between a consultant and contractor.  A contractor would simply 
pocket the watch after telling the customer the time.  We're a lot more 
subtle than consultants.  

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

Re: C on z/OS questions

[Richard Tsujimoto]

Instead of a "main", you can specify a name, e.g. int myfunc()

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

Re: Migrating Off IBM Mainframes

[Richard Tsujimoto]

45 72 69 6E 20 47 6F 20 42 72 61 67 68




Doc Farmer <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
03/16/2006 05:53 PM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: Migrating Off IBM Mainframes






On Thu, 16 Mar 2006 09:53:46 -0500, Richard Tsujimoto
<[EMAIL PROTECTED]> wrote:

>Doc said:
>>I've yet to see a mainframe to client-server transition that didn't end
>in
>>tears, higher costs, lowered service levels, gnashing of teeth, roaming
>>gangs of SysProgs threatening passers by in Hex, large cracks appearing
>in
>>the Earth's surface and all life in the Universe coming to a crashing
>halt.
>
>I assumed you meant, "putting a hex on passerbys using HEX"...on second
>thought, never mind
>

45 61 6E 79 2D 6D 65 61 6E 79 2C 20 63 68 69 6C 69 2D 62 65 61 6E 79 2C 20
74 68 65 20 73 70 69 72 69 74 73 20 61 72 65 20 61 62 6F 75 74 20 74 6F 20
73 70 65 61 6B 21

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Assembler question

[Richard Tsujimoto]

Bill wrote:
>Dear all

>(...)
>L 10,ADR1
>MVC ZON,0(10)   ===> (XX)
>(..)

>ADR1 DS F

>===> why when i replace (XX)  by "MVC ZON,ADR1" , i don't have the same
>value in ZON ???

Assume that the following:

Basereg = 12
Offset of ZON = X'444'
Offset of ADR1 = X'200'
Content of ADR1 = address of CL32'X...X'
Length of ZON = 4

Then the first instruction would look like:

D2 03 C444 A000 which would copy 4 X's to ZON

The second instruction would like like:

D2 03 C444 C200 which would copy 4 bytes starting at ADR1, which 
contains the address of the 32 X's.

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

Re: Migrating Off IBM Mainframes

[Richard Tsujimoto]

Doc said:
>I've yet to see a mainframe to client-server transition that didn't end 
in
>tears, higher costs, lowered service levels, gnashing of teeth, roaming
>gangs of SysProgs threatening passers by in Hex, large cracks appearing 
in
>the Earth's surface and all life in the Universe coming to a crashing 
halt.

I assumed you meant, "putting a hex on passerbys using HEX"...on second 
thought, never mind

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

Re: How to start a subtask under another user

[Richard Tsujimoto]

>Walt wrote:
>The system does not provide propagation of the ACEE to subtasks during 
>ATTACH except for servers using WLM message queueing to process work 
>requests.

>You will have to provide that propagation yourself, or ensure that your 
>code avoids multiple levels of subtasking.

I'm no security expert, but the impression I get from other products that 
do security
checking on behalf of other users, is that, as someone earlier posted, a 
RACROUTE is 
performed using the subject's userid.  It seems inappropriate to have to 
muck with
the TCB.

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

Re: Need help with msg IEE114I - solved

[Richard Tsujimoto]

The use of netstat was not for checking any APPC connection.  It was done 
to see if an IP connection was present, which it was.  Sorry for any 
confusion I might have caused.

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

Re: Need help with msg IEE114I - solved

[Richard Tsujimoto]

Ed, you embarrass me , we're clinging onto OS/390 2.6

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

Re: Need help with msg IEE114I

[Richard Tsujimoto]

Thanks Ed, I'll follow-up on this.

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

Re: Need help with msg IEE114I - solved

[Richard Tsujimoto]

We discovered something interesting.  We did an FTP operation using our 
terminal emulator product (PASSPORT) instead of the PC-based FTP product, 
and we can see an address space of type ATX started.  We stopped the test 
and then brought down APPC.  We repeated the FTP test and it worked, which 
proves the APPC STC has nothing to do with the creation of this particular 
ATX address space. 

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

Re: Need help with msg IEE114I - solved

[Richard Tsujimoto]

There is no entry for the product in the APPCTP data set.

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

Re: Need help with msg IEE114I - solved

[Richard Tsujimoto]

It turns out that the users/programmers have this desktop product that 
uses some variation of FTP.  It has the ability to spawn an ATX address 
space.  These are not APPC address spaces.  Looks like an expansion of the 
ATX attribute may be needed.

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

Re: Need help with msg IEE114I

[Richard Tsujimoto]

Hello Ed, it's been a long time since talking to the guys at Phoenix.  In 
any event, I tried the SRESET and YALL command, and there is no "Display 
ATXs ===> YES" on the Entry Panel or Primary Selection Criteria window. 
Maybe it's due to our version (V2R5M0).

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

Re: Need help with msg IEE114I

[Richard Tsujimoto]

>For quite a number of years now, TCP/IP uses OMVS sockets, so you are 
using OMVS if you use TCP.  That IP session may explain the ATX

You're right about TCP/IP and OMVS.  But, I was referring to user 
applications running in OMVS proper.  I suspect your right about IP and 
ATX as well, but I don't know where to look for the JCL that's used to 
spawn this ATX.  If it were APPC, then it would be in the APPCTP VSAM 
file.

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

Re: Need help with msg IEE114I

[Richard Tsujimoto]

>Can you tell us what the task name is that is listed as "A"?

It's a locally name application, e.g. COMETS

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

Re: Need help with msg IEE114I

[Richard Tsujimoto]

>Have you got APPC and ASCH started tasks, possibly ASCHINIT tasks?
Yes, but the APPCTP content has only one *job* in it and it isn't the one 
I'm looking for.

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

Re: Need help with msg IEE114I

[Richard Tsujimoto]

Instead of multiple replies, I combined them below (irrespective of 
poster):
>It looks like it is a spawned UNIX
task.
We're not running/using OMVS, so I don't think this is the case.

>Any mount messages pending?
Nope.

>These are probably APPC  Transactions.
That may be a possiblity, but when I did a netstat command, it showed an 
IP connection with a Windows server, so I don't think APPC is it.

>Attached transaction programs.
Thanks for the explanation.

The ATX is not viewable from EJES (we're JES3 - it's similar to SDSF), so 
I can't display the JCL associated with it.  I tried running a job with 
TYPRUN=SCAN and specifying a catalog proc name that matches the ATX name, 
but no luck.

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

Need help with msg IEE114I

[Richard Tsujimoto]

When a D J,L command is issued, the response is message IEE114I, showing a 
list of jobs and STCs.  Those that are jobs have J next to them, and STCs 
have S next to them.  We have one that has an A next to it.  According to 
Messages and Codes, A stands for ATX.  I can't find out what ATX stands 
for. 

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

Re: Migrating catalogs from os/390 2.7 to z/os v17

[Richard Tsujimoto]

I suspect you're not the only one out there.  Last year we were on the 
brink of going from OS/390 2.6 to 2.10 (as a transition step), before 
going to z/OS 1.2 (I think).  Then management pulled the plug.  There's 
still an outside chance that we may again attempt to do a migration, but 
it would be without the transitional path, e.g. take a leap and hope your 
primary chute works, because you ain't got no spare chute this time.  For 
all the laggers out there, tell us how it turns out.

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

Re: Unusual FTP request.

[Richard Tsujimoto]

>Ed Gould wrote:
>I have seen this same issue through the years. There is no perfect 
>answer, IMO. FTP (and other like programs) run async.

AFAIK, FTP is a synchronous operation.

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

Re: Unusual FTP request.

[Richard Tsujimoto]

This sort of process is very similar to those used by shops that have 
MQSeries (we do it here as well).  Triggering is built into the product 
and, assuming you have some sort of monitoring product that can issue 
email/paging alerts, any problems encountered along the way can trapped. 
As for using MQ for ftp'ing a file, there are several different ways to 
approach this, but it will involve code (in-house developed, or 
purchased).  But, once it's setup, it's pretty simple to use.

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

Re: PROTECTION EXCEPTION 0C4 - Job Doesn't Work When &&Dataset Used

[Richard Tsujimoto]

I think you're close to the cause.  The temp data set does not get deleted 
until step end, but if the appl closes the file and reopens it, then all 
bets are off.




Matthew Stitt <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
02/24/2006 10:58 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: PROTECTION EXCEPTION 0C4 - Job Doesn't Work When &&Dataset Used






Here is my theory:

Use DISP=(NEW,PASS)

Also this looks very much like a program which may write data to a file,
close the file, and then read the data back in.

On a temporary dataset, it my be getting deleted after the close.

Are the temporary datasets being directed to disk or VIO?

On Thu, 23 Feb 2006 16:37:07 -0500, Shmuel Metz (Seymour J.)
<[EMAIL PROTECTED]> wrote:

>In <[EMAIL PROTECTED]>, on
>02/23/2006
>   at 12:26 PM, Robert Pelletier <[EMAIL PROTECTED]> said:
>
>>Hi All. Once again I look to the group for help. I am at a total loss
>>and have test extensively.
>
> 1. Are there any IEC... messages?
>
> 2. What is the Interrupt code?
>
> 3. In what module is it taking the S0C4?
>
> 4. Where does R14 point?
>
>--
> 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 [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: IBM Supported method to empty PDS in Batch

[Richard Tsujimoto]

It's been working since the '70s




"Shmuel Metz (Seymour J.)" <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
02/23/2006 08:51 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: IBM Supported method to empty PDS in Batch






In
<[EMAIL PROTECTED]>,
on 02/22/2006
   at 12:53 PM, Richard Tsujimoto
<[EMAIL PROTECTED]> said:

>I don't recall if IBM explicitly states that you cannot/should not
>mess  with the PDS directory records, although common sense may
>dictate  otherwise.  But, when I was a newbie MVS sysprog in the
>early 70's, it was  more like the wild west.  We had fiche, so we had
>the info to muck with  the code.  One tool we used was a simple
>program that emptied a PDS.  We  wanted to maintain the order and
>space allocation of various SYS1 data  sets.  The program basically
>rewrites the first PDS directory record, so  that it had the same
>info as a newly created, but empty one.  The program  still works
>today, so the cache of being supported by IBM is not that 
>important.

The directory structure is well documented, and emptying it out is a
piece of cake IF YOU KNOW WHAT YOU ARE DOING. Writing such code based
on guesses is an invitation to disaster.
 
-- 
 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 [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: PROTECTION EXCEPTION 0C4 - Job Doesn't Work When &&Dataset Used

[Richard Tsujimoto]

By any chance do you create &&WORKxx in prior steps in the same job?




Robert Pelletier <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
02/23/2006 12:26 PM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
PROTECTION EXCEPTION 0C4 - Job Doesn't Work When &&Dataset Used






Hi All. Once again I look to the group for help. I am at a total loss and 
have test extensively. This is the issue:

If I use the following && JCL the job fails consistently with an 0C4:
 //WORK01   DD DISP=NEW,UNIT=SYSDA,SPACE=(CYL,(4300,5)), 
 //LRECL=8192,BLKSIZE=0,RECFM=VB,DSN=&&WORK01
 //WORK02   DD DISP=NEW,UNIT=SYSDA,SPACE=(CYL,(4300,5)), 
 //LRECL=8192,BLKSIZE=0,RECFM=VB,DSN=&&WORK02
 //WORK03   DD DISP=NEW,UNIT=SYSDA,SPACE=(CYL,(900,5)), 
 //LRECL=8192,BLKSIZE=0,RECFM=VB,DSN=&&WORK03
 //WORK04   DD DISP=NEW,UNIT=SYSDA,SPACE=(CYL,(900,5)), 
 //LRECL=8192,BLKSIZE=0,RECFM=VB,DSN=&&WORK04
I have 4 PUBLIC volumes.

If I use this JCL which uses permanent datasets the job works everytime:
//WORK01   DD DISP=(NEW,CATLG),UNIT=SYSDA,SPACE=(CYL,(5,5)), 
//LRECL=8192,BLKSIZE=0,RECFM=VB,DSN=TRAM1.WORK1, 
//VOL=SER=BACK09 
//WORK02   DD DISP=(NEW,CATLG),UNIT=SYSDA,SPACE=(CYL,(5,5)), 
//LRECL=8192,BLKSIZE=0,RECFM=VB,DSN=TRAM1.WORK2, 
//VOL=SER=BACK09 
//WORK03   DD DISP=(NEW,CATLG),UNIT=SYSDA,SPACE=(CYL,(5,5)), 
//LRECL=8192,BLKSIZE=0,RECFM=VB,DSN=TRAM1.WORK3, 
//VOL=SER=BACK09 
//WORK04   DD DISP=(NEW,CATLG),UNIT=SYSDA,SPACE=(CYL,(5,5)), 
//LRECL=8192,BLKSIZE=0,RECFM=VB,DSN=TRAM1.WORK4, 
//VOL=SER=BACK09 

Can anyone offer suggestions as to why &&work is not working. We are OS390 
V2R10 and the program is written LE. I do not have the source because it 
was given to us by the agency we feed the data too. In advance thanks all. 


Bob Pelletier
Connecticut Student Loan Foundation
Rocky Hill, Connecticut

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: REXX and APF

[Richard Tsujimoto]

I know you can go the other way, e.g. MF->non-MF using rexec, but don't 
know if you can go the other way.  Never tried it.  You could try posting 
to the TCPIP listserver for help.




Miklos Szigetvari <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
02/23/2006 04:35 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
REXX and APF






Hi

I would like to call a REXX exec from a non TSO environment, (HTTP 
server)  and the exec would call an APf authorized program
(SAPI interface)
I read the archive about this, maybe a new solution in 2006 ?

-- 
Mit freundlichen Grüßen / Best regards

Miklos Szigetvari

ISIS Information Systems GmbH
Alter Wienerweg 12
2344 Maria Enzersdorf
Austria

---
This e-mail is only intended for the recipient and not legally
binding. Unauthorised use, publication, reproduction or
disclosure of the content of this e-mail is not permitted.
This email has been checked for known viruses, but ISIS accepts
no responsibility for malicious or inappropriate content.
--- 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Data Set Name "Hiding"

[Richard Tsujimoto]

Sounds like a conspiracy to slow the MF down  ;- )




Mark Thomen <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
02/23/2006 11:19 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: Data Set Name "Hiding"






"Jim Marshall" <[EMAIL PROTECTED]> wrote in message
news:<[EMAIL PROTECTED]>...
> My Security folks are eager to have us implement something called
"Dataset
> Name Hiding". This will hide dataset names from a user's view if they do
> not have the necessary security authority for these files. I am not sure
of
> all the details as to what RACF permissions are needed "to see" a file.
>
> Has anyone implemented or evaluate this (most likely) new feature. What
> were the effect of implementation. My sense is there might be an
> implication of more processor usage depending on what z/OS needs to do 
to
> check if a user may or may not see a line to be displayed on their
screen.
> I believe this facility is within TSO with ISPF.

There are a lot more checks made with RACF to determine if the user has
access.  You might pay a high price for performance from the components
that use it (Catalog, DADSM, CVAF, etc).

If you don't give someone RACF access to a file, then they can't open it,
dump it, look at it - they'll just know the name.  And why is that an 
issue
with the security people?

Thanks,
Mark Thomen
Catalog/IDCAMS/VSAM Development

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: IBM Supported method to empty PDS in Batch

[Richard Tsujimoto]

I don't recall if IBM explicitly states that you cannot/should not mess 
with the PDS directory records, although common sense may dictate 
otherwise.  But, when I was a newbie MVS sysprog in the early 70's, it was 
more like the wild west.  We had fiche, so we had the info to muck with 
the code.  One tool we used was a simple program that emptied a PDS.  We 
wanted to maintain the order and space allocation of various SYS1 data 
sets.  The program basically rewrites the first PDS directory record, so 
that it had the same info as a newly created, but empty one.  The program 
still works today, so the cache of being supported by IBM is not that 
important.




Thomas Conley <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
02/22/2006 10:04 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: IBM Supported method to empty PDS in Batch






- Original Message - 
From: <[EMAIL PROTECTED]>
Newsgroups: bit.listserv.ibm-main
Sent: Wednesday, February 22, 2006 10:00 AM
Subject: IBM Supported method to empty PDS in Batch


>
> I have dug high and low and have not been able to find a way to empty a
> PDS that meets the following requirements:
> 1) Executes in batch
> 2) Provided and ***supported*** by IBM (not CBT, not DIY rexx code, not
> requiring SAS/PDSMAN/PDSFAST/etc...)
>
> Am I missing something totally obvious? If so, how is it done?
> If there is in fact no such capability, can anyone explain why on Earth
> that might be?
> Would it be that hard to add the capability to IEBCOPY say?
>

The only IBM-supported method to empty a PDS is to delete it and 
reallocate 
it.

Regards,
Tom Conley 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: FW: Mainframe Jobs Going Away

[Richard Tsujimoto]

Eight Jewish Korean Veterans?




George J Shedlock <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
02/14/2006 04:24 PM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: FW: Mainframe Jobs Going Away






Speaking of Korvettes, anyone know what the name is purported to stand 
for?

George Shedlock Jr
PDC - 212-855-8675

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: REXX , Panels and ISPEXEC Browse

[Richard Tsujimoto]

try single quotes




David Christianson <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
02/10/2006 10:33 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
REXX , Panels and ISPEXEC Browse






I'm trying to write a REXX exec that calls in a panel.  From that panel I
have an option to select datasets which I want to browse.  I get to my 
list
of datasets I have the option to browse, but when I make my selection I 
get
this error;
 Invalid parameter
 'ISPEXEC BROWSE DATASET("FED.IS.INFO")' contains unrecognized parameter.

 Panel line where error was detected:
 ZSEL = ISPEXEC BROWSE DATASET("FED.IS.INFO")

  I've tried several different combinations of quotes, and I've search
manuls and web sites and can't find the exact thing I'm trying to do.

  This is what the PROC section of my panel looks like.
)PROC
VER (&ZCMD,NONBLANK)
&ZSEL = TRANS( TRUNC (&ZCMD,'.')
  A,'CMD(IERBR14)'
  1,'ISPEXEC BROWSE DATASET("FED.IS.INFO")'
  2,'ISPEXEC BROWSE DATASET("FED.IS.INFO2")'
  3,'ISPEXEC BROWSE DATASET("E411BJM.SPF2.SOURCE")'
  4,'ISPEXEC BROWSE DATASET("TSS.ACID.LISTINGS(SUPERUSE)")'
  5,'ISPEXEC BROWSE DATASET("SMS.ACS.SOURCE")'
  6,'ISPEXEC BROWSE DATASET("FED.DISASTER.RECOVERY")'
  7,'ISPEXEC BROWSE DATASET("TSS.ACID.LISTINGS(ALLRECS)")'
  8,'ISPEXEC BROWSE DATASET("SYSFED02.VAN.AUTOJCL")'
  ' ',' '
X,'EXIT'
*,'?' )
)END

  Any ideas what I'm doing wrong?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: READPREV in batch

[Richard Tsujimoto]

Isn't this available from the catalog?  You might be able to get what you 
want using the SHOWCAT macro.




"Stephen M. Wiegand" <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
02/08/2006 03:59 PM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
READPREV in batch






In CICS you can do a STARTBR on a VSAM KSDS or ESDS file and then 
issue a READPREV to get the previous record from the key you started 
at.  However, this function is not available to COBOL or IBM 
Assembler in batch.  We have an issue where we need to know what the 
last RBA is in an ESDS file.  It would be nice if we could do a 
STARTBR with a key of high-values and then do a READPREV.

Has only via the mother of invention, found a way to do this that is 
fast?  I know we could do a startbr at the begging or somewhere in 
the middle, do READNEXT saving off the keys until we hit EOF at which 
point the saved key would be the highest RBA.  But we have a huge 
file and this way would take too much time.

Thanks in advance for any suggestions.

Steve Wiegand

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: 9672 R45 with zOS 1.4

[Richard Tsujimoto]

Thomas/Paolo,

This is very strange.  We've been told by IBM that inorder run anything 
higher than OS/390 2.10, we had to go to a z box.  We're currently running 
OS/390 2.6 on a 9672 R83.




Thomas Conley <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
02/07/2006 09:25 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: 9672 R45 with zOS 1.4






Sorry,

I should have said you can't go higher than OS/390 V2R10 on a 9672-R45 
(G4) 
box.

Regards,
Tom Conley

- Original Message - 
From: "Paolo Pirillo" <[EMAIL PROTECTED]>
Newsgroups: bit.listserv.ibm-main
Sent: Tuesday, February 07, 2006 4:06 AM
Subject: Re: 9672 R45 with zOS 1.4


> Hello Dude,
> we are running a 9672-R46 in our DR Site.
> It's running fine with z/OS 1.4.
> But we have to think about a new box,
> becourse we want to migrate to z/OS 1.7 next year.
>
> Regards,
> Paolo Pirillo
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Codepage 37 vs 1047

[Richard Tsujimoto]

Rob,

I encountered this dilemma last September and decided on using Code Page 
924 for this MQ-based file transfer application.  My decision was based on 
IBMLink Item RTA0001182059.  Also, I  believe 924 is used by FTP, which is 
how I discovered that FTP could do the conversion, but MQ couldn't when it 
used 037.





Rob Wunderlich <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
02/06/2006 02:57 PM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Codepage 37 vs 1047






We recently converted our DB2 CCSID from 500 (a long ago default) to CP37
to fix some translation problems and prepare for DB2 V8. This was not a
trival exercise. We chose CP37 and have been stanardizing our compilers,
terminal emulators, etc.

I'm now finding that many of our "open systems" components (java, ftp, IMS
Connect) default to using Cp1047. The significant difference is that 
square
brackets "[]" are represented by CP37 as x'BA' x'BB' and by CP1047 as 
x'AD'
x'BD'. I'm running around changing tables and parms as things crop up.

IBMLINK item BDC27070 documents the history of the different bracket
codepoints and states that "today, there is only one correct mapping, and
that is the x'BA' and x'BB' mappings." The item further states "Unless you
have specific requirements for 037, these days 1047 is probably the better
choice as a default." (The converse of the "one correct mapping" 
statement).

It seems that no matter which I "standarize" on, I'll wind up having to
modify something from it's default. There are always a few gotchas -- how
things appear in OMVS vs ISPF, for example.

My question is, for those US English shops that have swam through this
issue lately, which codepage did you choose to standarize on?

Thanks,
Rob

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Mainframe Programmer on EBay

[Richard Tsujimoto]

Maybe a sexy picture will result in more bids (or maybe not).

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

Re: Running two versions of CICS on the same system

[Richard Tsujimoto]

When I migrated from CICS/VS 1.7 to CICS/ESA V4.1, there were modules that 
were identically named, some of which resided in PLPA.  In those cases, 
you would probably want to segregate those modules, putting the new ones 
in PLPA, and STEPLIB'ing to the old ones in the older CICS regions.


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

Re: Clist problem: character [ is converted to : at output

[Richard Tsujimoto]

This might help:

http://listserv.meduniwien.ac.at/cgi-bin/wa?A2=ind0312&L=cics-l&T=0&O=A&P=37356




Eckart Koehler <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
01/27/2006 09:56 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Clist problem: character [ is converted to : at output






We've got a problem with clist. The character [ and ] (left and right
square brackets) are stored ok in the dataset (x'AD' and x'BD') but when
clist displays them at terminal they appear as : (colon). This is true 
even
if the clist displays any dataset with [ or ].

TIA.

E.Koehler

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: IEFUSI and ELIM

[Richard Tsujimoto]

Some CICS monitoring products, e.g. Candle (now IBM), have commands that 
layout virtual storage usage of CICS.

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

Re: Intertest

[Richard Tsujimoto]

It's been a long time since I played with Intertest, so I wouldn't be of 
much help without RTFM.  I would suggest cross-posting this request to 
CICS-L.




Brian Thomas <[EMAIL PROTECTED]> 
Sent by: IBM Mainframe Discussion List 
01/18/2006 02:57 AM
Please respond to
IBM Mainframe Discussion List 


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Intertest






Hi listners,
 
  In our shop we have insatlled intertest,previously there was xpeditor.
  In the Intertest how to put global break points. ie what i asm asking is 
when i process some claims in one region it will trigger some other 
program in another region. I need to trap these programs  and debug it. In 
the xped we are using global break points. Could any one pls let me know 
how to do this in intertest?
  Thanks,
Brian


Send instant messages to your online friends http://uk.messenger.yahoo.com 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] 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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html