amode rmode problem

2006-03-20 Thread Jim McAlpine
I inherited a set of programs one of which is assembler and runs as a
subroutine which is called by a COBOL main program.  Here is a snippet from
the assembler routine which is linkied AMODE(31) RMODE(24) -

  L R4,CZW3IOAA ...SETUP ADDR OF IOAREA
  L R5,CZW3DCBA ...SETUP ADDR OF DCB
  LAR8,DOGETS   SET UP 24 BIT ADDRESS
  LAR9,DOGETE   STORE CURR AMODE AND RET ADDR
  BSM   R9,R8   SWITCH AMODE TO 24 BIT
 DOGETS   GET   (R5),(R4)
+DOGETS   LR1,R5  LOAD PARAMETER REG
+ LR0,R4  LOAD PARAMETER REG
+ SLR   15,15CLEAR REGISTER @
+ ICM   15,7,49(1)   LOAD GET ROUTINE ADDR  @
+ BALR  14,15LINK TO GET ROUTINE
  BSM   0,R9SWITCH AMODE BACK TO 31 BIT
 DOGETE   EQU   *

When the COBOL program is linked AMODE(ANY) RMODE(24) it runs fine, but when
the COBOL program is linked AMODE(31) RMODE(ANY) the assembler subroutine
abends with a 0C4 abend on the first BSM instruction above.

Jim McAlpine

--
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: TCP/IP over Cisco router CIP

2006-03-20 Thread Chris Mason
Hal,

This response has been due for nearly a month. I needed to be sure about the
PPT SYST attribute before responding - see the SYST thread - and then I got
waylaid with other stuff - sorry.

If you had two machines (Central Electronic Complexes (CECs) is the formal
language I believe), couldn't LPARs on one be the backup for LPARs on
another in a parallel sysplex? Maybe that'll feature in your hot takeover.
In other words I'm looking at the hierarchy of failure situations:

1. application
2. operating system
3. LPAR
4. machine

You said you suffered from 1 (your IPL solution also covers 2) and 4 but
never 3. Here I'm mentioning that dynamic VIPA can help you with 4 even if a
fast IPL covers 1, 2 and 3. I guess it depends on your application but I
would expect that, in many/most cases, restarting an application on another
LPAR waiting with a live operating system was faster than IPLing.

I've taken the simple view that one application has one IP address. Your use
of the word application seems to consider composite applications with
internal client-server relationships where components might be split onto
different LPARs.

 The applications do not BIND as far as we can see, ...

I think I'm right in saying there is always a BIND. Certainly for server
programs[1], that is those programs where the initial contact is from the
communicating partner, there must be a known IP address (and port) which the
client making the connection (TCP)/initiating the transaction (UDP)
specifies in the initial packet. Setting up this IP address and port is
achieved by the bind() call.

[1] For client programs using the connect() call, there is an implicit
bind() call made within the connect() call.

Because there is always a bind() call and because the server program will
always specify INADDR_ANY, that is 0.0.0.0 - let us stick to traditional IP
V4 for now, as the IP address (except when there is some customization for a
specific address - which need not be specified), the PORT statement BIND
parameter can always be used to specify a dynamic VIPA so that the VIPA
becomes active with the program and becomes inactive with the program.

Have I misunderstood something here concerning the lack of BIND? This is
important since I wouldn't want anyone reading this to get confused over
something so basic and vital for the use of dynamic VIPA. Maybe there is an
issue with the only, as far as I know, alternative for server programming
with is the PASCAL API. It may be that the PORT statement BIND parameter
doesn't work with the PASCAL API.

It's good that your automated VIPADEFINE and VIPADELETE work for you. An
OBEY solution looks a bit complicated compared to the official way to
move a VIPA associated with an application rather than associated with the
LPAR itself. This is one of the following:

a. You can ensure that the associated VIPA is active when the application
is running by making the VIPA the value of the BIND parameter of the PORT
statement for the server application. The VIPA would be defined using a
VIPARANGE statement (VIPARANGE BIND in D TCPIP,,NETSTAT,VIPADYN messages)

b. Alternatively, you can ensure that the associated VIPA is active when
the application is running by adding a job step at the beginning of the
server application procedure which activates the VIPA. The job step would
contain the MODDVIPA program with -c specifying the VIPA. A job step
should also be added at the end containing the MODDVIPA program with -d
specifying the VIPA. This VIPA would also be defined using a VIPARANGE
statement. (VIPARANGE IOCTL in D TCPIP,,NETSTAT,VIPADYN messages)

c. An alternative to b is to have the application running on more that one
LPAR and use your automation simply to issue the appropriate MODDVIPA
command - or run a MODDVIPA procedure with suitable parameters.

OSPF picks up on a VIPA being added to the HOME list and advertises the
VIPA. As discussed in a spin-off topic in this thread you can ensure that
the VIPA is advertised all by itself to the backbone router - in a typical
network design - by use of the Advertise_VIPA_Route=HOME_ONLY parameter of
the generic VIPA OSPF_Interface statement. (As is made clear in the spin-off
conversation, I haven't actually tried this since the parameter is too new -
but I proposed it based on a clear hole in OMPROUTE support, a hole now
apparently filled.)

If you wish I can send you my report which attempts to describe VIPAs - at
the time of writing 2001. I detect you may have preferred to use MODDVIPA.
With the aid of this report - written out of frustration with the official
descriptions, so much good stuff so poorly described - you may find more
comfortable ways to activate and deactivate your VIPAs.

Since you regret that your applications do not support ARM, I guess you are
operating a parallel sysplex. It is not actually necessary that an
application incorporates support for ARM to be able to benefit from it. At
the time I was examining the possibilities of dynamic VIPAs, 

Re: amode rmode problem

2006-03-20 Thread Chris Mason
Jim,

The folk who love to work on this sort of problem can be relied upon to
watch the ASSEMBLER-LIST.

Here's the instructions:

quote

SUBSCRIBING TO ASSEMBLER-LIST:
To subscribe to ASSEMBLER-LIST, send an email message addressed to:
  [EMAIL PROTECTED]
In the body of the message, type:
 SUBSCRIBE ASSEMBLER-LIST first name last name
For example, if I wished to subscribe myself to the list, I would
send the message
 SUBSCRIBE ASSEMBLER-LIST Jean Snow

/quote

I, in the case of the text between the quotes, is the list owner - in
case someone watching wants to know whether or not I am called Jean Snow -
don't laugh, it happened recently.

Chris Mason

- Original Message - 
From: Jim McAlpine [EMAIL PROTECTED]
Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@BAMA.UA.EDU
Sent: Monday, 20 March, 2006 10:30 AM
Subject: amode rmode problem


I inherited a set of programs one of which is assembler and runs as a
subroutine which is called by a COBOL main program.  Here is a snippet from
the assembler routine which is linkied AMODE(31) RMODE(24) -

  L R4,CZW3IOAA ...SETUP ADDR OF IOAREA
  L R5,CZW3DCBA ...SETUP ADDR OF DCB
  LAR8,DOGETS   SET UP 24 BIT ADDRESS
  LAR9,DOGETE   STORE CURR AMODE AND RET ADDR
  BSM   R9,R8   SWITCH AMODE TO 24 BIT
 DOGETS   GET   (R5),(R4)
+DOGETS   LR1,R5  LOAD PARAMETER REG
+ LR0,R4  LOAD PARAMETER REG
+ SLR   15,15CLEAR REGISTER @
+ ICM   15,7,49(1)   LOAD GET ROUTINE ADDR  @
+ BALR  14,15LINK TO GET ROUTINE
  BSM   0,R9SWITCH AMODE BACK TO 31 BIT
 DOGETE   EQU   *

When the COBOL program is linked AMODE(ANY) RMODE(24) it runs fine, but when
the COBOL program is linked AMODE(31) RMODE(ANY) the assembler subroutine
abends with a 0C4 abend on the first BSM instruction above.

Jim McAlpine

--
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: TCP/IP over Cisco router CIP

2006-03-20 Thread Chris Mason
Pat,

Sorry about this very late response. Please see the post to Hal for a
sort-of excuse.

OSPF depends on routing by consolidation of many routes into one route. This
is done just like subnetting is done, namely by having an, in effect,
partial address - although it's still 4 bytes long - and a mask. The mask is
also 4 bytes long although I suspect, in practice if not in theory, the 1
bits are contiguous and so the mask could be represented as the number of
contiguous 1 bits, for example, 24 for the ever popular 255.255.255.0.

OSPF depends on consolidation when a destination needs to be advertised
throughout a network of OSPF areas - although it may only be one Area 0 in
practice. I imagine it is a typical situation that one needs those host
routes only in the stub area. The Area border router will - as RFC 1583 has
it - distill the routes within the stub area for the benefit of routing in
Area 0.

I'm not familiar with the sorts of statements that may be available to, say,
a Cisco router. I would expect to have to define the subnet that the dynamic
VIPAs (corresponding to the host routes) belong to in the Area border router
so that only this subnet is advertised to Area 0 routers - keeping to the
simple model of an Area 0 with attached stub areas. It's unreasonable to
expect the router to try to work out how to consolidate on the basis of
received routing information, especially host routes.

Actually one can say that a host route is a subnet route where the subnet
mask happens to be 32 1 bits. This is not so far away from a subnet of 30
contiguous 1 bits which is also unreasonable as a basis for consolidation,
the subnet of 30 contiguous 1 bits being the smallest subnet it is possible
to have where the subnet mask still contains 0 bits. I expect the router
would be capable of comparing the received routing information with the
routing information it has been asked to advertise and realising that the
former is encompassed by the latter. I've a vague idea I read something like
this in the RFC, that a route range is advertised only when an advertisement
for some subset of the range is received - but I could be wrong.

  In other words, I think the fixation was in OSPF, not in the specific
OMPROUTE implementation.

I blamed OMPROUTE because OSPF doesn't prohibit host routes; it's just
uncomfortable with them in practice[1]. The fact that OMPROUTE has managed
to come up with Advertise_VIPA_Routes=Host_Only shows that it was just a
matter of throwing off blinkers. The excuse in the response from 4 years ago
I sent to you was They (OMPROUTE instances) have to broadcast subnet routes
in case there are routers out there that do not recognize host routes. This
seems to assume that routers are so very likely to be averse to host routes
that users shouldn't even be allowed to think about not sending subnet
routes. :-)

[1] I say in practice because the theory of OSPF actually starts with
point-to-point routes, vectors. This is fully worked out before having to
introduce complicated constructions such as shared access transport
facilities, for example, LANs. Does this have a familiar ring for you?

Thanks for looking up the parameter. I'd imagined you knew about it already.

Chris Mason

- Original Message - 
From: Patrick O'Keefe [EMAIL PROTECTED]
Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@BAMA.UA.EDU
Sent: Friday, 24 February, 2006 11:11 PM
Subject: Re: TCP/IP over Cisco router CIP


 Chris,

 It probably looks like I have a seriously broken ALU if I say 4 years
ago
 on list and you were about 3 years ahead of me in the off-list
 email.  Faulty memory is probabably more to blame, but I actually had 2
 introductions to this issue.  The first was when I was first playing with
 OSPF and was trying to duplicate as best I could the RIP filters I had in
 place.  I was (correctly) told that I could not do that; that all the
 participants in an OSPF area really had to have identical (or at least
 compatable) routing information, and filtering would prevent that.  I
 was also told (correctly) that OSPF depends heavily on routing by subarea.

 It wasn't until several years later, when getting heavily into
