Re: Migrating me from linux/bsd to zOS

2006-04-12 Thread Charles Mills
Where's TSO COPY documented? I just got to wondering idly how hard it would
be to write a clone or semi-clone (without the bugs, or at least with new
and better bugs) in Rexx. It's not in the TSO commands manual (okay, it's
not a TSO command). I don't see any likely manual in the TSO bookshelf.
What's the name of the TSO add-on product that includes COPY?

It's not in the bibliography of the TSO commands manual under related
publications - that would make this z/OS programming stuff too easy.

Charles

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


Re: Migrating me from linux/bsd to zOS

2006-04-12 Thread Ray Mullins
Try to find a copy of "TSO Data Utilities: COPY, FORMAT, LIST, MERGE User's
Guide and Reference ".   I haven't looked, but I went to OS/390 V2R4 and did
a search in the TSO bookshelf, and found that hit.

Check the pubs site - maybe it's still orderable.

Later,
Ray

> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Charles Mills
> Sent: Wednesday April 12 2006 15:26
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Re: Migrating me from linux/bsd to zOS
> 
> Where's TSO COPY documented? I just got to wondering idly how 
> hard it would be to write a clone or semi-clone (without the 
> bugs, or at least with new and better bugs) in Rexx. It's not 
> in the TSO commands manual (okay, it's not a TSO command). I 
> don't see any likely manual in the TSO bookshelf.
> What's the name of the TSO add-on product that includes COPY?
> 
> It's not in the bibliography of the TSO commands manual under 
> related publications - that would make this z/OS programming 
> stuff too easy.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
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: SHARE Baltimore

2006-04-12 Thread (IBM Mainframe Discussion List)
 
 
In a message dated 4/12/2006 1:10:11 P.M. Central Daylight Time,  
[EMAIL PROTECTED] writes:

>Does anyone know when SHARE - Baltimore registration will be  available?
Keep checking their website at _http://www.share.org/_ 
(http://www.share.org/)  or this one 
_http://www.share.org/events/Baltimore/index.cfm_ 
(http://www.share.org/events/Baltimore/index.cfm) 


Bill  Fairchild


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


Re: Migrating me from linux/bsd to zOS

2006-04-12 Thread Skip Robinson
>From the TSO HELP members:

COPY

)F FUNCTION- 
  THE COPY COMMAND IS USED TO DUPLICATE A SEQUENTIAL OR 
  PARTITIONED DATA SET OR A MEMBER OF A PARTITIONED DATA 
  SET, TO ADD A MEMBER TO AN EXISTING PARTITIONED DATA SET, 
  OR TO MERGE TWO PARTITIONED DATA SETS. 
)X SYNTAX  - 
 COPY   'DSNAME1'  'DSNAME2' 
RENUM('BEGIN INTEGER'  'INCREMENT') 
 
NUM('BEGIN COLUMN'  'FIELD LENGTH') 
   OR 
NONUM 
 
NUM2('BEGIN COLUMN'  'FIELD LENGTH') 
LRECL(RECORDSIZE)  BLOCK(BLOCKSIZE) 
RECFM(U/V/F/D) 
ASCII 
 
  NOTE - U MAY BE FOLLOWED BY T. 
 V MAY BE FOLLOWED BY B/T/BT. 
 F MAY BE FOLLOWED BY B/S/T/BS/BT/ST/BST. 
 D MAY BE FOLLOWED BY B/BA. 
 F V OR U MAY BE FOLLOWED BY AN A OR M. 
  REQUIRED - 'DSNAME1' AND 'DSNAME2' 
  DEFAULTS - NONUM 


FORMAT

)F FUNCTION - 
  THE FORMAT COMMAND PROVIDES COMPREHENSIVE FORMATTING 
  CAPABILITIES THAT ARE APPLICABLE TO TEXT-ORIENTED OUTPUT 
  OPERATIONS. THIS COMMAND ALLOWS THE USER TO: 
 PLACE FORMATTED OUTPUT IN A DATA SET 
 PRINT HEADINGS ON EACH PAGE 
 CENTER LINES OF TEXT BETWEEN MARGINS 
 CONTROL THE AMOUNT OF SPACE FOR ALL FOUR MARGINS 
 JUSTIFY RIGHT AND LEFT MARGINS OF LINES OF TEXT 
 NUMBER PAGES OF OUTPUT CONSECUTIVELY 
 HALT PRINTING WHEN DESIRED 
 PRINT MULTIPLE COPIES OF SELECTED PAGES 
 CONTROL THE LINE AND PAGE LENGTH 
 CONTROL PARAGRAPH INDENTATION 
)X SYNTAX  - 
 FORMAT   'DSLIST' 
  'INTEGER1'  'INTEGER2' 
   OR 
  PAGE('INTEGER3'  'INTEGER4') 
  PAUSE/PAUSE1/NOPAUSE 
  NUM/NONUM/SNUM 
  PRINT('DSNAME'. T/PS/PC) 
  REQUIRED - 'DSLIST' 
  DEFAULTS - 'SNUM'  'NOPAUSE'  'T' 


LIST

)F FUNCTION - 
  THE LIST COMMAND IS USED TO PRINT OUT PART OR ALL OF A SEQUENTIAL 
  DATA SET OR MEMBER OF A PARTITIONED DATA SET. 
)X SYNTAX  - 
 LIST 'DSLIST'  'INTEGER1' 'INTEGER2' 
 NUM('BEGIN INTEGER' 'LENGTH')/ 
 SNUM('BEGIN COLUMN' 'LENGTH')/NONUM 
 COL('BEGIN COLUMN' 'END COLUMN') 
  REQUIRED - DSLIST 
  DEFAULTS - NUM 


MERGE

)F FUNCTION- 
  THE MERGE COMMAND IS USED TO COMBINE DATA SETS OR PARTS OF DATA SE
  AND ALSO TO COPY A DATA SET OR PARTIAL DATA SET. 
)X SYNTAX - 
 MERGE   'DSNAME1'  'INTEGER1'  'INTEGER2' 
 'DSNAME2'  'INTEGER3' 
 NUM('BEGIN INTEGER'  'LENGTH') OR  NONUM 
 NUM2('BEGIN INTEGER'  'LENGTH') OR  NONUM2 
 RENUM('BEGIN INTEGER'   'INCREMENT') 
 BASIC 
  REQUIRED - 'DSNAME1' AND 'DSNAME2' 
  DEFAULTS - 'NUM' AND 'NUM2' 
  NOTE - IF 'INTEGER2' IS OMITTED THE LINE SPECIFIED BY 
 'INTEGER1' IS MERGED. 
 IF 'INTEGER1' IS ALSO OMITTED THE ENTIRE DATA SET IS 
 MERGED OR COPIED. 

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

