Re: Eric Loriaux Services' mainframers' page is back

2013-01-15 Thread Elardus Engelbrecht
eric loriaux wrote: I've read in the archives of IBM-MAIN that someone was wondering what happened to my old site... It is back online and completely renewed : Eric Loriaux Services' mainframers' page is back Welcome back to the land of z/OS! ;-D I have browsed quickly there. After all those

Re: ADRDSSU + FTP

2013-01-15 Thread Jousma, David
You can easily FTP a DFDSS dump dataset. Just include the following on your FTP: quote site blksize=27998 lrecl=0 recfm=u pri=19950 sec=100 track mode b ebcdic

Re: ADRDSSU + FTP

2013-01-15 Thread Boris Lenz
Been said many times, so I remember the ftp commands: EBCDIC MODE B PUT or GET as needed. I think that's all. As noted, this fails on the empty record problem. How do you create empty records with ADRDSSU DUMP? As others have said, it should be easy to transfer an ADRDSSU DUMP dataset

Re: ADRDSSU + FTP

2013-01-15 Thread Mark Zelden
On Tue, 15 Jan 2013 07:01:44 +0100, nitz-...@gmx.net nitz-...@gmx.net wrote: As noted, this fails on the empty record problem. However, for RECFM=U (possibly via DD override) and z/OS-to-z/OS, BINARY PUT works. (Of course, DD override is not possible on GET. Might need

Re: ADRDSSU + FTP

2013-01-15 Thread Paul Gilmartin
On Tue, 15 Jan 2013 06:02:22 -0600, Boris Lenz wrote: Been said many times, so I remember the ftp commands: EBCDIC MODE B PUT or GET as needed. I think that's all. As noted, this fails on the empty record problem. How do you create empty records with ADRDSSU DUMP? Agreed; you can't. I

Re: ADRDSSU + FTP

2013-01-15 Thread Mark Zelden
On Tue, 15 Jan 2013 08:13:02 -0600, Mark Zelden m...@mzelden.com wrote: For z/OS to z/OS, I have FTPed DFDSS format dumps directly with no problem. From disk to tape or disk to disk. Tape, without changing the BLKSIZE is a problem. I think Barbara mentioned she has done this, but I never tried

Re: Eric Loriaux Services' mainframers' page is back

2013-01-15 Thread eric loriaux
Welcome back! I'll add my link to your site back to my links page. Good stuff there. If you really intend to add a link on your site please do not forget to tell me (read the scratch by back and I'll scratch yours policy at http://www.loriaux-services.be/mainframes/content/help#increase_visibility

Break a dataset into new record boundaries?

2013-01-15 Thread Charles Mills
I've got a dataset that has been mangled through some misguided efforts such that original record boundaries have been lost. It used to be RECFM=V and now it is RECFM=F As luck would have it, every original record begins with the same hex value. Can anyone suggest a simple tool -- z/OS, USS, or

Re: Break a dataset into new record boundaries?

2013-01-15 Thread Paul Gilmartin
On Tue, 15 Jan 2013 09:04:30 -0800, Charles Mills wrote: I've got a dataset that has been mangled through some misguided efforts such that original record boundaries have been lost. It used to be RECFM=V and now it is RECFM=F Surely not FTP!? As luck would have it, every original record begins

Re: Break a dataset into new record boundaries?

2013-01-15 Thread Dave Salt
Is the file editable? If so, a very simple edit macro would do what you want. Contact me off-list if you need help with it. Dave Salt SimpList(tm) - try it; you'll get it! http://www.mackinney.com/products/program-development/simplist.html Date: Tue, 15 Jan 2013 09:04:30 -0800 From:

Re: Break a dataset into new record boundaries?

2013-01-15 Thread Roberts, John J
I've got a dataset that has been mangled through some misguided efforts such that original record boundaries have been lost. It used to be RECFM=V and now it is RECFM=F As luck would have it, every original record begins with the same hex value. Can anyone suggest a simple tool -- z/OS, USS, or

Re: Break a dataset into new record boundaries?

2013-01-15 Thread John McKown
I know an easy way to do it in a z/OS UNIX file, using sed. The only restriction is that it won't work if the file has an embedded x'15' (z/OS UNIX new line). On a z/OS UNIX shell prompt (such as TSO OMVS, or ssh or telnet). If the value at the start of the record is not a printable character, you

Re: Break a dataset into new record boundaries?

2013-01-15 Thread Paul Gilmartin
On Tue, 15 Jan 2013 11:21:37 -0600, Roberts, John J wrote: If binary, I would just write a one-off ASM program to recover the original records. It's probably a 30 minute task, easier than trying to learn anything new. For me and for some others, that _is_ trying to learn something new. --

Re: Break a dataset into new record boundaries?

2013-01-15 Thread Paul Gilmartin
On Tue, 15 Jan 2013 09:04:30 -0800, Charles Mills wrote: I've got a dataset that has been mangled through some misguided efforts such that original record boundaries have been lost. It used to be RECFM=V and now it is RECFM=F As luck would have it, every original record begins with the same hex

Re: Break a dataset into new record boundaries?

2013-01-15 Thread Charles Mills
Wow! What an awesome group and resource. Five answers in twenty minutes. Responding more or less to everyone - I realized after I hit send what I had implied but failed to state: the file is binary -- that is, many of the characters are not printable -- basic mainframey data. I suspect that

Re: Break a dataset into new record boundaries?

2013-01-15 Thread John McKown
Doesn't TR just do a one-for-one translation of bytes? I.e. I don't think you can use it to insert, as your OOPS indicated. Your tr translates all \??? to \025 and all \025 to \???. I don't think this is what is desired. We could merge your answer with mine similar to: cp -B //'ZOS.DSN'

Re: Break a dataset into new record boundaries?

2013-01-15 Thread Sri h Kolusu
Charles, You can use RESIZE operator to break a large record into small records. I assumed that each record starts with X'5B' ($) and each record has a max length of 200 bytes and you have a max of 10 records in a single large FB record. //STEP0100 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=*

Re: Break a dataset into new record boundaries?

2013-01-15 Thread Walt Farrell
On Tue, 15 Jan 2013 09:04:30 -0800, Charles Mills charl...@mcn.org wrote: I've got a dataset that has been mangled through some misguided efforts such that original record boundaries have been lost. It used to be RECFM=V and now it is RECFM=F You did not say how it was mangled, and that can be

Re: Break a dataset into new record boundaries?

2013-01-15 Thread Charles Mills
Sri - Thanks! That will do it, assuming I do have ICETOOL. I will have to check. The only issue is that I don't know what the maximum number of real records per bad record is. But as I said, can live with a 90% job and then figure out how to manually repair the remaining 10%. Currently have

Re: Break a dataset into new record boundaries?

2013-01-15 Thread Sri h Kolusu
Charles, You can parse up to 100 bad records (%00-%99) . If you have more than 100 bad records per large record, then you may have to do another pass of data. Thanks, Sri Hari Kolusu DFSORT Development IBM Mainframe Discussion List IBM-MAIN@listserv.ua.edu wrote on 01/15/2013 10:41:28 AM:

Re: Break a dataset into new record boundaries?

2013-01-15 Thread John McKown
That is very neat! Thanks. I need to put that in my bag of tricks. Actually, I need to really get into the DFSORT book to see all the new nifties. I'd bet that we could use it to replace a lot of our EasyTrievePlus processing. On Tue, Jan 15, 2013 at 12:19 PM, Sri h Kolusu skol...@us.ibm.com

Re: Break a dataset into new record boundaries?

2013-01-15 Thread Bass, Walter W
snip I think I just need a PF-key-invocable macro that would split a record at the cursor position, putting the character under the cursor into the latter record. /snip You don't need an edit macro for that one. Just edit the dataset, enter the KEYS command and set the PF key of your

Re: Break a dataset into new record boundaries?

2013-01-15 Thread Charles Mills
Cool idea but 1. It inserts a blank line between records. 2. It pads my records with blanks. I want RECFM=V records that end where they end. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Bass, Walter W Sent: Tuesday,

Re: Break a dataset into new record boundaries?

2013-01-15 Thread Ted MacNEIL
1. Shouldn't happen if you hit enter right away. They're just lines for you to insert text, if wanted. 2. The file has to have variable length records to negate padding. /snip - Ted MacNEIL eamacn...@yahoo.ca Twitter: @TedMacNEIL -Original Message- From: Charles Mills

Re: Break a dataset into new record boundaries?

2013-01-15 Thread Charles Mills
Yeah, it seems to be working. Not sure yet. I think perhaps the apparent blanks are just ISPF edit window dressing at the ends of the lines. It doesn't know about short lines. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of

SHARE Tailgate Party

2013-01-15 Thread Edward Jaffe
SHARE in San Francisco begins on Sunday, February 3rd, 2013 -- the same day as the Super Bowl. SHARE is taking the opportunity to create a tailgate party themed reception so that everyone can watch the game together: 2:30pm – 7:00pm: SHARE Tailgate Party. This party will replace our Sunday

S0C4 - 4 problem in a SVC

2013-01-15 Thread Richard Verville
I have this strange problem with CICS TS 4.2 (trial version) which has NOT been happening with other TS 4.2 clients. I need to hook in a CICS program (12 bytes) to get control in my routine. In order to do so, my prog issues a LOAD (SVC 08) to get the address and issue a SVC (I coded) to

S0C4-4

2013-01-15 Thread Richard Verville
I have this strange problem with CICS TS 4.2 (trial version) which has NOT been happening with other TS 4.2 clients. I need to hook in a CICS program (12 bytes) to get control in my routine. In order to do so, my prog issues a LOAD (SVC 08) to get the address and issue a SVC (I coded) to

Re: S0C4 - 4 problem in a SVC

2013-01-15 Thread John McKown
It would be helpful to see the code (human and object) for both the EX and MVC instruction. From your description, I guess the EX uses R15 to keep the length. But I don't know that the EX is actually pointing to the MVC nor what registers the MVC is using. Remember that it is possible to get a

S0C4-004

2013-01-15 Thread Richard Verville
E2 4450 90FC000FE 1959 EX R5,VERSTOR CHECK STORAGE TO VERIFY 00062600 E6 4770 91280012A 1960 BNEERRVER 00062700 EA BF6F 201000010 1961 ICM

Re: S0C4-004

2013-01-15 Thread Rob Scott
Does the site have the DIAGxx option CSVRENTPROTECT specified ? Rob Scott Lead Developer Rocket Software 77 Fourth Avenue . Suite 100 . Waltham . MA 02451-1468 . USA Tel: +1.781.684.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion

Re: Break a dataset into new record boundaries?

2013-01-15 Thread Charles Mills
There's also this problem trying to edit the dataset but I'm up to my stack depth in alligators already. * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * ISPF processor ended abnormally

Re: Break a dataset into new record boundaries?

2013-01-15 Thread Charles Mills
Okay, I think I have it. I've spent too much time on this already. Yeah, it's imperfect. - The problem Gil describes below - TF seems confused by the binary data and at the very least stops on any line with a leading blank, I think. - Maybe one or two other details. But it's good enough for

Re: Break a dataset into new record boundaries?

2013-01-15 Thread Ed Gould
Charles: If all the records are V then why not just zap the dscb? then user iebgener? If the records are mixed (F VB) then use any of the suggestions. Ed On Jan 15, 2013, at 11:53 AM, Charles Mills wrote: Wow! What an awesome group and resource. Five answers in twenty minutes.

Re: Break a dataset into new record boundaries?

2013-01-15 Thread Charles Mills
The records can start out F or V as one chooses. That sounds like I am messing with you, but the file starts out (already mangled) on my PC, so I can upload it to any dataset I want. Typical of binary files on other than a mainframe or AS/400, there are no system line-endings. I know where the

Re: S0C4-004

2013-01-15 Thread Don Poitras
What's in R6? In article E40EAEDF99264AAEA4AB87F3DD644710@RichardPC you wrote: E2 4450 90FC000FE 1959 EX R5,VERSTOR CHECK STORAGE TO VERIFY 00062600 E6 4770 91280012A 1960 BNEERRVER

Re: OT: IBM #1 in number of patents for 2012. It's 20th year in a row to do so.

2013-01-15 Thread Shmuel Metz (Seymour J.)
In CAE1XxDH39XOyhfMcrHwiJZ3X=tgc4sjalq4dbzmy0mb7okb...@mail.gmail.com, on 01/11/2013 at 11:48 AM, John Gilmore jwgli...@gmail.com said: IBM also publishes a Disclosure Journal, available in libraries but not I think by subscription, in which it discloses the details of 'inventions' that it

Re: OT: IBM #1 in number of patents for 2012. It's 20th year in a row to do so.

2013-01-15 Thread Charles Mills
Until fairly recently (last two years?) although the law was clear as a bell that *anything* relevant constituted prior art, in fact the PTO examiners never considered anything except previously-issued US patents. So as Shmuel says, publication in the Disclosure Journal (or a blog or Scientific

Re: Problem with REXX using OMVS stuff.

2013-01-15 Thread Shmuel Metz (Seymour J.)
In of3feb89e6.057f84a0-on87257af0.00700f85-86257af0.00709...@us.ibm.com, on 01/11/2013 at 02:29 PM, Steve Thompson sthomp...@us.ibm.com said: Does anyone know of any reason why a subroutine in REXX can do an allocation What command and what environment? -- Shmuel (Seymour J.) Metz,

Re: SMP/E APPLY CHECK Wish

2013-01-15 Thread Shmuel Metz (Seymour J.)
In 4441394998900188.wa.paulgboulderaim@listserv.ua.edu, on 01/11/2013 at 03:12 PM, Paul Gilmartin paulgboul...@aim.com said: Is there a way, in APPLY CHECK GROUP, to see a list of the SYSMODs that will be selected via GROUPEXTEND or GROUP when the actual APPLY is performed? Why are you

Re: OT: IBM #1 in number of patents for 2012. It's 20th year in a row to do so.

2013-01-15 Thread Shmuel Metz (Seymour J.)
In c9e5140a-3cf2-4018-ab03-b078e3cad...@yahoo.com, on 01/11/2013 at 05:43 PM, Scott Ford scott_j_f...@yahoo.com said: Isn't if you writes program for say IBM, doesn't that mean they own it...and I assume patent it, right ? 1. Ownership depends on the terms of employment. 2. They don't have

Re: Passing of Chris Mason reported

2013-01-15 Thread Shmuel Metz (Seymour J.)
In CAN3vrr=a1qmrte0ds3fssteeqtds4bsozo1v+zmrctsstan...@mail.gmail.com, on 01/11/2013 at 05:47 PM, Rob Schramm rob.schr...@gmail.com said: Chris was a pain in my posterior... De mortui -- Shmuel (Seymour J.) Metz, SysProg and JOAT Atid/2http://patriot.net/~shmuel We don't

Re: OT: IBM #1 in number of patents for 2012. It's 20th year in a row to do so.

2013-01-15 Thread John Gilmore
The IBM Disclosure Journal (DJ) is useful to IBM, which is not at all to say that something like it would be equally useful to an ingenious blacksmith having [much] more limited resources.. IBM retains---pays for the immediate availability to it of--- the best legal counsel of all sorts,

Re: Passing of Chris Mason reported

2013-01-15 Thread John Gilmore
Shmuel wrote: | De mortui which is perhaps a botched reference to the Latin tag De mortuis nil nisi bonum [dicendum est]. Latin dropouts would do better to refrain from pretention that betrays them into the ridiculous. In other words, get it right or avoid it: 'octopuses' is unobjectionable,

Re: Passing of Chris Mason reported

2013-01-15 Thread Blaicher, Christopher Y.
John, Not being a Latin scholar, what does the Latin tag you quote mean in today's English? While many Latin tags are interesting, I never had the interest in learning a dead language. Yes, I am very aware it is the basis of many languages, and yes, I took a year of it and decided it was as

Re: Java Security?

2013-01-15 Thread Timothy Sipples
Allan Staller writes: It was my impression that the IBM JVM was a port directly from SUN (now ORACLE). I am not sure whether IBM or SUN/ORACLE was doing the porting. Direct port is not a fair description, no. I guess that information was just revealed if you weren't aware of it. :-) Conforming

Change bit problem

2013-01-15 Thread גדי בן אבי
Hi, In the beginning of December we upgraded to z/OS 1.13 and CA-DISK v12.5. Since then we’ve seen increased CPU and elapsed time in our CA-DISK incremental backup job. We tracked the reason for the increase to the backup of ZFS datasets. It looks like these datasets are being backed up every

Sharing TS7700 across sms plex

2013-01-15 Thread Victor Zhang
Hello, I have a request to sharing TS7700 across lpars belonging to different sms plex, one lpar created data and the other lpar,away from 2000km+ need restore the data, how to accomplish this? How to maintain TCDB? Regards Victor