application-
 specific DVIPAs, that I ran into this perpetually looping routing issue.

 ...
 It may be that enough people pointed out that this fixation on subnet
 routes
 was ridiculous and the dam gave way.
 ...

 I got the impression that, for most situations, OSPF *does* depend heavily
 on subnet routes, but DVIPAs do not fit well in that simple universe.  An
 interface that appears and disappears, that moves from host to host,
 just wasn't considered in OSPF.  In other words, I think the fixation was
 in OSPF, not in the specific OMPROUTE implementation.

 DVIPAs were (obviously) not considered by RIP either, but with RIP2 and
 an appropriate set of filters (that I will never be able to come up with
 again, I fear!) the chance of the perpetual routing loop is lessened.
 (Or maybe I was just never 

C/C++ tools

2006-03-20 Thread James Smith
Can anyone recommend any tools on the market which compete with IBM C/C++
Productivity Tools for z/OS??

 

Vendors feel free to email me privately so as not to clutter up the list
with advertising.

 

Regards

 

Jim 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: amode rmode problem

2006-03-20 Thread Hunkeler Peter (KRDO 4)
When the COBOL program is linked AMODE(ANY) RMODE(24) it runs 
fine, but when the COBOL program is linked AMODE(31) RMODE(ANY) 
the assembler subroutine abends with a 0C4 abend on the first 
BSM instruction above.

The first BSM instruction switches the AMODE to 24. However,
the code is resident above the line (RMODE=ANY almost always
means the module is loaded above), so the fetch of the next
sequential instruction (NSI) (L 1,R5) propbably fails. (If 
you're unlucky, there is some storage allocated at the 
24-bit NSI address and s few more instructions might execute
before strange things happen.

Although the ASM routine was programmed to deal with different 
AMODEs, switching forth and back as needed, it is not able to
run above the line. The RMODE of any code switching to AMODE24
MUST BE 24.


Peter Hunkeler
CREDIT SUISSE

--
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: amode rmode problem

2006-03-20 Thread Jim McAlpine
Peter, the assembler routine IS linked AMODE(24) and is called dynamically.

Jim McAlpine


On 3/20/06, Hunkeler Peter (KRDO 4) [EMAIL PROTECTED]
wrote:

 When the COBOL program is linked AMODE(ANY) RMODE(24) it runs
 fine, but when the COBOL program is linked AMODE(31) RMODE(ANY)
 the assembler subroutine abends with a 0C4 abend on the first
 BSM instruction above.

 The first BSM instruction switches the AMODE to 24. However,
 the code is resident above the line (RMODE=ANY almost always
 means the module is loaded above), so the fetch of the next
 sequential instruction (NSI) (L 1,R5) propbably fails. (If
 you're unlucky, there is some storage allocated at the
 24-bit NSI address and s few more instructions might execute
 before strange things happen.

 Although the ASM routine was programmed to deal with different
 AMODEs, switching forth and back as needed, it is not able to
 run above the line. The RMODE of any code switching to AMODE24
 MUST BE 24.


 Peter Hunkeler
 CREDIT SUISSE

 --
 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: amode rmode problem

2006-03-20 Thread Beate Kawelke
Hi Jim,

what does the PSW of the symptom dump say ?

Beate 

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Jim McAlpine
 Sent: Monday, March 20, 2006 11:54 AM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: [IBM-MAIN] amode rmode problem
 
 Peter, the assembler routine IS linked AMODE(24) and is 
 called dynamically.
 
 Jim McAlpine
 
 
 On 3/20/06, Hunkeler Peter (KRDO 4) [EMAIL PROTECTED]
 wrote:
 
  When the COBOL program is linked AMODE(ANY) RMODE(24) it 
 runs fine, 
  but when the COBOL program is linked AMODE(31) RMODE(ANY) the 
  assembler subroutine abends with a 0C4 abend on the first BSM 
  instruction above.
 
  The first BSM instruction switches the AMODE to 24. 
 However, the code 
  is resident above the line (RMODE=ANY almost always means 
 the module 
  is loaded above), so the fetch of the next sequential instruction 
  (NSI) (L 1,R5) propbably fails. (If you're unlucky, there is some 
  storage allocated at the 24-bit NSI address and s few more 
  instructions might execute before strange things happen.
 
  Although the ASM routine was programmed to deal with 
 different AMODEs, 
  switching forth and back as needed, it is not able to run above the 
  line. The RMODE of any code switching to AMODE24 MUST BE 24.
 
 
  Peter Hunkeler
  CREDIT SUISSE
 
  
 --
  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: amode rmode problem

2006-03-20 Thread Jim McAlpine
Beate, psw as follows -

EC PSW AT TIME OF ERROR  078D1000 00F0871E 00020011 00F08000

Jim McAlpine


On 3/20/06, Beate Kawelke [EMAIL PROTECTED] wrote:

 Hi Jim,

 what does the PSW of the symptom dump say ?

 Beate



--
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: amode rmode problem

2006-03-20 Thread Beate Kawelke
Just guessing: doesn't the LA of DOGETS set the high-order bit ? Thus, the 
adressing mode will not be set to 24-bit...

Get a dump after this LA and look at the address in R8. If the high-order bit 
is set, reset it (with a logical AND) to make sure you really get a 
24-bit-address.

Beate  

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Jim McAlpine
 Sent: Monday, March 20, 2006 12:27 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: [IBM-MAIN] amode rmode problem
 
 Beate, psw as follows -
 
 EC PSW AT TIME OF ERROR  078D1000 00F0871E 00020011 00F08000
 
 Jim McAlpine
 
 
 On 3/20/06, Beate Kawelke [EMAIL PROTECTED] wrote:
 
  Hi Jim,
 
  what does the PSW of the symptom dump say ?
 
  Beate
 
 
 
 --
 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: amode rmode problem

2006-03-20 Thread Rob Scott
Any reason why you cannot use the SAM24 and SAM31 instructions instead
of BSM ?

Rob Scott
Rocket Software
http://www.rs.com/portfolio/mxi/

--
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: amode rmode problem

2006-03-20 Thread Jim McAlpine
Rob,  I wasn't even aware of their existance.  It's a long time since I
wrote assembler for real and as I said, I inherited this code.  I'll check
them out.

Jim McAlpine


On 3/20/06, Rob Scott [EMAIL PROTECTED] wrote:

 Any reason why you cannot use the SAM24 and SAM31 instructions instead
 of BSM ?

 Rob Scott
 Rocket Software
 http://www.rs.com/portfolio/mxi/

 --
 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: amode rmode problem

2006-03-20 Thread Rob Scott
Also from the address in the PSW you posted earlier - it looks very much
like the 0C4 is in a PLPA/CSA routine (most likely GET) - check the
locations of your working storage.

Rob Scott
Rocket Software
http://www.rs.com/portfolio/mxi/

--
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: amode rmode problem

2006-03-20 Thread Barbara Nitz
Just my two cents:

What is dogets? What do R14/R15 show? Can you show the complete symptom
dump?

EC PSW AT TIME OF ERROR  078D1000 00F0871E 00020011 00F08000

This shows that you had a PIC 11 (it also shows clearly that you're
amode24.) What module is in F0871E? This looks like a nucleus address to me.
(best guess: 0A0D - cvtexit, the address everyone gets in R15 when control
is goven to a tcb). Plus, given that you're supposedly executing at the same
page, it is kind of hard to believe that you really were executing there.

Any chance dogets had clobbered your save areas some way? (which of course
you would see when dogets is done after its last LM.)

Regards, Barbara Nitz

-- 
Feel free mit GMX FreeMail!
Monat für Monat 10 FreeSMS inklusive! http://www.gmx.net

--
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: amode rmode problem

2006-03-20 Thread Binyamin Dissen
On Mon, 20 Mar 2006 11:26:57 + Jim McAlpine [EMAIL PROTECTED]
wrote:

:Beate, psw as follows -

:EC PSW AT TIME OF ERROR  078D1000 00F0871E 00020011 00F08000

My money says that your routine is loaded above the line.

Look at the registers.

:On 3/20/06, Beate Kawelke [EMAIL PROTECTED] wrote:

: Hi Jim,

: what does the PSW of the symptom dump say ?

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


Re: Z/OS, secure TCP/IP

2006-03-20 Thread Ulrich Boche

xalien wrote:

What it means use the System SSL API to add SSL support to your
application.?
Thanks



Download the book SC24-5901 z/OS Cryptographic Services System Secure 
Sockets Layer Programming from the IBM BookServer website and read the 
chapter: Writing and Building a z/OS System SSL Application.

--
Ulrich Boche
SVA GmbH, Germany
IBM Premier Business Partner

--
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: amode rmode problem

2006-03-20 Thread Hunkeler Peter (KRDO 4)
Peter, the assembler routine IS linked AMODE(24) and is called
dynamically.

Jim,
you wrote it the other way around:
subroutine which is called by a COBOL main program.  Here is a 
snippet from the assembler routine which is linkied AMODE(31) RMODE(24)


Peter Hunkeler
CREDIT SUISSE

--
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: amode rmode problem

2006-03-20 Thread Hunkeler Peter (KRDO 4)
Just guessing: doesn't the LA of DOGETS set the high-order bit?
Thus, the adressing mode will not be set to 24-bit... 

LA does never set the high order bit. It always clears all high
order bits not being used in the current addressing mode (only
in the low half of the 64 general purpose register, to be precise).


Peter Hunkeler
CREDIT SUISSE

--
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: amode rmode problem

2006-03-20 Thread Hunkeler Peter (KRDO 4)
Any reason why you cannot use the SAM24 and SAM31 instructions 
instead of BSM ? 

Code predates the advent of the pre-z/Architecture. 
SAMs are only available on z/Architecture machines.

Peter Hunkeler
CREDIT SUISSE

--
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: amode rmode problem

2006-03-20 Thread (IBM Mainframe Discussion List)
 
 
In a message dated 3/20/2006 6:38:02 A.M. Central Standard Time,  
[EMAIL PROTECTED] writes:

Just  guessing: doesn't the LA of DOGETS set the high-order bit?
Thus, the  adressing mode will not be set to 24-bit... 

LA does never set the high  order bit. It always clears all high
order bits not being used in the  current addressing mode (only
in the low half of the 64 general purpose  register, to be precise).


A purist might disagree and say that LA sets the high order bit to  zero.  
Remember the mainest rule of thumb:  when in doubt, read (or  re-read) the 
Principles of Operation description.  E.g.:  In the  31-bit addressing mode, 
the 
address is placed in bit positions 33-63,  bit 32 is set to zero, and  bits 
0-31 remain unchanged.
 
Bill  Fairchild
Plainfield, IL

Gens nefaria Bushorum delenda  est.

--
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: crypto processor with ftp and sftp

2006-03-20 Thread Ulrich Boche

Jack Kelly wrote:

hi all,

finally have 'real' ftp encrypting data and uid/password. now is there a
mechanism to have ftp/tcp let icsf do the heavy lifting? we're at 1.4.

also have sshd's (3.8.1p1 - 5655-m23) sftp encrypting data. we're at 1.4
and letting icsf do the lifting appears to require 1.7. has anyone
circumvented this 'feature'?



The SSL/TLS support for FTP is using z/OS System SSL which is 
automatically using the crypto hardware if it is available (ICSF must be 
up and running).


I'm not aware of hardware crypto support for SSH (and sftp) in z/OS V1R7 
other than the /dev/random support for creating random key values. Where 
did you see that announced?

--
Ulrich Boche
SVA GmbH, Germany
IBM Premier Business Partner

--
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: amode rmode problem

2006-03-20 Thread Jim McAlpine

 Sorry people, but the assembler routine was being called statically an not
 dynamically as it should have been, thus it was linked with the COBOL
 program and resided above the line.


  It's fixed now.  Or should I say I'm past that particular problem.

   Thanks again.

Jim McAlpine

--
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: amode rmode problem

2006-03-20 Thread Don Poitras
In amode 31, the 'high-order' bit is always cleared by LA. You often see
code where that is the only purpose of the instruction. He's correctly
going amode 24, but if GET tries to access memory above the line, or
return to an above the line caller, you get trouble. GET was changed a
while back to allow amode 31 callers, he can probably just get rid of
the logic to go amode 24.

In article [EMAIL PROTECTED] you wrote:
 Just guessing: doesn't the LA of DOGETS set the high-order bit ? Thus, the 
 adressing mode will not be set to 24-bit...

 Get a dump after this LA and look at the address in R8. If the high-order bit 
 is set, reset it (with a logical AND) to make sure you really get a 
 24-bit-address.

 Beate  

  -Original Message-
  From: IBM Mainframe Discussion List 
  [mailto:[EMAIL PROTECTED] On Behalf Of Jim McAlpine
  Sent: Monday, March 20, 2006 12:27 PM
  To: IBM-MAIN@BAMA.UA.EDU
  Subject: Re: [IBM-MAIN] amode rmode problem
  
  Beate, psw as follows -
  
  EC PSW AT TIME OF ERROR  078D1000 00F0871E 00020011 00F08000
  
  Jim McAlpine
  
  
  On 3/20/06, Beate Kawelke [EMAIL PROTECTED] wrote:
  
   Hi Jim,
  
   what does the PSW of the symptom dump say ?
  
   Beate
  
  
  
  --
  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

-- 
Don Poitras - SAS Development  -  SAS Institute Inc. - SAS Campus Drive
[EMAIL PROTECTED]   (919) 531-5637Cary, NC 27513

--
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: File Status = 46

2006-03-20 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Ed Gould
 
 On Mar 17, 2006, at 4:06 PM, Chase, John wrote:
 
 [ snip ]
 
  I (mistakenly?) believe that SMS-managed datasets are initialized
with 
  the appropriate EOF marker at allocation (or cataloging?) time.
 
 There is an option in parmlib (the IGD member) that does 
 this. Do you have it on?

If there is such an option, it is not documented in the MVS Init  Tuna
Reference for z/OS 1.5

-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


Re: amode rmode problem

2006-03-20 Thread Hunkeler Peter (KRDO 4)
A purist might disagree and say that LA sets the high order 
bit to  zero.   

I love it! Made my day.
Believe it or not, I did read the PoP (well a summary I once wrote)
before posting, I just didn't change my wording. (BTW, my summary
says ...set to zero, indeed).


Peter Hunkeler
CREDIT SUISSE

--
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: amode rmode problem

2006-03-20 Thread Hunkeler Peter (KRDO 4)
You are aware that all addresses passed from the COBOL to the
ASM routine must point to 24bit addressable storage, aren't you?

Peter Hunkeler
CREDIT SUISSE

--
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: amode rmode problem

2006-03-20 Thread Hunkeler Peter (KRDO 4)
Need to be more precise:

You are aware that all addresses passed from the COBOL to the
ASM routine must point to 24bit addressable storage if the ASM
code uses them while in AMODE24.


Peter Hunkeler
CREDIT SUISSE

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


Problem copying VM volumes under z/OS

2006-03-20 Thread Oswaldo Ferreira de Matos
I'm trying to use DFDSS under  z/OS 1.4 to copy my z/VM 51 volumes and  I am
getting the
following error message for every volume:
ADR307E (001)-OPNCL(11), UNABLE TO OPEN VOLUME HI8801, 16
From message guide :
16 
The VM-formatted volume does not have an OS-compatible VTOC
beginning on track zero, record five. 
I try to format from z/OS, but without success with the copy, but when I
format the output volumes under z/VM (ICKDSF CPVOLUME)
its is OK.
I am using the sysin :
COPYTRACKS(0,0,3338,14)  COPYVOLID -
ADMINISTRATOR  PURGE -
CPVOLUME -   
INDDNAME(ENTRADA) -  
OUTDDNAME(SAIDA)

Is it the only way to copy the volumes :
1) Format the volume from z/VM
2) Copy using DFDSS from z/OS
or maybe I can format by z/OS ?
Thanks.
Oswaldo 

--
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: New CLIST on SYSPROC - refresh

2006-03-20 Thread Sean Dunn

I issued the following command:
vlfnote add class(ikjexec) dataset('brot.cmdproc(tt)')
vlfnote update class(ikjexec) dataset('brot.cmdproc(tt)')

None of the above did the work. TT member still cannot be found.


The command I use to resolve this same problem is slightly different:

   VLFNOTE UPDATE DSNAME('the.pds.name(member)')

It works consistently. VLFNOTE is in AUTHCMD.
The 'CLASS' parm is not required for this action, and may be why it does not
work for you...

Regards, Sean

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


Interesting Article on COBOL, but not zSeries specific

2006-03-20 Thread McKown, John
From El Reg, entitled COBOL Resartus or Revisiting the re-tailored
COBOL universe

http://www.regdeveloper.co.uk/2006/03/20/cobol_financial_services/

May be good news for EU COBOL programmers especially. 

--
John McKown
Senior Systems Programmer
UICI Insurance Center
Information Technology

This message (including any attachments) contains confidential
information intended for a specific individual and purpose, and its
content is protected by law.  If you are not the intended recipient, you
should delete this message and are hereby notified that any disclosure,
copying, or distribution of this transmission, or taking any action
based on it, is strictly prohibited. 
 

--
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/C++ tools

2006-03-20 Thread Thomas David Rivers

James,

  We can't reply privately - because there's no e-mail address there.

  But - feel free to contact us - see http://www.dignus.com for
 information about our C and C++ offerings for the mainframe.
 For more information, toss a note to [EMAIL PROTECTED]

- Thanks! -
- Dave Rivers -


James Smith wrote:

Can anyone recommend any tools on the market which compete with IBM C/C++
Productivity Tools for z/OS??

 


Vendors feel free to email me privately so as not to clutter up the list
with advertising.

 


Regards

 


Jim S.





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


SSL Certificate Signing

2006-03-20 Thread Ward, Mike S
Hi all, I was trying to sign a certificate that came from a windows IIS
server on the z/OS system. I had the Window's user generate a
certificate request that I ftp'd to z/os. I then tried to add (Import)
the cert so that I could sign it using the my CA cert. I keep receiving
a racf error:
IRRD104I The input data set does not contain a valid certificate. So I
had them redo the request and I made sure to FTP it back to z/OS in
ascii mode. I still get the same error. Anyone able to help on this?

=
This email and any files transmitted with it are confidential and intended 
solely for the use of the individual or entity
to whom they are addressed.If you have received this email in error please 
notify the system manager. This message
contains confidential information and is intended only for the individual 
named. If you are not the named addressee you
should not disseminate, distribute or copy this e-mail. Please notify the 
sender immediately by e-mail if you have received
this e-mail by mistake and delete this e-mail from your system. If you are not 
the intended recipient you are notified that
disclosing, copying, distributing or taking any action in reliance on the 
contents of this information is strictly prohibited.

--
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: SSL Certificate Signing

2006-03-20 Thread TISLER Zaromil
- snip -
So I had them redo the request and I made sure to FTP it back to z/OS in
ascii mode. I still get the same error.
- snip -

Why ascii?

--
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: Has anyone heard about IBM changing the way they send customized maint?

2006-03-20 Thread John Eells

[EMAIL PROTECTED] wrote:

I just heard a rumor that IBM is moving to a new way of sending
maintenance to customers.  Apparently, we're supposed to send them our
SMP/E zones and they send customized maintenance.

I'm not placing any stock in this rumor but I wanted to be sure I
hadn't missed anything since I didn't go to the last SHARE.


Here are the changes:

- Effective January 15, 2006, the S/390 Service Update Facility 
(SUF) was be discontinued.


- Effective March 2006, new ESO and CBPDO physical delivery 
subscriptions will not be accepted.


- Effective June 2006, CBPDO product orders will include service 
only for included products.


- Effective June 2006, Service-Only CBPDO (5751-CS3) orders will 
no longer be accepted.


- Effective September 2006, existing ESO and CBPDO physical 
delivery subscriptions will be discontinued.


You should consider using the new SMP/E Internet Service 
Retrieval function that was introduced with SMP/E 3.4.  Using 
your batch scheduler to get service and HOLDDATA periodically 
(daily, weekly, whatever you want) can replace the subscription 
options we're withdrawing.


--
John Eells
z/OS Technical Marketing
IBM Poughkeepsie
[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


Re: CA's TCPAccess question.

2006-03-20 Thread Clark, Kevin D, HRC-Alexandria/EDS
John, 

I see you have your answer. This is a great list. 

Try FTPGREET member in the .HELP dataset  //SYSHELP

 
 I am  checking on your real question.
 
 Kevin


--
John McKown
Senior Systems Programmer
UICI Insurance Center
Information Technology

This message (including any attachments) contains confidential
information intended for a specific individual and purpose, and its
content is protected by law.  If you are not the intended recipient, you
should delete this message and are hereby notified that any disclosure,
copying, or distribution of this transmission, or taking any action
based on it, is strictly prohibited. 
 

--
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-OPS/MVS

2006-03-20 Thread Clark, Kevin D, HRC-Alexandria/EDS
The Knowledge base on CA-Support connect is all I know of.

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Mark Steely
Sent: Wednesday, March 15, 2006 6:03 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: CA-OPS/MVS


Is there a LISTSERV for CA products?
 
Thank You

--
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: TCPIP Question

2006-03-20 Thread Jack Kelly
with sshd you can seed the know_host by allowing unknow hosts in a test 
environment and sshd will update the file with the hosts that you connect 
to.

Jack Kelly
LA Systems @ US Courts
x 202-502-2390

--
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: SSL Certificate Signing

2006-03-20 Thread Ward, Mike S
Because then it's legible under z/os. Should I use binary? I'll try
binary and see what it does.

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of TISLER Zaromil
Sent: Monday, March 20, 2006 9:11 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: SSL Certificate Signing

- snip -
So I had them redo the request and I made sure to FTP it back to z/OS in
ascii mode. I still get the same error.
- snip -

Why ascii?

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

=
This email and any files transmitted with it are confidential and intended 
solely for the use of the individual or entity
to whom they are addressed.If you have received this email in error please 
notify the system manager. This message
contains confidential information and is intended only for the individual 
named. If you are not the named addressee you
should not disseminate, distribute or copy this e-mail. Please notify the 
sender immediately by e-mail if you have received
this e-mail by mistake and delete this e-mail from your system. If you are not 
the intended recipient you are notified that
disclosing, copying, distributing or taking any action in reliance on the 
contents of this information is strictly prohibited.

--
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 conversion from 3380 to 3390 - H E L P

2006-03-20 Thread Jack Kelly
if you have hsm up, an option is to migrate/recall and let hsm reblock (or 
just migrate). dss will also reblock src files so you could selectivly dss 
copy.

Jack Kelly
LA Systems @ US Courts
x 202-502-2390

--
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: SSL Certificate Signing

2006-03-20 Thread Ward, Mike S
It doesn't matter whether I ftp it in ascii or binary I still get the
same error.

Here are the racf statements I use.

RACDCERT ID(KEYMSTR) GENCERT('CERT.GENREQ') +
 SIGNWITH(CERTAUTH LABEL('My CA Authority 2005')) +
 WITHLABEL('WebReports Server') +
 NOTAFTER(DATE(2008-06-01))

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of TISLER Zaromil
Sent: Monday, March 20, 2006 9:11 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: SSL Certificate Signing

- snip -
So I had them redo the request and I made sure to FTP it back to z/OS in
ascii mode. I still get the same error.
- snip -

Why ascii?

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

=
This email and any files transmitted with it are confidential and intended 
solely for the use of the individual or entity
to whom they are addressed.If you have received this email in error please 
notify the system manager. This message
contains confidential information and is intended only for the individual 
named. If you are not the named addressee you
should not disseminate, distribute or copy this e-mail. Please notify the 
sender immediately by e-mail if you have received
this e-mail by mistake and delete this e-mail from your system. If you are not 
the intended recipient you are notified that
disclosing, copying, distributing or taking any action in reliance on the 
contents of this information is strictly prohibited.

--
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: Problem copying VM volumes under z/OS

2006-03-20 Thread Neubert, Kevin (DIS)
Should your COPY have PURGE?

At this time I don't have access to any DASD to try what you're doing, but
the following using tape works for me:

//SYSINDD *
  DUMP TRKS(0,0,3338,14) -
INDDNAME(DISKIN) -
OUTDDNAME(TAPEOUT) -
CPVOL -
ADMIN

//SYSINDD *
  RESTORE TRACKS(0,0,3338,14) -
INDDNAME(TAPEIN) -
OUTDDNAME(DISKOUT) -
PURGE -
CPVOL -
ADMIN

Regards,

Kevin

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Oswaldo Ferreira de Matos
Sent: Monday, March 20, 2006 5:50 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Problem copying VM volumes under z/OS

I'm trying to use DFDSS under  z/OS 1.4 to copy my z/VM 51 volumes and  I am
getting the
following error message for every volume:
ADR307E (001)-OPNCL(11), UNABLE TO OPEN VOLUME HI8801, 16
From message guide :
16 
The VM-formatted volume does not have an OS-compatible VTOC
beginning on track zero, record five. 
I try to format from z/OS, but without success with the copy, but when I
format the output volumes under z/VM (ICKDSF CPVOLUME)
its is OK.
I am using the sysin :
COPYTRACKS(0,0,3338,14)  COPYVOLID -
ADMINISTRATOR  PURGE -
CPVOLUME -   
INDDNAME(ENTRADA) -  
OUTDDNAME(SAIDA)

Is it the only way to copy the volumes :
1) Format the volume from z/VM
2) Copy using DFDSS from z/OS
or maybe I can format by z/OS ?
Thanks.
Oswaldo 

--
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: COBOL: File Status = 46

2006-03-20 Thread Frank Yaeger
John Chase wrote:

 Maybe I should repost with the DFSORT eyecatcher in the subject, to 
 ask specifically if DFSORT opens SORTOUT when it finds SORTIN was empty.  




Yes, it does.

(Sorry, I wasn't following this thread because of the Subject but I caught
it with google groups.)

Frank Yaeger - DFSORT Team (IBM)
 Specialties: ICETOOL, IFTHEN, OVERLAY, Symbols, Migration
 = DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort/

--
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: Problem copying VM volumes under z/OS

2006-03-20 Thread Paolo Cacciari
Oswaldo,

Using CPVOLUME in the copy command requires the source and
target volumes to be in VM format.
You will need to have the target volume initialized at a VM system
or use ICKDSF to initialize the target volume with a
VTOC starting on track zero, record five.

Hope this helps.

..snip ..
I'm trying to use DFDSS under  z/OS 1.4 to copy my z/VM 51 volumes and  I
am
getting the
following error message for every volume:
ADR307E (001)-OPNCL(11), UNABLE TO OPEN VOLUME HI8801, 16
From message guide :
16
 The VM-formatted volume does not have an OS-compatible VTOC
beginning on track zero, record five.
I try to format from z/OS, but without success with the copy, but when I
format the output volumes under z/VM (ICKDSF CPVOLUME)
its is OK.
I am using the sysin :
COPYTRACKS(0,0,3338,14)  COPYVOLID -
ADMINISTRATOR  PURGE -
CPVOLUME -
INDDNAME(ENTRADA) -
OUTDDNAME(SAIDA)

Is it the only way to copy the volumes :
1) Format the volume from z/VM
2) Copy using DFDSS from z/OS
or maybe I can format by z/OS ?
Thanks.
Oswaldo
 snip ..