IBM Mainframe Discussion List  wrote on 04/12/2006 
03:31:17 PM:

> Try to find a copy of "TSO Data Utilities: COPY, FORMAT, LIST, MERGE 
User's
> Guide and Reference ".   I haven't looked, but I went to OS/390 V2R4 and 
did
> a search in the TSO bookshelf, and found that hit.
> 
> Check the pubs site - maybe it's still orderable.
> 
> Later,
> Ray
> 
> > -Original Message-
> > From: IBM Mainframe Discussion List 
> > [mailto:[EMAIL PROTECTED] On Behalf Of Charles Mills
> > Sent: Wednesday April 12 2006 15:26
> > To: IBM-MAIN@BAMA.UA.EDU
> > Subject: Re: Migrating me from linux/bsd to zOS
> > 
> > Where's TSO COPY documented? I just got to wondering idly how 
> > hard it would be to write a clone or semi-clone (without the 
> > bugs, or at least with new and better bugs) in Rexx. It's not 
> > in the TSO commands manual (okay, it's not a TSO command). I 
> > don't see any likely manual in the TSO bookshelf.
> > What's the name of the TSO add-on product that includes COPY?
> > 
> > It's not in the bibliography of the TSO commands manual under 
> > related publications - that would make this z/OS programming 
> > stuff too easy.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
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: IRA400E

2006-04-12 Thread Steve Comstock

Richard Pinion wrote:

Wait a minute, I thought the State of Colorado doesn't have mainframes anymore!



No. The new CIO of the Colorado Revenue Department
was just quoted as saying "No one uses mainframes
anymore". They do, but this was his way of saying
he was amazed to find it out.

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


Re: COBOL2 Issues

2006-04-12 Thread Harold Zbiegien
what are the bytes around the PSW address, particularly before, It would be
nice to see the instruction that caused the error and a few leading up to
it.
- Original Message - 
From: "David DeBervec" <[EMAIL PROTECTED]>
Newsgroups: bit.listserv.ibm-main
To: 
Sent: Wednesday, April 12, 2006 6:14 PM
Subject: Re: COBOL2 Issues


> Sorry I haven't had a chance to respond you your assistance and replies,
> but there was more pressing business that required my attention.   I'm
> presently rounding up all the pieces that I can find that make up the load
> module.  I have secured the Enterprise COBOL manuals.  I checked linklst
> and it contains no COBOL2 load libraries. I am including a portion of the
> ABEND-AID dump that was produced.  I hope to have more information and
> questions in the near future.
>
> Thank you for your assistance,
>
> David
>
>
> Abend-Aid piece:
>
>  The IBM message that corresponds to the condition is:
> 0CEE3204S The system detected a protection exception (System
>   Completion Code=0C4).
>
>
>
>
>
>
>  ***
>  * Error Location  *
>  ***
> 0The next sequential instruction to be executed in program OFDBINIT was
>  at displacement 1C74.
> 0The program was compiled on 22 MAR 2006 and is 6AC8 bytes long.
> 0It is part of load module DBINIT.
> 0The module was loaded from JOBLIB library
>  TDM692.PRIVATE.CORE.R122005.LOADLIBB.
> 0The module was link edited on 24 MAR 2006 and is 00021668 bytes long.
> 0The last known I/O request or call in the program above was issued with
>  a return address at displacement 1C62.
>
>
>  ***
>  *   Call Trace Summary*
> 1  A B E N D - A I DPAGE   3
> 0***
>
>  ***Calling***  Return   ***Called
>  Load-Mod  Program  Type Value   Program  Load-Mod
>
>  *SYSTEMLinks to BLB3050  BLB3050
>
>  BLB3050   BLB3050  CallsCEEBTOR  CEEBINIT
>
> CEEBINIT  CEEBTOR  CallsBLB3050  BLB3050
>
> BLB3050   BLB3050  DISP  083E  CallsINITOFFL BLB3050
>
> BLB3050   INITOFFL DISP  1916  CallsDBIO BLB3050
>
> BLB3050   DBIO DISP  0BFE  CallsIGZCFCC  IGZCPAC
>
> IGZCPAC   IGZCFCC  DISP  0320  CallsIGZCD24  IGZCD24
>
> IGZCD24   IGZCD24  DISP  006A  CallsDBINIT   DBINIT
>
> DBINITDBINIT   DISP  00C4  CallsOFDBINIT DBINIT   *
>
> DBINITOFDBINIT DISP  1C62  CallsDBFILEIO DBINIT
>
> DBINITDBFILEIO Calls CEEPLPKA
>
> CEEPLPKA   DISP  048300B6  CallsLEAIDLEAID
>
>  LEAID LEAIDDISP  0ADC  CallsSNAPAID  LEAID
>
>Program Causing Error  *
> 0One or more modules loaded from the LINKLIST.
>  Current LINKLIST library set is LNKLST00
>
>
>  --- 
>  Load-ModAmode  Rmode  Resides in
>
>  DBINIT   24 24TDM692.PRIVATE.CORE.R122005.LOADLIBB
>  BLB3050  24 24TEC414.TLR.COBOL.LOAD
>  CEEBINIT 24 24CEE.SCEERUN
>  IGZCPAC  31ANYCEE.SCEERUN
>  IGZCD24  31 24CEE.SCEERUN
>  CEEPLPKA 31ANYEPLPA
>  LEAID31ANYSYS3.AA.R090500.SPAALOAD
>  --- 
>
>
>  ***
>  * Application Program Attributes  *
>  ***
> 1  A B E N D - A I DPAGE   4
> 0
>  Load-Mod  Program   Compile Date  LengthLanguage
>
>  BLB3050   BLB3050   06 APR 2006   8F9F  COBOL Z/OS V3R3M1
>
>  BLB3050   INITOFFL  24 MAR 2006   39FC  COBOL Z/OS V3R3M1
>
>  BLB3050   DBIO  24 MAR 2006   1074  COBOL Z/OS V3R3M1
>
>  DBINITDBINIT22 MAR 2006   1ADE  HLASM
>
>  DBINITOFDBINIT  22 MAR 2006   6AC8  COBOL Z/OS V3R3M1
>
>  DBINITDBFILEIO  22 MAR 2006   2001  HLASM
>
>
>  ***
>  *  Supporting Environmental Data  *
>  ***
>
>   Abend PSW - 078D 000920EC   A(OFDBINIT) + 1C74
>   Prog PSW  - 078D 000920EC   A(OFDBINIT) + 1C74
>   Load Module - DBINITEntry Point Address - 0008E998
>   ILC - 06,   INTC - 04   Load  Point Address - 0008E998
>Registers at time of error  (Descriptions based on 24 bit addresses)
> 0REG HEX   Decimal Description
>  R0  0005E528 386,344  A(0003C000) + 00022528, PVT SP=001 ALLOC
>  R1 

Re: Migrating me from linux/bsd to zOS

2006-04-12 Thread Charles Mills
Not on the V2R10 CDs but I may have an earlier one somewhere.

> maybe it's still orderable.

Not THAT curious! 

Charles



-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Ray Mullins
Sent: Wednesday, April 12, 2006 3:31 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Migrating me from linux/bsd to zOS


Try to find a copy of "TSO Data Utilities: COPY, FORMAT, LIST, MERGE User's
Guide and Reference ".   I haven't looked, but I went to OS/390 V2R4 and did
a search in the TSO bookshelf, and found that hit.

Check the pubs site - maybe it's still orderable.

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


Re: Migrating me from linux/bsd to zOS

2006-04-12 Thread Charles Mills
Thanks. I was too lazy to see if my (not licensed for the add-on product)
TSO HELP had this info. Unlike some of you folks, I'm not signed onto TSO
all day.

Gee, how hard could it be to write COPY 'DSN1' 'DSN2' in Rexx? I suppose the
"entire PDS" would be a little tricky. I'd leave out the bug-prone numbering
options. What does LRECL/RECFM do? Let you re-block if you are creating an
entire dataset? ASCII? I probably skip that also. If you need the data in
ASCII, you must need it somewhere else, so let FTP translate it.

Charles



-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Skip Robinson
Sent: Wednesday, April 12, 2006 3:39 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Migrating me from linux/bsd to zOS


>From the TSO HELP members:

COPY

)F FUNCTION- 
  THE COPY COMMAND IS USED TO DUPLICATE A SEQUENTIAL OR 
  PARTITIONED DATA SET OR A MEMBER OF A PARTITIONED DATA 
  SET, TO ADD A MEMBER TO AN EXISTING PARTITIONED DATA SET, 
  OR TO MERGE TWO PARTITIONED DATA SETS. 
)X SYNTAX  - 
 COPY   'DSNAME1'  'DSNAME2' 
