Re: Modify command - lower case command text possible or not?

2005-12-08 Thread Hunkeler Peter (KRDO 4)
>That appears to be an artifact of SDSF. I noticed that ...

It is not only an artifact of SDSF, it is an artifact of many elder
ISPF applications. The default atttibute for input fields had CAPS(ON)
as default, so everything entered there would be translated to upper
case by ISPF's dialog manager routine. So someone needed to change
the panel or invent a new one to allow lower case letters to be
entered. SDSF's extended command line is one example, ISPF's option 6
"Commands" is another one.


Peter Hunkeler

Credit Suisse - Information Technology

--
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: 'ALLOCATE' a data set in my TSO/E session

2005-12-08 Thread Hunkeler Peter (KRDO 4)
>As for "never, ever, no way, should anybody never, ever not 
>use a DISP even if they want the default of NEW,DELETE", that 
>is also not realistic since it is done routinely when allocating 
>temporary work files like SORTWK and SYSUT1, etc. type files.  
>It clearly doesn't make sense to code a disposition for a data 
>set that allows the DSNAME to default. 

I'm with John here. Do code the DISP parameter. I especially
recommend this to newcomers. 

The temporary work file cases you mention are surely candidates 
for exception but aren't they often (mostly?) coded within 
PROCs? And obsolete in many cases anyway. 


And since this has not yet been explicitly mentioned: Johnny, 
be aware that z/OS (MVS) does not support that two or more tasks
are simultaneously writing to a single sequential data set. This
is why you need to code DISP=OLD or MOD if you want to write to
a sequential data set. There are exceptions and "data set 
organisations" that work differently (e.g. data bases).

Peter Hunkeler

Credit Suisse - Information Technology

--
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: 'ALLOCATE' a data set in my TSO/E session

2005-12-08 Thread Hunkeler Peter (KRDO 4)
>I think what I should have said is the following:
>
>  If you do not code DISP you get the following conditions
>   DISP=(disp1,disp2,disp3)
>  If disp1 is not coded it will default to NEW
>  If disp2 is not coded it will default to DELETE for NEW or 
> KEEP for OLD
>  If disp3 is not coded it will be DELETE for NEW or Keep for OLD 

Almost. disp3 defaults to what was specified or implied as disp2, 
except when PASS was specified as disp2. Then disp3 will default
to DELETE for NEW and KEEP for OLD.


Peter Hunkeler

Credit Suisse - Information Technology

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


Re: Mainframe to windows and windows to mainframe

2005-12-08 Thread Marian Gasparovic
Thiru,
search archives. It was discussed here this week or a week before
M.

On 12/9/05, thirumurugan <[EMAIL PROTECTED]> wrote:
>
> Hi
>can any one knidly suggest me how do i submit jobs
> from windows to mainframe and get the SYSOUT back into
> windows.
>that is for example i have a jcl in the notepad for
> creating a PS dataset.. now i want it to be submited
> or send to mainframe to execute and get the SYSOUT log
> back into my windows machine.
>
> - thiru
>
> __
> Do You Yahoo!?
> Tired of spam?  Yahoo! Mail has the best spam protection around
> http://mail.yahoo.com
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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


Re: SOAP for CICS

2005-12-08 Thread Bill Seubert
On Thu, 8 Dec 2005 07:30:46 -0600, Peter Ten Eyck
<[EMAIL PROTECTED]> wrote:

>I was thinking more along the lines of securing what programs, tran ids or
>data sets can be run or accessed over this connection.

I believe that in CICS V2, you must use HTTP basic authentication to pass a
userid to CICS for authorization to resources.  In CICS TS V3, you can use
the WS-Security feature to provide more robust authentication for web
services transactions.

