Re: Have you ever done this using FTP?
The SENDSITE command will help if the PDS needs to be created. On Apr 26, 2012 6:41 PM, retired mainframer retired-mainfra...@q.com wrote: If you specify EBCDIC and BLOCK and if the receiving PDS is already allocated, it will even transfer load modules and preserve the directory information. I think it will also preserve ISPF statistics. lcd local_pds cd remote_pds ebcdic block mget * (or mput if you are on the transmit system) :: -Original Message- :: From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On :: Behalf Of John Norgauer :: Sent: Thursday, April 26, 2012 3:02 PM :: To: IBM-MAIN@bama.ua.edu :: Subject: Have you ever done this using FTP? :: :: FTP a PDS from one Mainframe to another mainframe connected through :: TCPIP? :: :: If so how is it done? :: :: :: :: John Norgauer :: Senior Systems Programmer :: Mainframe Technical Support Services :: University of California Davis Medical Center :: 2315 Stockton Blvd :: ASB 1300 :: Sacramento, Ca 95817 :: 916-734-0536 :: :: SYSTEMS PROGRAMMING.. Guilty, until proven innocent !! JN :: 2004 :: :: Hardware eventually breaks - Software eventually works anon :: :: :: -- :: For IBM-MAIN subscribe / signoff / archive access instructions, :: send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Anybody use the cob2 command on a UNIX shell to compile COBOL?
I do use a UNIX subdirectory on my SYSEXEC concatenation. But, as you said, it cannot be first. So I have an empty PDS with FB/80 as the first DSN in the concatenation. A clumsy work around, but at least it works for me. On Tue, 2012-04-17 at 17:27 -0500, Paul Gilmartin wrote: On Tue, 17 Apr 2012 13:07:18 -0600, Steve Comstock wrote: On 4/17/2012 12:53 PM, McKown, John wrote: As the OP, I thought I'm mention that I finally got the z/OS NFS server to allow me to mount a high-level onto a z/OS UNIX subdirectory on the same system. Clever and resourceful. But certainly just a workaround for the situation: you would like the compilers to be able to use MVS data sets directly for SYSLIB (and other DD names). More than just a workaround. It has the considerable collateral benefit of making legacy data sets available for processing by arbitrary USS commands. The next thing I'd like to see (but I don't do COBOL) is removal of contrived restrictions on the use of USS files and directories by applications using QSAM/BSAM/BPAM. For example I'd like to be able to use a USS directory as SYSEXEC. The only reason I can't is that Rexx makes a test (only on the first catenand) on DSORG that excludes USS directories. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Anybody use the cob2 command on a UNIX shell to compile COBOL?
Guess I am spoiled by the assembler (as command) and C/C++ compiler's support of both UNIX paths and z/OS PDS[E]s. I have a, to me, clumsy way to get around it. I started up the NFS server and exported the high level qualifier that had the PDS[E]s that I needed, then did a MOUNT onto a z/OS UNIX subdirectory. Clumsy, but it does work. I may write my own version of the cob2 command which does what _I_ want. Should be fairly easy. Just set up the allocations as needed using DYNALLOC, then use BPX1ATM UNIX routine to ATTACH the IGYCRCTL program. The main problem that I have with my UNIX programs is that I can only use HLASM (no C compiler license). And I have not figured out how to handle UNIX signals. So the cntlc to abort a command doesn't work. On Tue, 2012-04-17 at 15:04 -0700, Tom Ross wrote: On 4/16/2012 3:26 PM, McKown, John wrote: snip It clearly says only directories and paths, but I suppose a confirmation that datasets are not supported would be nice. I will try to get that into the next version of the Programming Guide. If anyone has a better suggestion for where this confirmation would go, let me know! Cheers, TomR COBOL is the Language of the Future! -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Modernizing the BCP code ?
Another consideration might be IBM doesn't need to worry about backward compatability or unreasonable user concerns and requirements. On Apr 14, 2012 12:57 PM, Paul Gilmartin paulgboul...@aim.com wrote: On Fri, 13 Apr 2012 18:15:19 -0400, Farley, Peter x23353 wrote: Mind you, I wouldn't want to be the one supporting three different languages for all those DSECTS ... But it *would* be awfully helpful if IBM did it for us... :) I wonder again why, nowadays, IBM doesn't make a product of PL/X. I can imagine two reasons: o It would provide a relative advantage to competitors What competitors, anymore? And couldn't IBM control the distribution of PL/X by licensing, even as IBM controls the distribution of z/OS? o Anticipated revenues don't match anticipated cost to support. But IBM devoted considerable resource, instead, to METAL-C. Is METAL-C displacing any use of PL/X within IBM? -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Secure FTP (Was: z/OS every two years)
On Sat, 2012-04-14 at 00:54 +, Gibney, Dave wrote: -Original Message- snip And, I've always found FTPS (granted no client identification certs yet) easier. None of that USS , sometimes called OMVS, perhaps properly called z/OS Unix System Services, involved :) Actually, I recently finished a sporadic effort to automount /u using ZFS. Now I can manage user's data in the zUnix arena. I may get back to trying ssh/sftp someday. If you implement the freely available SSH enhancements from Dovetailed Technologies, their sftp server can access the same z/OS legacy datasets and SPOOL (get to read a job's output, put to submit a job) as FTP. http://dovetail.com . Not only is the basic code free, you don't even need to register with them to download it. Literally no questions asked! Just download and implement. And it's fairly simple. If you want support, you can get that with a support contract. Dave Gibney Information Technology Services Washington State University -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Stupid JCL trick?
On Wed, 2012-02-22 at 01:11 -0600, Elardus Engelbrecht wrote: snip You are NOT allowed to say sorry. :-D As Gibbs on NCIS would say. I admire your courage to post tricks like this. Please continue to post more tricks, even if you only manage to get 'JCL haters' crazy! ;-D For my real tricks, you need to be on the MVS-OE forum. I come up with truly strange ideas and shell scripts for z/OS UNIX. Such as keeping all my JCL and source code in UNIX files now. I have some PDSes, but only to put the source into when I need to have another person copy it. Trying to get them to fetch it directly from UNIX would likely cause them great consternation and stress. It's too different!!! Doe zo voort! (Complimentary way to say 'Just go on!') Groete / Greetings Elardus Engelbrecht -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: O/T but curious (Re: Archaic allocation in JCL (Was: Physical record size query) )
On Mon, 2012-02-20 at 08:42 +0100, R.S. wrote: snip What is cool is that SMS storage group. Usually users do not see the volumes, they see dasd space. In case of shortage you can simply add some volumes to the group. You can even buy new box and simply add it to the group. And that's really cool IMHO. You'd like LVM2 on Linux. You assign your physical disk partitions to a physical volume group (conceptually like an SMS volume group). You can then divvy up the space in that group into various sized logical volumes. This is then initialized with a filesystem with mkfs (equivalent to ICKDSF, I guess). If the filesystem runs out of space, and you used the proper type of filesystem (there are many), you simply expand the size of the logical volume into unused space in the group. You then resize the filesystem. If you used ext4 or btrfs, I think you can do this while it is in use. If you used ext3, I think you need to unmount it (take it offline) to resize it. If you're out of space in the volume group, buy another disk and initialize it into the physical volume group, then expand. logical volume space does not need to be physically contiguous. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Batch process VS Started task
I like the Batch PIPES idea. Of course, since Batch PIPES is a product which costs extra, we can't use it. So I'd use a named UNIX pipe instead. I'm fairly sure that you can have the creating transaction simply write to it like a sequential file. And the processing STC would read it like a sequential file. Should be rather simple to implement. On Sun, 2012-02-19 at 17:40 -0500, Lizette Koehler wrote: Hi list. We have a daily betch job that is processing as input records which has been collected all day. volume of records is about 5 millions for 24 hours. In order to make systems more online we are looking for a way to run the process for each record all day long instead of a daily run, and doing so with minimum as possible application changes. One idea that came up is to convert the process to a self developed STC which will be triggered by a record on an MQ queue and will run as STC all the batch process programs To me it seems like a bad idea because having a self developed STC in production create a maintenance gap (and where there is one STC a second one will soon to follow...)... Are there other advantages / dis-advantages regarding a self developed STC ? Are there any self developed STC's at your shop? Any other ideas on how to approach this issue? Thanks in advanced. Magen Perhaps you could review the BATCH PIPES process in z/OS or if you have MQ, perhaps that could support what you need. Other options could be IMS solution MQ solution CICS solution DB2 Solution We currently have a need to send out orders when a DB2 table is updated. To do this we use our CA-ESP Scheduling software to monitor the DB2 table, when there is a row change, it triggers the process to action the order. If there were some more details on your problem, we might be able to come up with more specific answers? Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: O/T but curious (Re: Archaic allocation in JCL (Was: Physical record size query) )
Just to play the Devil's advocate for a bit, it depends on how you define dataset name. I agree, in Linux (and as a stretch, Windows), if you specify the entire file path, starting from the root, you don't need a catalog. But if you think of a file within a given subdirectory as a dataset equivalent and the subdirectory path as a volume equivalent, then you could use some sort of catalog. Of course, such names are not guaranteed to be unique. In fact, there are almost certainly duplicates such as each user's .profile file. Linux addresses this issue via a utility called mlocate. It runs periodically, usually once a day during a low activity time, via crontab. And, as you immediate can tell, it is not real time. Files get created and deleted without an immediate database update. Hum, might be interesting to see about using the inotify interface to implement a real time update to the mlocate database. I wonder if z/OS UNIX has something to monitor UNIX filesystem events. Something to think about. On Sun, 2012-02-19 at 12:40 -0500, Shmuel Metz (Seymour J.) wrote: In cajtoo59ducxpmrtvozjwjxbr26rbq1hdbdarsnfundxbhfw...@mail.gmail.com, on 02/18/2012 at 07:06 PM, Mike Schwab mike.a.sch...@gmail.com said: Neither Windows or Linux have a Catalog concept to find a dataset on What do you think a directory is? -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Authorized functions
On Sun, 2012-02-19 at 17:14 -0500, John Gilmore wrote: Learning curves are not culture-free; they are specific to a person and his or her experience. What you find easy and congenial I may find difficult and disagreeable. It is possible to teach able people abstractions that make learning a new instance of some class of formalisms, statement-level programming languages say, easy; but that is another matter. Very true. Learn COBOL, and FORTRAN is easier, as is PL/I. APL, however, will cause you problems. Or you'll write FORTRAN code in APL. And hate it. But if you want real fun, take somebody like me who only learned procedural languages in school. Now, give them Haskell or Erlang. Talk about culture shock. No, despite the saying of You can program FORTRAN in any language., you __cannot__ program FORTRAN in Haskell or Erlang. Nothing like a true variable, because once a name has an assigned value, that value cannot be changed. Well, not that version of that name. As Bo Pilgrim would say: It's a mind bogglin' thing! -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Simple iinventory control products?
I'll have to speak up. We have a number of MacKinney products. We only had one problem with one of them, about 15 years ago. I worked on that with them and we fixed it together. It was a race condition in a CICS product. I won't try to say that the products are the top of the line. But they work __for us__. And we can afford them. We've had to terminate a number of products in the past 3 years due to the high, to us, cost. Of course, we are a small shop (and shrinking), and so not a prime customer of companies like IBM, CA, or LRS. We've also eliminated products on the other platforms as well. I will say that IT management wants to eliminate z/OS entirely (along with Linux, AIX, and Oracle/Sun). They want a MS mono-culture because they are 100% convinced that is the most cost effective for our size shop. I don't have access to the budget numbers, so I can't tell. Higher level management cares only about cost (and Windows up-time is good enough. Going for months without an IPL (reboot) means nothing to them. The occasional Windows server crash is consider just how things are.) Actually, Windows itself rarely crashes. It's usually the main server application. On Fri, 2012-02-10 at 22:54 -0600, Ed Gould wrote: Greg: I am surprised a little bit by your attitude and am disappointed in your suggestion. I wasn't going to mention it but since you seemed to infer I wasn't professional I will add: Another person in the group I was in had a similar issue with them. The person was happy he didn't have to call as he had gotten a blank wall from McKinney as well. I don't recall the product and I am not about to insult you with suggestion about being a paid lacky for Mckinney. I have never heard anything positive about them. In the last say 20 years I guess the negatives outweigh anything. I never thought highly of the company as their postage card return to order their product was a little bit less than professional in my opinion. Yes they are a cheap software company and I will repeat you get what you pay for. Ed On Feb 9, 2012, at 10:27 AM, Greg Shirey wrote: After a few minutes of what on the phone? Calling them morons? Questioning their ancestry? MacKinney support gets you speaking to a developer far faster most other vendors I've contacted. Those developers may come across as somewhat defensive of their products (most everyone tends to believe they have debugged their code thoroughly) but I've had many occasions to call for support and have never been advised to debug it yourself. I think we have 5 MacKinney products in house, including LISTCAT PLUS - which has never abended 0C4 here... FWIW. Greg Shirey Ben E. Keith Company -Original Message- From: IBM Mainframe Discussion List On Behalf Of Ed Gould Sent: Thursday, February 09, 2012 8:35 AM One day I got a call from the production people about an OC4 (in LISTCAT) . I looked at it a little and since it was a vendor program I called up their support line. AFter a few minutes on the phone I got a not to nice of a response: DEBUG it yourself -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: What s going on in the redbooks site?
I was a FidoNet user. A sort of distributed BBS network. Dial into a local node, pick up and send messages. The local nodes would exchange messages throughout the day (usually at night). Dial in the next day to get the newly distributed message. Repeat daily. Loved my 56Kb modem. And, of course, CompuServe before the WWW was generally available. On Sat, 2012-02-04 at 20:37 -0500, Shmuel Metz (Seymour J.) wrote: In blu0-smtp1138c6cadd7f4c3cd57c1adb6...@phx.gbl, on 02/03/2012 at 11:07 AM, Ken Hume, IBM kph...@live.com said: What did we ever do before the internet came along. The Internet[1] is not the Web. Before the WWW, we had Archie, FTP, Gopher and other services that in many ways were more convenient than the WWW, and certainly more reliable. [1] A vast WAIS-land. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: CPP (C++) file on z/OS
C++ files certainly may be multi-line, just like C. What is the originating system? I have seen this sort of thing when an ASCII file has UNIX style line endings (LF only) and the ftp is done by a Windows system (which wants CRLF). Instead of using notepad (which makes me think you are using Windows), try using wordpad. I don't do Windows myself, but I've heard that wordpad will properly recognize the UNIX style line endings. You can then do a save function and wordpad will change the line endings from UNIX style to Windows style. This may well allow the ftp to succeed. On Mon, 2012-01-30 at 20:47 -0600, Donald Likens wrote: I am attempting to port a C++ (.CPP) file to z/OS. I appears that .CPP files do not have new line indicators because when I FTP it I get one long record that exceeds 32765 bytes and the FTP failes. Also when I read these file with notepad they are one long stream. Any advise? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Annoying ISPF prob
Very strange. What I have done in the past is deleted all members in my ISPF profile dataset to reset everything. A bit extreme. Another possibility, which may not be possible. is to do a DDLIST command (on any screen). Find the SYSPROC or SYSEXEC DD statement and see if there is a dataset on it which you can update. If there is, create a member called M and make it: /* REXX */ ISREDIT MACRO And that's it. A do nothing ISPF EDIT macro called M. This will at least shut ISPF up. On Sat, 2012-01-28 at 12:12 -0500, Graham Hobbs wrote: Thanks, I tried the methods but nothing worked. John - Edit settings .. there was no M and Profile 20 said IMACRO NONE. Lizette - the E /(##xx) gave me 'Invalid line command'. How might I subscribe to bit.listserv.ispf-l cheers Graham --- - Original Message - From: John McKown joa...@swbell.net Newsgroups: bit.listserv.ibm-main To: IBM-MAIN@bama.ua.edu Sent: Friday, January 27, 2012 8:53 PM Subject: Re: Annoying ISPF prob You probably, somehow, set M as an initial macro. Bring up a member in edit as you are now doing. Look up at the top row. See the Edit_Settings, which is 3rd from the left? Place your cursor on that and press ENTER. This brings up a dialog box. The first field in that is labelled User session initial macro. It __should__ have an M in it. Blank that field out. PF3 out of the dialog. You should no longer get those messages when you do an E on a member. Another possibility is that your edit profile has an IMACRO set. Edit a member and enter IMACRO NONE on the command line (without the marks). You can tell this from the command: PROFILE 20 to see if there is an IMACRO in the edit profile. On Fri, 2012-01-27 at 19:28 -0500, Graham Hobbs wrote: Hello, Newbe again .. I have three TSO/ISPF sessions going. Only one gives me this problem. I didn't consciously cause it. .. am wanting to edit a pgm in CBL.PGMS (prob is also true for CBL.CPYBKS, etc in this session), so I put 'e' as follows.. DSLIST - Data Sets Matching CON*1 Member processed Command === Scroll === CSR Command - Enter / to select action Message Volume --- CONRAD.CBL.CPYBKSEdited VPMVSC eCONRAD.CBL.PGMS Edited VPMVSC CONRAD.CBL.PGMS1 VPMVSC CONRAD.CBL.PGMS2.VIC VPMVSC CONRAD.GHTEST VPD91C .. which gets me to a member list where I put 'e' on a member (big E makes no difference) .. ss EDIT CONRAD.CBL.PGMS Row 00025 of 00053 Command === Scroll === CSR Name Prompt Size Created Changed ID _ STEPH01 322 2012/01/24 2012/01/26 09:47:31 IBMUSE2 _ STEPH033520 2012/01/24 2012/01/27 17:59:16 IBMUSE1 e STEPH101329 2012/01/24 2012/01/26 09:49:27 IBMUSE2 _ STEPH152206 2012/01/24 2012/01/26 09:49:46 IBMUSE2 _ STEPH40 386 2012/01/24 2012/01/26 09:50:06 IBMUSE2 _ STEPJ302219 2012/01/24 2012/01/26 09:51:15 IBMUSE2 .. hit Enter expecting to get the pgm in edit mode but I got .. IKJ56500I COMMAND M NOT FOUND *** .. hitting Enter again I got 'Macro does not exist' and an 'M' on the cmnd line .. EDIT CONRAD.CBL.PGMS(STEPH10) - 01.02 Macro does not exist Command === MScroll === CSR ** * Top of Data ** 01 *``STEPH10 02IDENTIFICATION DIVISION. 03PROGRAM-ID. STEPH10. .. only after I clear the M can normal editing can be done:-( I don't even know what to google for this. How can I stop this behaviour, please, thanks. Graham Hobbs -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- John McKown Maranatha
Re: Annoying ISPF prob
You probably, somehow, set M as an initial macro. Bring up a member in edit as you are now doing. Look up at the top row. See the Edit_Settings, which is 3rd from the left? Place your cursor on that and press ENTER. This brings up a dialog box. The first field in that is labelled User session initial macro. It __should__ have an M in it. Blank that field out. PF3 out of the dialog. You should no longer get those messages when you do an E on a member. Another possibility is that your edit profile has an IMACRO set. Edit a member and enter IMACRO NONE on the command line (without the marks). You can tell this from the command: PROFILE 20 to see if there is an IMACRO in the edit profile. On Fri, 2012-01-27 at 19:28 -0500, Graham Hobbs wrote: Hello, Newbe again .. I have three TSO/ISPF sessions going. Only one gives me this problem. I didn't consciously cause it. .. am wanting to edit a pgm in CBL.PGMS (prob is also true for CBL.CPYBKS, etc in this session), so I put 'e' as follows.. DSLIST - Data Sets Matching CON*1 Member processed Command === Scroll === CSR Command - Enter / to select action Message Volume --- CONRAD.CBL.CPYBKSEdited VPMVSC eCONRAD.CBL.PGMS Edited VPMVSC CONRAD.CBL.PGMS1 VPMVSC CONRAD.CBL.PGMS2.VIC VPMVSC CONRAD.GHTEST VPD91C .. which gets me to a member list where I put 'e' on a member (big E makes no difference) .. ss EDIT CONRAD.CBL.PGMS Row 00025 of 00053 Command === Scroll === CSR Name Prompt Size Created Changed ID _ STEPH01 322 2012/01/24 2012/01/26 09:47:31 IBMUSE2 _ STEPH033520 2012/01/24 2012/01/27 17:59:16 IBMUSE1 e STEPH101329 2012/01/24 2012/01/26 09:49:27 IBMUSE2 _ STEPH152206 2012/01/24 2012/01/26 09:49:46 IBMUSE2 _ STEPH40 386 2012/01/24 2012/01/26 09:50:06 IBMUSE2 _ STEPJ302219 2012/01/24 2012/01/26 09:51:15 IBMUSE2 .. hit Enter expecting to get the pgm in edit mode but I got .. IKJ56500I COMMAND M NOT FOUND *** .. hitting Enter again I got 'Macro does not exist' and an 'M' on the cmnd line .. EDIT CONRAD.CBL.PGMS(STEPH10) - 01.02 Macro does not exist Command === MScroll === CSR ** * Top of Data ** 01 *``STEPH10 02IDENTIFICATION DIVISION. 03PROGRAM-ID. STEPH10. .. only after I clear the M can normal editing can be done:-( I don't even know what to google for this. How can I stop this behaviour, please, thanks. Graham Hobbs -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: IPLs and system maintenance was Re: PDSE
IBM once owned the Stratus line, a competitor to Tandem, and called it the System/88. http://en.wikipedia.org/wiki/Stratus_Technologies On Sat, 2012-01-21 at 14:19 -0400, Clark Morris wrote: On 21 Jan 2012 08:07:01 -0800, in bit.listserv.ibm-main you wrote: On 01/21/2012 07:54 AM, Peter Relson wrote: how does IBM suggest doing a compress on a Linklist lib that needs compressing, inquiring minds would love to know There is no suggestion. This is simply not an operation that is supported or can be supported in general. Peter Relson z/OS Core Technology Design So the only functionally-equivalent, officially-sanctioned way to accomplish this goal is still to (1) create a new dataset with a different name and copy the data to it, (2) modify PARMLIB LNKLST defs to replace the old library in linklist with the new at next IPL, (3) IPL. And if for some reason you really must have the original dataset name, repeat the process to get back to the old name. All the other techniques that have been described here in the past to achieve this and bypass or defer the need for an IPL either don't guarantee the new library will be seen by all address spaces or carry some risk. While those of us who have been around long enough are fairly certain of specific cases at our own installation where the risks of alternative methods are small enough and acceptable, it is understandable that IBM does not wish to endorse techniques whose success depends on SysProg competence and judgement and also in many cases upon the tacit cooperation of Murphy in keeping unrelated system failures from occurring in a narrow transition window during which libraries and PARMLIB might be in a state where successful IPL and recovery from system failure is not be possible (without an independent z/OS recovery system). This discussion reminds me of when I was in a shop that had both Tandem and an IBM mainframe. The notice for a systems maintenance upgrade on the Tandem was that the operator would institute a simple procedure at a specific time with no outage. I think at one time IBM owned a computer company (Sequent?) that claimed to be able to do the same thing. I know that I was impressed by the Tandem capability. Clark Morris -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: z/OS version of NetCat or native JCL support
There is, IMO, a lot of stuff missing from z/OS UNIX. Such as the initially mentioned netcat command. On Tue, 2012-01-03 at 17:35 -0700, Gerard Nicol wrote: That would imply that you need to be talking SMTP to get the data from the z/OS SMTP server to the remote SMTP server. For this to work for my requirement the traffic would have to be relayed transparently, but it's kinda along the lines of what I was looking for. I can't believe that IBM didn't provide a APPC connection to their TCP address space, if they did you could just IEBEGENER data to a remote SMTP server (or other service) from JCL without having to spool the data or extend JCL. That has to be a trivial amount of programming for a huge increase in capability. Gerard -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
IBM manual formats
I like having IBM manuals be readable in electronic form. Personally, I prefer using the Web and BookManager format over PDF. But I cannot easily download those and view them offline. On the other hand, the PDF manuals are a royal PITA to me, except on my Kindle DX. Which is why I have a Kindle DX. They are a PITA because PDFs are formatted as a portrait mode, letter (or maybe A4) sized page. And since many of the manuals are two column, that means paging up and down while switching sides to read. The problem with the BookManager format, in addition to the not offline, is that I sometimes cannot read the diagrams. They aren't formatted correctly. Now, one of my favorite magazines has gone digital only. I have an Android app on my Xoom tablet which displays their magazine like a regular magazine - letter sized portrait. HOWEVER, they also have .mobi and .epub formats for reading on cell phones and other devices. I am wondering how difficult it would be for IBM to publish their manuals in .mobi or .epub format. This would make them much more readable on cell phones or other media such a the newer Kindles or Nook ebook reader. It would even help on netbooks, laptops, and desktop as it wouldn't force the letter sized pages onto a device which cannot render them nicely. Just a thought. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: cpu / machine identification
On Sun, 2012-01-01 at 12:23 -0500, Scott Ford wrote: Brian, Yep the India support get back to you doesn't set well with me as a vendor. We get back to our customers ASAP. Also want to add, don't expect the Support to know anything. Been on the phone with a certain ISP and had to tell them how to shoot the problem. Regards, Scott Sent from my iPad Not just India, per se. It's the vendor, regardless of country. We in z/OS support, for some reason, are tasked with a distributed application, which replaced a z/OS application. It runs on a Tomcat server on Linux, and a Windows server. It uses Oracle as some sort of index for data files kept on a NAS box. They also support the application using MS SQL. We want to convert from Tomcat/Linux with Oracle to Tomcat/Windows with MS SQL (I don't know why). The vendor DOES NOT KNOW HOW TO DO THIS! They are asking us for things like the Oracle schema ( or maybe its the data: 3 Terabytes). WHAT??? It's __their__ schema. They don't know how to copy the data in the Oracle database into an MS SQL database. I'm not really in this discussion, so maybe I'm missing something. And don't intend to try getting into, because our DBAs are now outsourced. I really don't want to bother with that headache of talking to the US reps of a Dutch company to tell an outsourced DBA what needs to be done. Oh, my. I'm would be homicidal in about 5 minutes. I don't suffer fools gladly. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
IDCAMS APF auth question.
I am writing a program which will ATTACH IDCAMS to do some things. I have been reading: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2I2A0/D.1 which goes over the commands which require APF authorization. I have one question that perhaps someone here knows the answer to. The above states: quote An address space that calls IDCAMS to issue any of these commands must be APF authorized, or the command will terminate: * ALLOCATE command to allocate an SMS-managed data set /quote What is the meaning of the second allocate in that sentence? Does it mean create as in allocate a new or does it mean the more generic allocate as in do a dynamic allocation even if the dataset already exists? I know, try it and see. When I get to that point, I will. I'm writing a UNIX command (in HLASM) which runs IDCAMS from a UNIX shell prompt. I'm still in the design stage on what I want it to look like in terms of options and arguments. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: IDCAMS APF auth question.
Guess I was a bit too vague. The ALLOCATE I was talking about was the IDCAMS control statement. My current plan is to allocate the SYSIN DD to /dev/fd0 (stdin) and SYSPRINT to /dev/fd1 (stdout). Unless the are redirected by some sort of option. I'm still in the design phase of what I want the command to look like in terms of command line. On Thu, 2011-12-29 at 21:35 -0500, Scott Ford wrote: John, I would say you will have to allocate the sysin dataset and sysprint. I have called in COBOL via bpxwdyn allocating sysin and sysprint, but wasnt idcams. I don't see why you couldn't do the same for idcams Sent from my iPad On Dec 29, 2011, at 7:50 PM, John McKown joa...@swbell.net wrote: I am writing a program which will ATTACH IDCAMS to do some things. I have been reading: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2I2A0/D.1 which goes over the commands which require APF authorization. I have one question that perhaps someone here knows the answer to. The above states: quote An address space that calls IDCAMS to issue any of these commands must be APF authorized, or the command will terminate: * ALLOCATE command to allocate an SMS-managed data set /quote What is the meaning of the second allocate in that sentence? Does it mean create as in allocate a new or does it mean the more generic allocate as in do a dynamic allocation even if the dataset already exists? I know, try it and see. When I get to that point, I will. I'm writing a UNIX command (in HLASM) which runs IDCAMS from a UNIX shell prompt. I'm still in the design stage on what I want it to look like in terms of options and arguments. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: cpu / machine identification
On Thu, 2011-12-29 at 20:32 -0600, Brian Westerman wrote: I didn't realize that a employee can bind the site, but I can see where that might actually be the case. I can imagine what would happen to a site like IBM in Dallas, should Microsoft or Corel say, we're coming on Tuesday to check every one of your machines. That would be very interesting. Brian Reminds me vaguely of an internal auditor who wanted access to the z/OS system in order to verify that it was not compromised by Windows viruses. Was incensed that z/OS did not have any virus scanning software installed. Literally __could not__ understand why a Windows virus couldn't infect the mainframe. software is software and a system is a system. Didn't understand that the z wasn't Intel compatible. Complete IT idiot. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: cpu / machine identification
We do our DR under z/VM. But we don't ask that the serial number be altered. Unless otherwise specified in the VM guest definition, the CPU serial number presented to z/OS is the hardware CPUID. IIRC, you can tell z/VM to emulate the serial number, but not the machine type. I.e. if you run on a z9BC at home, and a z10EC at DR, the machine type will still be a z10EC even if the CPUID is changed. Again, going by old memory, this is due to the differences in hardware recovery. On Thu, 2011-12-29 at 20:42 -0600, Brian Westerman wrote: We have DR support in our software, but I was under the impression that most of the DR sites were running the OS under VM and they simulated the serial anyway. I suppose their are sites that do not run the DR under VM, but don't the sites who don't run under VM know the serial number ahead of time, and wouldn't it be already built into the software, or they have a already setup job to enter the new serial(s)? I know I would have it set up if it were me. This also has nothing to do with the question, but I have always thought that the vendor should be compensated for support of the DR testing anyway. (this will probably cause a lot of angry responses). It's a separate processor and the vendor has to support a problem that might occur on it just like they would if it were the primary processor, which may not have the issue. If that were the case, then the vendor has to support your DR test for free. Now if you are paying $50k for the software, it's probably a reasonable expectation, but if you are paying $2K to $5K it's not as reasonable. I received an email between my last response and this one that said (a lot of things, but basically) that many sites (the grater percentage) don't know what they pay for their software because a) it's done by another department or their boss, or b) they only think about it when they first license the product and don't think about the cost involved until they either run low on budget and are trying to save some amount or they have a problem that makes them unhappy with the product that they are currently paying for. Is that true across the board with you people? Brian On Thu, 29 Dec 2011 17:39:58 -0500, Scott Ford scott_j_f...@yahoo.com wrote: ZMan I am pretty well versed in pc/unix/mf and learning Appleseed... Btw I wasn't a fan of CPU/serials because DR was such a pita without new product patches,etc for new CPUs.. Sent from my iPad On Dec 29, 2011, at 2:40 PM, zMan zedgarhoo...@gmail.com wrote: On Thu, Dec 29, 2011 at 10:25 AM, Scott Ford scott_j_f...@yahoo.com wrote: As A vendor I understand the CPU/serial situation but one has to consider the less than honest customers and 'yes' I have experience that also Sent from my iPad ...points to the liabilities of communicating using mobile devices? :-) -- zMan -- I've got a mainframe and I'm not afraid to use it -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: IDCAMS APF auth question.
Thanks! I didn't even think to read that section of the manual. Tunnel vision on the APF section. My bad. Now I really wonder why the ALLOCATE verb even exists. I guess I can understand about not allocating an existing dataset, due to it possibly be in use by another job. Perhaps it's for output via the OUTFILE subparameter. Hum, really need to think about that. On Fri, 2011-12-30 at 11:02 +0800, Cobe Xu wrote: Hi. z/OS DFSMS Access Method Services for Catalogs: Chapter 4. ALLOCATE: Access method services identifies the verb name ALLOCATE and attaches the terminal monitor program (TMP) that runs Time Sharing Option (TSO) commands in the background. The ALLOCATE command *should be used only to allocate new data sets to the job step*. If you use ALLOCATE through access method services for anything else (the handling of SYSOUT data sets, for example), you can get unpredictable results. Refer to z/OS TSO/E Programming Guide for additional information on using this command. Table 2 on page 29 separates the parameters to that you should use under access method services from the parameters that cause unpredictable results. HTH.. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: cpu / machine identification
On Thu, 2011-12-29 at 21:08 -0600, John McKown wrote: Depends on what they want to do. HIPAA is a big deal in my shop. If they just want SMF data, I normally run the job to create the dataset for them and send it to them. No big deal about that. If they want a sysprog level access (which has never happened), well, I'll do what I'm told. But if it were me, I'd tell them to get a court order, siting HIPAA. And get lots of legal documents signed by somebody like the president or other high officer of the company. Maybe even many somebodies. sed 's/siting/citing/g' -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: cpu / machine identification
Depends on what they want to do. HIPAA is a big deal in my shop. If they just want SMF data, I normally run the job to create the dataset for them and send it to them. No big deal about that. If they want a sysprog level access (which has never happened), well, I'll do what I'm told. But if it were me, I'd tell them to get a court order, siting HIPAA. And get lots of legal documents signed by somebody like the president or other high officer of the company. Maybe even many somebodies. On Thu, 2011-12-29 at 20:03 -0600, Brian Westerman wrote: I'm sorry Schmuel, normally I agree with your point on things, but I really have to disagree here. It's not like I have no experience with other sites, we have hundreds of clients, and I have been to well over 80% of them in person, and I can state without much worry that the percentages would not be on my side that the far greater percentage (approaching 100%) would never agree to giving a vendor access to their site to check up on them. Even when we go to a site as the IBM people, they go way out of their way to make sure that we stay focused on the problem and don't just look around. As a non IBM vendor, it would be even less likely that the client would just open their site to us. In this case I hardily agree with the view that the the vendor would be told to go pound salt. Imagine the security issues that would have to be dealt with to just give them an ID that has the capability to check. Brian -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Eight-character TSO Userid Support:
On Tue, 2011-12-27 at 01:08 -0500, Robert A. Rosenberg wrote: At 10:21 -0800 on 12/26/2011, Edward Jaffe wrote about Re: Eight-character TSO Userid Support:: Application environments are responsible for supporting whatever the current architected userid length is. It has been asserted that TSO is the only z/OS application environment in 2011 (soon 2012) that can't handle that fundamental requirement. I'm trying to discover if that's a true statement. None of the responses I've received thus-far have offered anything to disprove that assertion. If true, fixing TSO will provide *complete* eight-character userid support for z/OS. The problem with allowing TSO to use 8 Character USERIDs is that it makes some TSO commands fail. Jobnames are 8 characters max. Submit (at least ISPF Automatic Submit) adds a one character suffix to the UserID and thus breaks if the UserID is 8 Characters (since that would result in an invalid length 9 character JOBNAME). Also OUTPUT (used by ISPF 3.8) validates that the JOBNAME is UserID+1_Character and thus would not be able to handle 8 character UserIDs. I would think that the TSO SUBMIT could be gotten around rather easily, for IBM. But due to OCO might be a bit difficult for the average shop. Especially if they are like where I work. We don't do exits very much any more. If it is not customizable via PARMLIB or an options type module, then it cannot be done at all. We do use the IKJEFF53 exit to allow users to do OUTPUT / STATUS / CANCEL of jobs which do not conform to the userid+1 job name restriction. Not that anybody in our shop ever uses those commands, other than myself on rare occasion. We secure jobs using SAF/RACF with JESJOBS and JESSPOOL profiles. This exit would likely go away if anybody really knew that it existed. Everybody else where I work uses only SDSF. I'm weird grin. I like to use a UNIX shell a bit. And I use Dovetailed Technologies' fromdsn command to copy SPOOL output to a UNIX file. I use the tsocmd command to purge the job output (CANCEL ... PURGE). I'm thinking of trying to write an rmjes command just to have a UNIXy way to purge output. And because using TSO commands from the UNIX shell just irritates me. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Eight-character TSO Userid Support
On Sun, 2011-12-25 at 23:17 -0500, Robert A. Rosenberg wrote: At 19:20 -0600 on 12/24/2011, Paul Gilmartin wrote about Re: Eight-character TSO Userid Support: Hmmm. How many upper-case alphanumeric characters would be needed to provide unique identifiers for all the files an enterprise would ever need? By that metric, 44(8) is more than sufficient. A dataset name is up to 44 characters long but that is based on a set of 36 characters (26 letters and 10 numbers) CURRENTLY broken up into 1-8 character blocks separated by periods. The 8 character blocks are composed, if I remember correctly of 1 Alpha (A-Z) followed by 0-7 Alpha (A-Z) and Numeric (0-9) characters. There may also be some special characters in addition to the 36 (I forget). Each node is 1 to 8 characters. First character is alphabetic or a national character, of which there are three: @#$ in U.S. The other seven characters may be any of those plus the digits 0 through 9 and a dash (-). The dash threw me, when I first saw it. I don't know when that became legal in a DSN. For GDG Datasets, the limit is 39(8) since the last 9 are required for the .GVyy suffix to the GDG File Base Name. What do you mean by 44(8) anyway? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Eight-character TSO Userid Support
What PARMLIB member is it that allows 8 characters between periods? I just can't seem to find it. On Mon, 2011-12-26 at 09:00 -0600, Paul Gilmartin wrote: On Mon, 26 Dec 2011 08:00:17 -0600, John McKown wrote: snip There's a PARMLIB option that allows the use of far more than 36 (39?) (40?) and removes the 1-8 character blocking requirement. snip -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Eight-character TSO Userid Support
Got it. Thanks! Not at all what I was thinking it might be. On Mon, 2011-12-26 at 17:13 -0600, Paul Gilmartin wrote: On Mon, 26 Dec 2011 16:04:01 -0600, John McKown wrote: What PARMLIB member is it that allows 8 characters between periods? I just can't seem to find it. On Mon, 2011-12-26 at 09:00 -0600, Paul Gilmartin wrote: On Mon, 26 Dec 2011 08:00:17 -0600, John McKown wrote: snip There's a PARMLIB option that allows the use of far more than 36 (39?) (40?) and removes the 1-8 character blocking requirement. I know it's been discussed here; I may misremember the details. Before I posted, I searched publibz; the closest I found was a peripheral mention in: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/dgt2c190/8.6.5.1 RCF submitted suggesting cross-reference to ??? publication or section. It might have been better just to suggest naming the PARMLIB field. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
ISO updates C standard - The H Open Source: News and Features
A Christmas gift from ISO: http://www.h-online.com/open/news/item/ISO-updates-C-standard-1400814.html Article has a link to a PDF with the draft standard. http://www.iso.org/iso/iso_catalogue/catalogue_tc/catalogue_detail.htm?csnumber=57853 for the real standard. Which costs money to buy. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: 2 STC running on different GMT zones
On Sat, 2011-12-17 at 10:04 -0600, Paul Gilmartin wrote: On Sat, 17 Dec 2011 08:20:44 -0600, John McKown wrote: 00 21 * * 1-6 echo some_command | TZ=Australia/Canberra at midnight Could you use a UNIX crontab entry to nudge your STCs? -- gil You'd still have the problem of the timezone for jobs submitted by the STC. z/OS non-UNIX does not have a way to inherit the TZ offset. It should. Simply, if the STC process is dubbed and the TZ environment variable is set, TIME TZ=LOCAL should honor it. You're talking UNIX. I'm talking batch job submission. The TZ is inherited only if the originator does a fork() or spawn(). Which is not how, in general, z/OS job schedulers work. They submit JCL through the internal reader to run in an initiator. The TZ, if any, set in the process doing the submit is not inherited by submitted job. CA-7, our scheduling package, doesn't even use UNIX services. It's not dubbed as best as I can tell from looking at the SDSF PS screen. Our batch jobs aren't UNIX either. Just plain old COBOL batch. The only things we really use UNIX for is the TCPIP stack for TN3270 and ftp. Oh, and sending SNMP messages to our automated ticketing system if a production job has a problem. There are more than the two time zones TIME supports. OS X has 440; Solaris 453; Ubuntu 879 (after filtering out multiply-linked). Adapt or die. (Echoing a theme many of us know well in our workplaces. See DKM's posting 18 hours ago; don't give the airline magazines ammunition.) IBM has chosen to sacrifice z/OS. At least as far as smaller shops go. I guess the large multinationals may continue to use it. But where I work? No. We just aren't profitable enough to IBM. We're not large enough to succeed, in their play book. z/OS is the Bentley of operating systems. http://www.bentleymotors.com/ . The lowest priced Bently that I found was over US $180,000. They go up rapidly from there. Windows has won the lower and mid range war, as best as I can tell. -- gil -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: 2 STC running on different GMT zones
On Sat, 2011-12-17 at 03:17 -0600, Paul Gilmartin wrote: snip We have a crontab entry similar to: 00 21 * * 1-6 echo some_command | TZ=Australia/Canberra at midnight in Colorado to cause a job to run at midnight in Canberra year round, accommodating semiannual time changes. All the local timestamps will appear in Canberra time, etc. (For z/OS, the TZ argument is less intuitive.) Could you use a UNIX crontab entry to nudge your STCs? -- gil You'd still have the problem of the timezone for jobs submitted by the STC. z/OS non-UNIX does not have a way to inherit the TZ offset. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: 2 STC running on different GMT zones
On Fri, 2011-12-16 at 11:59 +, CUNY Yann wrote: Hi all, Here's my problem : We set up a scheduling LPAR to schedule all our production (Z/OS 1.11 - TWS 8.5). On this LPAR, we have many TWS instances (3 For France, 3 for the rest of the world). As you know, paris is on GMT+1. But we have to schedule some jobs for our Japan teams So, my question is : Is it possible to have 2 STC running with different GMT zones ? Regards, Yann Not using standard z/OS facilities. There are products which can be used. I vaguely remember one called HourGlass. But the problem then comes up with the STC which is running it submits a job. The time stamps in the job will be according to the actual system local time offset, not the STC's offset. In your case, is there any chance of running the local time as GMT (offset +0) and scheduling everything using GMT instead of the user's local time? Of course, this means that the user needs to do the time conversion themselves. Last time I tried this, I was yelled at. The only way to have separate offsets is to run on separate images (LPARs). -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Is there an SPF setting to turn CAPS ON like keyboard key?
On Wed, 2011-12-14 at 17:21 -0800, Cris Hernandez #9 wrote: yeah, TRANSLATE works to change it after the user hits enter, but I want characters to show in caps as soon as the character is typed, for visual purposes more so than anything else, and do so in both panel displays and spf editing. also wondering if panels have the ability to enlarge font size by row. This simply cannot be controlled from the z/OS side of things. There is nothing in the 3270 data stream architecture for this type of functionality. Now, with HLLAPI on the PC side and some tricky coding, you might be able to get something working. But this would be specific to the PC emulator with your mods in it. So if somebody else tried, it wouldn't work. Or if, like us, your emulator is supported by desktop support and they make a change, POOF! there goes your customization. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: TSO on z/OS 1.12 with LOGONHERE and multisystem logon
Nice little snip of code. Thanks. I was thinking of something along those lines, but hadn't really looked into the details. On Mon, 2011-12-12 at 08:13 +, Tidy, David (D) wrote: Hi Jon, To address the Console issue here, we force the SDSF variables on the way in with this code: sysname = mvsvar('SYMDEF','SYSNAME') isfcons = userid()||RIGHT(sysname,1) isfsysid = sysname Address ISPEXEC VPUT (ISFCONS ISFSYSID) SELECT PGM(ISFISP) PARM(option) Of course it might need tinkering to guarantee uniqueness, and we also have code in system automation to avoid conflict there. Best regards, David Tidy IS Technical Management/SAP-Mf Dow Benelux B.V. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Pinnacle Sent: 9 December 2011 23:49 To: IBM-MAIN@bama.ua.edu Subject: Re: TSO on z/OS 1.12 with LOGONHERE and multisystem logon On 12/9/2011 3:03 PM, Veilleux, Jon L wrote: I'm not sure why it would cause an issue. We have had it on for over a year and I have logged on to multiple systems in a sysplex many times. -Original Message- John, SDSF will set the CONSOLE to the userid by default, which is not a problem unless you issue commands. Command responses will be written to the console that first established the id, so if you logon to SYSA, then SYSB, and issue a command from SDSF on SYSB, the response will appear in SDSF on SYSA. Issue the SET CONSOLE command on SYSB to set a unique console. Unfortunately SDSF will save that value into the SDSF ISPF profile, so you have the same problem the next time you use multiple logon and SDSF. They're still working on an enhancement. Maybe next release (we can only hope). If you're a SHARE member, grab the Bit Bucket presentation from Orlando to see my presentation on correctly setting up multiple logon. Regards, Tom Conley -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
TSO multi-logon on multi-system, restricting to specific users?
I don't think there is a way to do this using normal IBM supplied facilities. At present, we propagate the SYSIKJUA enqueue across our entire sysplex via the GRSRNL member. When we convert to z/OS 1.12, I am going to remove this entry from the RNL. This will allows a single TSO user to logon to every system in the sysplex concurrently. I am setting up ISPF properly as well. But, if it is easy, I would like to restrict who can logon to multiple systems concurrently. Note, I must allow everyone to logon to all systems for support purposes. But I only want __concurrent__ logons for a few support people. In particular, I want the programmers to logon only to one system at a time, while Production Control and Tech Services can logon to all systems concurrently. Why? Because I have some programmers who abuse the system by doing batch like work under TSO. If they could do both normal ISPF work and batch like work by being logged on to multiple systems, they would. And we simply cannot afford the CPU overhead. We are CPU poor and have a directive to reduce CPU utilization to reduce software cost even if it reduces productivity. Or, best, let them do batch like work in batch so that it can be scheduled by contending for open initiators. Yes, I know, in general, how to do this by doing a SAF call and possibly a SYSTEMS level ENQ in the TSO logon exit. We don't want exits in z/OS. They must be maintained. I could say more as to why this is undesirable, but won't. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: TSO multi-logon on multi-system, restricting to specific users?
Good idea slapping head. I do that sometimes to enforce job single threading because we've set some job classes to allow duplicate job names in execution. I don't __think__ that I would ever need to allow some programmers to do concurrent logons while restricting others. On Sun, 2011-12-11 at 10:53 -0600, Steve Horein wrote: A DISP=OLD zero track SYSUID dataset in a programmer only logon proc? -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: TSO multi-logon on multi-system, restricting to specific users?
I suppose that I could test the SYSUID in our TSO logon REXX program and have a system-unique ISPF profile for those few who will normally need multisystem logon. I definitely do __NOT__ want it in general. I'll have programmers and actuaries crawling over my dead body about ISPF doesn't always save my changes any more. And I'd rather try to train a chimp rather than some of our users. On Sun, 2011-12-11 at 11:28 -0600, Mark Zelden wrote: On Sun, 11 Dec 2011 09:44:37 -0600, John McKown joa...@swbell.net wrote: But, if it is easy, I would like to restrict who can logon to multiple systems concurrently. Note, I must allow everyone to logon to all systems for support purposes. But I only want __concurrent__ logons for a few support people. In particular, I want the programmers to logon only to one system at a time, while Production Control and Tech Services can logon to all systems concurrently. As long as you don't enable ISPF profile sharing (which I never did because it is a kludge anyway - see past posts on ISPF-L), it is simple. Just don't allocate a separate ISPF profile based on SYSID in your logon CLIST(s).Now, the savvy user could free the one allocated in the CLIST and allocate their own prior to ISPF invocation if you are set up for such things - or from TSO ready after the ISPF failure on the 2nd system etc., but I never ran into that problem. It wasn't that we wanted to protect multiple system logon at my client when I did it back in 1998, we just didn't want to confuse everyone when they lost ISPF settings due to new profiles that were SYSID specific. So a check was put in the logon CLIST based on userid patterns. We also happened to be changing the standard at that time, so all new users (in addition to tech staff) were able to get the multi-system logon. BTW, you've probably seen it by now - but maybe you haven't - so I'm including a link to my doc from CBT file 434 / my web site on setting this up and caveats. It's the $SNGLTSO link in the JOBs/Doc section of my web site: http://www.mzelden.com/mvsutil.html http://www.mzelden.com/mvsfiles/$sngltso.txt Regards, Mark -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IEE600I REPLY TO 01 IS;SUPPRESSED
If the WTOR has a routcde of 9 (security), the the reply is not displayed and you see the SUPPRESSED in the log. The only way that I can think of to get around this is some sort of MPF exit to remove the ROUTCDE 9 indication. On Dec 9, 2011 8:10 PM, Lim Ming Liang limm...@unifi.my wrote: Hi, Anyone know how to enable the REPLY being displayed on the syslog ? -- Regards Lim ML --**--**-- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/**ibm-main.htmlhttp://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: ROOT file system is out space
Total agreement. Updating the running system is dangerous. I did so once by mistake (luckily it was my sandbox). I suffered an outage because an update to a LINKLIB module required a corresponding update to an LPALIB module. When somebody did an LLA REFRESH, the system died. I don't know if this can happen with UNIX, but at the least, if the SMP/E job fails, there could be incompatible files in the filesystem. Your gun, your bullet, your foot On Mon, 2011-12-05 at 20:16 -0500, Shmuel Metz (Seymour J.) wrote: In 4edd3dab.5070...@bremultibank.com.pl, on 12/05/2011 at 10:54 PM, R.S. r.skoru...@bremultibank.com.pl said: Why do you think so? Because it's a ticking time bomb. But it's not my dog. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: What SMF record types an formats does ACF2 write?
On Tue, 2011-12-06 at 01:47 -0800, Dale Miller wrote: John McKown wrote: With Z/OS, Windows, and Mac OSX, I don't even have a change to understand some of the internals. Read Mac OS X Internals by Amit Singh- Addison-Wesley 2007. Also the source code for Darwin (OS/X) is downloadable from Apple. Not to defend Apple, but it is interesting to note that Apple refers to internals as implementation detail, and discourages attention to internals by noting that implementation details are subject to change, and that depending on implementation details in applications leads to migration difficulties. I don't like using undocumented internals. That's why I like GNU/Linux. OK, it's not really documented. Unless you go with source==documentation. And talk about not guaranteed to stay consistent. Well the binary API to userspace is fairly consistent. And usually backward compatible. In z/OS, I stick with GUPI defined interfaces. It's much safer. Especially since my boss said he'd hang me out to dry if I ever make the system dependent on a non-GUPI interface. That said, any vendor whose software writes undocumented SMF records is not playing cricket. If the SMF records are to be useful me, they have to be documented. If they're not useful to me, I'll turn them off, and they won't be useful to the vendor. Dale Miller And, from what I've been told, if you run CA's CAS9 (RIM) (and who doesn't), it will front end IBM's SMF processing in such a way as to cause the records to be produced, regardless of anything you do. Of course, the actual writing of them may be suppressed. But not the production of the record. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Ziip on Z9 BC running on z/OS 1.9
Every LPAR on your z9BC has a profile which defines it's resources. Such as how much memory it has and the number of CPs it can use. Another of the resources is how many zIIP engines it can use (likewise for zAAP engines). You need to edit the LPAR definition to include zIIP engines. This is done from the HMC. Don't ask me how, if you don't know, I don't want to be responsible. Anyway, once you've done that, you must take down z/OS in that LPAR, deactivate the LPAR to release it's profile and resourses, then activate the LPAR with the updated profile to include the changes (this would be true to increase the number of CPs or the memory size too). Once successfully activated, you can reIPL z/OS in the LPAR. On Tue, 2011-12-06 at 09:46 +0300, Azim Syed wrote: Dear All, I enable Ziip on our machine but I can see it active on any LPAR , do I have to do something on HCM console please help. Azimuddin Syed System Software Support Saudi Arabian Airlines Jeddah Saudi Arabia -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: What SMF record types and formats does ACF2 write?
CA-SORT is still available. I don't think there are many external users. CA may use it internally in some of their products to be independent of the differences in DFSORT vs. SyncSort. On Mon, 2011-12-05 at 21:00 -0800, Ed Gould wrote: Charles: I worded that poorly and agree with you. ALthough outside of report writers I can' think of any other reasons for needing them. But again why not have them freely available for all? There are no secrets to be gained from the records as each installation (at least in the case of ACF2) write rules for dataset usage so indeed the information seems limited to the installation to understand and interpret them. The only possible information to be gained is possibly sort SMF records and that if you are attempting to write your own sort. With DFSORT and SYNCSORT are the only two sorts available there used to be another one but have not heard anything out of them in probably 20+ years (maybe more). Ed -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: What SMF record types and formats does ACF2 write?
I agree. Unless, of course, all customers sign an NDA, the formats will eventually become known. I also don't understand vendors who don't have their general documentation about their products freely available in some format. I prefer PDF format due mainly to ubiquity. I understand, a bit, not having logic manuals available. Of course, this lack is one reason I am a Penguinista (Linux user). I may not know how all parts of Linux work (I don't!) and I may not ever know. But at least I have a chance. With z/OS, Windows, and Mac OSX, I don't even have a chance to understand some of the internals. Of course, this helps the few because they have the money to invest to get the licensed documentation in order to try to compete. I would say more, but I'd get even more off-topic. On Mon, 2011-12-05 at 17:43 -0800, Ed Gould wrote: Scott, Well IBM does this in their freely available SMF records layout manual. The very idea that a record layout should not be public information is in my mind close minded. Ed -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: WLM interface
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/iea2w2b0/48.0 quote The IWMRESET macro allows the caller to perform the same functions as the RESET system command. If the system is running in workload management goal mode mode, the caller can: * Change the service class of work currently in execution, with the SRVCLASS keyword. Resetting to a new service class also resumes quiesced work. * Quiesce work currently in execution, with the QUIESCE keyword. * Reclassify work currently in execution according to the service policy in effect, with the RESUME keyword. The RESUME keyword also resumes quiesced work. The system does not allow every address space to be reset. The IWMRESET service has the same restrictions as the RESET system command. Refer to z/OS MVS System Commands for more information. /quote On Fri, 2011-11-25 at 12:01 +0100, Vernooij, CP - SPLXM wrote: Hello, I have been looking in all kinds of places, without result. Can someone point me to the assembler interface to change the WLM Service Class of a running job (and similar functions)? Or can this only be done with an E jobname operator command? Thanks, Kees. /prebrFor 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.brbrKoninklijke 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.brKoninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch Airlines) is registered in Amstelveen, The Netherla! nds, with registered number 33014286 brpre -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Help on Rexx Code.
On Sat, 2011-11-19 at 19:03 -0500, Shmuel Metz (Seymour J.) wrote: In camzsll-egewhvg47xjbpr4ov6wgsekwsikzh1rpojmvcxxw...@mail.gmail.com, on 11/18/2011 at 10:35 PM, sunil mirchandani sunilmirchandani1...@gmail.com said: since i am new to rexx so any one can look and suggest me with any sample or written rexx code. I'd start by looking at the REXX code in SYS1.SAMPLIB for calling the Catalog Search Interface (CSI). I'd also read up on the date() function and the parse statement. Please let me know if i am on right forum Since your goal relates as much to MVS as it does to Rexx, IMHO you're better off here. IGGCSI00 is very powerful. But for a newbie to both z/OS and REXX? It may be just a bit too involved. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: STOW macro Location
Most of the macros that are z/OS BCP (Base Control Program) related reside either in SYS1.MACLIB or SYS1.MODGEN. STOW is in SYS1.MACLIB. On Mon, 2011-11-14 at 15:31 +0530, jagadishan perumal wrote: Hi, Could anyone please point me to the STOW macro Library location in Z/os. Where I can see the Assembler codes Responsible for PDS/PDSE directory update by STOW. I referred this Link : http://publib.boulder.ibm.com/infocenter/zvm/v5r4/index.jsp?topic=/com.ibm.zos.r9.ieab200/destow.htm but Not able to find any information on its Code. Regards, Jags -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IODF Mis-Cataloged
On Tue, 2011-11-08 at 18:20 -0600, Ruegsegger, Jeff wrote: I'm wondering if anyone has any ideas about how one might get an HCD created IODF cataloged in the MASTER catalog rather than the usercatalog the ALIAS points to? I deleted it as follows. //DD1 DD UNIT=SYSDA,DISP=SHR,VOL=SER=IODFVL DEL 'SYS7.IODF16.CLUSTER' FILE(DD1) CATALOG(MY.SYSTEMS.MCAT) I can't for the life of me figure out how this may have come about. Any thoughts would be appreciated as one would like to not go down this road again! The IODF does not need to be in the master catalog in order to be used for IPL. In fact, the IODF is only used at IPL/NIP time and not by z/OS during normal operations at all. But if you really, really want it in the master catalog, you __might__ be able to do a REPRO MERGECAT function on the entry in the user catalog, moving it into the master. I'd strongly recommend against doing this! -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: How to enable Storage Protection Override?
Perhaps the question should be: How do I get my program to run in PSW key 9? Other than the normal, privileged, SKPA instruction. Is the appropriate bit in CR3 (PKM portion) set to allow SPKA to set to key 9 by a problem state program? Doesn't appear to be. And I don't see a way to set the PKM in a normal, problem state, APF program. I thought MODESET might, but it doesn't. I guess that CICS does it via their magic SVC. On Fri, 2011-11-04 at 18:40 -0400, Jim Mulder wrote: CICS uses a hardware facility called Storage Protection Override to allow key 9 to store into key 8 (but not vice versa). This is enabled on CICS startup via a parm in the SIT. How can an APF-authorized program enable this same facility for itself? Can't seem to find a macro or equivalent. z/OS always turns on the CR0.39 bit to enable this facility. You don't need to do anything to enable it. However, it does does the opposite of what you think. The facility allows key 9 storage to be fetched and stored using any PSW key. Jim Mulder z/OS System Test IBM Corp. Poughkeepsie, NY -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: How to enable Storage Protection Override?
Get thee behind me, Satan! grin I'm willing to write APF code, if absolutely necessary. But I never fiddled with control blocks other than via an IBM supplied API type interface. I know that vendors sometimes must do such things. But I find it very scary. On Sat, 2011-11-05 at 09:18 -0500, Bill Hecox wrote: You can use MODSET KEY=ZERO to put yourself in KEY0. Then you can modify any storage you have access to which includes the operating system. This can be dangerous. If you modify the wrong area of memory you can cause other programs to fail and they will have a difficult time figuring out what happened. The general practice is to go into KEY0 for only the specfic instructions that you need. Then go back to your normal KEY. MODESET KEY=NZERO . -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: How to enable Storage Protection Override?
On Sat, 2011-11-05 at 14:11 -0400, Jim Mulder wrote: Perhaps the question should be: How do I get my program to run in PSW key 9? Other than the normal, privileged, SKPA instruction. Is the appropriate bit in CR3 (PKM portion) set to allow SPKA to set to key 9 by a problem state program? Doesn't appear to be. And I don't see a way to set the PKM in a normal, problem state, APF program. I thought MODESET might, but it doesn't. I guess that CICS does it via their magic SVC. What were you looking at to determine that Doesn't appear to be? I'm at home and not handy to do a test on z/OS at work right now. I tried to find this out by perusing the manuals, doing searches on PKM. But didn't find anything that said was the default PKM in z/OS was. I don't know if it is not documented, or I just did a poor scan. My usual philosophy on z/OS is if it isn't documented, then it is unknown and liable to change without notice. Well, maybe an APAR's doc would mention such a change. But I rarely depend on test and see if it works or not because I've done that in the past and then it went and changed on me. In most cases, when a task is attached, the PKM in CR3 has the bits set to allow a problem-state program to do an SPKA to the task's key (the key in TCBPKF), and key 9. Thanks. But in most cases leaves open the possibility that some times the PKM isn't set. Again, I don't know where the doc for this is. I may just not have found it. I tried reading a number of the manuals on z/OS 1.13 in areas that I thought were appropriate. Reading IBM manuals for too long causes brain damage grin. Not as quickly as reading MS stuff. That's why GNU doesn't __do__ documentation. big grin. Jim Mulder z/OS System Test IBM Corp. Poughkeepsie, NY -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: How to enable Storage Protection Override?
On Sat, 2011-11-05 at 18:43 -0400, Jim Mulder wrote: snip Let me reword that to say in the environments where problem state application code would be running instead of in most cases. The documentation is under the KEY and PKM parameter descriptions on the ATTACHX macro in Authorized Assembler Services Reference. Ah. I was looking for the wrong thing. I was looking for a way to change my PKM in the currently executing environment. Like MODESET does for CPU keys. But apparently I should be able to freely switch between keys 8 9 using the SPKA instruction. I'm still not sure that is documented as GUPI or not. Yes, I'm a PITA about some of these things. Once burned, twice shy. Jim Mulder z/OS System Test IBM Corp. Poughkeepsie, NY -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SLightly O/T Perl
Wish I could remember. There's something in Java(?) which allows another program to register an intercept so that when a specific statement is executed, the intercept is activated and you come from that statement to your code. Found it: Aspect Oriented Programming http://en.wikipedia.org/wiki/Aspect-oriented_programming Not exactly come from but very different from what I'm used to. On Wed, 2011-11-02 at 16:04 -0500, Turriff, Leslie wrote: LoL! That reminds me, after Edsger W. Dijkstra published his famous paper, Go to considered harmful, of a parody article touting the benefits of a come from statement. :-) Leslie Turriff ITSD 751-3480 -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: BPXI039I and SHRLIBRGNSIZE at 100%
I'm ignorant of this. But did a search in IBMLink. It appears that there are shared libraries in z/OS UNIX which are loaded somewhere? (not documented where). The size of this area is specified in the SHRLIBRGNSIZE parameter. The load modules loaded into this area are .so UNIX dynamic subroutines which are marked as shareable in the filesystem via the +l extattr attribute. This area is them mapped into every UNIX address space into high private. I would guess this would eventually involve IARVSERV. http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2A9B0/5.0 and http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2A6A1/20.0?SHELF=IEA2BKB2DT=20101208204043 The larger the area, the more high private is lost in every UNIX address space which attempts to load a shared library. And the more ECSA is used for mapping tables. It appears that if it is too small, it is not used at all and each shared library is loaded into the user's address space as if it were not shared. This increases I/O. So I guess shared library region size is like an LLA for UNIX shared libraries. But I don't read of any way for obsolete modules to be purged and their storage reclaimed. And there doesn't appear to be any way to actually determine what is loaded. I would guess into some address space or data space controlled by the UNIX kernel. You could find all the possibilities by searching all of your mounted filesystems for files with the extended attribute of l specified. find / -ext l ~/list.of.shared.library.files The above will likely run a fair amount of time. I'd do it in batch. In: https://www-304.ibm.com/ibmlink/sis/viewAparDoc.wss?context=aparAndUsagedocumentIds=OA18803searchWords=SHRLIBRGNSIZElibraryType=Dlc=encc=US quote For a BPX1LOD (loadhfs) syscall request, when the module cannot be loaded as a user-shared library program, it should be loaded into user private storage as non-shared. This is not happening, and the loadhfs() syscall is failing with rsn091E03B7 JRShrStgShortage due to MAXSHAREPAGES being exceeded. /quote https://www-304.ibm.com/ibmlink/sis/viewAparDoc.wss?context=aparAndUsagedocumentIds=OA04183searchWords=SHRLIBRGNSIZElibraryType=Dlc=encc=US quote Change current statement as follows: The storage used in the user address space to establish the mapping to the shared library region is from the high end of private storage; | in most cases, it does not interfere with the virtual storage used by the application program. Add the following paragraph: The amount of storage that is carved out of the high end of private storage of each address space that loads a system shared library object is based on the SHRLIBRGNSIZE parmlib parameter value. If this value is set too high, the storage set aside for the shared library region mapping could interfere with the private storage requirements of each of these address spaces. For this reason, the value specified for SHRLIBRGNSIZE should be the minimum size required to contain all of the system shared library programs that are to be used on the system. /quote https://www-304.ibm.com/ibmlink/sis/viewEskbDoc.wss?context=aparAndUsagedocumentIds=swg21178068searchWords=SHRLIBRGNSIZElibraryType=Elc=encc=US quote Problem(Abstract) What are the consequences (for example, are there abends) of specifying a SHRLIBRGNSIZE that is not large enough for all the shared-library-eligible (that is, have the l extended attribute set) programs that are accessed? Resolving the problem If the shared library cache is not big enough, then z/OS will revert to normal storage use and the load module will be loaded into the broker address space. /quote On Sat, 2011-10-29 at 23:46 -0400, Lizette Koehler wrote: SHRLIBRGNSIZE -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CRLF in Unix being translated on Mainframe to x'25'
On Sat, 2011-10-29 at 19:28 -0500, Shmuel Metz (Seymour J.) wrote: In 2944060858263639.wa.paulgboulderaim@bama.ua.edu, on 10/29/2011 at 03:51 PM, Paul Gilmartin paulgboul...@aim.com said: What's really LF? Move to the same column of the next line, of course. What else could it be? Depends on the printer. 0x0A on many DecWriters did both a CR and an LF function. That's why UNIX defaulted that way, from what I was told. No need to do any character translation or additions if you just did a cp to the device. Of course, Windows via MS-DOS via CP/M-80 used CRLF for the same reason. The PC printers of the day required a separate LF and CR to go to the beginning of the next line. And the CR was done first so that the mechanical time to return the head was taken up by rolling the platten to the next line due to the fact that the CR functino took a significant amount of time compared to the LF or printing a simple character. Again, as I was told. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Lines per page - IDCAMS output
Very true. I sometimes get carried away with my current love. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Lines per page - IDCAMS output
I have some Perl code at work which does things with IDCAMS output. I'm at home. It's 01:00 local time. I need to learn how to sleep again. I hate being old. And yes, I do consider the alternative to be better any more. Of course, as far as reading my Perl code is concerned, all I can say is that it is easier to understand than my APL code was. grin Oh, how I __LOVED__ using APL at college. On Fri, 2011-10-28 at 16:03 +1000, Shane wrote: Hmmm - I'm not altogether sure that I'm comfortable with IDCAMS and efficient being mentioned in the same sentence. Be that as it may, for large runs, I did find that assembler invocations of the CSI were significantly faster than REXX doing likewise. Horses for courses - REXX is fine for quick jobs. But to the task at hand - these days I might be inclined to mangle the output of a LISTCAT with perl to get what was wanted. We've probably all got some REXX that'll do (some of) it somewhere, but perl (or awk) are designed for this sort of thing, and reformatting would likely be easier. After my experiences early last year, I might be inclined to make sure I wasn't feeding VBA into it though ... Shane ... -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Filling in the holes
As I recall the x'81' in the undefined area was a mod by SLAC to the Linkage Editor. I remember it well. Mainly because IBM had a bunch of DS instructions in the MVS CVT. When I did a sysgen one time the system died because the default vol of 0x00 in the DS areas were now x'81'. The NIP logic apparently had a compare against 0 to see if some field was initialized and bypassed further initialization if non-zero. When the slack bytes were x'81', MVS died during NIP. Long ago. This is my best recollection. On Thu, 2011-10-27 at 12:20 -0700, glen herrmannsfeldt wrote: There has been an ongoing discussion on comp.lang.fortran on the initialization of variables, including questions about OS/360 and its compilers. As I understand it, Fortran variables, and DS in assembler, generate holes in the object program (no TXT record for that position), and are filled in either by the linkage editor or program fetch. I believe that early OS/360 versions left whatever happened to be there, either in the linkage editor buffer or, for program fetch, in that memory location. At some time later, possibly for security reasons, this was changed to initialize to zero, or maybe something else (such as X'81'). The actual question is: when was this change made and which programs (compilers, linkage editors, program fetch) were changed? -- glen -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: HFS sharing and rolling product upgrades
On Thu, 2011-10-27 at 16:09 -0500, Kirk Wolf wrote: John, Thanks for your kind words. Much of what we offer owes large success to pesky users who send us feedback and suggestions :-) Your example reminds me that eventually we would like to add an idcams shell command, which would allow: catsearch cicsts*.** |\ cut -d '.' -f 2- |\ sort -u |\ while read i;do echo DEFINE ALIAS(NAME(CICSTS.$i) - echoSYMBOLICRELATE(CICSVER..$i)) done | idcams I would love that! I guess that I could create an idcams UNIX command using REXX and an ADDRESS TSO to run the actual IDCAMS command. But that offends my sense of elegance. Of course, if you like batch, this would easily run under COZBATCH :-) FWIW, you may have noticed that there is a com.ibm.jzos.AccessMethodServices class that provides a callable IDCAMS interface from Java. Nice. But I'd get strung up by my privates if I ran Java on the z at work (despite this, I have 1.4.0, 1.4.2, 1.5, 1.6, and 1.7 beta installed). We have reduced our z9BC to use a group capacity of 35 MSUs. Management wants it down to a max of 30 MSUs by year end to save more on license fees. I would say more, but it would be unwise. And I'm a techie who doesn't understand business. Cheers, Kirk Wolf Dovetailed Technologies http://dovetail.com PS consider using awk to build job to do the whole thing in a pipeline without temp files. Neat. I use awk a bit, but it's not my language of choice. I'm a Perl person. But I tend to avoid much beyond simple scripting due to CPU constraints. *Something* like: snip -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Our community strengths
I agree. And with z/OS, it's even worse than other. Windows is just a pile of shit that management understands why so many techies are needed to keep it running. We run z/OS with 3.5 (manager is a techie part of the time). We maintain much more of the company core business than Windows. But it's invisible because it just works. So management looks at the z as a place to get rid of people because they aren't needed. I actually like UNIX. Well, I like Fedora 15 on my PCs. More than I like TSO. I also like CMS more than TSO. I like a sharp stick more than TSO grin. Of course, running batch reports is not as good as with z/OS. I don't know of much in UNIX which can really match even 50% of CA-7, CA-11, and CA-1. But I admit to ignorance of what is generally available in UNIX for this type of thing. On Tue, 2011-10-25 at 18:36 -0700, Dale Miller wrote: OK, so we squabble, and disagree, but it is my belief that this community has in its membership many of the giants who built a technological marvel that underpins our society today, or at least would do so if management could be induced to extend its event-horizon beyond the current fiscal year, and to start counting real costs. Most of us have plied our trade in an environment where an unplanned outage or functional failure were simply not to be allowed. Because we built systems to perform well and reliably, we were invisible, except when we made mistakes. I'm sure I'm not alone in experiencing the almost- every-day complaint from a clerk in a store that 'the computer isn't working right today'. I believe that we should be getting the word out that computers don't have to act this way, and that we know how to build systems that behave properly. We certainly face an uphill battle against the mind-set among management that leads them to set unreasonable requirements for job descriptions and set the salary schedules far below current going rates. It really gets my goat that they use these machinations to spread the lies that they cannot get skilled IT personnel. See http://online.wsj.com/article_email/SB10001424052970204422404576596630897409182-lMyQjAxMTAxMDIwNDEyNDQyWj.html?mod=wsj_share_email . I retired when I could no longer put up with the asininity of company politics, but if I wanted to continue in my chosen career, I would certainly undertake to build my skills in database, communications, and UNIX, however distasteful that might be. I could go on for hours about the poor design features of UNIX and current email and internet protocols, but if I needed a job, I would swallow my pride and start hitting the books. Of course, with the current political climate regarding Social Security and Medicare, I might have to go back to work. Perhaps I should have made larger private investments, but then maybe I would have invested in Enron, AIG, Lehman Brothers, or Bernie Madoff. Dale Miller -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Display command for JOBS
OWT == Out, waiting. That is, every TCB in the address space is non-executable due to being in a WAIT. And there are no local SRBs. http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/iea2m7b0/4.64 On Sun, 2011-10-16 at 12:46 -0400, Micheal Butz wrote: Hi, Would anyone know when issuing the following console command D A,JOBNAME and OWT is displayed under M/S column What does OWT stand for ? thanks Snide comment: It's not exactly rocket science to find z/OS messages and their explanation. They are pretty much all in the book shelf which is obscurely entitled: z/OS Messages and Codes Bookshelf for the relevant release. The most current of which is z/OS 1.13 and is: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/Shelves/ez2mz940 -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SRB routine
On Sun, 2011-10-16 at 13:07 -0700, Edward Jaffe wrote: On 10/16/2011 6:50 AM, Micheal Butz wrote: Would anyone know if the SRB routine SRBEPA has to reside in common No. I admit to ignorance in this instance, but wouldn't a Global SRB need to be in common storage (i.e. CSA, LPA, etc)? If not, are global SRBs dispatched into a specific address space (MASTER?)? -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: [MVS-OE] compress dataset converting dsname in filename
On Wed, 2011-10-12 at 10:42 +0200, Marco Gianfranco Indaco wrote: Thanks for pax help but I suppose that this does not meet all my needs cause I want to compress lot of files into one and I don't want to copy/pax each file under uss mainly for storage reasons(but also for steps reason*)... for what I know(maybe I'm wrong) create a tmp under mvs is not the same than create a file under USS on a ZFS. Never heard about AMATERSE, seems good for transfer between mainframe only, is correct?(if not may be an idea but for other scenario) True. IBM only. What I'm looking for is something like this(from jcl, for cmd i thought to a file list): //TEST EXEC PGM=---paxAlot ...dds //OUT DD PATH='/somewhere/myfile.tgz',... or DSN=HLQ.MYFILE.TGZ //INP DD * HLQ.A as file_1 HLQ.B as file_2 HLQ.C as file_3 Under USS each file is a VB, is correct? Technically, no. In UNIX, a file has no explicit record structure. It is really just an ordered sequence of bytes (octets actually). QSAM/BSAM has some compatibility code which interprets that sequence of bytes. It can be VB or FB, depending on what the DCB in the program says. (A pax too...?) So customizing filename it's possible(using an exit) restore data in all system maintain DCB attributes (i.e. [REC=FB,LR=80]file_1). pax cannot maintain DCB attributes. The output file structure does not have any place to record that information. Remember, UNIX does not maintain that information about a file. The concepts of LRECL, BLKSIZE, RECFM, etc simply do not apply to UNIX files. That type of information is embedded in the application code (for z/OS non-UNIX code using BSAM/QSAM, specified in the JCL or DCB in the program). And pax only works with UNIX files, not z/OS datasets such as PS or PO or VSAM. As an aside, UNIX text files do not have a record structure either. Each line is the sequence of bytes up to the next x'15' (EBCDIC newline) byte. In UNIX ASCII, the line delimiter is usually x'0A' (LF or LineFeed). In Windows it is usually the two bytes x'0D0A' (CRLF - Carriage Return/Line Feed). I'm not adventuring writing a macro cause I'm not sure that performance will satisfy the effort(... I'd enjoy but have no time and surely I've not the right skill) (*) Actually I transfer to an external server all file, I compress there and I have back a binary tgz(2GB) on a VB file. It's not safe, I know, but works and costs are not bad using only ftp and an external processor. If there is a method to compress all under z/os I can make it safer and have full control of the process. Do you do an ASCII or BINARY ftp transfer? Just curious. What do you do with the tgz file? How do you process the tgz file later? Do you ftp it back to your external server, then unwind the tgz, then ftp the data back to z/OS? How, can you show us the process you use? If you just want to do compressed backups and subsequent restores of z/OS datasets, have you considered doing logical dataset backups and restores using ADRDSSU or FDR? Regards. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Automated SMFDUMP Job issue
Well, as was pointed out off-line. I was wrong. On Tue, 2011-10-11 at 10:23 -0500, McKown, John wrote: I am fairly sure that ADRDSSU is the nth grandchild of IEHDASDR (wasn't that the MVT disk dump/restore?). It does track level dumps and restores of datasets. I don't think it is a front end for any other utility. But, as always, I could be wrong. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Ed Gould Sent: Tuesday, October 11, 2011 10:23 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Automated SMFDUMP Job issue Mike, DFDSS is a fine utility. How ever from what I understand DFDSS just invokes the appropriate utility under covers. If it's aVSAM dataset it uses IDCAMS if it's PDS it uses IEBCOPY. The utilities are passed various parms or ddname parameters like size and bufnd (and the like). To make the utilities run as fast as possible. Ed On Oct 11, 2011, at 2:15 AM, Mike Wood mikeww...@hotmail.com wrote: saurabh, Further to my earlier reply: EDG4010D is issued only when you are using basic backup in rmm, and only when a tape open/close has been delayed for around 10 minutes. This means the backup of the CDS using IDCAMS via EDGHSKP/EDGBKUP is taking too long. Either the CDS is very large or the backup is not able to get the resources it needs to complete promptly. If you must use this backup method, ensure that the job running the backup can get the resources it needs and ensure also that the JCL used includes the changes recommended and provided in APAR OA09584. JCL samples were updated, and the rmm IC also updated. Also see rmm IC chapter 2 Step 18: Updating the Workload Management service definition for DFSMSrmm I still would recommend you use a better backup method, namely BACKUP(DSS). Mike Wood -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu 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 lists...@bama.ua.edu 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Chaos feared after Unix time-zone database is nuked
From what little I understand, it is not really the timezone information, per se. It was, supposedly, using copyrighted information for historical timezone information along with methods of determining the TZ for a given date and place. I'm not into astrology, but true believers in it are very exacting about when and where a person was born. So that they can precisely determine the stellar and planetary configuration as viewed at the instant of birth at the location of birth. The complaint is that the database illegally copied this information from their copyrighted and published information. On Sat, 2011-10-08 at 16:17 -0500, Mike Schwab wrote: For the US. Each country sets it own time zones. In Australia, each state. Maybe we could get the UN or the Astronomical Union to keep track of time zones? On Sat, Oct 8, 2011 at 3:35 PM, Ed Finnell efinnel...@aol.com wrote: Seems like it ought to be a link from NOAA or Naval Observatory time. In a message dated 10/8/2011 10:23:24 A.M. Central Daylight Time, paulgboul...@aim.com writes: Unix time-zone database is nuked -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
GNU software to created indexed PDF available.
OK, maybe old hat, but I just ran into it at: http://directory.fsf.org/wiki/Indexed_PDF_Creator quote Indexed PDF Creator http://hoopajoo.net/projects/ipdf.html Indexed PDF Creator creates indexed PDF documents from text files. It was primarily written as a utility to convert old mainframe print formats to something that can easily be posted on the Web. It allows indexing, customizing page settings, font size, font face, and superimposing text over an image in the case of using pre-printed forms. It supports unlimited levels of indexing bookmarks in documents and system/user configuration files /quote -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: WTO Sample Program
IMO, QEDIT is the proper way to go. hanging a WTOR to do normal operator interaction is easier (less code), but does not seem as professional to me. Perhaps it's because I get calls, at times, from newbies who ask There's a reply required to a message. What do I do?. I don't like replying Ignore it.. That can then become their general attitude: Hum, I don't know what that means, but I'm told to ignore that type of message, so I will. And, of course, they do it for the worse possible WTOR. And then finally call when the system comes to a dead halt, usually after an hour or so of non-productive waiting. I wish that the MODIFY command worked more like VSE's STXIT OC. The Modify requires that you either WAIT or check the ECB. I wish it would drive an interrupt routine instead. On Thu, 2011-10-06 at 10:19 -0500, Shmuel Metz (Seymour J.) wrote: In 1285172949175994.wa.wfarrellus.ibm@bama.ua.edu, on 10/05/2011 at 01:36 PM, Walt Farrell wfarr...@us.ibm.com said: But if you really did mean that you want the operator to send a message (to someone), and get a response, nothing I've heard of allows that. An application can use QEDIT to enable the operator to send it a message with MODIFY. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Rename of DDname ?
I don't think you can do a rename of an existing DD name. However, if you have a driver program doing the allocations, perhaps you can change it. Instead of allocating, say, SYSUT1. You allocate some unusual name, perhaps #SYSUT1$ (just to pick one). Then, when you want to refer to that allocation, do a dynamic allocation DYNALLOC using keys DALDDNAM - use the called program's DD name, eg SYSUT1 DALSTATS - use DISP=OLD (or maybe SHR) since you already have it allocated DALDCBDD - with #SYSUT1$ to pick up any DCB= DALREFD - with #SYSUT1$ to refer back for any attributes DALVLSER - with the volumes allocated to SYSUT1, other code will be needed to get this information after the original allocation is done. I have never done anything like this, so I could be totally off-base on the idea. Perhaps others can say more definitively. On Fri, 2011-10-07 at 17:11 +0200, Thomas Berg wrote: -Ursprungligt meddelande- Från: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] För Walt Farrell Skickat: den 7 oktober 2011 17:00 Till: IBM-MAIN@bama.ua.edu Ämne: Re: Rename of DDname ? On Fri, 7 Oct 2011 15:45:50 +0200, Thomas Berg thomas.b...@swedbank.se wrote: Are there any way to rename a ddname ? By that I mean leaving the allocation as such untouched but the name of the allocation/DDname is changed. An example of usage is when You have an allocation for application 1 with DDname 'ABC' for dataset AAA.BBB and want to keep that and then want to run application 2 which requires the same DDname (for dataset CCC.DDD). This is just *one* example. Is it a matter of editing the TIOT, or ? No, you can't edit the TIOT. How/where are you running these applications? For the moment the need is in the ISPF/TSO environment. There is programs that requires specific DDnames which is common to other programs, both homegrown and system types, and some of our dialogs need to run several of these at the same time (in sequence) but I want to preserve some allocations because of performance issues (e g big temporary datasets that takes a long time to create or that I need to keep the enques for, etc.). Common system names are such as SYSUT1, SYSUT2 etc. Regards, Thomas Berg _ Thomas Berg Specialist A M SWEDBANK -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: TSO/Telnet FTP limits
I don't really understand the question. And I don't have access to a z/VM system, but I have successfully ftp'ed much larger files from z/OS to z/OS. If the ftp is failing, perhaps the receiving CMS disk is full? On Fri, 2011-10-07 at 09:32 -0500, Larry Macioce wrote: My counterpart has asked me a question on this subject. I thought there was a limit of 2mb, but he told me the file was appox. 150k bytes. He is trying to go from the mvs system to out vm system. He has ruled out the firewall(he tried form home 1st) by attempting the sme transfer from his desk(inside the firewall) to vm and it still fails. I have googled with every search criteria he and I could think of but have had no luck, so here i am. Its a 1.6 system(yes we are looking to upgrade) . I have found refs to omvs but not mvs. Any help is appreciated. mace -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: BMC CMF vs. IBM RMF
On Fri, 2011-10-07 at 18:47 -0500, Rick Fochtman wrote: --snip--- I have been looking at CMF vs. RMF as a question. Is there any pros or cons between the two? Any other products besides CMF that competes with RMF on the mainframe? unsnip--- CMF is a wonderful product but it's very maintenance-sensitive, not only for itself but for the rest of the system as well. It uses a number of hooks that it places in z/OS code when it starts and removes during shutdown. If there's a maintenance mis-match, you could be looking at a system outage. BTDT GTSS. My choice is to stick with RMF. The numbers aren't as detailed but the risks are FAR lower. Rick I guess that I've been lucky. We've used CMF ever since I've been at my current job - almost 20 years now. You're right about keeping the maintenance up, but Boole Babbage (original) and BMC are very good at it. Of course, we are __never__ bleeding edge. Closer to don't upgrade until the old release is almost unsupported and only put on PTFs for specific problems when then occur. I do receive all maintenance, but rarely do any APPLYs unless it is to solve a problem that we have personally experienced. We're so behind the times in how we do things that this works well for us. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IDIDMAP
Oh, my, the thoughts. Don't want any Off Topic questions about IDI do we? (IDI-OT). On Thu, 2011-10-06 at 05:44 -0500, Barbara Nitz wrote: Whoever had the glorious idea to name a new RACF class IDIDMAP when the prefix IDI is IBM-defined as belonging to the IBM product Fault Analyzer Makes for some rough searching to find out why something with the prefix IDI is defined on one system in the plex sharing the RACF database but not the other when the Fault Analyzer product is identical and active on both systems! Barbara Nitz -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: BPXAS Abending with ICH408I on z/OS 1.11
I could be wrong, but I don't think that STCs normally don't do ACCTNUM checking. You may have an IEFUJV, IEFUJI, or IEFUSI exit doing that. You need to check the access list for the XCM1PT profile in the ACCTNUM class to be sure that OMVSKERN (or whatever) has the proper access. RLIST XCM1PT CLASS(ACCTNUM) AUTHUSER On Tue, 2011-09-27 at 21:49 +, Eric Bielefeld wrote: Thanks Alan. I'll try that in the morning. -- Eric Bielefeld Systems Programmer Starr wrote: Eric, Add a STARTED profile for it. Here's IBM's example SETROPTS GENERIC(STARTED) RDEFINE STARTED BPXAS.* STDATA(USER(OMVSKERN) TRUSTED(NO)) SETROPTS CLASSACT(STARTED) RACLIST(STARTED) Cheers, Alan -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Eric Bielefeld I IPL'd one of my test Lpars with z/OS 1.11. Now, BPXAS abends. I get the following: IRR812I PROFILE ** (G) IN THE STARTED CLASS WAS USED 777 TO START BPXAS WITH JOBNAME BPXAS. $HASP100 BPXASON STCINRDR $HASP373 BPXASSTARTED ICH408I JOB(BPXAS ) STEP(BPXAS ) XCM1PT CL(ACCTNUM ) 780 INSUFFICIENT ACCESS AUTHORITY ACCESS INTENT(READ ) ACCESS ALLOWED(NONE ) IEF170I 1 BPXASICH408I JOB(BPXAS ) STEP(BPXAS ) XCM1PT CL(ACCT 781 INSUFFICIENT ACCESS AUTHORITY ACCESS INTENT(READ ) ACCESS ALLOWED(NONE ) Does this need a RACF userid for BPXAS? The z/OS 1.9 system doesn't have one. Does anyone know how to fix this? -- Eric Bielefeld Systems Programmer -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMF timestamps
I hadn't really planned on sequential processing. That assumes that the relative physical sequence of individual records never change. Which implies not having been run through a sort process. Of course, we have multiple z/OS images and we merge all the SMF data together using DFSORT. This is done every Sunday because Sundays are usually not very busy. I hate local time. DST is the work of the IT devil. Long live UTC! Of course most people, at least in the shops I've worked in, are not too smart in this area. They can't handle a 24 hour clock at all. And if it isn't in local time, they freak out. Just say 19:30 hours Zulu to them and you may as well be speaking ancient Sumerian. And that's the professional programmers. On Wed, 2011-09-07 at 17:47 +0930, Anthony Thompson wrote: I suppose the trick is to ensure SMF records are processed in the order they are written. Look for Type 0 records to determine the time zone offset at IPL, start processing records of interest with that offset while also looking for Type 90 records with a SET CLOCK/DATE/RESET sub-type for any variations to the time zone offset. I'm wondering if a SET TIMEZONE command gets written as a SET CLOCK record... Ant. Northern Territory Government of Australia -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Speculation: Random thoughts on web based report access
boring historical stuff Taking reports from the SPOOL and putting them in some sort of archive is now rather well established. I remember host based-only systems such as SAR, RMDS, InfoPAC (now ViewDirect?) and others. And they still exist and are in use. They seem to fall into two groups. The first consists of actual reports generated by an application. The second consists of the JES related SPOOL like JESMSGLG, JESJCL, JESYSMSG, and maybe utility messages to SYSPRINT. Most of these started out being accessed by either TSO ISPF applications or VTAM applications or both. Many of these are now accessible via Web Browsers. Some even keep the data on other platforms such a Windows or Linux. We do this where I work. We have a product which reads the JES SPOOL and uses the LPR protocol to send the print files to a Windows server which indexes it and writes the output into proprietary files. Another server running Tomcat serves up the reports. /boring historical stuff Now for my random thought. Many web sites such as news sites and blogs use RSS and/or Atom news feeds. The user subscribes to the feeds that they are interested in. Their PC or tablet or smartphone periodically scans those feeds for new articles. So I'm curious as to whether people who read reports could also use that facility. That is, instead of coming in, firing up a browser, and checking to see if there is a new xyz report, they subscribe to the xyz report feed. The report archive software, or whatever, would create the feed. Now they just do a fast scan of their aggregator to see if a new report is ready, instead of needing to click on a lot of links to see what is available. Now, the user can look at the report from where ever they are, subject to appropriate authority. And the ability of the device to display the report intelligibly, of course. This function would likely require an HTTPS connection instead of simple HTTP for security reasons as well as some sort of user validation (I'd prefer a digital cert, but userid/password would work too). They fire up their new aggregrator and see all a list of all the new reports to which they are subscribed. Am I stating the obvious and implemented? Or is this actually something that is a new use of existing technology? If this is new, I freely release any and all interest that might theoretically be mine to the community to implement. I say that because somebody is likely to try to patent it in the U.S. And I hate most software patents. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Cobol and large QSAM record length
As I recall, QSAM/BSAM can have a logical record 32K. But __only__ if it is VBS and __ONLY__ if you process each logical segment separately in your own code. That is, you cannot request that QSAM merge the segments together into a single logical record for you. The reason being that each segment contains its own LLBB field and the merged record also has a single LLBB field. The halfword LL field restricts the LRECL to =32767 or it won't fit as a signed halfword. Now, it think this means that COBOL itself cannot use LRECL32K because I don't think COBOL supports separate VBS record segments being processed separately. But I'm not a COBOL programmer. On Mon, 2011-08-29 at 10:05 -0700, Frank Swarbrick wrote: Even using Spanned (record format is S) or Undefined (record format is U) Cobol (Enterprise COBOL 4.2) appears to not allow a record length more than 32K: 32 IGYGR1224-E The maximum calculated record size of file WIRE-DOCUMENT-FILE was greater than the maximum allowable size 32767. 32767 was assumed. Is this a COBOL limitation or a QSAM limitation? Is VSAM my best (only?) alternative? Thanks, Frank -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Spool volumes and SMS
No. On Sat, 2011-08-27 at 14:50 -0700, Ed Gould wrote: Just curious as to a general consensus, do you use SMS for spool volumes? Ed -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: JCL Changes and SMS and Not Cataloged Datasets
On Sat, 2011-08-27 at 16:58 +, Ted MacNEIL wrote: I catalog them as a single multi-volume dataset. I've always been overly generous with spool space and thus have seldom needed to add spool space. What would happen when you reach the practical limit of 59 volumes? Why do you say this? quote Up to 253 volumes can be designated as spool volumes. Spool volumes are identified to JES2 by a volume serial number, the first four or five characters of which are specified by the VOLUME= parameter on the SPOOLDEF statement during JES2 initialization. The first four or five characters specifying the volume serial number of each volume must be identical to the characters specified by the VOLUME= parameter. The fifth and sixth characters can be assigned to designate individual spool volumes and can be any characters that are valid in a volume serial number. /quote http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/HAS2A390/3.1.1.1 And, weird as it sounds, I somehow had a VSAM cluster extend to more than 59 volumes. But, once that step finished, th cluster could not be allocated. Got a JCL error! And couldn't do an IDCAMS DELETE either. I had to do a DELETE NOSCRATCH, then individual DELETE VVR commands. Also, what do you do with multiple sysres? Multiple parm/lpa/load libs? Since they all have the same name, they cannot all be catalogued! - Ted MacNEIL eamacn...@yahoo.ca Twitter: @TedMacNEIL -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Copying file to OMVS
Had a power outage causing a delay in replying. I am an idiot (nothing new about that). The owner access is --- which is none. And I noticed you did not include the DD parameter PATHMODE. Try: //SYSUT2 DD PATH='/TEST/COMPRESS9', // PATHOPTS=(OWRONLY,OCREAT,OEXCL), // PATHMODE=(SIRWXU,SIRGRP,SIROTH), // PATHDISP=(KEEP,DELETE) The default in JCL if PATHMODE is not specified is no access at all to anyone according to: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IEA2B680/12.48.3 But you may need to delete the existing file first. On Thu, 2011-08-25 at 19:36 -0300, Angel Tamayo wrote: The directory /TEST already is 777 Display File Attributes Pathname : /TEST File type . . . . . . : Directory Permissions . . . . . : 777 rwxrwxrwx and COMPRESS9 is created by the job. Angel 2011/8/25 jagadishan perumal jagadish...@gmail.com Hi, Have your RACF person to provide : CHMOD 777 /TEST/COMPRESS9 to execute this command in OMVS. Also ask them to change the owner by CHOWN command.. Simple.. then submitting the JCL again On Thu, Aug 25, 2011 at 6:19 PM, Angel Tamayo a.tamay...@gmail.com wrote: Hi List, Maybe someone here could have the same or similar case. I run job: //COPY1 EXEC PGM=IEBGENER,REGION=0M //SYSPRINT DD SYSOUT=* //SYSUT1 DD DISP=SHR,DSN=HLQ.COMPRESS.PAX //SYSUT2 DD PATH='/TEST/COMPRESS9', // PATHOPTS=(OWRONLY,OCREAT,OEXCL), // PATHDISP=(KEEP,DELETE) //SYSIN DD DUMMY I received message: ICH408I USER(ZOSUSER ) GROUP(OMVSGRP ) NAME(USER NAME) 479 /TEST/COMPRESS9 CL(FSOBJ ) FID(38130041) INSUFFICIENT AUTHORITY TO OPEN ACCESS INTENT(RW-) ACCESS ALLOWED(OWNER ---) EFFECTIVE UID(000999) EFFECTIVE GID(01) The RACF persons says that I need to have OMVS segment setup for my userid with UID(0). I suppose UID(0) will solve the problem but it is really the only way to solve it?. I'm looking for a solution without UID(0), any idea on this will be appreciated. As additional information ZOSUSER have authority to use SU (superuser) in OMVS environment, don't really know if this helps to this case. Angel -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu 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 lists...@bama.ua.edu 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: UNIX (USS)
QWS3270 runs under WINE. I wonder if Tom's software would too. On Aug 18, 2011 5:41 AM, Jan MOEYERSONS jan.moeyers...@adelior.be wrote: On Wed, 17 Aug 2011 10:47:50 -0400, Mark Jacobs mark.jac...@custserv.com wrote: It won't be an immediate help but I've been recommending that Systems Programmers ditch their Windows workstations and utilize Linux, or other like Un*x OS's (I use FreeBSD) for their day to day work. X3270 serves If only Tom Brennans' Vista would run on Linux... Jantje. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: UNIX (USS)
Abandon TSO for multiple UNIX shells, except for TSO required stuff such as HCD. EDIT on Linux desktop using z/OS UNIX files exported via NFS. Or maybe ftpfs or sshfs on Linux. Hum, will need to try that myself tomorrow. On Aug 17, 2011 7:50 PM, Paul Gilmartin paulgboul...@aim.com wrote: On Wed, 17 Aug 2011 09:31:18 -0700, Ed Gould wrote: This reminds me the about the the day that they ripped the 3270's out from underneath us and all of a sudden I couldn't switch from session to session using TPX. (I don't remember specifics). My productivity went to zero. Get a workstation. Run as many tn3270 sessions as your heart desires. Then complain that TSO won't allow you to run multiple sessions. (I know; there are hacks that fix that. Sort of. It just isn't standard.) -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: TSO/E NSLOOKUP and DIG deprecation
Oh, agreed! But I'm pragmatic. If IBM is going to eliminate the TSO version, it is at least good to know that there is a work around. Like many of my wishes for a native UNIX version of TSO commands. To which many TSO oriented people say: Just use the TSO version and don't worry about it.. So I'll reverse it on dig. Just use the UNIX version and don't worry about it. grin On Sun, 2011-08-14 at 10:46 -0400, Shmuel Metz (Seymour J.) wrote: In a6b9336cdb62bb46b9f8708e686a7ea00afc0ed...@nrhmms8p02.uicnrh.dom, on 08/12/2011 at 05:27 PM, McKown, John john.mck...@healthmarkets.com said: Just asking: Could a TSO user use OSHELL to run those UNIX commands? Would such use require that the user have an OMVS segment? Yes to both. But it would be cleaner to have the native TSO commands we have today. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Soft Capping an LPAR
Strong agreement! We don't even have operators any more. The help desk people can barely reset RACF ids even given the Web interface that I wrote (OK, that may be my bad - I'm not a web designer.) The production control people actually have VTAM SMCS consoles up on their desktop to monitor z/OS because they are our first line of defense any more. We use CA-OPS/MVS to capture messages and send SNMP traps to something called Orion which can interface to CA-UniCenter to create tickets. We also use OPS to send TSO messages to our production control people who are logged on. But we run totally dark starting Saturday night until Monday morning. The on call production support person does do a logon from home on occasion just to see what is going on. On Sun, 2011-08-14 at 17:22 -0700, Ed Gould wrote: The WTO would have to be used in unison with automated ops, IMO. One place I worked they had a message appear on the console and it was a really critical message. Even though they were non delete able. The instructions were extremely clear that if these messages were to appear that bells and alarms were so supposed to go off. The operators ignored them. Automated ops should have been used. Ed -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: TSO/E NSLOOKUP and DIG deprecation
In your TSO REXX command, use BPXWUNIX to run the UNIX dig command. You can set it up to trap stdout and stderr to REXX stem variables. At least as easy as OUTTRAP. On Fri, 2011-08-12 at 16:00 -0500, Hansen, Dave L - Eagan, MN wrote: Group, Has anyone had an issue with managing DNS entries and finding a DNS name that should not have the name it does? I keep looking for a wildcard query that can report on more than one DNS record at a time so I can find DNS names that don't conform to our standards. I looked in the V1R12 IP Sys Admin Commands and it says TSO NSLOOKUP has been deprecated in favor of the z/OS UNIX dig command and it also says TSO DIG has been deprecated in favor of the z/OS UNIX dig command. It looks like in the future TSO won't be able to do a DNS query. I am writing an EXEC that uses TSO/E commands NSLOOKUP and DIG. It appears the OUTTRAP is not catching the output from these commands. Here is my EXEC: addr = 'x.x.x.x' x = OUTTRAP(DNSIN.) ADDRESS TSO 'DIG -x' addr '+noquestion' x = OUTTRAP('OFF') Do i = 1 TO DNSIN.0 Say 'rec' i '=' DNSIN.i End x = OUTTRAP(DNSIN.) ADDRESS TSO 'NSLOOKUP' addr x = OUTTRAP('OFF') Do i = 1 TO DNSIN.0 Say 'rec' i '=' DNSIN.i End Q). Should outtrap catch the output of TSO/E commands NSLOOKUP and DIG? Q). Should I just write a z/OS UNIX dig script and forget about deprecated TSO/E commands? Thanks, Dave Dave Hansen Eagan Software Systems Branch 651-406-1208 dave.l.han...@usps.gov -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SETLOCK in IEFU85
Yes, I know. But I don't know why the OP said CS isn't working and wanted to do a SETLOCK instead. It may be that using logic with PLO instructions in a consistent manner would do what using the simpler CS will not. But the OP never said what he was trying to accomplish and why a CS didn't work. On Mon, 2011-08-08 at 10:06 -0400, Shmuel Metz (Seymour J.) wrote: In a6b9336cdb62bb46b9f8708e686a7ea00afc0ed...@nrhmms8p02.uicnrh.dom, on 08/08/2011 at 07:21 AM, McKown, John john.mck...@healthmarkets.com said: Just out of curiosity, what is your problem with CS? Perhaps PLO would be better? It has more functions. The basic rule is that all parties must use the same synchronization technique. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IEC614I EXTEND FAILED - RC 000, DIAGNOSTIC INFORMATION IS (04034379)
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2R171/6.9.1 x'0403' - VDSS detected an error. x'4379' is VDSS1 VDSS2 quote VDSS error reason code (low order 2 bytes). For a description of the VDSS1 and VDSS2 field values, convert the reason code to decimal and see Storage Management Subsystem Reason Codes in topic 17.9.5. /quote http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/dgt2r171/17.9.5.16 4379 - Allocation failed for all volumes selected for the data set. Not much help, but I see: VAMEX37 NVF411 P1OPSBP.FC610.NVFF411A SECONDARY EXTENT DOUBLED Hum, what is VAM? Some sort of vendor product? Perhaps it is changing the allocation parameter in such a way that no on-line volume has enough free space? On Wed, 2011-08-03 at 13:03 +0530, Rohit Bhandari wrote: We are facing this issue for last few days , I ended up adding space to the respective Storage Groups , still it persists . VAMEX37 NVF411 P1OPSBP.FC610.NVFF411A SECONDARY EXTENT DOUBLED 400 IEC614I EXTEND FAILED - RC 000, DIAGNOSTIC INFORMATION IS (04034379) , 490 NVF411A, ,P1OPSBP.FC610.NVFF411A IEC032I E37-08,IFG0554P,NVF411,NVF411A,SORTOUT,620F,BTCP51,04034379,P1OPSBP.FC610.NVFF411A IEA995I SYMPTOM DUMP OUTPUT 577 SYSTEM COMPLETION CODE=E37 REASON CODE=0008 TIME=03.15.01 SEQ=15018 CPU= ASID=003D PSW AT TIME OF ERROR 075C1000 80E04C12 ILC 2 INTC 0D NO ACTIVE MODULE FOUND NAME=UNKNOWN DATA AT PSW 00E04C0C - 4100382E 0A0DB20A 00509808 AR/GR 0: 80C7EB3E/00E04E18 1: /A4E37000 2: /9010 3: /00E045EA 4: /008C5218 5: /00E2 6: /008C54BC 7: /008C5514 8: /008C54DC 9: /008C47B0 A: /00F0B530 B: /008C44D0 C: /008C47B0 D: / E: /00E04A4C F: /0008 END OF SYMPTOM DUMP IEF450I NVF411 NVF4 Right now as a temp solution we are routing data to tape . Any help in this will be appreciated . -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: FTP from IBM's book server
You said it: Windows only. No Windows systems here at home. 3 Linux, soon to be 4, and 1 Mac. MS need not apply. On Mon, 2011-08-01 at 23:03 +, Gibney, Dave wrote: I really don't understand why anyone wouldn't be satisfied with Softcopy Librarian? Yes, it's Windows only Java :(, but it will drag down almost every book you could want. And if you want to play with them further, they are all there in your local storage. Dave Gibney Information Technology Services Washington State University -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: where 2 find SMS compression code
Thanks. these are small datasets. I don't know why they were compressed with Data Accelerator. We greatly overused that product. Management at the time said: Great! Compress everything and we don't need to get any more DASD! Management today says: Use SMS compression and eliminate the cost of Data Accelerator! We did not testing to see how this will affect CPU usage or compression ratio. Just say save money! and eyes glisten like a child in a candy shop. On Mon, 2011-08-01 at 09:33 -0500, Norbert Friemel wrote: On Mon, 1 Aug 2011 09:16:52 -0500, McKown, John wrote: Thanks. Of course, I was really hoping as to WHY it is no benefit. Guess I'll need to double check the allocation / max lrecl / cisize. Primary space 5 or 8MB or *minimum* lrecl (w/o key) 40 Norbert Friemel -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Ignorant DATACLAS question
We are currently converting some VSAM files from using BMC's Data Accelerator to using SMS compression. I am doing this by changing the DATACLAS of the cluster to DCEXTC which specifies SMS compression. I am assigning this DATACLAS specifically in my DEFINE by using DATACLAS(DCEXTC). And I am also listing them in a FILTLIST in my DATACLAS ACS routine so that they will be assigned this DATACLAS even if someone redefines them and forgets to specify the DATACLAS. Now, many of these cluster have alternate indices. I've noticed that the DATACLAS assigned to these AIXes is our normal DATACLAS of DCEXT. Am I correct in my assumption that it doesn't really matter? I don't think the AIX data needs to be compressed, just the CLUSTER data. Thanks. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
base arithmetic in REXX
anybody know an easy way to encode a base 10 number into base 26? Basically, I want to make a decimal number into the English alphabet: A-Z. I was hoping there was a simpler way than: i=input_number output= alphabet=ABCDEFGHIJKLMNOPQRSTUVWXYZ do while i0 j=i//26 output=substr(alphabet,j+1,1)||output i=i%26 end output=A||output output=strip(output,L,A) /* strip leading As */ if 0 = length(output) then output=A -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
where 2 find SMS compression code
In my SMS conversion to compress some VSAM dataset, I am getting a message like: IGD17162I RETURN CODE (12) REASON CODE (5F01083F) RECEIVED FROM COMPRESSION SERVICES WHILE PROCESSING DATA SET PRITV.PR.GCR26KSD , COMPRESSION REQUEST NOT HONORED BECAUSE DATA SET CHARACTERISTICS DO NOT MEET COMPRESSION CRITERIA, ALLOCATION CONTINUES IGD17070I DATA SET PRITV.PR.GCR26KSD ALLOCATED SUCCESSFULLY WITH 1 STRIPE(S). IGD17172I DATA SET PRITV.PR.GCR26KSD IS ELIGIBLE FOR EXTENDED ADDRESSABILITY I don't seem to be able to find the 5F01083F code. -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: looking for documentation (Offensive Word Found In Message)
True, but it pulls down more than what I want. I actually redirect the output to a file which I edit to eliminate the entries that I don't really want. Just to be nice. On Thu, 2011-07-28 at 21:02 -0600, Mark Post wrote: On 7/28/2011 at 04:12 PM, McKown, John john.mck...@healthmarkets.com wrote: Not that it's of any help to you, but I grab this sort of thing using wget on Linux. I wget the web page. I then process that through a Perl script which finds all the href=ftp://; for pdf files and reformats them into wget commands to suck them all down. Try using the -p or --page-requisites option to avoid having to do that yourself. Mark Post -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Eight Position TSO Logonid
No. Why? Because there are a number of control blocks in z/OS related to TSO which reserve only 7 bytes for the value. What would normally be the 8th byte is a 1 byte length field. I don't know why TSO stored the length of the id. Now, this is only true if the person wants to LOGON to TSO interactively. A person with a 8 character RACF id can submit a job which, maybe via ftp, runs IKJEFT01 in batch to do some non-interactive TSO commands. Also, a UNIX shell user (telnet or ssh or rlogin) can have an 8 character RACF id. They can then use the tso or, in z/OS 1.12+, the tsocmd command to issue TSO commands. But not if they expect 3270 interaction, such as ISPF. Such users could use RD/z, if it is licensed. Another possibility is to write UNIX REXX scripts which use ADDRESS TSO to do non-3270 TSO commands. I would bet that if they wanted to, IBM could make non-3270 fullscreen (curses or X) versions of SDSF or ISPF. ISPF is unlikely to get this because it would decrease the demand for RD/z. SDSF could possibly be done by one of us via the SDSF API in REXX or Java. Now, there's an idea. If they did a non-3270 version of ISPF, that would likely mean that all ISPF applications would be available natively to UNIX shell users. But would anybody be willing to pay extra for it? On Wed, 2011-07-27 at 15:00 -0700, Donnelly, John P wrote: Does an exit exist or does a CBT modification exist or does some purchasable software exist? Might a z/VM front end allow? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: RESEND - RE: Write directly to the JESLOG for a job
Does that work in application code? I've used it in IEFACTRT before. I want this in my HLASM application. On Mon, 2011-07-25 at 20:22 -0700, Skip Robinson wrote: You call routine IEFYS . See SYS1.SAMPLIB(SMFEXITS) for examples on how to use it. . . JO.Skip Robinson SCE Infrastructure Technology Services Electric Dragon Team Paddler SHARE MVS Program Co-Manager 626-302-7535 Office 323-715-0595 Mobile jo.skip.robin...@sce.com From: John McKown joa...@swbell.net To: IBM-MAIN@bama.ua.edu Date: 07/25/2011 08:13 PM Subject:Re: RESEND - RE: Write directly to the JESLOG for a job Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu Perhaps it was JESMSG and not JESLOG. It was a long time ago. What is the JESMSG interface called? On Mon, 2011-07-25 at 17:10 -0700, Skip Robinson wrote: I know that John specifically asked about writing to JESLOG. If it would satisfy his requirement to write into the JESMSG file, there is a standard, documented interface for writing messages there. No possibility of going to syslog regardless of system settings. . . JO.Skip Robinson SCE Infrastructure Technology Services Electric Dragon Team Paddler SHARE MVS Program Co-Manager 626-302-7535 Office 323-715-0595 Mobile jo.skip.robin...@sce.com From: Jim Thomas j...@thethomasresidence.us To: IBM-MAIN@bama.ua.edu Date: 07/25/2011 04:59 PM Subject:RESEND - RE: Write directly to the JESLOG for a job Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu Sir, Just thought of something ... (will look at the manuals tomorrow, to confirm) .. I seem to remember a difference in behavior (if you're using ROUTCDE=11) between LINKAGE=SVC (default) and LINKAGE=BRANCH. IIRC, LINKAGE=BRANCH will not allow the message to be sent to SYSMSG or do I have that mixed up ?? .. Please note that there are limitations in doing this. Further, is a SYSOUT DD coded when you use the ROUTECDE=11 ?. Kind Regards Jim Thomas 617-233-4130 (mobile) 636-294-1014(res) j...@thethomasresidence.us (Email) -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of McKown, John Sent: Monday, July 25, 2011 4:10 PM To: IBM-MAIN@bama.ua.edu Subject: Write directly to the JESLOG for a job I vaguely remember at one time seeing some code which did chain chasing to find the ACB for the JESLOG SPOOL dataset. The code could then do a PUT with an ACB= and RPL= to write to the JESLOG like a VSAM ESDS file. This avoided any chance of going to the SYSLOG like sometimes happens with WTO ROUTCDE=11. Does anybody else remember this or have the code? John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * john.mck...@healthmarkets.com * www.HealthMarkets.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: RESEND - RE: Write directly to the JESLOG for a job
Perhaps it was JESMSG and not JESLOG. It was a long time ago. What is the JESMSG interface called? On Mon, 2011-07-25 at 17:10 -0700, Skip Robinson wrote: I know that John specifically asked about writing to JESLOG. If it would satisfy his requirement to write into the JESMSG file, there is a standard, documented interface for writing messages there. No possibility of going to syslog regardless of system settings. . . JO.Skip Robinson SCE Infrastructure Technology Services Electric Dragon Team Paddler SHARE MVS Program Co-Manager 626-302-7535 Office 323-715-0595 Mobile jo.skip.robin...@sce.com From: Jim Thomas j...@thethomasresidence.us To: IBM-MAIN@bama.ua.edu Date: 07/25/2011 04:59 PM Subject:RESEND - RE: Write directly to the JESLOG for a job Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu Sir, Just thought of something ... (will look at the manuals tomorrow, to confirm) .. I seem to remember a difference in behavior (if you're using ROUTCDE=11) between LINKAGE=SVC (default) and LINKAGE=BRANCH. IIRC, LINKAGE=BRANCH will not allow the message to be sent to SYSMSG or do I have that mixed up ?? .. Please note that there are limitations in doing this. Further, is a SYSOUT DD coded when you use the ROUTECDE=11 ?. Kind Regards Jim Thomas 617-233-4130 (mobile) 636-294-1014(res) j...@thethomasresidence.us (Email) -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of McKown, John Sent: Monday, July 25, 2011 4:10 PM To: IBM-MAIN@bama.ua.edu Subject: Write directly to the JESLOG for a job I vaguely remember at one time seeing some code which did chain chasing to find the ACB for the JESLOG SPOOL dataset. The code could then do a PUT with an ACB= and RPL= to write to the JESLOG like a VSAM ESDS file. This avoided any chance of going to the SYSLOG like sometimes happens with WTO ROUTCDE=11. Does anybody else remember this or have the code? John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * john.mck...@healthmarkets.com * www.HealthMarkets.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF quandry.
I like the FILTER. The problem with H * without the OWNER or FILTER is that there are thousands of jobs in the SPOOL in the HELD queue. And our system is max'ed out most of the time, so response goes into the toilet. I guess from building the screen since accessing the SPOOL in the OWNER or FILTER case should still be about the same. I guess. On Mon, 2011-07-25 at 20:21 -0400, Shmuel Metz (Seymour J.) wrote: In a6b9336cdb62bb46b9f8708e686a7ea00afc0ed...@nrhmms8p02.uicnrh.dom, on 07/25/2011 at 01:37 PM, McKown, John john.mck...@healthmarkets.com said: OK, I'm violating IBM standards on this. But I want to name my jobs what I want to name them, not just start them with my RACF id. Then name them what you want. When I do an H, I only see things which start with my id. Are you sure that you had PREFIX *? So what I would want is something like OWNER which only effects the H screen. Did you try, e.g., H * S OWNER uid Is there an outstanding requirement for OWNER and other filter operands on SDSF display commands? -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Cobol - STC design issue
What type of file organization? If it's sequential, then you could write to a UNIX file from COBOL. On the DD, use BUFNO=1 and one record per block. That should flush the I/O buffer from COBOL to the UNIX kernel on each write. That does have overhead, but less than my usual way of doing: OPEN WRITE CLOSE The I/O to the file is actually done by the UNIX filesystem code which runs in a separate address space. It is either done in the kernel address space or a colony address space (for ZFS files, that the ZFS started task). If it's VSAM, I don't know of a way to do it other than the OPEN/WRITE/CLOSE which has a LOT of CPU and I/O overhead. On Mon, 2011-07-25 at 16:45 -0700, Scott Ford wrote: All: I have a STC written in Cobol that I have a question about. If a console operator issues a C x , where x is the STC and it has a file open, isnt it a for gone conclusion that I could loose data , because file wouldnt close. I should add this STC is in LE Cobol. I have to support this Cobol STC and not sure how I could intercept the Cancel and make sure the file could be closed without loosing data. Yeah, I could re-write in Assembler, not doable at this time or C or C++. Regards, Scott J Ford Software Engineer http://www.identityforge.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: MULTIVOLUME READ with UPDATE-IN-PLACE
Have you considered using BDAM instead of BSAM? Not that I know much about either. On Jul 24, 2011 2:41 PM, William Hecox bill.he...@mail.com wrote: Well that was a resonable suggestion. I could not find much DOC on the EOV MACRO. There was something in the DFSMS advanced services. It is was under XDAP and EXCP sections. I could not find anything on the EOV MACRO in BSAM processing. So I tried it. I issued the EOV DCB in the EODAD routine if I know there are more volumes to be read. I got an IEC020I ABEND 001-1 An attempt was made to read after end-of file . Good suggestion but did not work. BTW this is a DASD dataset. Thanks, Bill - Original Message - From: Binyamin Dissen bdis...@dissensoftware.com Newsgroups: bit.listserv.ibm-main To: IBM-MAIN@bama.ua.edu Sent: Sunday, July 24, 2011 2:39 PM Subject: Re: MULTIVOLUME READ with UPDATE-IN-PLACE On Sun, 24 Jul 2011 14:06:04 -0400 William Hecox bill.he...@mail.com wrote: :I have a question on how do I proceed to the next volume when :doing a BSAM READ with UPDATE-IN-PLACE on a MULTIVOLUME Dataset. : :If the multivolume dataset is opened with just INPUT, the next :READ goes to next volume after reading the last block of the :1st volume. :According to the IBM doc the EODAD exit is entered at the end :of each volume if the dataset is opened with INPUT UPDAT. :How do I proceed to the next volume? I tried doing a NOTE :and POINT DCB,TTR0,RELNEXT but the next read still goes to the :last block of the 1st volume. I haven't done this, but have you tried an EOV macro? -- Binyamin Dissen bdis...@dissensoftware.com http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu 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 lists...@bama.ua.edu 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Fun and games with LE
I looked for an LE subroutine which would return information about whether LE was active or not, but didn't find one. Would it be possible to use a ENTRY instruction and an ALIAS so that the one program object has two names and associated entry points? One would entry would use MAIN=YES and the other MAIN=NO. On Mon, 2011-07-25 at 00:51 +0300, Binyamin Dissen wrote: It appears that if an LE MAIN=YES BALR's to another LE MAIN=YES, when the inner program does a CEETERM it skips the outer program. On the other hand, if the outer program does a LINK, the inner program returns. Are there any rules for this? Or is the action undefined? The situation is that the inner does not know if LE has been established. -- Binyamin Dissen bdis...@dissensoftware.com http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: JCL enhancement ideas - your thoughts.
I agree entirely. I understand the 255 limit in the past when all we had were CVOL catalogs and a 1 byte field. ICF catalogs don't work that way. And, again, the reverse order made sense in the days of CVOL due to the way that GDGs were actually implemented in CVOLs. Again, ICF catalogs don't work that way. But I wonder what the JCL syntax would be to specify the order. Hopefully something simple. But since GDG-ALL processing effectively creates a concatenated set of DDs, what about the limit of 255 DDs per jobstep? How to do GDG-ALL of a DSN with 1000 entries? On Fri, 2011-07-22 at 22:07 -0700, Ed Gould wrote: John: I think a prime requirement is to support more than 255 GDG entries and also a way to call them in order they were created. Ed -- John McKown Maranatha! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html