RENUM('BEGIN INTEGER'  'INCREMENT') 
 
NUM('BEGIN COLUMN'  'FIELD LENGTH') 
   OR 
NONUM 
 
NUM2('BEGIN COLUMN'  'FIELD LENGTH') 
LRECL(RECORDSIZE)  BLOCK(BLOCKSIZE) 
RECFM(U/V/F/D) 
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: Migrating me from linux/bsd to zOS

2006-04-12 Thread Skip Robinson
To put some perspective on the 'upward compatibility' issue with respect 
to various platforms: our copies of the TSO DATA UTILITIES were last link 
edited in 1976. They work as well today as when they were installed. 

We had a bit of a battle during Y2K remediation because some people felt 
that anything that old could not possibly survive the calendar rollover. 
Of course they suffered not a bit. ;-)

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

IBM Mainframe Discussion List  wrote on 04/12/2006 
04:04:28 PM:

> Not on the V2R10 CDs but I may have an earlier one somewhere.
> 
> > maybe it's still orderable.
> 
> Not THAT curious! 
> 
> Charles
> 
> 
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On 
Behalf
> Of Ray Mullins
> Sent: Wednesday, April 12, 2006 3:31 PM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Re: Migrating me from linux/bsd to zOS
> 
> 
> Try to find a copy of "TSO Data Utilities: COPY, FORMAT, LIST, MERGE 
User's
> Guide and Reference ".   I haven't looked, but I went to OS/390 V2R4 and 
did
> a search in the TSO bookshelf, and found that hit.
> 
> Check the pubs site - maybe it's still orderable.

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


Re: Migrating me from linux/bsd to zOS

2006-04-12 Thread Chris Mason
All this chat about COPY, FORMAT, LIST, MERGE.

It seems a lot of people didn't think much of this product - more later.

Fortunately I didn't know how rubbishy this product was and I found a good
use for it, specifically COPY.

I used to run a number of systems under VM which shared a "system" volume
and each had their own "read/write" volume - and I liked to keep these
volumes clean and tidy.

My "application" for the COPY command was in a sequence ALLOCATE, COPY,
DELETE within a REXX Clist used generally for partitioned data sets in order
to tidy up a data set which had had a lot of activity: much member editing
or regeneration of load modules. I used a command - I forget what it was
now - which enabled me to work out what the size of the data set and the
size of the directory were in order to work out what numbers to use in the
allocate. Clearly I used the same "organization" and I probably had a
uniform default block size - adjusted, if necessary for record size.

The particular use was to consolidate a data set which had run into multiple
extents and to allocate additional directory space when it was getting
tight - or had run out. By default the data set was considered still
"active" and needed maybe 10% more space and directory than were currently
in use.I recall running the Clist against whole screen-fulls of data sets
after a burst of activity - and going off to get a plastic cup of coffee.

I remember having a policy for allocation in units of 5 tracks (if 5 or more
tracks were needed) as some sort of anti-fragmentation measure - or maybe
the results just ended up looking more tidy on the ISPF volume panel - this
is all quite a while ago now. I also remember having some very tight checks
that the COPY command had completed its job successfully before going on to
the DELETE for the original data set. (Do I really need an emoticon here?)

I think it was during my time running these test/education systems that the
PDSE came along which I decided I didn't need - possibly because I had this
nice tool available to me and maybe also because COPY is incompatible with
PDSE - did I see that somewhere in this thread before I was really paying
attention?

I remember also having to make a special request to have this product
5734-UT1 - doesn't that product number date it? - and the guy in charge of
MVS locally was very doubtful about it. I think he made sure that only my
systems used it and eventually I had to make a private copy so that I didn't
depend on it being available from one "clone" of the production installation
to another - as disapproval turned to denial.

Incidentally, in case it hasn't been mentioned and I see someone suggests it
may still be orderable, URL
http://www-306.ibm.com/common/ssi/fcgi-bin/ssialias?infotype=OC&subtype=NA&htmlfid=897/ENUS5734-UT1&appname=totalstorage
says "(For IBM US, No Longer Available as of February 19, 1997)"

Chris Mason

- Original Message - 
From: "Skip Robinson" <[EMAIL PROTECTED]>
Newsgroups: bit.listserv.ibm-main
To: 
Sent: Thursday, 13 April, 2006 12:38 AM
Subject: Re: Migrating me from linux/bsd to zOS