There is some info on securing SOAP for CICS in the "Revealed! Architecting
e-Business Access to CICS" redbook
(http://www.redbooks.ibm.com/redbooks/pdfs/sg245466.pdf), in section 4.7.

--
Bill Seubert
zSeries Software I/T Architect
IBMC Corporation
[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


Mainframe to windows and windows to mainframe

2005-12-08 Thread thirumurugan
Hi
   can any one knidly suggest me how do i submit jobs
from windows to mainframe and get the SYSOUT back into
windows.
   that is for example i have a jcl in the notepad for
creating a PS dataset.. now i want it to be submited
or send to mainframe to execute and get the SYSOUT log
back into my windows machine.

- thiru 

__
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around 
http://mail.yahoo.com 

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


Re: Error - Path H: cannot be found. Make sure drive path is correct.

2005-12-08 Thread John S. Giltner, Jr.

Jerry Ragland wrote:

Hi all,

I have my CICS region load modules installed in a volume which resides in
emulated OS/2 H drive. The CICS regions were all working fine, but now I
faced a problem when I was doing an IPL, during IPL it says -




<--- Begin Snip --->
<--- End   Snip --->



Then I went into the OS/2 system menu and it show me the drives.
H: drive appears, but when I click on it, I get an error message:

"Path H: cannot be found. Make sure drive path is correct."

What I have to do to rectify this problem ?
Please help in this problem..

Thanks in Advance,
-Jerry



Do you know where you H drive was?  Could you be missing a physical 
drive or could a partitiion have been deleted or added by mistake?


You may want to fdisk and make sure all of your hard drives are present 
and that they are still partitioned the way they should be.


--
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: 'ALLOCATE' a data set in my TSO/E session

2005-12-08 Thread Chris Mason
I'm afraid I haven't been following this thread in detail but I see the
discussion has turned to what the DISP operand of the DD statement does.

In case it might be of interest, I'll pass on a "trick" I was told many
years ago which I found very helpful with the sort of test or - as it seems
to be described these days - "sandbox" systems I used to use for research
and education. In other words, as a "trick" it may not meet the strict
requirements of production systems.

What follows is how the technique is described in some lecture notes I have
hung onto. Note that, at the time I wrote these notes, I believe this
"trick" was a "little-known capability". Maybe it's "old hat" today. Also
I've a strong feeling this technique will be torn apart by the gurus here
assembled :-) Talking of gurus, perhaps to spare any blushes, it's as well
I've forgotten the name of the gentleman who passed on this "little-known
capability" to me but I do remember he was on assignment at my education
centre from the Washington Systems Center. Oh - and I did use this technique
wherever I may have needed dump or trace data sets in many typically started
task procedures for those many years over many releases, possibly versions,
of the underlying software.

Having copied the text, I note it doesn't explicitly make the point I wanted
to mention here which is that DISP=MOD doesn't care whether or not the
referenced data set exists already. Thus, with the aid of DISP=MOD, you can
make - expletive deleted - sure that it doesn't exist - and doesn't fail
your started task procedure.

Dump Data Set Suggestion


It may be convenient, particularly in a test environment, to be able to
start VTAM under MVS in such a way that the existence or otherwise of the
NCP dump data sets can be tolerated either way when the VTAM, NET, procedure
starts.

This is possible using a little-known capability of the DD-statement DISP
operand first suboperand MOD value.
In addition it must be possible to be able to start the VTAM, NET, procedure
as a multiple-step job.

Starting VTAM as a multiple step job is possible if the program properties
table, PPT, entry for VTAM does
NOT have the system task attribute. The IBM-supplied PPT entry for VTAM in
module/CSECT IEFSDPPT in
SYS1.LINKLIB has the system task attribute. This can be re-specified using
the SCHEDxx member of SYS1.PARMLIB.
The entry for VTAM would then have the form:

 --
 |  PPT PGMNAME(ISTINM01) |
 |  KEY(06)   |
 |  NOCANCEL  |
 |  NOPASS|
 |  NOPREF|
 |  NOSWAP|
 --

Note: The system task attribute, defined by the keyword SYST, is not
present.

A VTAM, NET, procedure in a system with the above modification may now run
with multiple steps. An example of such a procedure which ensures that the
NCP dump data set is created freshly when the procedure is started and is
not sensitive to whether the data set exists or not, is as follows:

 -
 | //NET PROC|
 | //*   |
 | //IEFBR14 EXEC PGM=IEFBR14|
 | //NCPDUMP DD DSN=USER.NCPDUMP,DISP=(MOD,DELETE),  |
 | // VOL=REF=SYS1.PARMLIB,SPACE=(TRK,1) |
 | //*   |
 | //NET EXEC PGM=ISTINM01,TIME=1440,REGION=2048K|
 | //STEPLIB DD DSN=SYS1.SSPLIB,DISP=SHR |
 | //VTAMLST DD DSN=USER.VTAMLST,DISP=SHR|
 | //VTAMLIB DD DSN=USER.VTAMLIB,DISP=SHR|
 | //DD DSN=SYS1.VTAMLIB,DISP=SHR|
 | //NCPLOAD DD DSN=USER.NCPLOAD,DISP=SHR|
 | //NCPDUMP DD DSN=USER.NCPDUMP,DISP=(NEW,KEEP),|
 | // VOL=REF=SYS1.PARMLIB,SPACE=(TRK,(1,50),RLSE),  |
 | // DCB=(RECFM=F,LRECL=512,BLKSIZE=512)|
 -

The SPACE operand of the NCPDUMP DD-statement is specified so that only one
track is allocated if no dump is taken and, if a dump is taken and VTAM is
terminated normally, the data set will contain no unused space.

Similar DD-statements may be placed in both job steps if separate MOSS and
CSP dump data sets are required.

Note: Removal of the system task attribute also implies that job step timing
will be used, so TIME=1440 has been added to the EXEC statement for the VTAM
program, ISTINM01.

Chris Mason

- Original Message - 
From: "Gerhard Adam" <[EMAIL PROTECTED]>
Newsgroups: bit.listserv.ibm-main
To: 
Sent: Thursday, 08 December, 2005 11:47 PM
Subject: Re: 'ALLOCATE' a data set in my TSO/E session


> >So, if you do not code a DISP on a DD statement then you will default
> to NEW which creates an EXCL enq on the data set if >it is in use by
> another function.  Once the function that allocated the file 

Re: How to quickly shut down system

2005-12-08 Thread ibm-main
From: "Hal Merritt"

> I was once advised to cancel the IRLM address space. DB2 tends to
> abruptly drop in its tracks, but knows what to do to get back going
> again.

Never had it fail. Doesn't win popularity points with the DBAs though.
Likewise, we have our CICS regions in STCJOBS; C CICS* works wonders, but is
frowned upon.

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: Mainframe to Mainframe FTP

2005-12-08 Thread Paul Gilmartin
In a recent note, "Shmuel Metz (Seymour J.)" said:

> Date: Thu, 8 Dec 2005 11:29:52 -0500
> 
> >Some misconfigured 'black hole'
> >routers will silently drop packets or otherwise garble the data.
> 
> Wouldn't TCP catch such?
> 
Most TCPs.  Not necessarily IBM's.  To be fair, they fix such
bugs as they're reported, if they can reproduce them.  It's
getting steadily better, but the bitter memories fade slowly.

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


Establishing a Cascaded Director Fabric

2005-12-08 Thread Michael Pratt
Hi,

I was wondering if anyone has any experience in configuring a cascaded
ficon fabric over a long distance network (supported by USD-x channel
extenders).

We are in the process of configuring (or trying to configure) the director
(6140) at the remote site, but the link is not fully established at this
time.  My question is primarily around configuring zones and zonesets - at
this stage the two switches appear (obviously) in completely separate
zones.  Which is fine.  But all of the config guides show multiple
switches and zones available via a single management interface.  Again,
that is fine.  But, is there anything we need to do (or anything we can
do) on the director side PRIOR to finalising the connections between the
switch that will enable us to see both switches (and therefore zone
configurations) from the one management interface when the link is up?
Or, will the two directors 'magically' appear to the one management
interfaces as soon as we can establish the connection?

I guess my concern is that when the link is finalised, and therefore the
connection between the two directors established, I will still be unable
to see both directors and I will therefore still be unable to establish my
fabric...all of the documentation I am reading (RedBook, McData Docco)
shows both of the directors appearing and I am a little unsure if there
are extra actions that need to be completed before this can be achieved.

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: Commands in JCL

2005-12-08 Thread Shmuel Metz (Seymour J.)
In <[EMAIL PROTECTED]>, on 12/07/2005
   at 02:13 PM, Steve Comstock <[EMAIL PROTECTED]> said:

>Is there a way to issue an operator command such as
>Start in a JCL COMMAND statement without causing the
>system to ask the console operator to allow it or not?

At your shop or in general? There are several ways to issue commands,
and each has its own security requirements. My guess is that you are
more likely to get authorization to use a facility like CONSOLE than
to get authorization to do it from JCL.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see  
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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


Re: AFP-l FAQ

2005-12-08 Thread Shmuel Metz (Seymour J.)
In <[EMAIL PROTECTED]>, on 12/07/2005
   at 10:28 AM, Ed Finnell <[EMAIL PROTECTED]> said:

>Don't know what the circumstances are that made afp-l use topica, but
>there is a good bit of developer involvement.

I'm sure there are, just as there are some good resources in yahoo
groups. But any time you use such spam-friendly organizations to host
your site you are at risk of blocking. You can ask the developers to
provide access elsewhere, or ask your provider to whitelist them.
There's no guarantee that either the developers or your provider will
agree.

Of all the sins committed by the spammers, destroying the viability of
the open Internet was the worst.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see  
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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


Re: Mainframe to Mainframe FTP

2005-12-08 Thread Shmuel Metz (Seymour J.)
In <[EMAIL PROTECTED]>, on
12/07/2005
   at 03:16 PM, Hal Merritt <[EMAIL PROTECTED]> said:

>This almost sounds like a network issue.

I'd guess that it's using stream mode instead of record mode.

>Some misconfigured 'black hole'
>routers will silently drop packets or otherwise garble the data.

Wouldn't TCP catch such?
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see  
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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


Re: 'ALLOCATE' a data set in my TSO/E session

2005-12-08 Thread Shmuel Metz (Seymour J.)
In <[EMAIL PROTECTED]>, on
12/08/2005
   at 03:14 PM, Luo Johnny <[EMAIL PROTECTED]> said:

>1,In TSO,I use 'listalc status' to find that SYS1.UADS has been
>   allocated to DDNAME 'SYSUADS'. For a test, I issue
>   'allocate dsn(center.uads) dd(sysuads)' and get the meesage that
>   filename is in use. I resort to manuals and know that to do this
>   I must use 'REUSE' operand.
>   However,I submit a job via JCL which also uses DDNAME 'SYSUADS'
>   and there is no problem.

Put the same DD statement in your logon JCL and there will also not be
a problem. The problem is doing a TSO ALLOCATE with a ddname that is
already in use. Chage the batch job to do an ALLOCATE in the  same
context and you'll get the same error message.

>2,I have a simple cobol program who just opens  a input file and
>   closes it(select infile assign to infile). First I issue
>   'allocate dsn(md0006.input.qsam) dd(infile)' and succeed. Then I
>   can use TSO command 'call' to execute the program successfully.
>   However,when I execute the program via JCL  without coding infile
>   DDNAME, it fails.

Why would you expect otherwise?

>So I want to know the exact reason.

Your program referred to a ddname that you hadn't allocated.

>My personal guess is that a job submitted by JCL is not executed in
>my TSO address space.

That's the whole point of submitting a job; it's an independent unit
of work. If you want to call a program in your address space, use CALL
or something similar.

-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see  
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

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


Re: 'ALLOCATE' a data set in my TSO/E session

2005-12-08 Thread Gerhard Adam
>So, if you do not code a DISP on a DD statement then you will default
to NEW which creates an EXCL enq on the data set if >it is in use by
another function.  Once the function that allocated the file as default
NEW ends, it sets the DELETE bit 
>on the file.  Then when all the other functions that have the file,
free it, it will be deleted.  Which could be days,
>weeks, or months later?

I'm sorry but that simply isn't true.  There is no "delete" bit on a
file.  The way it works is quite simple actually.  When the disposition
is not coded it results in a default of DISP=NEW.  The second and third
parameters will default to the "state the data set was in when the job
started".  In other words, if the data set existed at the beginning of
the job it will continue to exist at the end (unless the DISP is coded
to explicitly instruct ALLOCATION to do otherwise).  Similarly if the
data set didn't exist before the job started it will be deleted at the
end (unless explicitly instructed otherwise).

There is no default condition that would allow an EXISTING data set to
be deleted.  Once a job ends, all disposition conditions are resolved.
The previous examples of an IMS library could not have occurred without
some other factors at play since it is impossible to allocate an
existing data set with a disposition of NEW and end up with it being
deleted.  

Disposition processing requires explicit coding before any action is
taken.

As for "never, ever, no way, should anybody never, ever not use a DISP
even if they want the default of NEW,DELETE", that is also not realistic
since it is done routinely when allocating temporary work files like
SORTWK and SYSUT1, etc. type files.  It clearly doesn't make sense to
code a disposition for a data set that allows the DSNAME to default.

Regards

Adam

--
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 Compiler Limit/Bug?

2005-12-08 Thread Schiradin,Roland HG-Dir itb-db/dc
We had such a problem months ago but got 
CCN1107: Program too complex in function rg_sys.

z/OS R4. 

Roland

-Original Message-
From: IBM Mainframe Discussion List 
[mailto:[EMAIL PROTECTED] On Behalf Of Benjamin White
Sent: Thursday, December 08, 2005 5:40 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: C Compiler Limit/Bug?


I am trying to compile a large C program with large
tables in it.  The compiler return code is zero and
produces no error messages.  The problem is that the
object deck or module does not have the END cards. 
The program would compile when the tables were
smaller.

What are the limits for C program size?  Where are the
limits published?  We use the Z/OS 1.6 C compiler.

If we reach a limit, shouldn't there be an error
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: 64 Bit Application Gotchas

2005-12-08 Thread McKown, John
> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Kittendorf, Craig
> Sent: Thursday, December 08, 2005 2:54 PM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: 64 Bit Application Gotchas
> 
> 
> Hi,
> 
> We have a remote possibility of getting a z/890-104 next year.  We are
> currently z/OS v1.4, CICS/TS 2.3, Enterprize COBOL 3.2 (soon 3.4), IMS
> 8.1, DB/2 7.1.  I noticed we do have some VS COBOL programs that have
> not been compiled lately.  Some assembler and even less C++.
> 
> What kind of things should we look for in applications that 
> might cause
> them to fail?
> 
> Thanks,
>Craig

We are running z/OS 1.4 on a z890 right now. We have OS/VS COBOL 2.4
programs (batch only), VS COBOL II programs (Batch & CICS), Enterprise
COBOL programs (batch & CICS). We are running CICS/TS 1.3. No IMS. No
DB2. Some assembler, no C. We had no problems upgrading from a z800 in
64 bit mode to the z890 in 64 bit mode. We did run into some problems
going from 31 bit mode to 64 bit mode with OEM software (old and needed
upgrading). We had ZERO problems with our in-house applications when
going from 31 bit to 64 bit (ARCHLEVEL 2) on the z800.

--
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: How to quickly shut down system

2005-12-08 Thread Hal Merritt
I was once advised to cancel the IRLM address space. DB2 tends to
abruptly drop in its tracks, but knows what to do to get back going
again. 

Hal 

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of R.S.
Sent: Thursday, December 08, 2005 12:34 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: How to quickly shut down system

...snip
That's why the procedure have to be *SIMPLE*. No checking, no decision, 
no analysis.

However I'm still not sure, what's better - do something like STOP 
DB2,MODE(FORCE) or do nothing.
-- 
Radoslaw Skorupka
Lodz, Poland

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


64 Bit Application Gotchas

2005-12-08 Thread Kittendorf, Craig
Hi,

We have a remote possibility of getting a z/890-104 next year.  We are
currently z/OS v1.4, CICS/TS 2.3, Enterprize COBOL 3.2 (soon 3.4), IMS
8.1, DB/2 7.1.  I noticed we do have some VS COBOL programs that have
not been compiled lately.  Some assembler and even less C++.

What kind of things should we look for in applications that might cause
them to fail?

Thanks,
   Craig

--
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: Modify command - lower case command text possible or not?

2005-12-08 Thread Don Poitras
Chuck Arney wrote:
> 
> A quick test seems to show this is true for Modify commands entered through
> an MCS console.  As John points out, the command string is received by the
> program with the quotes included so your command processor must be ready to
> strip them off.
> 
> However, entering Modify commands through my SDSF under ISPF (z/OS 1.6
> system), the command string is still converted to upper case and the program
> receives the upper case string with quotes included.
> 
> Chuck Arney

In SDSF, use '/+' (without the quotes). This brings up a panel where you
can enter commands in mixed case.

-- 
Don Poitras - zSeries R & D  -  SAS Institute Inc. -  SAS Campus Drive 
mailto:[EMAIL PROTECTED]   (919)531-5637  Fax:677- Cary, 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: Modify command - lower case command text possible or not?

2005-12-08 Thread Chuck Arney
As usual, Mark comes up with the right answer.  But that's a pain to have to
use the extension panel when entering short commands.  Why does one panel
work differently than the other?  Oh well, at least there IS a way to do it.

Thanks for the solution.

Chuck Arney
illustro Systems International, LLC
http://www.illustro.com
Access 3270 data from anywhere with z/XML-Host
Access 3270 apps from the web with z/Web-Host
Access CMS minidisks from OS/390 or VSE with CMSACCess
Voice: 972-296-6166

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
> Behalf Of Mark Zelden
> Sent: Thursday, December 08, 2005 1:57 PM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Re: Modify command - lower case command text possible or not?
> 
> On Thu, 8 Dec 2005 13:47:03 -0600, Chuck Arney <[EMAIL PROTECTED]>
> wrote:
> 
> >A quick test seems to show this is true for Modify commands entered
> through
> >an MCS console.  As John points out, the command string is received by
> the
> >program with the quotes included so your command processor must be ready
> to
> >strip them off.
> >
> >However, entering Modify commands through my SDSF under ISPF (z/OS 1.6
> >system), the command string is still converted to upper case and the
> program
> >receives the upper case string with quotes included.
> >
> 
> Lowercase is supported via SDSF running under ISPF, but you need to
> use the system command extention panel (a slash followed by enter) in
> addition to enclosing the string withing single quotes.
> 
> Regards,
> 
> Mark
> --

--
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: Modify command - lower case command text possible or not?

2005-12-08 Thread McKown, John
> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Chuck Arney
> Sent: Thursday, December 08, 2005 1:47 PM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Re: Modify command - lower case command text possible or not?
> 
> 
> A quick test seems to show this is true for Modify commands 
> entered through
> an MCS console.  As John points out, the command string is 
> received by the
> program with the quotes included so your command processor 
> must be ready to
> strip them off.
> 
> However, entering Modify commands through my SDSF under ISPF (z/OS 1.6
> system), the command string is still converted to upper case 
> and the program
> receives the upper case string with quotes included.
> 
> Chuck Arney

That appears to be an artifact of SDSF. I noticed that if I enter

/f x,'lower case'

I see

F X,'LOWER CASE'

in SYSLOG.

However, if I enter just a slash / and get the "pop up" for entry of the
command, entering "f x,'lower case'" then I see

F X,'lower case'

in SYSLOG.

--
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: Modify command - lower case command text possible or not?

2005-12-08 Thread Mark Zelden
On Thu, 8 Dec 2005 13:47:03 -0600, Chuck Arney <[EMAIL PROTECTED]> wrote:

>A quick test seems to show this is true for Modify commands entered through
>an MCS console.  As John points out, the command string is received by the
>program with the quotes included so your command processor must be ready to
>strip them off.
>
>However, entering Modify commands through my SDSF under ISPF (z/OS 1.6
>system), the command string is still converted to upper case and the
program
>receives the upper case string with quotes included.
>

Lowercase is supported via SDSF running under ISPF, but you need to
use the system command extention panel (a slash followed by enter) in
addition to enclosing the string withing single quotes.

Regards,

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

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


Re: Modify command - lower case command text possible or not?

2005-12-08 Thread Chuck Arney
A quick test seems to show this is true for Modify commands entered through
an MCS console.  As John points out, the command string is received by the
program with the quotes included so your command processor must be ready to
strip them off.

However, entering Modify commands through my SDSF under ISPF (z/OS 1.6
system), the command string is still converted to upper case and the program
receives the upper case string with quotes included.

Chuck Arney
illustro Systems International, LLC
http://www.illustro.com
Access 3270 data from anywhere with z/XML-Host
Access 3270 apps from the web with z/Web-Host
Access CMS minidisks from OS/390 or VSE with CMSACCess
Voice: 972-296-6166

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
> Behalf Of McKown, John
> Sent: Thursday, December 08, 2005 1:39 PM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Re: Modify command - lower case command text possible or not?
> 
> 
> Enclose it in quote marks. Otherwise, as you've noticed, the data is
> uppercased.
> 
> F PROCESS,'lower case'
> 
> would get 'lower case' (including the ' marks)
> 
> F PROCESS,lower case
> 
> would get, as you've seen, LOWER CASE
> 
> I don't think there is a way to get around this. From what I've seen,
> this was designed for the convience of the operator so that they could
> enter:
> 
> s task,dsn
> 
> instead of being forced to enter:
> 
> S TASK,DSN
> 
> Remember all of this was designed when 3277's were the main operator
> console. And the original ones could only display UPPER CASE.
> 

--
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: Modify command - lower case command text possible or not?

2005-12-08 Thread McKown, John
> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Dave McLellan
> Sent: Thursday, December 08, 2005 1:05 PM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Modify command - lower case command text possible or not?
> 
> 
> Hi:  I've searched for a while in the archives and can't find 
> any hits on a
> topic like this, although it's probably been discussed a few 
> times before on
> this list. 
> 
> Using the MODIFY console command, command text appears to 
> come through to
> the applicatinn (EXTRACT, QEDIT) folded to upper case.   I have not
> specifically experimented the our hardware consoles; I'm just 
> using SDSF and
> REXX CONSOLE facility. I am porting unix software which is 
> expecting command
> texts in buffers where case is important. 
> 
> Is there any way to read  MODIFY command text from the 
> console without it
> being folded to upper case?   
> 
> Thanks. 
> 
> Dave McLellan --Consulting Software Engineer - SPEA Engineering
> EMC Corporation

Enclose it in quote marks. Otherwise, as you've noticed, the data is
uppercased.

F PROCESS,'lower case'

would get 'lower case' (including the ' marks)

F PROCESS,lower case

would get, as you've seen, LOWER CASE

I don't think there is a way to get around this. From what I've seen,
this was designed for the convience of the operator so that they could
enter:

s task,dsn

instead of being forced to enter:

S TASK,DSN

Remember all of this was designed when 3277's were the main operator
console. And the original ones could only display UPPER CASE.

--
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: Modify command - lower case command text possible or not?

2005-12-08 Thread Bruce Black

from the System Commands manual,

You can enter operator commands in uppercase or lowercase. Unless enclosed
in apostrophes, lowercase letters are converted to uppercase. Therefore, 
when a lowercase response is required, you must enclose the text in  
apostrophes. Also, when an apostrophe appears in the text of a command and

the text is enclosed in apostrophes, you must enter two apostrophes in the
text. For example, you would enter:  

 SEND 'Your job''s done'


So I imagine that
F taskname,'lower case input'
would work

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

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


Modify command - lower case command text possible or not?

2005-12-08 Thread Dave McLellan
Hi:  I've searched for a while in the archives and can't find any hits on a
topic like this, although it's probably been discussed a few times before on
this list. 

Using the MODIFY console command, command text appears to come through to
the applicatinn (EXTRACT, QEDIT) folded to upper case.   I have not
specifically experimented the our hardware consoles; I'm just using SDSF and
REXX CONSOLE facility. I am porting unix software which is expecting command
texts in buffers where case is important. 

Is there any way to read  MODIFY command text from the console without it
being folded to upper case?   

Thanks. 

Dave McLellan --Consulting Software Engineer - SPEA Engineering
EMC Corporation
228 South St. Mail Stop: 228 LL/AA-24
Hopkinton, MA 01748  USA
+1-508-249-1257 F: +1-508-497-8030  [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: How to quickly shut down system

2005-12-08 Thread R.S.

Hal Merritt wrote:

The more I think about this, the more I think less is better.
 
Given the amount of time to fully understand the situation, find the

procedure (which has never been tested), get a management buy in to pull
the trigger, thoughtfully issue the correct commands in the correct
sequence (watching for and reacting to unexpected results) hmmm just
ran out of time and the lights are out. No flashlight? Gee. Perhaps you
should have taken a few minutes to find one that is working. 


Emergency procedures are located in separate (RED) binder, clearly 
visible on the shelf. These are more available than live vest in an 
aircraft.
Procedures *ARE* tested. Especially such like that (this wasn't, because 
it's under construction). Procedure results (DB2 broken or not) will be 
tested as well.
Regarding to the light: there is "evacuation light", battery operated. 
It lasts for approx. half hour. "Normal" light is UPS-supplied, 
procedure does not mention to switch it off, or even reduce (the effect 
is not worth consumed time). Besides, operators have flashlights 
(torch?). I *know* the situation, when in case of total power outage the 
only light source was mobile phone, even no ligther.




Perhaps it would be better to see to the safety of the personnel and let
the software do what it will.  


People safety is first, it is not debatable. In case of *human* 
emergency, the only procedure is to escape, optionally trying to help 
others. Then call 911 (we have another numbers).




I would wonder if the potential for damage is greater if I were hacking
away on the console when the lights finally went out. 


That's why the procedure have to be *SIMPLE*. No checking, no decision, 
no analysis.


However I'm still not sure, what's better - do something like STOP 
DB2,MODE(FORCE) or do nothing.

--
Radoslaw Skorupka
Lodz, Poland

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


P/390 "Chassis'" available

2005-12-08 Thread Gary Green
I have a couple of P/390 Server 330 chassis' (the chassis NOT the P/390
cards) available for anyone that's willing to stop on over to pick them up.
We're cleaning out the closet and these are going.

They are the 266 MHz version at least 256mb memory and they each include the
sleds for the SCSI drives Raid.  I believe there 6 sleds in each machine;
plus the built-in SCSI drive for the OS.

If you're still running your P/390 in one of these chassis this is a great
way to acquire a couple of "parts" machines; even though they do work!

If interested, please contact me offline.  We're located in the South Jersey
area.  If you wish, we could meet up somewhere for the handoff.

Thanks.

--
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: 'ALLOCATE' a data set in my TSO/E session

2005-12-08 Thread Farley, Peter x23353
Mea culpa to all, I should know better than to click Send without checking
the Fine Manual first.

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] 
Sent: Thursday, December 08, 2005 12:16 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: 'ALLOCATE' a data set in my TSO/E session

Actually if you do not code DISP, according to the JCL Reference manual:

If you omit the DISP parameter, the default is a NEW data set with a 
disposition of DELETE for both normal and abnormal termination   
disposition.  Thus, you can omit the DISP parameter for a data set   
that is created and deleted during a step.   

So the default when not coded at all is DISP=(NEW,DELETE,DELETE)

Don Imbriale

>-Original Message-
>From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf
>Of Farley, Peter x23353
>Sent: Thursday, December 08, 2005 10:32 AM
>To: IBM-MAIN@BAMA.UA.EDU
>Subject: Re: 'ALLOCATE' a data set in my TSO/E session
>
>Lizette, the default DISP for existing datasets is OLD,KEEP, not
OLD,DELETE.
>

_
This message and any attachments are intended only for the use of the addressee 
and
may contain information that is privileged and confidential. If the reader of 
the 
message is not the intended recipient or an authorized representative of the
intended recipient, you are hereby notified that any dissemination of this
communication is strictly prohibited. If you have received this communication in
error, please notify us immediately by e-mail and delete the message and any
attachments from your system.

--
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: Make a volume under SMS control

2005-12-08 Thread Marian Gasparovic
Use CONVERT command from ISMF in front of volume. It will generate a JCL for
you. You can even run it in test mode.

On 12/8/05, Luo Johnny <[EMAIL PROTECTED]> wrote:
>
> I know the proper way is to add the volume to storage group
> when initializing the volume.But I want to know whether I can make
> the volume SMS-managed after initialization.
>
> When I initialize one of my volume,I didn't add it to storage group.
> And later,I wanna to do this.So I delete all the data sets which
> isn't sms-managed on that volume and add it to a storage group.
> However,in ISMF,I see the volume physical status is 'not sms-control'.
>
> I want to know what to do.Reinitialize it?
>
>
>
> --
> Best Regards,
> Johnny Luo
>
> --
> 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: Make a volume under SMS control

2005-12-08 Thread Desi de la Garza
What if you delete unit and re-define as SMS?

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

-Original Message-
From: McKown, John [mailto:[EMAIL PROTECTED] 
Sent: Thursday, December 08, 2005 7:40 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Make a volume under SMS control

> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Luo Johnny
> Sent: Thursday, December 08, 2005 7:34 AM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Make a volume under SMS control
> 
> 
> I know the proper way is to add the volume to storage group
> when initializing the volume.But I want to know whether I can make
> the volume SMS-managed after initialization.
> 
> When I initialize one of my volume,I didn't add it to storage group.
> And later,I wanna to do this.So I delete all the data sets which
> isn't sms-managed on that volume and add it to a storage group.
> However,in ISMF,I see the volume physical status is 'not sms-control'.
> 
> I want to know what to do.Reinitialize it?
> 
> 
> 
> --
> Best Regards,
> Johnny Luo

No. Run PGM=ADRDSSU and use the CONVERTV verb.

Documented at:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2R240/3.4

You can also get "canned" JCL to do this by using ISMF, option 2.1. Put
the volser in the field labelled "Volume Serial Number". Press ENTER.
You should see the volser in the resulting display. In front of the
displayed volser, enter the command CONVERTV and go through the panels.

--
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: Commands in JCL

2005-12-08 Thread Mark Zelden
On Thu, 8 Dec 2005 08:48:26 -0600, Rob Wunderlich
<[EMAIL PROTECTED]> wrote:

>On Wed, 7 Dec 2005 15:18:55 -0700, Steve Comstock
><[EMAIL PROTECTED]> wrote:
>>> $tjobclass(*),command=execute
>>>
>>> Then update JES2PARM. No need to recycle JES or IPL or anything at all
>>>
>>Thanks, John. But some of the other experiments
>>worked without even changing JESPARMS. I'm good
>>to go.
>
>Steve,
>
>I believe the JESPARMS reminder was to ensure your change is remembered
>across a warm start, not to effect the change.
>
>-Rob
>

Good advise (to keep the parms in sync), but WARM start / IPL won't change
it back.  JOBCLASS() parms are only modified by operator command or
JES2 cold start since OS/390 2.4 with an $ACTIVATEd spool.   Also note
that they are MAS in scope since the same time.

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

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


test

2005-12-08 Thread Anthony Bongiorno
test

-
The information contained in this electronic mail message, and any and all
accompanying documents, constitutes confidential information.  If you are
not the intended recipient of this information, any disclosure, copying,
distribution, or the taking of any action in reliance on it is strictly
prohibited.  If you received this information in error, please notify the
sender immediately and destroy this communication.  Messages sent via this
medium may be subject to delays and/or unauthorized alteration.  Neither
The Bank of Tokyo-Mitsubishi, Ltd. nor any of its affiliates shall be held
liable for the contents of 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: 'ALLOCATE' a data set in my TSO/E session

2005-12-08 Thread Chase, John
> -Original Message-
> From: IBM Mainframe Discussion List On Behalf Of Lizette Koehler
> 
> Johnny,
> 
> When allocating any dataset under TSO or BATCH I always 
> ensure the DISP parameter is properly set.
> 
> If you just code a DD statement of
> 
>   //DD1  DD DSN=datasetname
> 
> Then the default DISP is OLD,DELETE. 

The z/OS 1.5 MVS JCL Reference manual disagrees:

"If you omit the DISP parameter, the default is a NEW data set with a
disposition of DELETE for both normal and abnormal termination disposition.
Thus, you can omit the DISP parameter for a data set that is created and
deleted during a step."

-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: Subject: Commands in JCL

2005-12-08 Thread Rundberget, Leif
There is an old Macro called MGCR that we setup in the 70's and it still
works with z/OS 1.4.  Here is the reference to the book from MVS/XA.  It is
a very small program and easy to compile and use.  Let me know if you would
like the source code and the old ENTER MACRO to compile it with.

MORE INFORMATION CAN BE FOUND UNDER THE 'MGCR' MACRO IN:
MVS/XA SPL: SYSTEM MACROS AND FACILITIES VOL. 2 (GC28-1151)

Here is a sample of JCL to run the macro.
//xx JOB ...
//*MAIN CLASS=1
//*
//***   SUBMIT COMMAND  ***
//*
//DRCOMMND EXEC PGM=DRCOMMND,PARM='D T'


Runs on both JES2/3 systems.

Leif Rundberget
Operating Systems Programmer/Analyst III 
State of Colorado 
Department of Personnel & Administration (DPA) 
Division of Information Technologies (DoIT) 
690 Kipling Street,  Room 2060 
Lakewood,  CO  80215-5844 
Phone:  (303) 239-4357 
Fax:  (303) 239-4383 



-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Steve Comstock
Sent: Wednesday, December 07, 2005 4:13 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Commands in JCL

Is there a way to issue an operator command such as
Start in a JCL COMMAND statement without causing the
system to ask the console operator to allow it or not?

I want to issue a series of commands, one to start
SMTP, another to submit an email via IEBGENER and
the internal reader, and another to stop SMTP.

Kind regards,

-Steve Comstock

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


C Compiler Limit/Bug?

2005-12-08 Thread Benjamin White
I am trying to compile a large C program with large
tables in it.  The compiler return code is zero and
produces no error messages.  The problem is that the
object deck or module does not have the END cards. 
The program would compile when the tables were
smaller.

What are the limits for C program size?  Where are the
limits published?  We use the Z/OS 1.6 C compiler.

If we reach a limit, shouldn't there be an error
message?



__
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around 
http://mail.yahoo.com 

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


Website on your mainframe

2005-12-08 Thread Steve Comstock

Well, I've gone ahead and developed a small website
hosted on our zPad. It demonstrates z/OS 1.6 using
the supplied (included-in-the-price) HTTP server,
serving up web pages that include embedded graphics
and multimedia (pdf, quicktime, macromedia) and
that demonstrate sending emails and text messages
from the mainframe.

This is simply to demo it can be done to the
unbelievers. If you would like to have a link to
that demo site, please email me a request off-list.

Since this is z/OS running under Flex-es under Linux
on a Thinkpad, there is not a lot of capacity, so I
am trying to limit access to a few folks at a time.

My intent, of course, is to stimulate training of
how to do this stuff, and so it is not meant for
everyone to just play with. But if you think there
is a need that can be met by demoing this to someone
in your organization, let me know.

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.
http://www.trainersfriend.com
(the above is _not_ the demo site)

--
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: 'ALLOCATE' a data set in my TSO/E session

2005-12-08 Thread Lizette Koehler
Peter,

Okay, I was remembering an incident where a Production IMS Reslib
disappeared because the application programmer coded (in the RESLIB
concatenation) 

//DD DSN=reslib

And nothing else in the DD statement.  When the IMS Control region came down
- it was deleted.

I think what I should have said is the following:

  If you do not code DISP you get the following conditions
DISP=(disp1,disp2,disp3)
If disp1 is not coded it will default to NEW
If disp2 is not coded it will default to DELETE for NEW or KEEP -
OLD
If disp3 is not coded it will be DELETE for NEW or Keep for OLD

So, if you do not code a DISP on a DD statement then you will default to NEW
which creates an EXCL enq on the data set if it is in use by another
function.  Once the function that allocated the file as default NEW ends, it
sets the DELETE bit on the file.  Then when all the other functions that
have the file, free it, it will be deleted.  Which could be days, weeks, or
months later?

So, in the case I was thinking of the data set got the DISP as NEW, DELETE.
This also created an ENQ on the RESLIB and the batch job cancelled.  Later
when the IMS Control Region came down (several days later) the production
RESLIB showed DELETED in the JESLOG.

A valuable lesson to the programmer about proper coding of DISP in JCL
statements.  Later, the application group setup an ISPF function to
eliminate the need to know the JCL for the programmers.

Sorry I got a little confused.

Lizette Koehler

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


Re: 'ALLOCATE' a data set in my TSO/E session

2005-12-08 Thread McKown, John
> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Steve Comstock
> Sent: Thursday, December 08, 2005 10:10 AM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Re: 'ALLOCATE' a data set in my TSO/E session
> 
> 
> Farley, Peter x23353 wrote:
> > Lizette, the default DISP for existing datasets is 
> OLD,KEEP, not OLD,DELETE.
> > 
> 
> Peter, if you do not specify any DISP, the default is NEW,DELETE,
> _whether or not the data set already exists_. That's the way
> allocation works: it does not check first to see if the dataset
> exists (it would eventually find it, if it were cataloged and
> there was an attempt to create a duplicate data set name, of
> course, but that check comes later).
> 
> Kind regards,
> 
> -Steve Comstock
> 

And, for those of us running a "restart" product such as CA-11,
forgetting to use the DISP will result in the restart package DELETING
our dataset. In my opinion, never, ever, no way, should anybody never,
ever not use a DISP even if they want the default of NEW,DELETE.

--
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: 'ALLOCATE' a data set in my TSO/E session

2005-12-08 Thread Steve Comstock

Farley, Peter x23353 wrote:

Lizette, the default DISP for existing datasets is OLD,KEEP, not OLD,DELETE.



Peter, if you do not specify any DISP, the default is NEW,DELETE,
_whether or not the data set already exists_. That's the way
allocation works: it does not check first to see if the dataset
exists (it would eventually find it, if it were cataloged and
there was an attempt to create a duplicate data set name, of
course, but that check comes later).

Kind regards,

-Steve Comstock


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] 
Sent: Thursday, December 08, 2005 10:22 AM

To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: 'ALLOCATE' a data set in my TSO/E session

Johnny,

When allocating any dataset under TSO or BATCH I always ensure the DISP
parameter is properly set.

If you just code a DD statement of

	//DD1  DD DSN=datasetname


Then the default DISP is OLD,DELETE.  That means at job termination the data
set will be deleted.  I will let others on the list address how DFSMS might
change that statement.


So if you are using

	ALLOOCATE DSN(CENTER.UADS) DD(SYSUADS)  


During the time of your TSO session, the CENTER.UADS data set is allocated
with OLD which is an EXCLUSIVE enq and not SHARED.


--
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: 'ALLOCATE' a data set in my TSO/E session

2005-12-08 Thread Imbriale, Donald (Exchange)
Actually if you do not code DISP, according to the JCL Reference manual:

If you omit the DISP parameter, the default is a NEW data set with a 
disposition of DELETE for both normal and abnormal termination   
disposition.  Thus, you can omit the DISP parameter for a data set   
that is created and deleted during a step.   

So the default when not coded at all is DISP=(NEW,DELETE,DELETE)

Don Imbriale

>-Original Message-
>From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf
>Of Farley, Peter x23353
>Sent: Thursday, December 08, 2005 10:32 AM
>To: IBM-MAIN@BAMA.UA.EDU
>Subject: Re: 'ALLOCATE' a data set in my TSO/E session
>
>Lizette, the default DISP for existing datasets is OLD,KEEP, not
OLD,DELETE.
>


***
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: INFOPRINT server for z/OS

2005-12-08 Thread Roberto Halais Kareh
Marie:

That is one way we use it to print from CICS thru TD queues.
We also do CICS SEND commands directly to the printer.

We use at 110 sites.

Up till now, no problems.

Roberto

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED]
Behalf Of VENET Marie-Claude
Sent: Wednesday, December 07, 2005 9:53 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: INFOPRINT server for z/OS


Is-it the good solution to print on a LPD from transaction CICS that write in a 
TD queue ? 

> -Message d'origine-
> De:   IBM Mainframe Discussion List [SMTP:[EMAIL PROTECTED] À la place de 
> Richard Pinion
> Date: mercredi 7 décembre 2005 14:27
> À:IBM-MAIN@BAMA.UA.EDU
> Objet:Re: INFOPRINT server for z/OS
> 
> What would you like know?
> 
> >>> [EMAIL PROTECTED] 12/7/2005 3:58 AM >>>
> hello, 
> 
> I seek people who set up Infoprint server on z/OS ?
> 
>  
> 
>  
> 
> --
> 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

--
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: 'ALLOCATE' a data set in my TSO/E session

2005-12-08 Thread Farley, Peter x23353
Lizette, the default DISP for existing datasets is OLD,KEEP, not OLD,DELETE.

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] 
Sent: Thursday, December 08, 2005 10:22 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: 'ALLOCATE' a data set in my TSO/E session

Johnny,

When allocating any dataset under TSO or BATCH I always ensure the DISP
parameter is properly set.

If you just code a DD statement of

//DD1  DD DSN=datasetname

Then the default DISP is OLD,DELETE.  That means at job termination the data
set will be deleted.  I will let others on the list address how DFSMS might
change that statement.


So if you are using

ALLOOCATE DSN(CENTER.UADS) DD(SYSUADS)  

During the time of your TSO session, the CENTER.UADS data set is allocated
with OLD which is an EXCLUSIVE enq and not SHARED.

I would use instead

ALLOCATE DSN(CENTER.UADS) DD(SYSUADS) SHR REUSE

To make sure the defaults are not used and a data sets is not accidentally
deleted.

I am not sure if the default for ALLOCATE under TSO is OLD,DELETE as well.
If it is, then you also risk accidentally deleting the data set when it is
freed from your TSO session.

The whole point is if you do not specify a DISP parm then the default of OLD
is usually used.  That creates an exclusive ENQ and no one else can use the
file until it is released.

Second, you probably need to review the TSO/E REXX and TSO CLIST manuals.
They have many examples on how to set up CLIST and REXX execs that run in
Batch or TSO.



Lizette Koehler

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

_
This message and any attachments are intended only for the use of the addressee 
and
may contain information that is privileged and confidential. If the reader of 
the 
message is not the intended recipient or an authorized representative of the
intended recipient, you are hereby notified that any dissemination of this
communication is strictly prohibited. If you have received this communication in
error, please notify us immediately by e-mail and delete the message and any
attachments from your system.

--
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: 'ALLOCATE' a data set in my TSO/E session

2005-12-08 Thread Lizette Koehler
Johnny,

When allocating any dataset under TSO or BATCH I always ensure the DISP
parameter is properly set.

If you just code a DD statement of

//DD1  DD DSN=datasetname

Then the default DISP is OLD,DELETE.  That means at job termination the data
set will be deleted.  I will let others on the list address how DFSMS might
change that statement.


So if you are using

ALLOOCATE DSN(CENTER.UADS) DD(SYSUADS)  

During the time of your TSO session, the CENTER.UADS data set is allocated
with OLD which is an EXCLUSIVE enq and not SHARED.

I would use instead

ALLOCATE DSN(CENTER.UADS) DD(SYSUADS) SHR REUSE

To make sure the defaults are not used and a data sets is not accidentally
deleted.

I am not sure if the default for ALLOCATE under TSO is OLD,DELETE as well.
If it is, then you also risk accidentally deleting the data set when it is
freed from your TSO session.

The whole point is if you do not specify a DISP parm then the default of OLD
is usually used.  That creates an exclusive ENQ and no one else can use the
file until it is released.

Second, you probably need to review the TSO/E REXX and TSO CLIST manuals.
They have many examples on how to set up CLIST and REXX execs that run in
Batch or TSO.



Lizette Koehler

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


Re: Commands in JCL

2005-12-08 Thread Rob Wunderlich
On Wed, 7 Dec 2005 15:18:55 -0700, Steve Comstock
<[EMAIL PROTECTED]> wrote:
>> $tjobclass(*),command=execute
>>
>> Then update JES2PARM. No need to recycle JES or IPL or anything at all
>>
>Thanks, John. But some of the other experiments
>worked without even changing JESPARMS. I'm good
>to go.

Steve,

I believe the JESPARMS reminder was to ensure your change is remembered
across a warm start, not to effect the change.

-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: Make a volume under SMS control

2005-12-08 Thread Bruce Black



No. Run PGM=ADRDSSU and use the CONVERTV verb.

Or if you are a FDR customer, run the FDRCONVT program (section 70 in 
the manual).


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

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


Re: 'ALLOCATE' a data set in my TSO/E session

2005-12-08 Thread Pommier, Rex R.
Yes,  because any time you run a batch job, whether or not you are running 
IKJEFT10 in the batch job or calling the COBOL program directly on the EXEC 
statement, you are in essence, starting with a blank slate, an empty address 
space.  Just like your TSO logon proc allocates datasets so you can run TSO 
interactively, you need to build the JCL for the batch job to allocate the 
"infile" DDNAME to run the second TSO environment in batch mode.  

I know the purists out there will jump on me for saying it is an empty address 
space because system libraries, etc, are already there , but for the sake of 
your question you are running 2 completely different address 
spaces/environments and so anything you allocate in one of them to make it 
work, you will have to allocate in the other to make it work as well.  

HTH

Rex

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Luo 
Johnny
Sent: Thursday, December 08, 2005 7:00 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: 'ALLOCATE' a data set in my TSO/E session


On 12/8/05, Terry Sambrooks <[EMAIL PROTECTED]> wrote:
>
>
>
> If a batch job is submitted with PGM=IKJEFT10, IKJEFT1B or any of the 
> valid variations then whatever happens inside, be in REXX, Assembler, 
> Cobol, PLI, will run in a TSO environment, but not the same 
> environment as that of the submitter. Remember that batch jobs run in 
> their own Address Spaces.


*Terry ,thanks for the reply.It really helps.*
**
*I konw utilities like IKJEFT10 can offer a TSO envrionment  in which we can 
execute TSO COMMAND.*
**
*Hoever,if my cobol program need a DDNAME 'infile' and I have allocated it in 
my TSO session,then when I execute the program via IKJEFT10,do I need to 
allocate it again?Because as you said,these two TSO environments are not the
same.*
**
**









--
Best Regards,
Johnny Luo

--
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: 'ALLOCATE' a data set in my TSO/E session

2005-12-08 Thread Farley, Peter x23353
A batch job and your TSO session are executing in different address spaces
and thus they are INDEPENDENT of each other -- what you do in one of them
*usually* has no impact on the other one.  The usual "exception" is if one
of the two allocates a file EXCLUSIVELY (DISP=OLD), then the other one
cannot also allocate that file.  The first one to get EXCLUSIVE access wins,
and the other one loses.  This is the same as if two JCL jobs try to
allocate the same file with DISP=OLD (explicitly or by default).

The other thing you need to understand is the concept of "shared" versus
"exclusive" access to a file -- in your case, both the TSO session and the
batch job must have used "DISP=SHR", that is they SHARED access (read-only)
to that file.

When you already have one allocation of a file (SYS1.UADS is allocated to
DDname SYSUADS), it is not allowed to have a second EXCLUSIVE allocation;
your allocate command did not use the SHR keyword, so the default DISP is
OLD, which asks for EXCLUSIVE access to the file.  If you had used the SHR
keyword, your allocate would have succeeded.

Lastly, when you execute your COBOL program in JCL, you must do the JCL
equivalent of "allocate", and in JCL this is the DD statement.  Running your
program in JCL without a DD is like running your program in TSO without an
"allocate" before.

So, to run your COBOL program in JCL, write a DD statement and use DISP=SHR
if it is a file other jobs or TSO sessions will already be using.

HTH

Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] 
Sent: Thursday, December 08, 2005 2:19 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: 'ALLOCATE' a data set in my TSO/E session

I've  dwell on some questions  for days :

1,In TSO,I use 'listalc status' to find that SYS1.UADS has been allocated to
DDNAME 'SYSUADS'.
   For a test, I issue 'allocate dsn(center.uads) dd(sysuads)' and get the
meesage that filename is
   in use. I resort to manuals and know that to do this I must use 'REUSE'
operand.
   However,I submit a job via JCL which also uses DDNAME 'SYSUADS' and there
is no problem.

2,I have a simple cobol program who just opens  a input file and closes
it(select infile assign to infile).
   First I issue 'allocate dsn(md0006.input.qsam) dd(infile)' and
succeed.Then I can use TSO command 'call'
   to execute the program successfully.
   However,when I execute the program via JCL  without coding infile
DDNAME,it fails.

So I want to know the exact reason.My personal guess is that a job submitted
by JCL is not executed in my TSO address space.Would someone be kind enough
to give some explanation for me?

Thanks a lot.

_
This message and any attachments are intended only for the use of the addressee 
and
may contain information that is privileged and confidential. If the reader of 
the 
message is not the intended recipient or an authorized representative of the
intended recipient, you are hereby notified that any dissemination of this
communication is strictly prohibited. If you have received this communication in
error, please notify us immediately by e-mail and delete the message and any
attachments from your system.

--
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: Commands in JCL

2005-12-08 Thread Charles Mills
You're right. If you have a string of commands, it REDUCES the operator
intervention to one command, assuming you can tolerate a one-minute security
exposure.

Charles



-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Paul Gilmartin
Sent: Wednesday, December 07, 2005 6:19 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Commands in JCL


In a recent note, Charles Mills said:

> Date: Wed, 7 Dec 2005 18:13:10 -0500
> 
> No, no, if the current setting is verify, then the $T command has to be
> verified. No (fundamental) logical flaw there.
> 
Good.  But doesn't this, then, fail Steve's requirement (as I
perceived it) that he be able to avoid operator intervention?

--
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: Make a volume under SMS control

2005-12-08 Thread McKown, John
> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Luo Johnny
> Sent: Thursday, December 08, 2005 7:34 AM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Make a volume under SMS control
> 
> 
> I know the proper way is to add the volume to storage group
> when initializing the volume.But I want to know whether I can make
> the volume SMS-managed after initialization.
> 
> When I initialize one of my volume,I didn't add it to storage group.
> And later,I wanna to do this.So I delete all the data sets which
> isn't sms-managed on that volume and add it to a storage group.
> However,in ISMF,I see the volume physical status is 'not sms-control'.
> 
> I want to know what to do.Reinitialize it?
> 
> 
> 
> --
> Best Regards,
> Johnny Luo

No. Run PGM=ADRDSSU and use the CONVERTV verb.

Documented at:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2R240/3.4

You can also get "canned" JCL to do this by using ISMF, option 2.1. Put
the volser in the field labelled "Volume Serial Number". Press ENTER.
You should see the volser in the resulting display. In front of the
displayed volser, enter the command CONVERTV and go through the panels.

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


Make a volume under SMS control

2005-12-08 Thread Luo Johnny
I know the proper way is to add the volume to storage group
when initializing the volume.But I want to know whether I can make
the volume SMS-managed after initialization.

When I initialize one of my volume,I didn't add it to storage group.
And later,I wanna to do this.So I delete all the data sets which
isn't sms-managed on that volume and add it to a storage group.
However,in ISMF,I see the volume physical status is 'not sms-control'.

I want to know what to do.Reinitialize it?



--
Best Regards,
Johnny Luo

--
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: SOAP for CICS

2005-12-08 Thread Peter Ten Eyck
I was thinking more along the lines of securing what programs, tran ids or
data sets can be run or accessed over this connection.

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


Error - Path H: cannot be found. Make sure drive path is correct.

2005-12-08 Thread Jerry Ragland
Hi all,

I have my CICS region load modules installed in a volume which resides in
emulated OS/2 H drive. The CICS regions were all working fine, but now I
faced a problem when I was doing an IPL, during IPL it says -


  *  IGGN505A SPECIFY UNIT FOR CICSTS31.CICS.SDFHLOAD ON MVSRES OR CANCEL
 IEE600I REPLY TO 00 IS;0B81
 IGGN306I 0B81,UNIT UNACCEPTABLE, 0004
  *  IGGN505A SPECIFY UNIT FOR CICSTS31.CICS.SDFHLOAD ON MVSRES OR CANCEL
 IEE600I REPLY TO 00 IS;0B82
 IGGN306I 0B82,UNIT UNACCEPTABLE, 0004
  *   IGGN505A SPECIFY UNIT FOR CICSTS31.CICS.SDFHLOAD ON MVSRES OR CANCEL
 IEE600I REPLY TO 00 IS;CANCEL
 IEA716I UNABLE TO MOUNT VOLUME -LNKLST   DATA SET IGNORED
CICSTS31.CICS.SDFHLOAD
 IEA716I UNABLE TO MOUNT VOLUME -LNKLST   DATA SET IGNORED
SYS1.CICSTS31.CICS.SDFHLINK

As above I tried replying with the unit numbers but of no use.

Then I issued the following commands to know the status -

D M=DEV(B81)

IEE174I 00.06.05 DISPLAY M 036
DEVICE 0B81   STATUS=OFFLINE
CHP   FC
DEST LINK ADDRESS 00
PATH ONLINE   Y
CHP PHYSICALLY ONLINE Y
PATH OPERATIONAL  N
PATHS NOT VALIDATED


V 0B81,ONLINE

IEE103I UNIT 0B81 NOT BROUGHT ONLINE 038
IEE763I NAME= IECVIOPM CODE= 0004
IOS551I NO PATHS PHYSICALLY AVAILABLE
IEE764I END OF IEE103IRELATED MESSAGES


V PATH(0B81,FC),ONLINE

IEE386I PATH(0B81,FC) NOT BROUGHT ONLINE 040
IEE763I NAME= IECVIOPM CODE= 0004
IOS552I PATH NOT PHYSICALLY AVAILABLE
IEE764I END OF IEE386IRELATED MESSAGES


CF CHP(FC),ONLINE

IEE712I CONFIG   PROCESSING COMPLETE


V PATH(0B81,FC),ONLINE

IEE386I PATH(0B81,FC) NOT BROUGHT ONLINE 044
IEE763I NAME= IECVIOPM CODE= 0004
IOS552I PATH NOT PHYSICALLY AVAILABLE
IEE764I END OF IEE386IRELATED MESSAGES


DS P,0B81

RESPONSE=P390
 IEE459I 02.07.01 DEVSERV PATHS 006
 UNIT DTYPE  M CNT VOLSER  CHPID=PATH STATUS
  RTYPE   SSID CFW TC   DFW   PIN  DC-STATE CCA  DDC   ALT  CU-TYPE
 0B81,3390  ,F,000,  ,FC=<
  SYMBOL DEFINITIONS 
 F = OFFLINE< = PHYSICALLY UNAVAILABLE

Then I went into the OS/2 system menu and it show me the drives.
H: drive appears, but when I click on it, I get an error message:

"Path H: cannot be found. Make sure drive path is correct."

What I have to do to rectify this problem ?
Please help in this problem..

Thanks in Advance,
-Jerry

--
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: 'ALLOCATE' a data set in my TSO/E session

2005-12-08 Thread Luo Johnny
On 12/8/05, Terry Sambrooks <[EMAIL PROTECTED]> wrote:
>
>
>
> If a batch job is submitted with PGM=IKJEFT10, IKJEFT1B or any of the
> valid variations then whatever happens inside, be in REXX, Assembler, Cobol,
> PLI, will run in a TSO environment, but not the same environment as that of
> the submitter. Remember that batch jobs run in their own Address Spaces.


*Terry ,thanks for the reply.It really helps.*
**
*I konw utilities like IKJEFT10 can offer a TSO envrionment  in which we can
execute TSO COMMAND.*
**
*Hoever,if my cobol program need a DDNAME 'infile' and I have allocated it
in my TSO session,then when I execute the program via IKJEFT10,do I need to
allocate it again?Because as you said,these two TSO environments are not the
same.*
**
**









--
Best Regards,
Johnny Luo

--
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: STRNO in DB2 catalog

2005-12-08 Thread Avram Friedman
The problem is
  1.  There is no such thing as a ICF DB2 Catalog
   In ICF it is simply "Catalog" mignt be used for
none, part of or all of DB2 objects in a sub-system
  2.   In DB2 there is no STRNO

Hence is the user talking about
STRNO for DB2 Catalog VSAM datasets in the ICF Catalog

Seems like a reasonable confusion to me

So the question should be
"Are there any special performance considerations for STRNO for the ICF
catalog that contains DB2 objects?"

he answer being No, The same considerations that apply to managing ICF
catalogs for anything apply to an ICF catalog that manages some DB2
objects?  The answer is no.

A bit of additional information for a single DB2 subsystem, DB2 database
objects are rarely allocated, and rarely go through o/c/e  When it does
happen the request comes from a single address space / tcb called DBM1

The above discussion might exclude Object define, delete and some stand
alone DB2 utilities.


On Wed, 7 Dec 2005 12:46:12 +0100, R.S. <[EMAIL PROTECTED]>
wrote:

>Avram Friedman wrote:
>
>> I am a bit confused.
>>
>> Dose the term 'DB2 catalog' in the original posting refer to
>> the ICF catalog that points to data sets of any type
>> or the special set of objects in DB2 that contains DB2 system
information.
>>
>> I fankly assumed it was the second case ...
>
>IMHO bad assumption. Topic keyword STRNO suggests ICF.
>
>
>--
>Radoslaw Skorupka
>Lodz, Poland
>
>--
>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: 'ALLOCATE' a data set in my TSO/E session

2005-12-08 Thread Terry Sambrooks
Hi:

In a recent post Johnny Luo wrote:

"... However,when I execute the program via JCL  without coding infile
DDNAME,it fails.

So I want to know the exact reason.My personal guess is that a job submitted
by JCL is not executed in
my TSO address space.Would someone be kind enough to give some explanation
for me?"

If a batch job is submitted with PGM=IKJEFT10, IKJEFT1B or any of the valid 
variations then whatever happens inside, be in REXX, Assembler, Cobol, PLI, 
will run in a TSO environment, but not the same environment as that of the 
submitter. Remember that batch jobs run in their own Address Spaces.

If, in the logged on session, the command sequence is:

- Allocate data sets
- Execute program
- Deallocate data set

Then that sequence must be present in the batch job, either after the SYSTSIN 
DD statement, or within a REXX /CLIST routine, which can be invoked via the 
PARM field on the EXEC statement of the submitted job.

I hope this helps. 

Kind regards - Terry

Terry Sambrooks
Director
KMS-IT Limited
228 Abbeydale Road South
Dore
Sheffield
South Yorkshire
UK

Tel +44 (0) 114 262 0933
Web www.kmsitltd.co.uk

Reg: England & Wales 3767263 at the above address

All outgoing E-mails are scanned but it remains the responsibility of the 
recipient to ensure that their system is protected from infection by virus, 
Trojans, and worms.

--
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: Cheers: PREFERENCE and KEY8 CSA storage

2005-12-08 Thread ibm-main
From: "Edward E. Jaffe"
>
> Customers are another story. ... Since their
> use can make otherwise functioning code fail, they aren't recommended
> for customer use.

Mmmm - devel/production use maybe.
I'm with Sam - turn the traps on in sandpit(s) and kick any misbehaving ISVs
based on results.
Well behaved ISVs - *obviously* Phoenix, by definition ... ;) receive kudos
by omission.

> They first have to make sure none
> of their code violates the rules. And, since they recently acquired
> Candle's line of products, they have their work cut out for them.

No need to be coy Ed, say what you really mean .
God, I hope somebody sorts out their memory management code one day 

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