_
Paolo Cacciari
Business Continuity and Recovery Services, IBM Global Services - South
Region, EMEA
Via Darwin 85, 20019 Settimo Milanese(MI) – Italy - MISET001
The goal is to be prepared for a disaster not to continually plan for a
successful test
* [EMAIL PROTECTED]
( + 39 051 41.36799   Mobile: + 39 335 6287584
7 + 39 02 596.23288

--
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: Problem copying VM volumes under z/OS

2006-03-20 Thread Jack Kelly
you only need a label to keep mvs happy. sounds like you're trying to do 
logical dump/copies and that'll never work. you can only do physical dumps 
of vm packs from mvs. logical dump imply a vtoc and vm doesn't do that.

Jack Kelly
LA Systems @ US Courts
x 202-502-2390

--
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: amode rmode problem

2006-03-20 Thread Edward E. Jaffe

Don Poitras wrote:

In amode 31, the 'high-order' bit is always cleared by LA. You often see
code where that is the only purpose of the instruction. He's correctly
going amode 24, but if GET tries to access memory above the line, or
return to an above the line caller, you get trouble. GET was changed a
while back to allow amode 31 callers, he can probably just get rid of
the logic to go amode 24.
  


A long, long, _long_ while back! It was DFSMS/MVS 1.1 circa MVS/ESA 
V4. Like you, I suggest he delete that obsolete code and just stay in 
31-bit mode.


--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
310-338-0400 x318
[EMAIL PROTECTED]
http://www.phoenixsoftware.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


IPCS in Batch

2006-03-20 Thread Chase, John
Hi, All,

Having fun trying to format a CTRACE using IPCS in batch mode.  Seems
that no matter what I specify for the PROFILE LINESIZE( ) subcommand, I
get the output formatted for 80 columns (I'd really like to get it in
full print width of 132 or more).

Also having difficulty understanding how to get the output to DDNAME
IPCSPRNT instead of SYSTSPRT.

Here's the latest iteration of the JCL I'm trying (based on the example
in the IP Diagnosis Guide):

//IPCSEXEC PGM=IKJEFT01 
//STEPLIB   DD DISP=SHR,DSN=SYS1.MIGLIB 
//SYSPRINT  DD SYSOUT=* 
//SYSUDUMP  DD SYSOUT=* 
//IPCSTOC   DD SYSOUT=* 
//PRINTER   DD SYSOUT=* 
//SYSPROC   DD DISP=SHR,DSN=SYS1.CLIST  
//  DD DISP=SHR,DSN=SYS1.SBLSCLI0   
//IPCSPARM  DD DISP=SHR,DSN=SYS1.PARMLIB
//  DD DISP=SHR,DSN=SYS1.PARMLIB.PRD1Z15
//  DD DISP=SHR,DSN=SYS1.PARMLIB.ZOS15  
//  DD DISP=SHR,DSN=SYS1.IBM.PARMLIB
//IPCSPRNT  DD DISP=(,CATLG),DSN=.CTRACE.FORMAT, 
// UNIT=SYSDA,VOL=SER=VOLSER,SPACE=(CYL,(120,30),RLSE), 
// DCB=(RECFM=FBA,LRECL=133,BLKSIZE=0)  
//SYSTSPRT  DD SYSOUT=* 
//IPCSDDIR  DD DISP=SHR,DSN=.DDIR
//SYSTSIN   DD *
  IPCS NOPARM   
  PROFILE LINESIZE(132) 
  SETDEF DA('.CTRACE1') 
  CTRACE COMP(SYSTCPDA) SUB((TCPIP)) FULL LOCAL PRINT   
  END   
/* 

Any tips, hints, etc. would be appreciated.  The above JCL fills the
spool rather quickly.

TIA,

-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


Re: SSL Certificate Signing

2006-03-20 Thread John S. Giltner, Jr.

Not sure why, but we have had problems ftp'ing certificates to import.

What we end up doing is cut'ing from the PC and pasting into the TSO.

I was just recenlty made aware of this, the security people new but did 
not tell any of the networking people.  Here the mainframe network 
sysprogs do all truly network functions (firewalls, switches, routers).


I was told that it has something to do with trailing blanks on the end 
of the lines.  That ftp was adding them, and something did not like 
them.  I want to do some testing, I think that using recfm VB should 
work but I have not tried it yet.




Ward, Mike S wrote:

It doesn't matter whether I ftp it in ascii or binary I still get the
same error.

Here are the racf statements I use.

RACDCERT ID(KEYMSTR) GENCERT('CERT.GENREQ') +
 SIGNWITH(CERTAUTH LABEL('My CA Authority 2005')) +
 WITHLABEL('WebReports Server') +
 NOTAFTER(DATE(2008-06-01))

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED]
Behalf Of TISLER Zaromil
Sent: Monday, March 20, 2006 9:11 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: SSL Certificate Signing

- snip -
So I had them redo the request and I made sure to FTP it back to z/OS in
ascii mode. I still get the same error.
- snip -

Why ascii?



--
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: Problem copying VM volumes under z/OS

2006-03-20 Thread Ray Mullins
Bom dia, Oswaldo,

This has been discussed before on VMESA-L, which is now known as IBMVM.

Go here:  http://listserv.uark.edu/archives/ibmvm.html

You can search the archives, and subscribe there também. 

Saludos,
Ray

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Oswaldo Ferreira de Matos
 Sent: Monday March 20 2006 05:50
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Problem copying VM volumes under z/OS
 
 I'm trying to use DFDSS under  z/OS 1.4 to copy my z/VM 51 
 volumes and  I am getting the following error message for 
 every volume:
 ADR307E (001)-OPNCL(11), UNABLE TO OPEN VOLUME HI8801, 16
 From message guide :
 16 
   The VM-formatted volume does not have an OS-compatible 
 VTOC beginning on track zero, record five. 
 I try to format from z/OS, but without success with the copy, 
 but when I format the output volumes under z/VM (ICKDSF 
 CPVOLUME) its is OK.
 I am using the sysin :
 COPYTRACKS(0,0,3338,14)  COPYVOLID -
 ADMINISTRATOR  PURGE -
 CPVOLUME -   
 INDDNAME(ENTRADA) -  
 OUTDDNAME(SAIDA)
 
 Is it the only way to copy the volumes :
 1) Format the volume from z/VM
 2) Copy using DFDSS from z/OS
 or maybe I can format by z/OS ?
 Thanks.
 Oswaldo 
 
 --
 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: IPCS in Batch

2006-03-20 Thread John S. Giltner, Jr.

Try:

SETDEF DA('.CTRACE1') PRINT NOTERMINAL


Chase, John wrote:

Hi, All,

Having fun trying to format a CTRACE using IPCS in batch mode.  Seems
that no matter what I specify for the PROFILE LINESIZE( ) subcommand, I
get the output formatted for 80 columns (I'd really like to get it in
full print width of 132 or more).

Also having difficulty understanding how to get the output to DDNAME
IPCSPRNT instead of SYSTSPRT.

Here's the latest iteration of the JCL I'm trying (based on the example
in the IP Diagnosis Guide):

//IPCSEXEC PGM=IKJEFT01 
//STEPLIB   DD DISP=SHR,DSN=SYS1.MIGLIB 
//SYSPRINT  DD SYSOUT=* 
//SYSUDUMP  DD SYSOUT=* 
//IPCSTOC   DD SYSOUT=* 
//PRINTER   DD SYSOUT=* 
//SYSPROC   DD DISP=SHR,DSN=SYS1.CLIST  
//  DD DISP=SHR,DSN=SYS1.SBLSCLI0   
//IPCSPARM  DD DISP=SHR,DSN=SYS1.PARMLIB
//  DD DISP=SHR,DSN=SYS1.PARMLIB.PRD1Z15
//  DD DISP=SHR,DSN=SYS1.PARMLIB.ZOS15  
//  DD DISP=SHR,DSN=SYS1.IBM.PARMLIB
//IPCSPRNT  DD DISP=(,CATLG),DSN=.CTRACE.FORMAT, 
// UNIT=SYSDA,VOL=SER=VOLSER,SPACE=(CYL,(120,30),RLSE), 
// DCB=(RECFM=FBA,LRECL=133,BLKSIZE=0)  
//SYSTSPRT  DD SYSOUT=* 
//IPCSDDIR  DD DISP=SHR,DSN=.DDIR
//SYSTSIN   DD *
  IPCS NOPARM   
  PROFILE LINESIZE(132) 
  SETDEF DA('.CTRACE1') 
  CTRACE COMP(SYSTCPDA) SUB((TCPIP)) FULL LOCAL PRINT   
  END   
/* 


Any tips, hints, etc. would be appreciated.  The above JCL fills the
spool rather quickly.

TIA,

-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


CICS question

2006-03-20 Thread Peter Ten Eyck
Is there any difference between:

01  WS-USNAO100PIC X(8)VALUE 'USNAO100'.
...
EXEC CICS LINK
  PROGRAM(WS-USNAO100)
  COMMAREA(NAME-REQUEST-INFO)
  LENGTH(NAME-REQ-LENGTH)
END-EXEC.

and

EXEC CICS LINK
  PROGRAM('USNAO100')
  COMMAREA(NAME-REQUEST-INFO)
  LENGTH(NAME-REQ-LENGTH)
END-EXEC.

--
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: Has anyone heard about IBM changing the way they send customized maint?

2006-03-20 Thread John Eells

[EMAIL PROTECTED] wrote:
snip

I assume ShopZseries will still let me order service for products?  It
is in ShopZSeries where you can upload your CSIs.  I always have to
download everything to my PC then upload to the mainframe.

The subscription stuff isn't an issue for me (rarely used those tapes
anyway).  But I sometimes ordered service only PDOs...



I'm not aware of any plans to withdraw the ShopzSeries support 
that allows you to upload a bitmap and order service, or to 
withdraw ESO orders in general (just subscriptions).  So in 
effect we are replacing subscriptions for tape delivery of 
service with two flavors of electronic delivery and one form of 
tape delivery on demand.


--
John Eells
z/OS Technical Marketing
IBM Poughkeepsie
[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


Re: CICS question

2006-03-20 Thread Schiradin,Roland HG-Dir itb-db/dc
Yes the second one save 8 bytes of working storage which 
exists for each current task. It's a so called literal and 
exist just once for each cics region.

Roland


-Original Message-
From: IBM Mainframe Discussion List 
[mailto:[EMAIL PROTECTED] On Behalf Of Peter Ten Eyck
Sent: Monday, March 20, 2006 8:02 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: CICS question


Is there any difference between:

01  WS-USNAO100PIC X(8)VALUE 'USNAO100'.
...
EXEC CICS LINK
  PROGRAM(WS-USNAO100)
  COMMAREA(NAME-REQUEST-INFO)
  LENGTH(NAME-REQ-LENGTH)
END-EXEC.

and

EXEC CICS LINK
  PROGRAM('USNAO100')
  COMMAREA(NAME-REQUEST-INFO)
  LENGTH(NAME-REQ-LENGTH)
END-EXEC.

--
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: PROGxx APF and LNKLST VOLUME Best practices?

2006-03-20 Thread Roberto Ibarra Magdaleno
Great:

1) We’ll change everything in APF to SMS if it’s SMS.

2) So, for LNKLST if the datasets are in the master catalog, but not in the
SYSRES  nor in then MCATVOL, we should leave the VOLUME entry blank so the
system looks for it in the master catalog, right?

Roberto Ibarra


-IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU wrote: -

To: IBM-MAIN@BAMA.UA.EDU
From: Peter Relson [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


JES2 $TA persist across warm start

2006-03-20 Thread Rob Wunderlich
Do JES2 $TA commands persist across a JES2 warm start?

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


Re: JES2 $TA persist across warm start

2006-03-20 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Rob Wunderlich
 Sent: Monday, March 20, 2006 1:18 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: JES2 $TA persist across warm start
 
 
 Do JES2 $TA commands persist across a JES2 warm start?
 
 Thanks,
 Rob

No.

--
John McKown
Senior Systems Programmer
UICI Insurance Center
Information Technology

This message (including any attachments) contains confidential
information intended for a specific individual and purpose, and its
content is protected by law.  If you are not the intended recipient, you
should delete this message and are hereby notified that any disclosure,
copying, or distribution of this transmission, or taking any action
based on it, is strictly prohibited. 
 

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

2006-03-20 Thread Rugen, Len
And some obscure instruction could MOVE 'NOTAO100' TO WS-USNAO100. and
things would be different next time the link was called.

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Peter Ten Eyck
Sent: Monday, March 20, 2006 1:02 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: CICS question

Is there any difference between:

01  WS-USNAO100PIC X(8)VALUE 'USNAO100'.
...
EXEC CICS LINK
  PROGRAM(WS-USNAO100)
  COMMAREA(NAME-REQUEST-INFO)
  LENGTH(NAME-REQ-LENGTH)
END-EXEC.

and

EXEC CICS LINK
  PROGRAM('USNAO100')
  COMMAREA(NAME-REQUEST-INFO)
  LENGTH(NAME-REQ-LENGTH)
END-EXEC.

--
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: IPCS in Batch

2006-03-20 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Robert Wright
 
 
  Having fun trying to format a CTRACE using IPCS in batch mode.  
  [ snip ]
 
  Also having difficulty understanding how to get the output to DDNAME

  IPCSPRNT instead of SYSTSPRT.
 
  Here's the latest iteration of the JCL I'm trying (based on the 
  example in the IP Diagnosis Guide):
 
  [ snip ]
 
 I'd recommend the following changes relative to what you show:
 
 o  Make the IPCSPRNT ddname say RECFM=VBA, not FBA.
 
 o  Add PRINT NOTERM to your SETDEF options or just add 
 NOTERM to your CTRACE subcommand options.  IPCS is willing to 
 route messages to both destinations, but you rarely want that 
 combination.  When it is done, IPCS sets the recommended line 
 width to the minimum of the two available.

Thanks!  Exactly what I was looking for.

-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


Re: IPCS in Batch

2006-03-20 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of John S. Giltner, Jr.
 
 Try:
 
 SETDEF DA('.CTRACE1') PRINT NOTERMINAL

Got it, Thanks.

-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


Re: SMP/E for non-sysprogs?

2006-03-20 Thread Patrick O'Keefe
On Fri, 17 Mar 2006 09:12:55 -0500, Shmuel Metz (Seymour J.) shmuel+ibm-
[EMAIL PROTECTED] wrote:

...
I think we're just going to disagree on this one.  It sounds to me
that you expect infalable SMP users.

Then you're not reading what I wrote. Mistakes happen, but ignoring
advice is not an excuse for making mistakes. When you write off the
advice that you were given then it is presumptuous to demand that
someone bail you out.
...

I think we are arguing past each other here.  And I hereby continue the
process.

The original posting asked whether it was appropriate to let non-system
programmers use SMP.  I contended that the same question applies to system
programmers that are familiar with SMP, and further contend that this
situation may be thrust apon us (whichever group is us) by managerial
dictate.  And I finally contend that some advice given by the SMP experts
will ignored, forgotten, and/or misunderstood by the SMP neophyte; SMP
is just too complicated for this not to happen.

The expert may be completely justified in saying You created te mess;
you fix it, but who benefits from that?  Give some help and maybe the
neophyte will learn.

Pat O'Keefe

--
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: SSL Certificate Signing

2006-03-20 Thread Anne Lynn Wheeler

John S. Giltner, Jr. wrote:

Not sure why, but we have had problems ftp'ing certificates to import.

What we end up doing is cut'ing from the PC and pasting into the TSO.

I was just recenlty made aware of this, the security people new but did 
not tell any of the networking people.  Here the mainframe network 
sysprogs do all truly network functions (firewalls, switches, routers).


I was told that it has something to do with trailing blanks on the end 
of the lines.  That ftp was adding them, and something did not like 
them.  I want to do some testing, I think that using recfm VB should 
work but I have not tried it yet.


digital signatures are applied to data ... then the digital signature is 
later verified to check that 1) no bits in the data have changed and 2) 
authenticate the entity generating the digital signature


digital certificates are a specialized standards format that are 
digitally signed. any bit change in the body of the digital certificate 
will result in the verification of the certificate's digital signature 
to fail (and treating the result as a bad digital certificate).


a similar but different issue that happened with the XML digital 
signature standard was that the base XML wasn't defining a deterministic 
encoding standard.


FSTC finally came up with FSML deterministic encoding standard for 
(digitally signed) financial transactions. Part of the issue was that 
standard encoding process results in quite a bit of payload bloat for 
financial transactions. Their solution was to take a financial 
transaction, encode it for digital signing and then transmit the 
original unencoded financial transaction (rather than the bloated 
encoded version) along with appended digital signature. The recipient 
would then re-encode the transaction and verify the digital signature. 
Unless all the encoding processes produced exactly the same bits ... the 
digital signature verification would fail.


--
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: FLEX-ES

2006-03-20 Thread Knutson, Sam
Hi Tim,

I would advise anyone very strongly against the partnership approach.
It falls into the paper recovery trap that many shops including one I
worked at allowed to occur in the past.  Documentation such as a letter
indicating a reciprocal agreement could be produced which might satisfy
the auditors but the hardware, carbon based units, and real access to
back it up was never there.  It was the most dangerous of constructs an
illusion of safety without a real safety net.  

Does the partner have enough spare capacity to run your entire business
critical workload on a few hours or even a days notice for weeks till
other arrangements are made?  Do they have an LPAR defined ready and
waiting?  CPU capacity available as 'spare' or more likely inactive but
installed capacity?  Do you pay for the feature to allow them to
dynamically activate capacity? Who pays for tests? Do they have enough
spare DASD capacity?  Have their auditors and security administrators
and senior management all concurred?  That partnership probably won't
get you past the security guards on a Saturday morning do you have
escalation procedures?  Is the sizing reviewed when business process
changes occur or at least annually?

A partnership implies that both partners incur very real costs or have
approximately the same size expendable workload equal in size to the
partner production workload that they are willing to totally sacrifice
and allow the other party to process almost on demand.  

Business Recovery Providers are not free but to get a DR plan that will
keep you employed after it's executed I think you need to get skin in
the game.  You either $build or $buy but I don't see DR instituted as a
reciprocal agreement (free beer) as something suitable for most
businesses.

Best Regards, 

Sam Knutson, GEICO 
Performance and Availability Management 
mailto:[EMAIL PROTECTED] 
(office)  301.986.3574 

All it takes to fly is to hurl yourself at the ground... and miss.
Douglas Adams

-Original Message-
Another way is to form a partnership with another mainframe shop in your
general vicinity.  It works best if you find another company with
roughly the same problem -- there probably is at least one -- and you
simply agree to provide DR coverage for each other on your production
systems.  There's probably no money that changes hands in either
direction (because you're mutually helping each other more or less
equally).  Check with IBM on any implications (and possible
suggestions), but it should be quite doable.

- - - - -
Timothy F. Sipples
Consulting Enterprise Software Architect, z9/zSeries IBM Japan, Ltd.
E-Mail: [EMAIL PROTECTED]

][

This email/fax message is for the sole use of the intended
recipient(s) and may contain confidential and privileged information.
Any unauthorized review, use, disclosure or distribution of this
email/fax is prohibited. If you are not the intended recipient, please
destroy all paper and electronic copies of the original message.

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


Enhanced Catalog Sharing

2006-03-20 Thread Andy White
Does anyone have enhanced catalog sharing turned on their systems. On our 
lab today we have done this in the coupling facility was wondering what 
the feed back has been,  problems if any, user experiences.

Thanks

Andy
Internet: Mailto:[EMAIL PROTECTED]

The information contained in this message may be CONFIDENTIAL and is for the 
intended addressee only.  Any unauthorized use, dissemination of the 
information, or copying of this message is prohibited.  If you are not the 
intended addressee, please notify the sender immediately and delete this 
message.

--
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: SSL Certificate Signing

2006-03-20 Thread Ward, Mike S
I made sure this wasn't the case. You can hex edit the file in ispf and
look for and delete them if need be. My ftp wasn't appending CRLF's to
the file.

The file is an 84 byte record variable length blocked 27998. I have
opened up and ETR with IBM to see if RACF is having some kind of issue.

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of John S. Giltner, Jr.
Sent: Monday, March 20, 2006 11:30 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: SSL Certificate Signing

Not sure why, but we have had problems ftp'ing certificates to import.

What we end up doing is cut'ing from the PC and pasting into the TSO.

I was just recenlty made aware of this, the security people new but did 
not tell any of the networking people.  Here the mainframe network 
sysprogs do all truly network functions (firewalls, switches, routers).

I was told that it has something to do with trailing blanks on the end 
of the lines.  That ftp was adding them, and something did not like 
them.  I want to do some testing, I think that using recfm VB should 
work but I have not tried it yet.



Ward, Mike S wrote:
 It doesn't matter whether I ftp it in ascii or binary I still get the
 same error.
 
 Here are the racf statements I use.
 
 RACDCERT ID(KEYMSTR) GENCERT('CERT.GENREQ') +
  SIGNWITH(CERTAUTH LABEL('My CA Authority 2005')) +
  WITHLABEL('WebReports Server') +
  NOTAFTER(DATE(2008-06-01))
 
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED]
 Behalf Of TISLER Zaromil
 Sent: Monday, March 20, 2006 9:11 AM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: SSL Certificate Signing
 
 - snip -
 So I had them redo the request and I made sure to FTP it back to z/OS
in
 ascii mode. I still get the same error.
 - snip -
 
 Why ascii?
 

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

=
This email and any files transmitted with it are confidential and intended 
solely for the use of the individual or entity
to whom they are addressed.If you have received this email in error please 
notify the system manager. This message
contains confidential information and is intended only for the individual 
named. If you are not the named addressee you
should not disseminate, distribute or copy this e-mail. Please notify the 
sender immediately by e-mail if you have received
this e-mail by mistake and delete this e-mail from your system. If you are not 
the intended recipient you are notified that
disclosing, copying, distributing or taking any action in reliance on the 
contents of this information is strictly prohibited.

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


Fw: amode rmode problem

2006-03-20 Thread Bill Klein
Jim,
 Not certain that it is releavant, but have you read the information at:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/igy3mg30/APPENDIX
1.4.13 

also

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ceea4140/14.2.1 


Jim McAlpine [EMAIL PROTECTED] wrote in message
news:[EMAIL PROTECTED]...
 I inherited a set of programs one of which is assembler and runs as a
 subroutine which is called by a COBOL main program.  Here is a snippet
from
 the assembler routine which is linkied AMODE(31) RMODE(24) -
 
   L R4,CZW3IOAA ...SETUP ADDR OF IOAREA
   L R5,CZW3DCBA ...SETUP ADDR OF DCB
   LAR8,DOGETS   SET UP 24 BIT ADDRESS
   LAR9,DOGETE   STORE CURR AMODE AND RET ADDR
   BSM   R9,R8   SWITCH AMODE TO 24 BIT
  DOGETS   GET   (R5),(R4)
 +DOGETS   LR1,R5  LOAD PARAMETER REG
 + LR0,R4  LOAD PARAMETER REG
 + SLR   15,15CLEAR REGISTER @
 + ICM   15,7,49(1)   LOAD GET ROUTINE ADDR  @
 + BALR  14,15LINK TO GET ROUTINE
   BSM   0,R9SWITCH AMODE BACK TO 31 BIT
  DOGETE   EQU   *
 
 When the COBOL program is linked AMODE(ANY) RMODE(24) it runs fine, but
when
 the COBOL program is linked AMODE(31) RMODE(ANY) the assembler subroutine
 abends with a 0C4 abend on the first BSM instruction above.
 

--
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: FLEX-ES

2006-03-20 Thread Ted MacNEIL
I would advise anyone very strongly against the partnership approach.
It falls into the paper recovery trap that many shops including one I
worked at allowed to occur in the past.

I could not agree more.
I also find that the COMDISCO approach doesn't work either.

I have one recovery site, and more than one customer.
What happens if more than one customer gets hit by a disaster (9-11? Katrina? 
Other?)?
Who gets the site?
First?
Largest?
Biggest payer?
More than one?
None? You're too close to the storm centre!

The only thing that works is true replication under YOUR control.
Everything else is 'paper recovery' (I like that term, Sam!).

It's too expensive!
So is going out of business!

D/R is an insurance policy.
Sites, testing, back-up, recovery, procedures?
They're the premium payments.

As with all, you get what you paid for.

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


Re: FLEX-ES

2006-03-20 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Ted MacNEIL
 Sent: Sunday, March 19, 2006 6:00 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: FLEX-ES
 
 
 I would advise anyone very strongly against the partnership approach.
 It falls into the paper recovery trap that many shops including one I
 worked at allowed to occur in the past.
 
 I could not agree more.
 I also find that the COMDISCO approach doesn't work either.

I sort of agree with you. The problem is cost for us small-timers. We
cannot afford to have a duplicate, replicated, remote datacenter. Trying
to do that would cause us to likely go under right now instead of in
the case of a disaster. My other problem with any D.R. scenario is
personnel. We are trying to make our z/OS recovery cook book. And we
are getting there. The Sungard people do 99% of the initial recovery
(getting z/OS running). Unfortunately, application recovery is still
dependant on local knowledge. So if a major disaster hits our area
(not just our computer room), then the lack of trained personnel may
well cause the business to fail. And I'm not just talking I.T. people.
What about end-users? You can't just take somebody off the street and
have them be able to take over. So, our disaster recover, is more for
a data center disaster and not a 911 type disaster where we are all
dead. Of course, if I'm dead, I won't really care about the company too
much, will I?


 
 I have one recovery site, and more than one customer.
 What happens if more than one customer gets hit by a disaster 
 (9-11? Katrina? Other?)?
 Who gets the site?
 First?

From what I understand it is first declared, first come.

 Largest?
 Biggest payer?
 More than one?
 None? You're too close to the storm centre!
 
 The only thing that works is true replication under YOUR control.
 Everything else is 'paper recovery' (I like that term, Sam!).
 
 It's too expensive!
 So is going out of business!

But if the cost of a proper scenario drives you to bankruptcy due to
cost, what's the diff?

 
 D/R is an insurance policy.
 Sites, testing, back-up, recovery, procedures?
 They're the premium payments.

And if the premium payment for insurance is greater than the replacement
cost? Not a good decision then. Theoretically, an Insurance Company
(like mine) cannot really go out of business all at one. The various
state agencies will step in. So, although we may lose our jobs, our
customers should be safe. Theoretically.

 
 As with all, you get what you paid for.

No - you pay for what you get. There are many times when you don't get
even if you pay.

 
 -
 -teD
--
John McKown
Senior Systems Programmer
UICI Insurance Center
Information Technology

This message (including any attachments) contains confidential
information intended for a specific individual and purpose, and its
content is protected by law.  If you are not the intended recipient, you
should delete this message and are hereby notified that any disclosure,
copying, or distribution of this transmission, or taking any action
based on it, is strictly prohibited. 
 

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


using 3390 mod-9s

2006-03-20 Thread Dennis Leong
We will be using 3390 model-9 for the first time soon.  Are there any 
guidelines on where to place the vtoc?  As I read the ickdsf documentation, 
the vtoc must reside within the first 64K tracks.  Does someone have an 
ickdsf example for specifying the vtoc in an init?  Thank you.


- enD sin

--
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 3390 mod-9s

2006-03-20 Thread Imbriale, Donald (Exchange)
With today's devices, I prefer to allocate the VTOC, VTOC index, and
VVDS at the start of the volume.  This leaves large contiguous areas
from which to allocate.

INIT -  
 UNITADDRESS() -
 DEVICETYPE(3390) - 
 PURGE- 
 MAP  - 
 NOCHECK -  
 NOVALIDATE -   
 NORECLAIM  -   
 VOLID(vv) -
 INDEX(5,0,14) -
 VTOC(0,1,74)   

Don Imbriale

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf
Of Dennis Leong
Sent: Monday, March 20, 2006 4:35 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: using 3390 mod-9s

We will be using 3390 model-9 for the first time soon.  Are there any
guidelines on where to place the vtoc?  As I read the ickdsf
documentation,
the vtoc must reside within the first 64K tracks.  Does someone have an
ickdsf example for specifying the vtoc in an init?  Thank you.



***
Bear Stearns is not responsible for any recommendation, solicitation, 
offer or agreement or any information about any transaction, customer 
account or account activity contained in this communication.
***

--
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 3390 mod-9s

2006-03-20 Thread Shane
On Mon, 2006-03-20 at 13:35 -0800, Dennis Leong wrote:

 We will be using 3390 model-9 for the first time soon.  Are there any 
 guidelines on where to place the vtoc?  As I read the ickdsf documentation, 
 the vtoc must reside within the first 64K tracks.  Does someone have an 
 ickdsf example for specifying the vtoc in an init?  Thank you.

Hasn't been an issue since the real (SLED) mod-9's went and joined the
dodo.
These days, just as convenient to put it at the front as anywhere.

Shane ...

--
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 3390 mod-9s

2006-03-20 Thread Len Rugen
But, depending on what you're going to put on the volume, make the vtoc and
index larger.  On my SMS volumes, after space management, I ended up with a
lot of small datasets and ran out of space, they are cheap.

---
[This E-mail scanned for viruses by Declude Virus]

--
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: D/R (Was: FLEX-ES)

2006-03-20 Thread Ted MacNEIL
I sort of agree with you. The problem is cost for us small-timers. We
cannot afford to have a duplicate, replicated, remote datacenter. Trying
to do that would cause us to likely go under right now instead of in the 
case of a disaster.

Then, why bother?
If you can't afford to lose, you can't afford to win.
If it's too expensive to set up to recover the business, go forth and hope sh*t 
doesn't happen.
(TIC)

the lack of trained personnel may well cause the business to fail. 

See first comment.

So, our disaster recover, is more for
a data center disaster and not a 911 type disaster where we are all dead.

Not if your recovery site wasn't hit by an airplane.


From what I understand it is first declared, first come.

So, you're not guaranteed.
So, again, why bother?

But if the cost of a proper scenario drives you to bankruptcy due to
cost, what's the diff?

Then, why bother?

And if the premium payment for insurance is greater than the replacement cost? 
Not a good decision then.

Then don't pay the premium!


The various state agencies will step in. So, although we may lose our jobs, 
our customers should be safe

Specious at its best.
Don't do D/R because the government will step in and save our butts.
Truly Canadian in sentiment.

No - you pay for what you get. There are many times when you don't get even if 
you pay.

Then don't pay!

The three laws of thermodynamics, in layman's terms:
1. You can't win!
2. You can't break even!
3. You can't even get out of the game!


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


Re: COBOL: File Status = 46

2006-03-20 Thread David Speake
I am vague on this but I believe that only CLOSE (if opened system will close
on ABEND - last decade or two) will write an EOF on DASD, SMS or no SMS.

SMS checks bits in the Format1 DSCB on OPEN INPUT and does not attempt a
READ. Just gives nice friendly EOF on first READ attempt.

Without SMS - don't even think about it. Worst possible case is if the
first track(s) of the extent contain data left over from a previous
run of the program that supplies your input. Garbage/error reports to
customers instead of nice clean ABEND.

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


List contents of DFSMSdss-produced dump?

2006-03-20 Thread Paul Gilmartin
OK.  I've never done this before.

I have been given a DFSMSdss-produced dump data set to
diagnose.  I believe I should look before I leap, so I'd
like to know what data set names it contains.  What command
will tell me the names of the data sets contained in a
DFSMSdss-produced dump?

BTW, TFM, z/OS V1R5.0 DFSMSdss Storage Administration
Reference, speaks pervasively of DFSMSdss-produced dump
volume[s].  At least it's catalogued with a DSNAME.  May
I simply read dump data set whereever TFM says dump
volume?

Being unable to change the number of qualifiers with the
RENAME command (I've got that far; I simply don't know
what I'll be renameing _from_) is a PITA.

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


Re: using 3390 mod-9s

2006-03-20 Thread Ted MacNEIL
Are there any guidelines on where to place the vtoc?

IBM has recommended, for almost 20 years, always put it at the beginning of the 
pack.

With the advent of cache, striping, PAV, faster DASD, channels, and buffering, 
the old guideline of one-third into the pack (which I grew up with) has gone 
the way of the Dodo.

Allocate (pick your own sizes), at the beginning of the pack, in this order:

1. VTOC
2. INDEX
3. VVDS
4. Catalogue (if you want/need one).

Allow for secondaries (on the ones you can), but try to make them large enough 
to handle all you think you need.
Then add 50%.

Then open the pack up for new allocations.

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


Re: List contents of DFSMSdss-produced dump?

2006-03-20 Thread Imbriale, Donald (Exchange)
Run the RESTORE with TYPRUN=NORUN on the EXEC in JCL.

Don Imbriale

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf
Of Paul Gilmartin
Sent: Monday, March 20, 2006 5:09 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: List contents of DFSMSdss-produced dump?

OK.  I've never done this before.

I have been given a DFSMSdss-produced dump data set to
diagnose.  I believe I should look before I leap, so I'd
like to know what data set names it contains.  What command
will tell me the names of the data sets contained in a
DFSMSdss-produced dump?

BTW, TFM, z/OS V1R5.0 DFSMSdss Storage Administration
Reference, speaks pervasively of DFSMSdss-produced dump
volume[s].  At least it's catalogued with a DSNAME.  May
I simply read dump data set whereever TFM says dump
volume?

Being unable to change the number of qualifiers with the
RENAME command (I've got that far; I simply don't know
what I'll be renameing _from_) is a PITA.



***
Bear Stearns is not responsible for any recommendation, solicitation, 
offer or agreement or any information about any transaction, customer 
account or account activity contained in this communication.
***

--
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: DR: (was FLEX-ES)

2006-03-20 Thread Ted MacNEIL
Wow!
Your response was in 10 minutes before I saw my post!

-
-teD

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

-Original Message-
From: Shane [EMAIL PROTECTED]
Date: Tue, 21 Mar 2006 07:51:04 
To:IBM-MAIN@BAMA.UA.EDU
Subject: DR: (was FLEX-ES)

I can see Johns point of view, however I'm with Sam and Ted. Especially
re sharing production sites for backup of each other.
That would have to be a recipe for an unmitigated bloody schmozzle.

I can see the common backup site approach working -  would need
discipline, but that would be one of the plusses a third party would
bring to the table presumably. Never used such a service myself mind
you.
When I was at Amdahl we tried to get one of our customers to use their
hot DR site to act as fallback for another. Would help with costs, and
we'd ensure sufficient kit was on the floor.
Politics got in the way.

Shane ...

--
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: List contents of DFSMSdss-produced dump?

2006-03-20 Thread Mike Bell
I am sure there are better ways but simple has it's own benefits.
//ST1  EXEC PGM=ADRDSSU,PARM='TYPRUN=NORUN'
and any restore command will identify the available datasets on the dump
tape

Mike

On 3/20/06, Paul Gilmartin [EMAIL PROTECTED] wrote:

 OK.  I've never done this before.

 I have been given a DFSMSdss-produced dump data set to
 diagnose.  I believe I should look before I leap, so I'd
 like to know what data set names it contains.  What command
 will tell me the names of the data sets contained in a
 DFSMSdss-produced dump?

 BTW, TFM, z/OS V1R5.0 DFSMSdss Storage Administration
 Reference, speaks pervasively of DFSMSdss-produced dump
 volume[s].  At least it's catalogued with a DSNAME.  May
 I simply read dump data set whereever TFM says dump
 volume?

 Being unable to change the number of qualifiers with the
 RENAME command (I've got that far; I simply don't know
 what I'll be renameing _from_) is a PITA.

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




--
Mike

--
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: List contents of DFSMSdss-produced dump?

2006-03-20 Thread Ray Mullins
First, run with PARM='TYPRUN=NORUN', so you won't actually copy anything off
the tape.

Then use INCLUDE((**)).  ADRDSSU will show you all of the data sets
dumped/copied onto the tape.

Then, once you figure out what's there, and what to rename to (usually just
changing the HLQ is sufficient to get the data on disk, then rename
afterwards), then take out the PARM.

Later,
Ray

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Paul Gilmartin
 Sent: Monday March 20 2006 14:09
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: List contents of DFSMSdss-produced dump?
 
 OK.  I've never done this before.
 
 I have been given a DFSMSdss-produced dump data set to 
 diagnose.  I believe I should look before I leap, so I'd like 
 to know what data set names it contains.  What command will 
 tell me the names of the data sets contained in a 
 DFSMSdss-produced dump?
 
 BTW, TFM, z/OS V1R5.0 DFSMSdss Storage Administration 
 Reference, speaks pervasively of DFSMSdss-produced dump 
 volume[s].  At least it's catalogued with a DSNAME.  May I 
 simply read dump data set whereever TFM says dump volume?
 
 Being unable to change the number of qualifiers with the 
 RENAME command (I've got that far; I simply don't know what 
 I'll be renameing _from_) is a PITA.
 
 Thanks,
 gil

--
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: List contents of DFSMSdss-produced dump?

2006-03-20 Thread Paul Gilmartin
In a recent note, Imbriale, Donald (Exchange) said:

 Date: Mon, 20 Mar 2006 17:14:24 -0500
 
 Run the RESTORE with TYPRUN=NORUN on the EXEC in JCL.
 
???

The JCL RM lists TYPRUN as a parameter of the JOB statement,
but not of the EXEC statement.

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


Re: Enhanced Catalog Sharing

2006-03-20 Thread Schiradin,Roland HG-Dir itb-db/dc
We've been using ECS since March 2001 without any issue. 
At that time I add some coding to support this info in SHOWzOS

From the change log
*   Catalog display contains now ECS and Locked flag RS0301

Roland


-Original Message-
From: IBM Mainframe Discussion List 
[mailto:[EMAIL PROTECTED] On Behalf Of Andy White
Sent: Monday, March 20, 2006 9:39 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Enhanced Catalog Sharing


Does anyone have enhanced catalog sharing turned on their 
systems. On our 
lab today we have done this in the coupling facility was wondering what 
the feed back has been,  problems if any, user experiences.

--
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: List contents of DFSMSdss-produced dump?

2006-03-20 Thread Greg Shirey
In this case, it's a PARM to program ADRDSSU; i.e.
EXEC PGM=ADRDSSU,PARM='TYPRUN=NORUN' 

HTH,
Greg Shirey
Ben E. Keith Company

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED]
Behalf Of Paul Gilmartin
Sent: Monday, March 20, 2006 4:25 PM

In a recent note, Imbriale, Donald (Exchange) said:

 Date: Mon, 20 Mar 2006 17:14:24 -0500
 
 Run the RESTORE with TYPRUN=NORUN on the EXEC in JCL.
 
???

The JCL RM lists TYPRUN as a parameter of the JOB statement,
but not of the EXEC statement.

--
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: SSL Certificate Signing

2006-03-20 Thread Richard Peurifoy
Ward, Mike S wrote:

 I made sure this wasn't the case. You can hex edit the file in ispf and

 look for and delete them if need be. My ftp wasn't appending CRLF's to

 the file.

 The file is an 84 byte record variable length blocked 27998. I have

 opened up and ETR with IBM to see if RACF is having some kind of issue.


Are you sure it is a valid CSR?

It should starrt with

-BEGIN CERTIFICATE REQUEST-

and end with

-END CERTIFICATE REQUEST-

I have had people send me exported certs, or even their private key
rather than a CSR.


Another possibilty, I have had problems with certificates that had
an  (ampersand) in their name. Initially I could not add a local
CA cert with the  in the name.

If I remember correctly, this was because generics were enabled on
the class. I corrected that and was able to add the cert and thought
everything was ok, but I still seem to have problems recognizing
certs signed with this cert.

When I get a chance I am going to try and track this down.
In the mean time I created my own CA cert to sign certs for
TLS FTP's.

I have has no problem signing valid certs with 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: List contents of DFSMSdss-produced dump?

2006-03-20 Thread Paul Gilmartin
In a recent note, Ray Mullins said:

 Date: Mon, 20 Mar 2006 14:24:30 -0800
 
 First, run with PARM='TYPRUN=NORUN', so you won't actually copy anything off
 the tape.
 
Got it.  Thanks.

 Then use INCLUDE((**)).  ADRDSSU will show you all of the data sets
 dumped/copied onto the tape.
 
 Then, once you figure out what's there, and what to rename to (usually just
 changing the HLQ is sufficient to get the data on disk, then rename
 afterwards), then take out the PARM.
 
And I have three identical HLQs to play with on the data sets.

I see some additional detail on the VSAM CLUSTER contained:
CATALOG; COMPONENT; COMPONENT.  Will RESTORE unwind the
CATALOG information correctly?

Do I need to specify a volume to restore to, or can I let
SMS choose the volume(s)?

Thanks again,
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


Re: List contents of DFSMSdss-produced dump?

2006-03-20 Thread Ted MacNEIL
Do I need to specify a volume to restore to, or can I let
SMS choose the volume(s)?

Both, either.
If you have the proper authority, there are DFDSS parms to do whichever.

I forget the exact PARMS after being an FDR user for 14 of the last 15 years, 
and not being directly involved with either for the last 8, or so.

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


User catalog space

2006-03-20 Thread Strudwick, Martin
Group,

We have recently been getting message IEC361I at IPL time indicating 
that we are running out of space on one of our user catalogs.  I would like to 
move one or more of the aliases over to a newly defined catalog and reclaim the 
space in the original.  Can someone explain this process or direct me to a 
description of this process.

Thanks,

Martin Strudwick

NOTICE:  The information contained in this electronic mail transmission is 
intended by the sender for the sole use of the named individual or entity to 
which it is directed and may contain information that is privileged or 
otherwise confidential.  Please do not copy it or use it for any purposes, or 
disclose its contents to any other person.  To do so could violate state and 
Federal privacy laws.  If you have received this electronic mail transmission 
in error, please delete it from your system without copying or forwarding it, 
and notify the sender of the error by reply email or by telephone, so that the 
sender's address records can be corrected.  Thank you for your cooperation.

--
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: List contents of DFSMSdss-produced dump?

2006-03-20 Thread Ray Mullins
VSAM.  Ah!  *turns and runs away*

You'll need a RECAT to force cataloging of all the renamed components in the
right catalog.  (That's why RENUNC(*) is recommended.)  

As far as volumes...it's been so long since I've done a restore of a VSAM
data set, and that was not in an SMS environment - so hardcoding of volumes
was required (OUTDY(volser,unit)).  SMS might help here, but I'll have to
defer to others.

Later,
Ray

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Paul Gilmartin
 Sent: Monday March 20 2006 14:40
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: List contents of DFSMSdss-produced dump?
 
 In a recent note, Ray Mullins said:
 
  Date: Mon, 20 Mar 2006 14:24:30 -0800
  
  First, run with PARM='TYPRUN=NORUN', so you won't actually copy 
  anything off the tape.
  
 Got it.  Thanks.
 
  Then use INCLUDE((**)).  ADRDSSU will show you all of the data sets 
  dumped/copied onto the tape.
  
  Then, once you figure out what's there, and what to rename 
 to (usually 
  just changing the HLQ is sufficient to get the data on disk, then 
  rename afterwards), then take out the PARM.
  
 And I have three identical HLQs to play with on the data sets.
 
 I see some additional detail on the VSAM CLUSTER contained:
 CATALOG; COMPONENT; COMPONENT.  Will RESTORE unwind the 
 CATALOG information correctly?
 
 Do I need to specify a volume to restore to, or can I let SMS 
 choose the volume(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: User catalog space

2006-03-20 Thread Imbriale, Donald (Exchange)
Check out the Managing Catalogs manual on the DFSMS bookshelf.  It's all
goodness and explains what you need to do.

Don Imbriale

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf
Of Strudwick, Martin
Sent: Monday, March 20, 2006 5:48 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: User catalog space

Group,

   We have recently been getting message IEC361I at IPL time
indicating that
we are running out of space on one of our user catalogs.  I would like
to move one
or more of the aliases over to a newly defined catalog and reclaim the
space in the
original.  Can someone explain this process or direct me to a
description of this
process.

Thanks,

Martin Strudwick



***
Bear Stearns is not responsible for any recommendation, solicitation, 
offer or agreement or any information about any transaction, customer 
account or account activity contained in this communication.
***

--
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: User catalog space

2006-03-20 Thread Larry Crilley
The first issue is what value do you have your NOTIFYEXTENT set at?  You can
use the 'F CATALOG,REPORT' command to see your 'NOTIFY EXTENT' value.  You
may then want to do a LISTCAT on your catalog in question to see exactly how
many extents are allocated, is there space on the volume for more extents,
etc.  I would also look at things like the HURBA, and FREESPACE to see if
you really need to move entries to another catalog or perhaps you just need
to reorganize the catalog.

Assuming you need to move entries, then you are basically talking about a
REPRO MERGECAT to move your records to the new catalog.  You then would
probably want to perform a REORG against the original SOURCE catalog.

All the normal caveats when performing catalog maintenance apply: backups of
each catalog, perhaps volume backups, consider LOCKing the catalog. Keep in
mind that IDCAMS REPRO MERGECAT requires all datasets be closed.  Should you
want to perform the REPRO MERGECAT function and allow the datasets to remain
OPEN, we (Dino Software) are currently looking for beta sites for our new
TERADON product.  TERADON allows the associated datasets to remain OPEN
while performing the REPRO MERGECAT. 

You are welcome to call me offline should you want to get into more details
for the steps involved in the IDCAMS REPRO MERGECAT process.  We can also
talk about an easy way to get your catalog reorganized by using our T-REX
tool.


Larry Crilley
Dino Software Corp.
http://www.dino-software.com/
412-734-2853.
 
TERADON - The World's First Online Repro Mergecat

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Strudwick, Martin
Sent: Monday, March 20, 2006 5:48 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: User catalog space

Group,

We have recently been getting message IEC361I at IPL time indicating
that we are running out of space on one of our user catalogs.  I would like
to move one or more of the aliases over to a newly defined catalog and
reclaim the space in the original.  Can someone explain this process or
direct me to a description of this process.

Thanks,

Martin Strudwick

NOTICE:  The information contained in this electronic mail transmission is
intended by the sender for the sole use of the named individual or entity to
which it is directed and may contain information that is privileged or
otherwise confidential.  Please do not copy it or use it for any purposes,
or disclose its contents to any other person.  To do so could violate state
and Federal privacy laws.  If you have received this electronic mail
transmission in error, please delete it from your system without copying or
forwarding it, and notify the sender of the error by reply email or by
telephone, so that the sender's address records can be corrected.  Thank you
for your cooperation.

--
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: JES2 $TA persist across warm start

2006-03-20 Thread Charles Mills
Not in my experience. 

I use them as a minimal job scheduler on my development system. After
several attempts at remembering or noting what had to be entered after an
IPL, I now have them in a job imaginatively called AFTERIPL that I run after
an IPL.

Charles



-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Rob Wunderlich
Sent: Monday, March 20, 2006 11:18 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: JES2 $TA persist across warm start


Do JES2 $TA commands persist across a JES2 warm start?

--
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: List contents of DFSMSdss-produced dump?

2006-03-20 Thread Paul Gilmartin
In a recent note, Ray Mullins said:

 Date: Mon, 20 Mar 2006 14:59:12 -0800
 
 VSAM.  Ah!  *turns and runs away*
 
It wouldn't need to be bad if the designers did it right.

 You'll need a RECAT to force cataloging of all the renamed components in the
 right catalog.  (That's why RENUNC(*) is recommended.)
 
 As far as volumes...it's been so long since I've done a restore of a VSAM
 data set, and that was not in an SMS environment - so hardcoding of volumes
 was required (OUTDY(volser,unit)).  SMS might help here, but I'll have to
 defer to others.
 
I took all the defaults; Did RENAME (which feels safer than RENAMEU),
supplied no VOLSER information; supplied CATALOG, not RECAT; in short
leapt without looking except to see there was nothing in the prefix.

Apparently SMS did its thing.  The data sets were restored,
renamed, and catalogued.  ISPF panels show the restored CSI
contents OK.

Now I'm faced with the tedious task of updating all the DDDEFs.
The book will tell me how much help SMP/E will give me here.

Thanks again,
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


Re: Data conversion from 3380 to 3390 - H E L P

2006-03-20 Thread willie bunter
Thanks Jack for the suggestion.  Too bad the environment doesn't have HSM.  
Your idea sounds like a great idea.  Out of curiosity what would happend if the 
files were to be recalled which volume would it be recalled to?  Would I need 
to keep the old volsers in order for the recall to work?

Jack Kelly [EMAIL PROTECTED] wrote:  if you have hsm up, an option is to 
migrate/recall and let hsm reblock (or 
just migrate). dss will also reblock src files so you could selectivly dss 
copy.

Jack Kelly
LA Systems @ US Courts
x 202-502-2390

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




-
 Yahoo! Mail
 Use Photomail to share photos without annoying attachments.

--
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: File Status = 46

2006-03-20 Thread Ed Gould

On Mar 20, 2006, at 4:08 PM, David Speake wrote:

I am vague on this but I believe that only CLOSE (if opened system  
will close
on ABEND - last decade or two) will write an EOF on DASD, SMS or no  
SMS.


Dave,

I am quite sure that it is an SMS option. I can't find the IT manual  
at the moment. We had a few jobs (in my past life) that got garbage  
when they tried to read a file. It didn't get an i/o error as the  
data on that specific track was left over from a previous job. The  
Godzilla member in parmlib option was quite clear about writing an  
EOF marker on all sequential output datasets.


Now they could have deleted the option, I hope not as it was an  
invaluable option, IMO.


Maybe Mark Thorem could speak up and tell us if that option is still  
available and how it works.


Ed



SMS checks bits in the Format1 DSCB on OPEN INPUT and does not  
attempt a

READ. Just gives nice friendly EOF on first READ attempt.

Without SMS - don't even think about it. Worst possible case is if the
first track(s) of the extent contain data left over from a previous
run of the program that supplies your input. Garbage/error reports to
customers instead of nice clean ABEND.

--
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: List contents of DFSMSdss-produced dump?

2006-03-20 Thread Ed Gould

On Mar 20, 2006, at 4:24 PM, Paul Gilmartin wrote:


In a recent note, Imbriale, Donald (Exchange) said:


Date: Mon, 20 Mar 2006 17:14:24 -0500

Run the RESTORE with TYPRUN=NORUN on the EXEC in JCL.


???

The JCL RM lists TYPRUN as a parameter of the JOB statement,
but not of the EXEC statement.

Thanks,
gil


Gil,

It is on the exec statement of DFDSS.

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: User catalog space

2006-03-20 Thread Ed Gould

On Mar 20, 2006, at 4:48 PM, Strudwick, Martin wrote:


Group,

	We have recently been getting message IEC361I at IPL time  
indicating that we are running out of space on one of our user  
catalogs.  I would like to move one or more of the aliases over to  
a newly defined catalog and reclaim the space in the original.  Can  
someone explain this process or direct me to a description of this  
process.


Thanks,

Martin Strudwick


Martin,

The DFSMS managing catalogs book has a reasonable write up on how to  
do it.


Ed



NOTICE:  The information contained in this electronic mail  
transmission is intended by the sender for the sole use of the  
named individual or entity to which it is directed and may contain  
information that is privileged or otherwise confidential.  Please  
do not copy it or use it for any purposes, or disclose its contents  
to any other person.  To do so could violate state and Federal  
privacy laws.  If you have received this electronic mail  
transmission in error, please delete it from your system without  
copying or forwarding it, and notify the sender of the error by  
reply email or by telephone, so that the sender's address records  
can be corrected.  Thank you for your cooperation.


--
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 conversion from 3380 to 3390 - H E L P

2006-03-20 Thread Ed Gould

On Mar 20, 2006, at 6:38 PM, willie bunter wrote:

Thanks Jack for the suggestion.  Too bad the environment doesn't  
have HSM.  Your idea sounds like a great idea.  Out of curiosity  
what would happend if the files were to be recalled which volume  
would it be recalled to?  Would I need to keep the old volsers in  
order for the recall to work?



If you have DFDSS there is an option to reblock the datasets that are  
copied and its reasonably fast. I could be wrong in this but the FDR  
people didn't have the option.


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


The Replacements ???

2006-03-20 Thread Gary Green
Interesting article.  If it's already been posted, I'm sorry...

http://www.treknature.com/gallery/South_America/Brazil/photo13127.htm

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


SMP/E rename data sets (was: List contents ... )

2006-03-20 Thread Paul Gilmartin
In a recent note, Paul Gilmartin said:

 Date: Mon, 20 Mar 2006 16:37:38 -0700
 
 Apparently SMS did its thing.  The data sets were restored,
 renamed, and catalogued.  ISPF panels show the restored CSI
 contents OK.
 
 Now I'm faced with the tedious task of updating all the DDDEFs.
 The book will tell me how much help SMP/E will give me here.
 
I must be missing something here.  SMP/E has a nice ZONERENAME
command, which I don't need because I'm making a fresh CSI,
but I see nothing to systematically change the DATASETs in
the DDDEFs.

I did a LIST DDDEF in each zone, and an awk script (and some
manual processing) to build UCLIN from its output.

There must be a better way.  Have I overlooked a command
to generate UCLIN from the contents of an existing CSI?
Perhaps even with systematic renames?

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


Re: The Replacements ???

2006-03-20 Thread Gary Green
Sorry, sorry, sorry

The correct URL is:
http://www.ccnmag.com/news.php?id=4123

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Gary Green
Sent: Monday, March 20, 2006 8:18 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: The Replacements ???

Interesting article.  If it's already been posted, I'm sorry...

http://www.treknature.com/gallery/South_America/Brazil/photo13127.htm

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


-- 
No virus found in this incoming message.
Checked by AVG Free Edition.
Version: 7.1.385 / Virus Database: 268.2.3/281 - Release Date: 3/14/2006

--
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: SMP/E rename data sets (was: List contents ... )

2006-03-20 Thread Shane Ginnane
In a recent note, Paul Gilmartin said:
 
 I must be missing something here.  SMP/E has a nice ZONERENAME
 command, which I don't need because I'm making a fresh CSI,
 but I see nothing to systematically change the DATASETs in
 the DDDEFs.

 I did a LIST DDDEF in each zone, and an awk script (and some
 manual processing) to build UCLIN from its output.

 There must be a better way.  Have I overlooked a command
 to generate UCLIN from the contents of an existing CSI?
 Perhaps even with systematic renames?

Quote:
The ZONEEDIT command can be used instead of multiple UCL statements to
make mass changes in selected SMP/E entries in the same zone.

Just the puppy for things like this.
If you *really* need all the UCLIN for DDDEFs, have a look at UNLOAD whilst
you are in the manual.

Shane ...

--
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 conversion from 3380 to 3390 - H E L P

2006-03-20 Thread Ron and Jenny Hawkins
Willie,

It's been a long, long time since I did this, but there are a few extra
weapons in the arsenal nowadays.

There is not much that is going to actually break when you go from 3380 to
3390. VSAM will look after itself and flat files will have wasted space. The
main things that will break are DA files.

First thing would be to think about your default device geometry in SMS.
Your allocation will be influenced by this. I would suggest leaving it as
3380 until your conversion is complete, and then change to 3390.

DCOLLECT is your friend. SMF records are your second best friend.

You can use DCOLLECT to audit the attributes of your files. You can find and
DA files here and check if they need any special attention. You can also use
this DCOLLECT to identify your largest files. Just focusing on the largest
files that make up 80% of allocated space will get the most gain for the
least effort.

Once you have found the largest files in DCOLLECT, use the Type 14, 15, and
6n records to find the job that allocates them. Replace the BLKSIZE parm
with the DSORG parm and they will be created with SDB. The small datasets
can be an exercise for a later time.

Ron

 
 On Sat, 18 Mar 2006 04:56:12 -0800, willie bunter [EMAIL PROTECTED]
 wrote:
 
 Hi,
 
   I am seeking help regarding the conversion from 3380 to 3390.  I
 performed this in 1992. I scanned the archives but there was a negligible
 amount of information.  Can anybody please help me?  Any advice will be
 greatfully appreciated.

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


  1   2   >