> From the TSO HELP members:
>
> COPY
>
> )F FUNCTION-
>   THE COPY COMMAND IS USED TO DUPLICATE A SEQUENTIAL OR
>   PARTITIONED DATA SET OR A MEMBER OF A PARTITIONED DATA
>   SET, TO ADD A MEMBER TO AN EXISTING PARTITIONED DATA SET,
>   OR TO MERGE TWO PARTITIONED DATA SETS.
> )X SYNTAX  -
>  COPY   'DSNAME1'  'DSNAME2'
> RENUM('BEGIN INTEGER'  'INCREMENT')
>
> NUM('BEGIN COLUMN'  'FIELD LENGTH')
>OR
> NONUM
>
> NUM2('BEGIN COLUMN'  'FIELD LENGTH')
> LRECL(RECORDSIZE)  BLOCK(BLOCKSIZE)
> RECFM(U/V/F/D)
> ASCII
>
>   NOTE - U MAY BE FOLLOWED BY T.
>  V MAY BE FOLLOWED BY B/T/BT.
>  F MAY BE FOLLOWED BY B/S/T/BS/BT/ST/BST.
>  D MAY BE FOLLOWED BY B/BA.
>  F V OR U MAY BE FOLLOWED BY AN A OR M.
>   REQUIRED - 'DSNAME1' AND 'DSNAME2'
>   DEFAULTS - NONUM
>
>
> FORMAT
>
> )F FUNCTION -
>   THE FORMAT COMMAND PROVIDES COMPREHENSIVE FORMATTING
>   CAPABILITIES THAT ARE APPLICABLE TO TEXT-ORIENTED OUTPUT
>   OPERATIONS. THIS COMMAND ALLOWS THE USER TO:
>  PLACE FORMATTED OUTPUT IN A DATA SET
>  PRINT HEADINGS ON EACH PAGE
>  CENTER LINES OF TEXT BETWEEN MARGINS
>  CONTROL THE AMOUNT OF SPACE FOR ALL FOUR MARGINS
>  JUSTIFY RIGHT AND LEFT MARGINS OF LINES OF TEXT
>  NUMBER PAGES OF OUTPUT CONSECUTIVELY
>  HALT PRINTING WHEN DESIRED
>  PRINT MULTIPLE COPIES OF SELECTED PAGES
>  CONTROL THE LINE AND PAGE LENGTH
>  CONTROL PARAGRAPH INDENTATION
> )X SYNTAX  -
>  FORMAT   'DSLIST'
>   'INTEGER1'  'INTEGER2'
>OR
>   PAGE('INTEGER3'  'INTEGER4')
>   PAUSE/PAUSE1/NOPAUSE
>   NUM/NONUM/S

Looking for binary to character translation utility

2006-04-12 Thread Charles Mills
I'm looking for a free or very inexpensive utility ***available in source
code form*** that would convert an arbitrary mainframe file to a character
(such as hex) format, and back again.
 
I've got a situation where I must access a client mainframe through
Hummingbird running on MS Remote Desktop. I can't get a file from my PC to
the remote desktop due to "security," but I can get a clipboard full of
ASCII data from one desktop to the other. I'd like to be able to get TSO
TRANSMIT files from my mainframe to my desktop, and from my desktop to the
remote desktop, and from the remote desktop to the client mainframe. I can
do this with character files, such as source code, using a fairly elaborate
series of FTP, cut-and-paste, and IND$FILE, but binary data does not make
the journey gracefully.
 
I could write something in Rexx to convert a file to vanilla hex with some
sort of "record descriptors" and another Rexx program to reassemble the
original file. Better than hex would be base 64 because the character file
would be considerably smaller. It has to be something that runs on z/OS
because I have no way of getting an executable PC program onto the remote
desktop. It can't be an executable (not source code, in other words)
mainframe program because I have no way of getting a binary file onto the
mainframe -- but I can get Rexx source from here to there.
 
But why re-invent the wheel? Is there something on the CBT tape? I searched
file 001 for "binary" and didn't get any promising hits. Some of you guys
seem to have the CBT tape memorized and I would welcome your assistance.
 
Why can't I have the client install binary files for me? The client is the
most compartmentalized group I have ever worked with. Names omitted to
protect the guilty. Suffice it to say I can write a Rexx program faster than
this would happen.
 
Is it just me or could the CBT tape use a better index? File 001 is the
whole history of western civilization. It would be nice to have a smaller
file that just had the file number and a paragraph summarizing what the file
did. Or am I missing something? But I digress ...

Charles Mills


 

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


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

2006-04-12 Thread Ted MacNEIL
>Print is usually synonymous with list in DP circles, and since the statement 
>is wrong either way, ...

Excuse me?
List/type/cat displays a file to the STDOUT.

Are you saying that that is an incorrect statement?

Are we arguing semantics?

What word would you like to use to say:

"Take the contents of a file/input and display/copy it to another device/file?"

LIST has been a term used for years, would you like to pick another.

Or, are you just obsfuscating your error with baffle-gab?


-
-teD

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

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


Re: Looking for binary to character translation utility

2006-04-12 Thread Paul Gilmartin
In a recent note, Charles Mills said:

> Date: Wed, 12 Apr 2006 16:54:19 -0700
> 
> I've got a situation where I must access a client mainframe through
> Hummingbird running on MS Remote Desktop. I can't get a file from my PC to
> the remote desktop due to "security," but I can get a clipboard full of
> 
Whose "security"?  Yours or theirs?  Can you E-mail?

I'm thinking of something like:

TRANSMIT OUTDSN()

FTP to local desktop

E-mail as base64 attachment to remote desktop

Save decoded attachment on remote desktop

FTP to remote mainframe

RECEIVE INDSN()

I suppose this breaks somewhere or you'd have thought
of it.  But where?

I don't suppose either desktop lets you export or import
raw .mbox files, which are text.  I could do it with
OS X, but you probably aren't that lucky twice.

-- 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: Mainframe & Evil

2006-04-12 Thread Ed Gould

On Apr 12, 2006, at 3:30 PM, Chase, John wrote:


-Original Message-
From: IBM Mainframe Discussion List On Behalf Of George Bly

[ snip ]

Last upgrade in my small shop cost for just ISV software was
$300,000 in just upgrade fees.  I didn't need to change one
piece of code.  That's hard to defend.


To put it bluntly, it's indefensible.



John,

Agreed... but some PC software cost (Oracle and the like) do charge  
by the number of processors, so its not just the MF software ISV's  
that are the problem. That being said we have all heard of horror  
stories that another processor cost. I cannot say if the cost is more  
in PC land than in MF land. I just don't have the background in the  
PC arena. The two (was three) major vendors have been raked over the  
coals by just about everyone on here. So there is no use in namimg  
them again.


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: Another fine mess

2006-04-12 Thread Gerhard Adam
>1) Could RNL=NO be the issue that causes the ENQ to fail?

>3) Is there latency in the updating of the catalog by IDCAMS?

What makes you think the ENQ has failed?  There is certainly latency in 
updating the catalog between the catalog address spaces on the different 
systems.  Are you using the coupling facility within a plex?  Are you relying 
on each LPAR to detect the change and update it's own catalog address space?  
Does the problem ever happen within the same LPAR? or only is it when sharing 
between LPAR's?

Anyway ... those are some of the questions I have.

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: Migrating me from linux/bsd to zOS

2006-04-12 Thread Ed Gould

IIRC the proper name is TSO Command Utilities (5734-???)
25+ years ago bits are starting to drop.

Ed

On Apr 12, 2006, at 5:25 PM, Charles Mills wrote:

Where's TSO COPY documented? I just got to wondering idly how hard  
it would
be to write a clone or semi-clone (without the bugs, or at least  
with new
and better bugs) in Rexx. It's not in the TSO commands manual  
(okay, it's
not a TSO command). I don't see any likely manual in the TSO  
bookshelf.

What's the name of the TSO add-on product that includes COPY?

It's not in the bibliography of the TSO commands manual under related
publications - that would make this z/OS programming stuff too easy.

Charles

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


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


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

2006-04-12 Thread Aaron Peterson
On 4/12/06, Ted MacNEIL <[EMAIL PROTECTED]> wrote:
> Excuse me?
> List/type/cat displays a file to the STDOUT.
>
> Are you saying that that is an incorrect statement?

Most UNIX comands display their output to STDOUT.  The normal behavior
of "cat" is to print its *output* to STDOUT.  However it's reason
d'etre is indicated by its name, short for catenate.  It's purpose is
to take multiple files and catenate all the input into a single output
stream.  Many people happen to use it to list the contents of single
files, and it works great for that.  I happen to prefer "less" for
simple text file viewing.

Anyway, "cat" was superfluous in the example we are arguing about,
because the output of the previous commands was already destined for
STDOUT.  So using "cat" to read from STDIN and send to STDOUT without
any other modification to the data was completely unnecessary.  Come
to think of it, the whole chain of commands seems contrived and
doesn't result in any useful output that I can discern.

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


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

2006-04-12 Thread Ted MacNEIL
>However it's reason
d'etre is indicated by its name, short for catenate.  It's purpose is
to take multiple files and catenate all the input into a single output
stream.

And, catenate is intuitive?

My point was that all OS's have a LIST command.
I was told that LIST was an invalid description of what the command did.
What word would you pick?

I saw UNIX before I saw TSO (not before I saw JCL)!
What's with these strange names?
That has been my complaint since 1976!

And, what kind of word is catenate?
Concatenate is a valid english word!

-
-teD

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

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


Re: Looking for binary to character translation utility

2006-04-12 Thread Charles Mills
Whose security? Someone's job security? I don't know. Seriously, the
client's security. In fairness, let me say the client has more reason than
most to be careful about such things.

Nope, no e-mail on remote desktop. That would be too easy. A very bare-bones
Windows desktop with Hummingbird and the Hummingbird X-Server called Exceed
or Excess or something like that (not having the pleasure of being on it at
the moment) and not much else other than very basic Windows utilities such
as Notepad. No FTP.

No FTP on client mainframe, or rather, no FTP between the client mainframe
and the real world. The only way "in and out" for files that I have found is
Hummingbird and IND$FILE. The Hummingbird IND$FILE client has a nice feature
- lets you transfer to and from the Windows clipboard.

My mainframe to mainframe sequence is FTP from my mainframe to my desktop
using desktop FTP client. Open file in NoteTab*. Copy to clipboard. Toggle
to remote desktop Hummingbird. Transfer file from clipboard to host file. I
can batch this up somewhat - transfer multiple files with FTP and open
multiple files in NoteTab. Moved a lot of source code this way on Monday.
Reverse works roughly the same way.

Yeah, e-mail attachments are base 64, right? But how do I take advantage of
that? What about UNIX od? Will it go both ways? Will it do base 64? I wonder
if I have OMVS access on the client machine. Probably not.

*Quick plug: NoteTab is a GREAT text type editor for Windows. Light version
is free. Google knows where to find it. One nice feature for this use:
single step copy-to-clipboard without first having to do a Select All.

Charles



-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Paul Gilmartin
Sent: Wednesday, April 12, 2006 5:29 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Looking for binary to character translation utility


In a recent note, Charles Mills said:

> Date: Wed, 12 Apr 2006 16:54:19 -0700
> 
> I've got a situation where I must access a client mainframe through
> Hummingbird running on MS Remote Desktop. I can't get a file from my PC to
> the remote desktop due to "security," but I can get a clipboard full of
> 
Whose "security"?  Yours or theirs?  Can you E-mail?

I'm thinking of something like:

TRANSMIT OUTDSN()

FTP to local desktop

E-mail as base64 attachment to remote desktop

Save decoded attachment on remote desktop

FTP to remote mainframe

RECEIVE INDSN()

I suppose this breaks somewhere or you'd have thought
of it.  But where?

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


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

2006-04-12 Thread Aaron Peterson
On 4/12/06, Ted MacNEIL <[EMAIL PROTECTED]> wrote:

> My point was that all OS's have a LIST command.
> I was told that LIST was an invalid description of what the command did.
> What word would you pick?

I would use

grep '.*'

or perhaps

awk '{print}'

or you could even just use

dd

and leave out the "wc -c" since dd prints how many bytes it
transferred at the end of its output

Cheers :-),

Aaron Peterson
Versailles, KY

--
For IBM-MAIN subscribe / signoff / archive access instructions,
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 & Evil

2006-04-12 Thread Craddock, Chris
Ed Gould wrote;
> I cannot say if the cost is more in PC land than in MF land.
> I just don't have the background in the PC arena. The two
> (was three) major vendors have been raked over the  coals by
> just about everyone on here. So there is no use in namimg
> them again.

Not to pick on Ed, but everything costs more on the MF no matter what
anyone says. That's because of the costs of doing business in this
market space and the relatively small (tiny!!) size of the market in
terms of customers, if not dollars. No matter what anyone says, IT and
especially MF systems software is a very people-intensive business. It
did not get this way over night.

You can argue whether it's what the market will bear or just gouging,
but the reality is that people don't work for altruism. This is a
business like any other and as such it has to charge enough to pay the
bills and give a return to the shareholders. If there were more large
systems customers the costs would be spread wider and they would be
lower on average than today. PC software only looks "cheap" FSVO cheap
because the costs are spread over a much much larger number of
customers. Building PC software costs a ton of money too.

CC

BTW> after the IBM disclosure meetings this week the cat is out of the
bag and a lot of the other CA guys have been dying for me to "de-cloak"
so here goes... Check the email address.

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


Re: Mainframe & Evil

2006-04-12 Thread Norman Hollander
Welcome to the Borg Collection.  Resistance is futile!

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Craddock, Chris
Sent: Wednesday, April 12, 2006 SYSN 6:57 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Mainframe & Evil

Ed Gould wrote;
> I cannot say if the cost is more in PC land than in MF land.
> I just don't have the background in the PC arena. The two
> (was three) major vendors have been raked over the  coals by
> just about everyone on here. So there is no use in namimg
> them again.

Not to pick on Ed, but everything costs more on the MF no matter what
anyone says. That's because of the costs of doing business in this
market space and the relatively small (tiny!!) size of the market in
terms of customers, if not dollars. No matter what anyone says, IT and
especially MF systems software is a very people-intensive business. It
did not get this way over night.

You can argue whether it's what the market will bear or just gouging,
but the reality is that people don't work for altruism. This is a
business like any other and as such it has to charge enough to pay the
bills and give a return to the shareholders. If there were more large
systems customers the costs would be spread wider and they would be
lower on average than today. PC software only looks "cheap" FSVO cheap
because the costs are spread over a much much larger number of
customers. Building PC software costs a ton of money too.

CC

BTW> after the IBM disclosure meetings this week the cat is out of the
bag and a lot of the other CA guys have been dying for me to "de-cloak"
so here goes... Check the email address.

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

--
For IBM-MAIN subscribe / signoff / archive access instructions,
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 & Evil

2006-04-12 Thread Norman Hollander
At the risk of starting a never ending thread:

Today, we just don't look at how much mainframe hardware and software costs.
Rather, we need to look at the value it brings in support of a business's
strategic
direction.  

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Craddock, Chris
Sent: Wednesday, April 12, 2006 SYSN 6:57 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Mainframe & Evil

Ed Gould wrote;
> I cannot say if the cost is more in PC land than in MF land.
> I just don't have the background in the PC arena. The two
> (was three) major vendors have been raked over the  coals by
> just about everyone on here. So there is no use in namimg
> them again.

Not to pick on Ed, but everything costs more on the MF no matter what
anyone says. That's because of the costs of doing business in this
market space and the relatively small (tiny!!) size of the market in
terms of customers, if not dollars. No matter what anyone says, IT and
especially MF systems software is a very people-intensive business. It
did not get this way over night.

You can argue whether it's what the market will bear or just gouging,
but the reality is that people don't work for altruism. This is a
business like any other and as such it has to charge enough to pay the
bills and give a return to the shareholders. If there were more large
systems customers the costs would be spread wider and they would be
lower on average than today. PC software only looks "cheap" FSVO cheap
because the costs are spread over a much much larger number of
customers. Building PC software costs a ton of money too.

CC

BTW> after the IBM disclosure meetings this week the cat is out of the
bag and a lot of the other CA guys have been dying for me to "de-cloak"
so here goes... Check the email address.

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

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


Re: A very basic question

2006-04-12 Thread Bruce Black


There have been some good discussions in the past which suggest that the
DFP access methods don't use STARTIO directly.  
Sam, that sounds like semantics.  Most of the non-VSAM access methods 
(xSAM, BPAM, BDAM) issue EXCP SVCs, and EXCP invokes STARTIO.  In that 
sense they are indirect.  VSAM uses Media Manager, which invokes 
STARTIO, so that could also be considered indirect, I guess.  Same for 
PDSE and HFS.


--
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: Mainframe & Evil

2006-04-12 Thread Bruce Black


Welcome to the Borg Collection.
Actually it is Bord Collective.  The Borg Collection is probably 
something you buy from one of those collectible stores 


--
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: Mainframe & Evil

2006-04-12 Thread Richards.Bob
All the best in your new endeavors from Rebecca and I.

Bob 

 -Original Message-
From:   IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED]  On Behalf Of 
Craddock, Chris
Sent:   Wednesday, April 12, 2006 9:57 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject:Re: Mainframe & Evil


BTW> after the IBM disclosure meetings this week the cat is out of the
bag and a lot of the other CA guys have been dying for me to "de-cloak"
so here goes... Check the email address. 
  
  
  
LEGAL DISCLAIMER 
The information transmitted is intended solely for the individual or entity to 
which it is addressed and may contain confidential and/or privileged material. 
Any review, retransmission, dissemination or other use of or taking action in 
reliance upon this information by persons or entities other than the intended 
recipient is prohibited. If you have received this email in error please 
contact the sender and delete the material from any computer. 
  
Seeing Beyond Money is a service mark of SunTrust Banks, Inc. 
[ST:XCL] 
 
 
 
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
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 & Evil

2006-04-12 Thread Ed Gould

On Apr 12, 2006, at 9:35 PM, Bruce Black wrote:



Welcome to the Borg Collection.
Actually it is Bord Collective.  The Borg Collection is probably  
something you buy from one of those collectible stores 



Bruce,

I think he misspoke I think he meant Welcome to the CA Imperial Army  
(otherwise known as the CIA:)


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: Looking for binary to character translation utility

2006-04-12 Thread Paul Gilmartin
In a recent note, Charles Mills said:

> Date: Wed, 12 Apr 2006 18:13:11 -0700
> 
> My mainframe to mainframe sequence is FTP from my mainframe to my desktop
> using desktop FTP client. Open file in NoteTab*. Copy to clipboard. Toggle
> to remote desktop Hummingbird. Transfer file from clipboard to host file. I
> can batch this up somewhat - transfer multiple files with FTP and open
> multiple files in NoteTab. Moved a lot of source code this way on Monday.
> Reverse works roughly the same way.
> 
Y'know, Kermit was invented to solve problems like this.
but I suspect even Kermit would balk at this configuration.

Unload with TSO TRANSMIT.  Think about XMITIP -- I'm
sure it does base64.  Can you XMITIP from your MF to
your desktop?  Can you capture the raw mail text (still
base64) on your desktop?  If not, XMITIP to your MF
account; capture the mailbox with SDSF (or 3.8?).

Now you gotta undo the base64.  Rexx.  Shave off the
whiskers.  TRANSLATE; C2D; 
right(D2C(((c0*64+c1)*64+c2)*64+c3, 3, '00'x);
string 'em together (yes, teD, "catenate" is a word.)

-- 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: IBM Announces WebSphere Application Server V6.1 for z/OS

2006-04-12 Thread Timothy Sipples
Kirk Wolf writes:
>I don't see the SOD re: Apache in the referenced announcement.  Can
>you provide a link?

It's on page 6 (left hand column, about 40% from the top) in the 
announcement letter:

http://www.ibm.com/common/ssi/rep_ca/7/897/ENUS206-077/ENUS206-077.PDF

Just search on "Apache" if you cannot find it easily and it'll pop up (as 
the second hit, I think).  Hope that helps!

- - - - -
Timothy F. Sipples
Consulting Enterprise Software Architect, z9/zSeries
IBM Japan, Ltd.
E-Mail: [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: Migrating me from linux/bsd to zOS

2006-04-12 Thread Gerhard Postpischil

Charles Mills wrote:

Gee, how hard could it be to write COPY 'DSN1' 'DSN2' in Rexx? I suppose the
"entire PDS" would be a little tricky. I'd leave out the bug-prone numbering
options. What does LRECL/RECFM do? Let you re-block if you are creating an
entire dataset? ASCII? I probably skip that also. If you need the data in
ASCII, you must need it somewhere else, so let FTP translate it.


To use REXX for these functions, you need a supporting environment. 
Under TSO you need SYSDSN or a similar function, and ALLOCATE. If you 
are allocating a new PDS member, or need a member list, the ISPF/PDF 
LMxxx services are handy. To copy a PDS in its entirety, it's probably 
easier to allocate the files and invoke IEBCOPY than to use REXX I/O.


Not quite ten years ago I worked on a project for which this support was 
required under the covers, and it wasn't pretty. It would have been 
faster to write, and execute, written in assembler using DESERV and 
access methods, but management decided that the REXX code would be 
easier to maintain in the long run.


Gerhard Postpischil
Bradford, VT

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


Re: IBM Announces WebSphere Application Server V6.1 for z/OS

2006-04-12 Thread Timothy Sipples
Clark Morris writes:
>So will you be able to compile COBOL programs that can run in 64 bit
>mode inside of Websphere?  Can they interoperate with JAVA and will
>they finally recognize IEEE floating point so that NO conversions are
>needed to work with JAVA.

Really good questions. All I know at this point is that IBM provided a 
"technology preview" (starting a couple years ago) describing how you 
could compile COBOL in such a way as to run as EJBs inside WebSphere 
Application Server for z/OS.  You had to follow certain rules 
(thread-safe, extreme care in how to do I/O, etc.), but it's an intriguing 
technology.

Before anyone asks, no, I don't have the reference for this technology. 
IBM may be hiding the information now -- it's not popping up in my 
searches of the IBM Internet Web sites. Talk with your friendly local 
WebSphere and/or mainframe specialist about it. Just because it's possible 
doesn't mean it's necessarily a good idea, especially post-zAAP.

As you might know, here's what IBM is officially saying about 64-bit 
COBOL:

- - - - -

http://www-03.ibm.com/servers/eserver/zseries/zos/installation/zos_cobol_faqs.html

Question: Will there be a version of COBOL and/or the BINDER that will 
create 64-bit COBOL load modules to run under z/OS?

Answer: We have no plans for 64-bit addressing support in COBOL. The 
BINDER already supports 64-bit assembler programs and will support 64-bit 
C/C++ programs in the future. We have not heard of any customers requiring 
64-bit addressing in COBOL programs. If you have a need for that, please 
send your requirements to us with details about why 31-bit addressing is 
not enough. Please use the Contact z/OS link below.

- - - - -

Now, is this a problem (with respect to the COBOL EJB technology preview)? 
I don't know, but it's interesting that we'll have both 31-bit and 64-bit 
Java support in the same WebSphere Application Server release. I was 
thinking in terms of how it'd be useful for smooth Java migration 
(especially for ultra-cautious customers), but COBOL interoperability 
(with COBOL EJBs) might be another such area. If you're working with the 
COBOL EJB technology then I would check with your IBM contact on that to 
see what he/she says. I guess we'll all find out more as the 64-bit 
delivery gets closer how this all fits together in the various mixed-mode 
permutations. It's a little early for me yet. My educated guess is that it 
will be very flexible.

With respect to the IEEE floating point question, obviously the current 
situation functions just fine, but I think you're referring to a question 
of overhead and efficiency (which I get the impression is good, but 
engineers always look for better). I believe the official line on this is, 
"We understand." For slightly less official information I'd recommend 
SHARE forums, possibly combined with alcohol. :-)

- - - - -
Timothy F. Sipples
Consulting Enterprise Software Architect, z9/zSeries
IBM Japan, Ltd.
E-Mail: [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: Kudos to IBM's promotion

2006-04-12 Thread Timothy Sipples
My esteemed colleague writes:
>I think you hit the nail on the head here Steve.  I volunteer to help 
with 
>Universities in Arizona for the IBM Academic Initiative.  2 of the 3 
>Universities have been approached in Arizona and the heads of the CS 
>departments have stopped IBM in their tracks saying mainframes are not a 
>technology that they see any future for and scoff at the idea of adding 
>some curriculum to support them.  These schools have been offered many 
>incentives, but the bottom line is they don't want it.  They don't 
>understand the role mainframes play.  On an upbeat note, one professor in 

>the 3rd school has just introduced mainframes as part of his OS class and 

>will be attempting to get an upper class z/OS introduction class into 
>their curriculum.  IBM Academic Initiative is working with companies to 
>try to bring them to the Universities to speak to the CS departments to 
>convince them of the need for these skills.  They are tired of hiring 
>senior level programmers to do entry level jobs.  IBM is actively 
>soliciting Universities to try to introduce more curriculum. So hopefully 

>its moving in the right direction. Unfortunately, its an uphill climb at 
>this point.

There's really a simple and straightforward solution to this problem, one 
which most of you on IBM-MAIN can execute: hire college interns. (IBM 
certainly is.) That's what most directly impacts campus perceptions. Knock 
on the college doors and say, "We want three interns next summer -- with 
X, Y, and Z preparation if possible."

College interns are extremely inexpensive, to be totally blunt. (The 
career investment can cost a little more, but first things first.) And 
they have secondary benefits for your own organization (e.g. morale). Hire 
them, now.

So is anyone hiring from college? I'll start. Yes, my department has 
offers out to five new college graduates -- we call them "vitality hires" 
-- one of which was a summer intern last year in my office. (I was her 
mentor, actually.) I believe four have accepted (including our intern). 
They will all undergo intense training(*) and mentoring for several months 
in mainframe technical roles. And this is just software, just one part of 
the world, just what my own second line manager is doing. We hope all of 
them will stay with IBM for 30+ years (if they succeed and if we're able), 
although quite possibly some of you will enjoy having them available as 
professional employees after we've trained them, should they desire a 
change of venue for whatever reason.

Anybody want to go next?

(*)This part sounds like something Steve could help your company do, yes?

- - - - -
Timothy F. Sipples
Consulting Enterprise Software Architect, z9/zSeries
IBM Japan, Ltd.
E-Mail: [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: Moving BACK to the mainframe

2006-04-12 Thread Timothy Sipples
I'll have to officially call this a "rumor" and only specify the general 
parameters, but I'll see what I can say.

Apparently there's some group sponsored by some software company that 
alleges that it makes business sense to move everything away from the 
mainframe to an unreliable, expensive, proprietary, inefficient, 
worm/virus-infested platform that the software company happens to sell. 
I'm sure I don't know any group like that.

Well, the group scheduled a conference, prepared a schedule, and sent the 
schedule out to prospective attendees.  The schedule included a "success 
story" of a company that had allegedly managed to make this very peculiar 
move (or at least declared its intentions).  The company also provided a 
testimonial.  (Rumor has it that a Google search shows the testimonial 
available on the vendor's Web site.)

Right after the schedule went out, the success story

1. Fired its CIO.
2. Purchased a new mainframe (a z890 as it happens).
3. Redoubled its mainframe software investment and development projects to 
address actual business issues rather than their ever-swelling IT budget.

I'm sure it would be interesting to compare the first conference schedule 
with the actual delivered schedule.

Rumor has it, of course.

- - - - -
Timothy F. Sipples
Consulting Enterprise Software Architect, z9/zSeries
IBM Japan, Ltd.
E-Mail: [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


Cancel a job after 10 min runtime

2006-04-12 Thread Miklos Szigetvari
Hi 


How can I cancel a job after 10 minutes runtime ? 
(Tried with JESPARM TIME but seems tom me, it has no effect)

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


Re: Another fine mess

2006-04-12 Thread Vernooy, C.P. - SPLXM
<[EMAIL PROTECTED]> wrote in message news:<[EMAIL PROTECTED]>...
> Our tech people can't find the source of this problem and I am looking for 
> any guesses you might have.
> 
> Sysplex in question has 11 lpars on 5 CECs
> 
> zOS 1.4 with 1.7 being tested.  Sometimes this summer some of the lpars in 
> this plex will be running 1.7 if all goes well.  (So far it hasn't.)
> 
> I am told GRS used to propagate ENQ in star configuration.
> 
> Batch job on lpar 1 builds VSAM file called N.  At the end of the build > job 
> is a step using a program to frontend IDCAMS.  The frontend issues an 
> ENQ RET=NONE with scope of SYSTEMS.  It then links to IDCAMS.  IDCAMS > 
> renames C to O and renames N to C, effectively bringing a new version of C 
> into play.  When IDCAMS ends, the frontend issues DEQ.
> 
> Meanwhile on lpar 2, a batch job using program called BT689 wants to use > 
> file C.  It calls a linked subroutine BS689 which issues an ENQ with the > 
> same scope as mentioned above.  The ENQ does not specify RET=NONE, but > that 
> is the default.  It does specify RNL=NO, which is not the default. 
> That should not matter since both ENQ have scope of SYSTEMS.
> 


You don't have CA-MIM? MIM skips ENQs with RNL=NO, in which case both ENQs are 
handled differently.

Kees.


**
For information, services and offers, please visit our web site: 
http://www.klm.com. This e-mail and any attachment may contain confidential and 
privileged material intended for the addressee only. If you are not the 
addressee, you are notified that no part of the e-mail or any attachment may be 
disclosed, copied or distributed, and that any other action related to this 
e-mail or attachment is strictly prohibited, and may be unlawful. If you have 
received this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM), 
its subsidiaries and/or its employees shall not be liable for the incorrect or 
incomplete transmission of this e-mail or any attachments, nor responsible for 
any delay in receipt.
**

--
For IBM-MAIN subscribe / signoff / archive access instructions,
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: Job scheduling

2006-04-12 Thread Rashmi Nijaguni Mogali


J O B S C H E D U L E R   


--  



 Select the jobs you want to schedule:



   TSSE011_

   TSSE041_

   TSSI050A-59A  _

   TSSI101 _

   TSSI206 _

   TSSI207A-207J _

   TSSI600 _

   TSSI605 _



 
I am planning to do it in an interactive way via a panel. Something
which looks like this:




Here the user will be able to select the jobs which he needs to schedule
by typing 'S' adjacent to the job. Here again, TSSE041 will be scheduled
after the successful execution of TSSE011 and so on..if the user has
typed 'S' adjacent to the 2 jobs. Also the output of TSSE011 is the
input to TSSE041.



Regards,

Rashmi



-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Steve Comstock
Sent: Wednesday, April 12, 2006 5:57 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Job scheduling



Rashmi Nijaguni Mogali wrote:

> Hi,

>

>

>

>

> I need to schedule the execution of 26 jobs.

>

> This has to happen such that the 2nd job should start after the

> successful execution of the 1st job, the 3rd after the 2nd and so on.

>

> Moreover the output of 1st job is the input to the 2nd job.

>

> How do I accomplish this using Clist?

>

> Any documents available on Clist would be most helpful.

>



1. Why would you use CLIST instead of REXX?



2. So, what research / experiments have you run so far?



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

   



 CAUTION - Disclaimer *
This e-mail contains PRIVILEGED AND CONFIDENTIAL INFORMATION intended solely 
for the use of the addressee(s). If you are not the intended recipient, please 
notify the sender by e-mail and delete the original message. Further, you are 
not to copy, disclose, or distribute this e-mail or its contents to any other 
person and any such actions are unlawful. This e-mail may contain viruses. 
Infosys has taken every reasonable precaution to minimize this risk, but is not 
liable for any damage you may sustain as a result of any virus in this e-mail. 
You should carry out your own virus checks before opening the e-mail or 
attachment. Infosys reserves the right to monitor and review the content of all 
messages sent to or from this e-mail address. Messages sent to or from this 
e-mail address may be stored on the Infosys e-mail system.
***INFOSYS End of Disclaimer INFOSYS***

--
For IBM-MAIN subscribe / signoff / archive access instructions,
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