Re: Unicode 6.1.0 released (not on z/OS yet)
On 2/1/2012 10:30 AM, McKown, John wrote: Just in case anybody is really interested. http://www.unicode.org/versions/Unicode6.1.0/ I am. Thanks. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: OT: Backup drives for a PC
On 2/1/2012 12:34 PM, Clark Morris wrote: [snip] Some comments that have mainframe relevance or at least association. I like using Acronis which has saved me on a couple of occasions. I can take the full disk backup and restore individual files from it. I have done both full disk and file restores. I have finally figured out their improved user interface. I can't stand their interface. I find it unfriendly, and their support site is awful! I rue the day I let the Micro Center salesman talk me into buying it. Every day I get a cryptic message about operation paused and if I don't respond it will make an automatic decision. The message says something about drive 30 or location 30 with no information of what that's about. There is no place to tell the software where drive or location 30 is. The software does not make an automatic decision, it just updates the time on the message and keeps it on the screen. I have to close the window. Going to their help site never gets a response. Sucks big time. I would swithc to doing back up by hand, but supposedly this Acronis stuff is backing up the system settings and I don't know enough to do that with any confidence. It reminds me of Innovations FDR/FDRDSF which I also like using and which saved the day on more than one occasion. What is really scary is that I can fit a USB key in my wallet and the 1 terabyte portable drive in my pants pocket. That means an authorized person logging on to an organization's computer can download a very large amount of data onto something that fits in their wallet and a tremendous amount into something that would be unobtrusive in their pants pocket. The security implications are frightening to someone who comes from an era where even a 3480 cartridge was somewhat noticeable. Thanks: Clark Morris -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: IBM Research z196 Papers
On 1/31/2012 6:06 AM, Meral Temel wrote: To colleagues and students who are interested in, IBM Research published z196 papers in their current issue which is entitled `IBM zEnterprise Systems And Technology'. http://www.research.ibm.com/journal/ Best Regards, Meral. Looks interesting. But individual articles are $30 for non-IEEE members and $20 for IEEE members. Am I reading that right? -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Workstation Agent for Windows 7?
On 1/27/2012 8:48 AM, Pinnacle wrote: On 1/27/2012 7:50 AM, Hunkeler Peter , KIUP 4 wrote: I've been asked if there is a way to see ISPF split sessions in parallel in multiple windows, and remembered the ISPF workstation agent WSA. I haven't looked into this for ages. The ISPF download panel only talks about Windows 2000/NT. Trying to run the downloaded file on Windows 7 ends with a message telling me not being compatible. The ISPF manual also only talks about Windows 2000/NT. So, it seems this feature has been functionally stabilized. Or am I missing something? Peter, The Workstation Agent is functionallly stabilized. z/OSMF is the way to go if you really want multiple windows in the same ISPF session. Regards, Tom Conley But z/OSMF requires WAS and is, itself, a separately licensed product. This could get pretty expensive in a hurry, just to have multiple windows in ISPF. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: The Trainer's Friend announces - no price increase
On 1/24/2012 11:28 PM, Timothy Sipples wrote: Steve Comstock writes: We are using the same pricing we used in 2002. :-) We aren't, thank goodness. We slashed z/OS prices repeatedly then increased some of them this year, once, a bit, far less than we slashed them. Yes. Well, our classroom training prices are the same as 2002, but we have other options and products and those prices have swung both up and down. We're just like IBM. Only a little smaller. And we don't do hardware. And we only do z/OS And ... Ah well. :-) Although I do like your training services and think they're fairly priced. Reminder: My views are my own. The facts, however, are the facts. Timothy Sipples Resident Enterprise Architect (Based in Singapore) E-Mail: timothy.sipp...@us.ibm.com -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: QUEUED() not working with ISPF (CROSS POSTED to ISPF-L)
On 1/25/2012 9:30 AM, Hansen, Dave L - Eagan, MN wrote: Readers, IBM helped identify the issue. It is a TSO problem. TSO gets 'confused' between line-mode and full screen. Before: ADDRESS ISPEXEC 'VPUT ... ADDRESS ISPEXEC 'DISPLAY .. ADDRESS ISPEXEC 'VGET ... After:ADDRESS ISPEXEC 'VPUT ... ADDRESS ISPEXEC CONTROL DISPLAY REFRESH ADDRESS ISPEXEC 'DISPLAY .. ADDRESS ISPEXEC CONTROL DISPLAY LINE START(1) ADDRESS ISPEXEC 'VGET ... I have logged off and back on many times to get the new copy of my EXEC and PANEL. Q). What is the secret to 'refreshing' my 'link' to the code I keep changing in the dataset I have concatenated? Thanks for all your help, Dave Dave Hansen Eagan Software Systems Branch 651-406-1208 dave.l.han...@usps.gov You want to run in Test mode. This always refreshes panels and messages. Start ISPF with ISPF TEST or, once you are in ISPF, run your tests under ISPF option 7, Dialog Test -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: The Trainer's Friend announces - no price increase
On 1/25/2012 10:55 AM, R.S. wrote: W dniu 2012-01-25 00:58, Steve Comstock pisze: We are using the same pricing we used in 2002. :-) I have to admit I increased my prices significantly. ;-) Especially when measured in USD, because dollar is much cheaper than 10 years ago. [Well, just a thought.] [No offense intended to those who abhor any kind of marketing on the list. But what an opportunity!] In my case it's not marketing in any way. I'm not wiling to travel to U.S. nor teach in English. ;-))) Well, I'm willing to travel to Poland. But, I can only teach in English :-( -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
The Trainer's Friend announces - no price increase
We are using the same pricing we used in 2002. :-) Your software just got more expensive, while training costs remain low. Train your people to get the most from your software: maybe the improved effectiveness in using the software will offset the increased cost, even after allowing for the cost of the training. [Well, just a thought.] [No offense intended to those who abhor any kind of marketing on the list. But what an opportunity!] -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Ikjeft01
On 1/23/2012 8:18 AM, Scott Ford wrote: All, Does anyone know or have called IKJEFT01 from a LE COBOL program. I have read manuals and googled and found no definitive answer. Sent from my iPad Scott Ford Senior Systems Engineer www.identityforge.com What are you trying to accomplish? I've invoked TSO facilities (IKJEFTSR, IKJCT441, IKJTSOEV) from COBOL (and PL/I, and C, and Assembler), but I've not called TSO itself from any program. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Mainframe advertisement
On 1/11/2012 12:32 PM, R.S. wrote: (Disclaimer: this message is non-technical, but still about mainframes) Have you ever seen mainframe advertisement? I just realized that I have never ever seen any mainframe advertisement in Poland. (*) Of course I'm aware that mainframe marketing is not the same as washing powder business, but I have seen ads of HP server, Dec Alpha servers, more general Dec Alpha technology (in the old times), Intel and AMD processors, Sun machines, Oracle software, even DB2, AIX machines (System p, aka pSeries, aka RS/6000), AS/400 machines, etc. etc. I don't mean laptops, tablets and other end-user products. So, IT companies, including IBM do spend money on advertising their professional IT products, but the mainframe is exception. Even IBM polish website is almost mainframe-free. Few pages with links to US pages - that's all. How can they expect someone will really choose that platform, I mean new customers? (*) I don't count content of Hot Topics magazine, but I count airline magazines and ads in airport area ;-) An old complaint, I'm afraid, and one IBM doesn't seem to care about: they are not interested in raising the level of awareness of mainframes, especially z/OS, their flagship operating system. IBM is not telling the story and doesn't seem to care about winning the hearts and minds of anyone vis a vis mainframes. Sigh. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: How to find a PDS member
On 1/4/2012 12:50 AM, Lizette Koehler wrote: Graham Hobbsgho...@cdpwise.net wrote in message news:5e97g75eqo2bi4cfbrhqcm9phcacji9...@4ax.com... Hello, Just returned to z/OS mainframe after 10 years, working alone, nobody to talk to:-(. My first elementary question: - there are many PDS's in the environment I now have access to - need to find which PDS(s') members called ABCCOP* exist - I don't know which PDS it or they are in - Question: Can I find it/them with ISPF 3.14 or 3.15; if not then how? Please, thanks, more duqu's to come:-) Graham Graham, What are you trying to do? 1) A selected list of PDS datasets and then search for all members of ABCCOP* 2) Generate a list of PDS Datasets (unknown number) which include members for ABCCOP* 3) Any datasets in my logon proc that contains ABCCOP* (including LINKLST and LPALST) In Option 3.4, you can use a command called SRCHFOR that might be of help. Lizette Actually, for what he is looking for, the MEMBER command would be better: From a 3.4 data set list, enter: === m abccop* and each data set that is a PDS or PDSE that contains a member with that nameing pattern will have a message 'Member: ABCCOP*' next to the member's name. SRCHFOR looks for text inside datasets or members. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Semiprivileged instructions, part 1 (3)
On 12/30/2011 5:52 AM, Peter Relson wrote: I have noted a couple of omissions in the PoPs that I will submit a Readers Comment for I didn't notice that any of the things you mentioned regarding the PoOp are necessarily omissions or things to be corrected (but I might have missed it). You questioned the list of semiprivileged instructions, I believe. That depends on what is meant by semiprivileged. If it means subject to one of the authorization mechanisms shown in table 5-6 then TRAP2/TRAP are not. RP is not. The wording in the PoOp tends to be extremely precise (not 100% correct, but pretty darn close). I caution against assuming that terms mean what they do not say they mean. I understand, and I believe you. But, there are times (perhaps when separate chapters are written or updated by different people) when the consistency is not what I, personally, would like. Consider the Preface description of Chapter 10 says that chapter: contains detailed descriptions of all of the semiprivileged and privileged instructions except for the I/O instructions. Chapter 3 mentions a semiprivileged program - what is that? (Chapter 5 also uses this term without defining it) Chapter 4 says Another group of instructions, called semiprivileged instructions, are executed by a CPU in the problem state only if specific authority tests are met; otherwise, a privileged-operation exception or a special-operation exception is recognized. Chapter 5 says There are 23 semiprivileged instructions and also the privileged LOAD ADDRESS SPACE PARAMETERS instruction that are controlled by the authorization mechanisms. (so, to go back to your point, LASP, and several other instructions in the referenced table are _not_ semiprivileged; it would be nice if that table simply indicated if each instruction is privileged or semiprivileged) The table, Figure 5-6, titled Summary of Authorization Mechanisms includes semiprivileged instructions _and_ some others; Looking carefully, I cannot discern which of these 36 instructions are the 23 semiprivileged instructions. Chapter 10 has a table, Figure 10-1, in which RP has a characteristic of 'Q', which is described as: Privileged-operation exception for semiprivileged instructions so it looks like RP is semiprivileged In that same table, TRAP2 and TRAP4 have characteristic 'SO' which says Special-operation exception and I find ambiguous: these instructions will not raise a 'Privileged-operation exception', according to the table, so they are not privileged. Neither fish nor fowl, eh? So, this is the kind of thing I find difficult and in need of clarification. Peter Relson z/OS Core Technology Design -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: removing nulls from a file
On 12/29/2011 10:17 AM, Scott Ford wrote: I have seen this on a SYSOUT created with a Cobol program Moving spaces to a print line can cause nulls for sure... Huh? How? How is the file transferred ? Binary will not change anything, but if they transfer it with CR/LF and ebcdic to ascii enabled ... Could be interesting Scott J Ford Software Engineer http://www.identityforge.com From: Joel C. Ewingjcew...@acm.org To: IBM-MAIN@bama.ua.edu Sent: Thursday, December 29, 2011 12:10 PM Subject: Re: removing nulls from a file On 12/29/2011 09:19 AM, Brad Wissink wrote: We have a client that is trying to transfer us a file and it is loaded with nulls. They say that is the way it comes from the purchased software they have on their workstation. The file has a null character inserted after every character so it looks like this 1 12/29/2011 becomes F1004000F100F2006100F200F9006100F200F000F100F100... Has anyone seen anything like this before? Is there a quick and easy way to remove all the nulls? It's almost as if they are using software that somehow mistakenly thinks EBCDIC is a two-byte character encoding, or the process for conversion to EBCDIC was written by a neophyte programmer who treated each character as a null-terminated string and some how managed to include the null termination for each character when outputting the converted data. Maybe they have their software package mis-configured in some way, or since they are talking about workstation software producing the data, the software package generating the data may be ignorant of EBCDIC and the fault may be in what technique they are using after-the-fact to either convert the data to EBCDIC or transmit the data with conversion. If at all possible, try to get clarification of exactly what software and options they are using to produce the data and exactly what technique and options they are using to transmit the data. If possible, get them to transmit via other methods (Email, FTP, etc.) samples of any intermediate files as binary data so you can see exactly what data format they are really dealing with on their workstation (as opposed to what the client may think he has). If they are really transmitting twice the number of needed bytes, fixing the problem at their end would be the better solution. Perhaps given enough background on what they are doing, a solution would become obvious, or you would be able to search on-line for a solution if the client lacks the technical expertise to do so on their own. If everything is kosher on their end and the byte doubling is somehow occurring just on your receiving system, then hopefully you will have enough to be able to recreate and fix the problem on your end. Just cleaning up bad data after the fact will work, but is not as desirable as eliminating the creation of the bad data in the first place. -- Joel C. Ewing,Bentonville, AR jcew...@acm.org -- 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 -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Semiprivileged instructions, part 1
[Consolidating several responses] On 12/29/2011 6:57 AM, Peter Relson wrote: responding both to assembler-list and ibm-main BSG - Branch in Subspace Group EREG- Extract stacked REGisters (32 bits) EREGG - Extract stacked REGisters Grande (64-bits) ESTA- Extract stacked STAte LPTEA - Load Page Table Entry Address == privileged (thanks to Peter Relson for pointing that out, below) MSTA- Modify stacked STAte SSAR- Set Secondary ASN SSAIR - Set Secondary ASN with Instance STRAG - Store Real Address p TAR - Test Access p == not privileged (thanks to Allen Gainsford for pointing that out to me) TPROT - Test PROTection p ('interesting' in the sense they are not semiprivileged and the first eight are not privileged either, but they are described in the chapter on Control Instructions: so are they 'general' instructions? I think not, but it's hard to say.) My focus: are these first eight instructions useful for applications programmers? BAKR, PR, EREG, EREGG are all part of the original linkage standard for AR-mode routines, providing a way to preserve the ARs (and GR high halves) without having to change the caller to provide a large enough save area to hold everything. AR mode is fully available to applications programmers. ESTA and MSTA are of primary use to PC target routines so would not be used by writers of *unauthorized* applications. The statement that the first eight are not privileged seems incorrect. LPTEA is a privileged operation. SSAR and SSAIR will not be used by an unauthorized application (they may be issued but would only be in the current primary state rather than space switch). SSAR/SSAIR for space switch are semiprivileged. You would see these in macro expansions of services entered by non-stacking PC's. Most applications would not care much about using BSG (this was created to help cases such as CICS to isolate its transactions from each other). If you think it important to document which semi-privileged instructions are available to problem state applications, please submit a readers comment form asking that this be done. It seems reasonable. It appears at a glance that all of the semiprivileged instructions in table 5-6 on page 5-28 of PoOp are available, subject to such things as need a suitable PSW key mask and not requesting space switch. z/OS does set, for example, CR0 bit 36 which authorizes various instructions. [I added TRAP2 and TRAP4 after Martin Truebner pointed out the omission] I have noted a couple of omissions in the PoPs that I will submit a Readers Comment for; but there also needs to be a place in each operating system's pub set where it specifies what semiprivileged instructions are available under that system. Not sure where that would be for z/OS, but I'll give it some thought. z/OS itself does not provide support for TRAP2/TRAP4. But some (authorized) program products do this on their own (a bad decision not to have this provided by the operating system). They got burned when the architecture changed incompatibly (incompatible changes in the architecture are almost never done to problem state programs, but such changes are something that we in the base control program expect to take care of when they occur). The long and short of it is that you can't use TRAP2/TRAP4 on your own if you are not privileged. Peter Relson z/OS Core Technology Design Thanks for that, Peter. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Semiprivileged instructions, part 1
[Cross-posted to the mainframe assembler list] [This is in two parts because of restrictions on posting size for the assembler list.] Based on some earlier posts on the mainframe assembler list, I have been researching the semiprivileged instructions to see which ones might be useful for application programs (programs written to accomplish corporate work: problem state, only standard interfaces and APIs used). The PoPs says, on page 5-24 in the PDF version (dz9zr008.pdf / SA22-7832-08), there are 23 semiprivilged instructions. There is a table, Figure 5-6 on pp. 5-28/5-29, that purportedly includes all the semiprivileged instructions along with some other instructions that use authorization messages. If you stick with the 23 semiprivilged instructions, you get these: BAKR- Branch and Stack BSA - Branch and Set Authority EPAR- Extract Primary ASN EPAIR - Extract Primary ASN and Instance ESAR- Extract Secondary ASN ESAIR - Extract Secondary ASN and Instance IAC - Insert Address space Control IPK - Insert PSW Key IVSK- Insert Virtual Storage Key MVCDK - Move Characters with Destination Key MVCK- Move Characters with Key (not shown in Figure 5-6 on pp. 5-28/5-29) MVCOS - Move Characters with Optional Specifications MVCP- Move Characters to Primary MVCS- Move Characters to Secondary MVCSK - Move Characters with Source Key PC - Program Control PR - Program Return PT - Program Transfer PTI - Program Transfer with Instance RP - Resume Program SAC - Set Address space Control SACF- Set Address space Control Fast SPKA- Set PSW Key from Address Some other interesting instructions in this table: BSG - Branch in Subspace Group EREG- Extract stacked REGisters (32 bits) EREGG - Extract stacked REGisters Grande (64-bits) ESTA- Extract stacked STAte LPTEA - Load Page Table Entry Address MSTA- Modify stacked STAte SSAR- Set Secondary ASN SSAIR - Set Secondary ASN with Instance STRAG - Store Real Address p TAR - Test Access p TPROT - Test PROTection p ('interesting' in the sense they are not semiprivileged and the first eight are not privileged either, but they are described in the chapter on Control Instructions: so are they 'general' instructions? I think not, but it's hard to say.) My focus: are these first eight instructions useful for applications programmers? -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Semiprivileged instructions, part 2
[Cross-posted to the mainframe assembler list] [This is in two parts because of restrictions on posting size for the assembler list.] Now, let me just focus on the 23 semiprivileged instructions: BAKR- Branch and Stack BSA - Branch and Set Authority EPAR- Extract Primary ASN EPAIR - Extract Primary ASN and Instance ESAR- Extract Secondary ASN ESAIR - Extract Secondary ASN and Instance IAC - Insert Address space Control IPK - Insert PSW Key IVSK- Insert Virtual Storage Key MVCDK - Move Characters with Destination Key MVCK- Move Characters with Key (not shown in Figure 5-6 on pp. 5-28/5-29) MVCOS - Move Characters with Optional Specifications MVCP- Move Characters to Primary MVCS- Move Characters to Secondary MVCSK - Move Characters with Source Key PC - Program Control PR - Program Return PT - Program Transfer PTI - Program Transfer with Instance RP - Resume Program SAC - Set Address space Control SACF- Set Address space Control Fast SPKA- Set PSW Key from Address In this discussion, Peter Relson wrote: If the operating system lets an unauthorized program do something, then why restrict that unauthorized program further unless necessary? So my next line of inquiry is: which of the above instructions are allowed by z/OS for problem state programs? Where is this information documented? [My follow up research will be: which of these instructions allowed by z/OS are useful for the application programmer? This may then result in a new course. We'll see.] -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Semiprivileged instructions, part 1
On 12/28/2011 2:57 PM, Tony Harminc wrote: On 28 December 2011 15:16, Steve Comstockst...@trainersfriend.com wrote: The PoPs says, on page 5-24 in the PDF version (dz9zr008.pdf / SA22-7832-08), there are 23 semiprivilged instructions. [...] PC - Program Control That's Program Call... Tony H. You're right. I knew that, but blew it. Thanks. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- 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 12/27/2011 8:28 AM, McKown, John wrote: -Original Message- [snip] No C compiler here. John, You've mentioned this frequently. I got to wondering if you can still call the C functions from an LE-enabled Assembler program? Should work, but I'm not sure if there are some cases where it doesn't. -- John McKown Systems Engineer IV IT -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
Re: Imagine dealing with THIS in production
On 12/16/2011 12:20 PM, Jonathan Goossen wrote: And what about the pour people who will loose a birthday? Whoa! Is it happy hour already? Thank you and have a Terrific day! Jonathan Goossen, ACG, CL For help with communication and leadership skills checkout Woodwinds Toastmasters IBM Mainframe Discussion ListIBM-MAIN@bama.ua.edu wrote on 12/15/2011 03:04:48 PM: From: zManzedgarhoo...@gmail.com To: IBM-MAIN@bama.ua.edu Date: 12/15/2011 03:30 PM Subject: Imagine dealing with THIS in production Sent by: IBM Mainframe Discussion ListIBM-MAIN@bama.ua.edu http://travelonthedollar.com/2011/06/28/samoa-will-lose-a-day-in-december/ Even things like billing a hotel stay that spans the change could be interesting! -- 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: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html This e-mail message and all attachments transmitted with it may contain legally privileged and/or confidential information intended solely for the use of the addressee(s). If the reader of this message is not the intended recipient, you are hereby notified that any reading, dissemination, distribution, copying, forwarding or other use of this message or its attachments is strictly prohibited. If you have received this message in error, please notify the sender immediately and delete this message and all copies and backups thereof. Thank you. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.html -- 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 12/14/2011 7:58 PM, John McKown wrote: 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. I got to wondering: why do you (the OP) want everything in caps? The right way to do it, I believe, is to accept input as the user gives it. If you want to capitalize (for consistency in compare operations, for example), copy it to a work area, translate the string copy to uppercase, then do the compare. User friendly is programmer difficult. But it's the right way to go. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: IBM RDZ vs COBOS
On 12/14/2011 9:33 AM, Tom Marchant wrote: On Wed, 14 Dec 2011 14:53:57 +0200, Itschak Mugzach wrote: Does anyone here uses the open source Cobos product as a replacement for IBM RDZ? It doesn't look like open source to me, despite the statement on http://sourceforge.net/projects/cobosproject/ that it is. The license is listed as Other license. Sourceforge links to http://cobos.metrixware.org/ and if you look at their license, it reads, in part, quote if Licensee is: (i) an Organization, the licensee may install and use the Software on a maximum of one (1) local developer Workstations with a maximum of two (2) CPUs; or (ii) an Educational Institution, Licensee may install and use the Software on an unlimited number of Workstations and CPUs, provided such use is solely for educational or training purposes and not for Licensee’s internal business or any commercial use Any other use requires that you acquire a commercial version of the Metrixware software under the terms of the commercial Metrixware End-User License Agreement. /quote I wouldn't consider downloading it to test it because I have no way of knowing whether someone else in the company might have done so, and their license allows it to be installed on only one workstation within the company. Good point. They would be better off not worrying about that kind of restrictive license and get revenue from maintenance and support contracts. That way, they would get a lot more people interested in and using the product (if it's good). After all, they offer the software with no guarantees and no maintenance. So why restrict it? -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: JCL sheesh! for today
On 12/12/2011 7:06 PM, Paul Gilmartin wrote: On Mon, 12 Dec 2011 11:12:44 -0500, Shmuel Metz (Seymour J.) wrote: Is the example suitable?: Yes, other than using RC as a variable name. As in RC = BPXWDYN( ... )? Well, RC really is a variable. It has some special behaviors, as does SIGL. (Others? None come immediately to mind.) There are three REXX reserved variable names: RC, RESULT, and SIGL I really wish that any setting of RC0, as by assignment, parse, etc. would trigger the actions of trace Err/signal on Error. Or even that there were a simple way to force an error. I suppose one might write a command processor that simply returned with the value of its argument in R15: SETRC CSECT L R15,0(,R1) Point to first argument pointer. L R15,0(,R15) (I know; I know; I can make it work with address LINKPGM) BR R15 YREGS END (I am _not_ an assembler programmer.) I also wish that procedure expose ... would set SIGL inside the procedure, not outside. -- gil -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: Java apps have most flaws, Cobol is cleanest.
On 12/9/2011 7:05 PM, John Gilmore wrote: Steve Comstock's point is well made/taken. If you use IBM Enterprise COBOL you are inescapably in an LE environment. You are paying for its overheads whether or not you use its very flexible facilities for allocating and freeing dynamic---stack|heap---storage. Why not then use them? I don't know that Steve has in fact done this, but they are easy to package as COBOL functions having perspicuous names. The COBOL preprocessor is still a rudimentary thing, but it is well up to that. John Gilmore, Ashland, MA 01721 - USA John, I'm unclear on your last paragraph: 1. What are you refering to as 'they' when you say: they are easy to package as COBOL functions 2. What do you mean by 'package as COBOL functions', for that matter? 3. What COBOL preprocessor? Mystified in Denver. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: Java apps have most flaws, Cobol is cleanest.
On 12/9/2011 9:32 AM, John Gilmore wrote: Gary Merrill writes begin EDITED snippet A couple of years ago at SHARE, in a mostly-Java-folks session, I asked the IBM speaker why Java architected Garbage Collection . . . , and his reply was that that was done because Java programmers didn't know how much memory their program needed, so I asked if that meant that COBOL programmers were smarter than Java programmers. /end EDITED snippet I am not sure that I would not look at language characteristics first. COBOL aggregates are compile-time bound. If you decide in a COBOL AP that you want to process multiple vehicles in, say, an automotive insurance one you also decide that you will also process, say, at most 10 vehicles and implicitly allocate storage for them at compile time. In Java, on the other hand, open-ended lists may be and are frequently used instead; their dynamic storage usage is in principle impossible to determine, except in the not very helpful sense that use of a two-byte signed binary counter limits the maximal number of vehicles or the like to 2^15 -1 = 32767. (The sense in which Java is 'pointerless' is a very literal one. It has mostly adequate surrogates for pointers.) Note that I am aware that list processing is now possible in COBOL, but in my parochial experience it is only done in COBOL when I do it to show that it is possible. Not only is list _processing_ possible, list _creation_ is also possible in current COBOL, with the help of LE callable services. But, alas, you're right: although I think many COBOL programmers would be interested in doing this if it made sense in the application, my experience is that most COBOL programmer _managers_ do not want to take the chance(?) of challenging their staff, so they don't train them and they may even forbid them from using the newer features. Instead of using COBOL, where memory management can be done clearly and explicitly, they would rather hire Java coders, who have no control on memory management and very little understanding of what's really going on in either the JVM or the underlying z/OS system. There is very little chance of changing that, I'm afraid. So it is what it is, and we soldier on. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: Java apps have most flaws, Cobol is cleanest.
On 12/9/2011 4:48 PM, Frank Swarbrick wrote: Kind of a non sequitur. COBOL programs (I am a COBOL programmer) do little in the way of dynamic allocation, thus no GC required. (Not that I wouldn't like some dynamic allocation in COBOL...) Frank It's there for you to use: http://www.trainersfriend.com/Language_Environment_courses/m512descr.htm http://www.trainersfriend.com/COBOL_Courses/d704descr.htm http://www.trainersfriend.com/COBOL_Courses/D725descrpt.htm -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: JCL sheesh! for today
On 12/8/2011 2:17 PM, Lindy Mayfield wrote: Would you mind, please, Joel (or anyone else), giving me an example of some sort of JCL substitute language you and Fred speak of? In the real/wild world? I personally do not see any benefit from a JCL-like language being in the style of another language. But I think I got this wrong. This is something I think - and I said I think - that I've learned a bit over the past few years. That when you take a general purpose type of language and make it specific for one purpose only... then just go from there. All the stuff you need to know you need to know from the assembly language. But in my case, and perhaps many others, I wrote and modified over 10's of thousands of Cobol and CSP (not to mention JCL, Rexx, SQL, etc) lines of code during my lifetime up to a certain point. And I never, ever knew any MVS instructions at all, other than, by accident IEFBR14. I always knew the BR14 was somehow special. Took me forever to find out, but I did. What I would say is this: If you made JCL more C like when running C programs, could I use it for running other programs like Cobol or Rexx or IDCAMS? Then why not make it more C-like or Rexx-like or macro-like? It all boils down to the same thing, doesn't it? And if I hate C as much as some hate JCL, then what? Didn't we already learn this lesson from shell's and shell scripting languages? Today, for 45 more minutes is Sibelius' birthday. Happy birthday. This is a nice Finlandia, if I didn't mistakenly post it already. I've been having fun on both IBM-MAIN and ASSEMBLER-LIST for the past few days, so I get mixed up. http://www.youtube.com/watch?v=ci3RPAOFok4 Regards Lindy Well, that was bracing. Now to the soundtrack from Departures, the Japanese movie that got best foreign fill at the Academy Awards last year: http://www.youtube.com/watch?v=UiyFeT0Tpkk And, oh yes, back to work. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: Licence to kill -9
On 11/30/2011 1:26 AM, Lindy Mayfield wrote: That is a very fair test, basic, and not high difficulty. Sometimes I get a bit miffed when I find out an interview for a technical position was held without me or any other technical person there. One test question back some years ago with I was working in Heidelberg was to ask the interviewee what would they do if they encountered some network problems. I didn't get that question because I was interviewing for a mainframe position, and with one manager level MVSkinda-sorta and another Unix guy that didn't say much. And knew diddly about mainframes. But the answer they were looking for about the network was the ping utility. To be honest, I would have probably gotten that one wrong because I would have gone deeper too look for a problem. Ping is such a staple utility used so much that I would have dismissed it as being just too obvious. Of course I would have started with something like ping, but I wouldn't have counted it as any sort of answer. Personally I would expect more from a professional. Ok, if someone says they are an assembler programmer, then sure, show us what you can do. Copying a file to a file seems trivial. But what if they aren't an assembler programmer? I'd say come back tomorrow with a working program, and explain briefly how it works in case it was simply copied from another source and (hopefully changed a bit). Copying code is fair game. Now you have me challenged to see if that would be a fair request. My assembler skills are next to nothing. Best I've done is a Rexx assembler function and that was mostly just going through a bunch load of control blocks. And I might as be a RISC programmer - I might know 40 instructions. Starting now, if I don't give up for some good reason, I am going to write an assembler program to copy a file. Something I've never done before, and I have no clue how to do it. Sounds like a nice challenge. If you need any hints / samples, you could visit http://www.trainersfriend.com/General_content/Book_site.htm and scroll down the three Assembler papers. In your case you might start with the third of the three and then read the second and then the first. But ... try it yourself first. Lindy Mayfield -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Rick Fochtman Sent: Tuesday, November 29, 2011 12:09 AM To: IBM-MAIN@bama.ua.edu Subject: Re: Licence to kill -9 unsnip When they talk about their skills in Assembler, I ask them to write a simple program to copy one file to another. (I had a white boarxd in my office.) We then would critique the result. Sometimes the program was very good: short and effective. Other times, the result was a disaster. One couldn't do it at all. And HE was supposed to be the Assembler expert! Bottom line: you MIGHT dazzle us with brilliance; you certainly CANNOT baffle us with BS. -- 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 -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: Multipl Entry Points in PL/1 Load Module
On 11/23/2011 8:29 PM, Munif Sadek wrote: Thanks Rick That’s exactly what I am finding out.. It does not matter what Linkage editor statements I use (Thanks Steve) I cannot create multiple entry points in a PL/1 load module and make them independent runnable unit. 1. You're welcome. 2. I'm concerned about your desire to make alternate entry points into 'independend runnabl unit's. What do you mean by that? Any way, you can have PL/I subroutine load module with multiple alternate entry points. You could also consider using PL/I packages or PL/I DLL linkages. If I am not asking for too much, can someone please provide a working example or pointers in the right direction for PL/1 subroutines that has multiple entry points. I will go through rest of this thread and make my tiny brain work hard.. I did find a sample skeleton in IBM PL/1 Library but so far not able to make it work. The example I posted was a PL/I subroutine with two entry points: MSTST : PROC REORDER; DEFAULT RANGE(*) STATIC; PUT SKIP LIST(' MSTST ENTRY POINT'); END; MSTSTE: PROCEDURE; MSTST1: ENTRY; PUT SKIP LIST(' MSTST1 ENTRY POINT'); END; It's the same as your original post, except I pulled 'OPTIONS(MAIN)' off. Be aware that you can have multiple entry points without separate procedures: a single procedure may have multiple entry points. You might use alternate entry points for different parameter lists, for example. /* Rick Wrote : I think you'll find that multiple entry points are NOT permitted for a PL/I Main Program; only for a subroutine, where the PL/I environment vis-a-vis save areas, error handling, etc. are already established. */ Thanks for your help.. regards. Munif PS. Steve - I will be in touch with you, we do have technology gap here in XML parser, GDPS and WLM / IRD - ARM etc ..etc despite having collective 300Yrs+ sysproging experience and most of the technical staff are ex IBM sysprogs ;-) I can't wait. Be aware: I am not a systems programmer. I develop and teach courses designed for z/OS applications programmers. If that's what you're needing, then we're good. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: Multipl Entry Points in PL/1 Load Module
On 11/22/2011 1:19 AM, Munif Sadek wrote: Dear Listerr I am trying to create multiple entry point for single PL/1 Load module. My source is MSTST : PROC OPTIONS (MAIN) REORDER; DEFAULT RANGE(*) STATIC; PUT SKIP LIST(' MSTST ENTRY POINT'); END; MSTSTE: PROCEDURE; MSTST1: ENTRY; PUT SKIP LIST(' MSTST1 ENTRY POINT'); END; and my Binder is //SYSLIN DD * INCLUDE PLIOBJ SETSSI 0040 ALIAS MSTSTE NAME MSTST(R) /* In my load library I am getting MSTST load module created and ALIAS MSTSTE created for LOAD MSTST. I can run MSTST but MSTSTE fails with S0C4 RSN0004. Any pointers in right direction please.. regards Hmm. Try changing your alias to: ALIAS MSTSTE(MSTST1) Alternate entry points are just one of the fascinating topics we cover in our three day course Cross Program Communication in z/OS. See http://www.trainersfriend.com/Language_Environment_courses/m520descr.htm -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: Multipl Entry Points in PL/1 Load Module
On 11/22/2011 8:54 AM, Shmuel Metz (Seymour J.) wrote: In4ecb9897.6080...@trainersfriend.com, on 11/22/2011 at 05:41 AM, Steve Comstockst...@trainersfriend.com said: Hmm. Try changing your alias to: ALIAS MSTSTE(MSTST1) That won't do what he asked for. He needs an ALIAS statement for each INCLUDE PLIOBJ SETSSI 0040 ALIAS MSTSTE ALIAS MSTSTE1 NAME MSTST(R) There's also the issue that he only has OPTIONS(MAIN) on one of the three entry points. I don't believe the any current PL/I supports multiple main entry points. Well, you're totally right about the OPTIONS(MAIN) point. So I set up a calling routine: pmaina: proc options(main); dcl mstst entry external; dcl mstste entry external; call mstst; call mstste; end pmaina; Then I compiled the OP's original program and ran two tests: 1. with LKED.SYSIN consisting of: ALIAS MSTSTE ALIAS MSTSTE1 NAME MSTST(R) result of running pmaina: MSTST ENTRY POINT MSTST1 ENTRY POINT 2. with LKED.SYSIN consisting of: ALIAS MSTSTE(MSTST1) NAME MSTST(R) result of running pmaina: MSTST ENTRY POINT MSTST1 ENTRY POINT So either way, the binder control statements work. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: Multipl Entry Points in PL/1 Load Module
[top posting] Sorry, I forgot to mention that I pulled the OPTIONS(MAIN) off the OP's code for running my tests. On 11/22/2011 10:24 AM, Steve Comstock wrote: On 11/22/2011 8:54 AM, Shmuel Metz (Seymour J.) wrote: In4ecb9897.6080...@trainersfriend.com, on 11/22/2011 at 05:41 AM, Steve Comstockst...@trainersfriend.com said: Hmm. Try changing your alias to: ALIAS MSTSTE(MSTST1) That won't do what he asked for. He needs an ALIAS statement for each INCLUDE PLIOBJ SETSSI 0040 ALIAS MSTSTE ALIAS MSTSTE1 NAME MSTST(R) There's also the issue that he only has OPTIONS(MAIN) on one of the three entry points. I don't believe the any current PL/I supports multiple main entry points. Well, you're totally right about the OPTIONS(MAIN) point. So I set up a calling routine: pmaina: proc options(main); dcl mstst entry external; dcl mstste entry external; call mstst; call mstste; end pmaina; Then I compiled the OP's original program and ran two tests: 1. with LKED.SYSIN consisting of: ALIAS MSTSTE ALIAS MSTSTE1 NAME MSTST(R) result of running pmaina: MSTST ENTRY POINT MSTST1 ENTRY POINT 2. with LKED.SYSIN consisting of: ALIAS MSTSTE(MSTST1) NAME MSTST(R) result of running pmaina: MSTST ENTRY POINT MSTST1 ENTRY POINT So either way, the binder control statements work. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: Terminology
On 11/22/2011 10:30 AM, Linda Mooney wrote: Greetings! snip--- The mark over the 'a' in 'ä' is, for example, called a diaresis in English and an umlaut in German. /snip--- Even in my English class it was called an umlaut, but that is the only one of the marks (is that the proper term?) that I recognize. I have been following this thread and I can see that there are many more marks than I have ever been aware of. Somebody's (maybe everybody's) email editor is probably playing tricks as the same marks, including those forwarded, are not shown consistently in my inbox. Can anyone offer a link with these marks that includes something about them, and hopefully audible enunciation? I did check Google, and found listings for en.wiktionary.org and www.tfode.com , but are there better references? Thanks, Linda David Bond of Tachyon Software has some great pages on this. For what you're asking about, check out: http://www.tachyonsoft.com/uc.htm#U00C4 - Original Message - From: John Gilmorejohnwgilmore0...@gmail.com To: IBM-MAIN@bama.ua.edu Sent: Tuesday, November 22, 2011 9:02:05 AM Subject: Re: Terminology The ‘inverted circumflex’, as in ‘ă’, is in fact more like a lower semicircle than an inversion of the circumflex in ‘â’. It occur alone and in combination with other marks, as in ‘ặ ’, ‘ắ’, and ‘ẵ’. Linguists writing in English, in which it does not occur, sometimes call it a cup. In the languages in which it is actually used it has other names, different in each language. This is to be expected. The mark over the 'a' in 'ä' is, for example, called a diaresis in English and an umlaut in German. John Gilmore, Ashland, MA 01721 - USA -- 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 -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: Multipl Entry Points in PL/1 Load Module
On 11/22/2011 2:56 PM, Shmuel Metz (Seymour J.) wrote: In4ecbdad9.8070...@trainersfriend.com, on 11/22/2011 at 10:24 AM, Steve Comstockst...@trainersfriend.com said: call mstst; call mstste; You left out call mstste1 So either way, the binder control statements work. See above. The OP didn't want to call mstste1, just mstste. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: Simple record extraction from a sequential file
On 11/21/2011 3:02 PM, John Gilmore wrote: You have a response that apparently meets your needs. Your question interests me for another reason. I asked two admittedly very bright 15 year olds to write a parameterized--a value V, a field of length L, and a one-origin offset O of its first byte--PL/I procedure to do what you want to do. It took them 10 and 13 minutes, respectively, to come up with correct, working procedures complete with bullet proofing and test cases. The use of the SORT to do this job seems to me to be much akin to using a piledriver to set a ten-penny nail., and I should be interested to know why you sought a canned solution to a problem of this sort. John Gilmore, Ashland, MA 01721 - USA John, It's the wave of the future. Actually, the wave of the present: if I create it myself I will have to think. If I can take a canned solution, the bulk of the thinking is done for me. How many times have you seen people on this list say, proudly even, I'm lazy so ... . From a more practical standpoint: it's efficient to use existing art. (Not counting the time it takes to find the existing art, such as querying on ibm-main.) The whole mantra of code reuse has always struck me as sort of disengenuous. Java is not the only language that can create methods that can be used by many other programs. Think subroutines. But in large shops I have seen the number of subroutines be so overwhelming that it's often easier to roll your own. So now we get a proliferation of subroutines (or methods) available but no one knows how to find them or use them (except for, perhaps, the most frequently used 10%). So it goes. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: Braces, Brackets, Broken braces, and Parentheses
On 11/18/2011 8:01 AM, zMan wrote: Hmm, I'd never heard 'broken bracket either, but http://en.wikipedia.org/wiki/Bracket does say occasionally known as. Of course, John may have added that to the page just to mess with us :-) I'd always heard the term 'angle bracket', which makes some sense, I think. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: Braces, Brackets, Broken braces, and Parentheses
On 11/18/2011 8:48 AM, Lindy Mayfield wrote: In the UK and other parts of Europe, they say them this way: (,) Brackets (Open and close) [,] Square bracket s {,} Curly brackets . Full stop So the term 'parentheses' is unknown or unused? The trouble I have gotten into is when the word bracket is used, I automatically think square brackets. Lindy -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of John Gilmore Sent: Friday, November 18, 2011 4:46 AM To: IBM-MAIN@bama.ua.edu Subject: Braces, Brackets, Broken braces, and Parentheses Steve Comstock's observation, that o that [,] are brackets, o that {,} are braces, o that (,) are parentheses, and, I will add, o that,, used in BNF notation, are broken brackets are consonant with standand Anglo-American mathematical and computer-science usage. If one is talking about, say, FORTRAN, which uses only parentheses, the first three of these distinctions are not, finally, necessary. Inexact terminology does no harm. If one is talking about, say, C or C++, which use each of the first three very differently--notionally in order to avoid the compiler complexities associated with context sensitivity or overloading--it is important to have different names for them and to use these names consistently. Pedantry is context-sensitive. John Gilmore, Ashland, MA 01721 - USA -- 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 -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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
Website rewrite to HTML5
'sfunny how things go 'round. In September I was unhappy with my ISP and I asked for advice on alternatives. Which I got, and I'm now down to two contenders. (Thanks to those who passed on suggestions and personal experiences.) But, before I actually move my website, I decided it was time for a major overhaul: I originally began by using MicroSoft Front Page, and it worked for getting my site up pretty quickly. But as I've learned more about HTML, I started looking at the generated pages from Front Page and I was pretty appalled: really ugly. And if I used the Front Page editor to make changes, when I saved the changed page Front Page would revert to its style. At the same time I've started to explore HTML5, which, while not yet a standard, seems destined to be the preferred markup for the web. Many browsers support most of the features already, and the direction the RFC is taking looks to be really nice. So I've just done a major overhaul of our website: used Notepad (and my colleague Hunter Cobb helped, using Notepad++) to rewrite over 350 pages in HTML5 with no Front Page garbage and my preferred style of indentation and markup. This also gave us a chance to change some styles, improve some layouts, fix broken links, rewrite some of the prose, and so on. Fun. Most of these changes have been moved to my current site location for testing. All re-written pages have been validated using the W3C's HTML validation tool (pretty cool: http://validator.w3.org/#validate_by_upload ) and most have been checked using five different browsers. But I have not been able to check the pages on small monitors, monitors with different resolutions, and on older browsers. Just too much. So here's my point: if you have the time and inclination, I would appreciate any feedback / problems with our website. Just get to http://www.trainersfriend.com and poke around. Let us know of any problems: * Links that don't work * Layout that doesn't look right on your system (tell us your browser name and version, and screen size and resolution) * Typos * Badly written prose We'll also be happy to hear any suggestions for improvements. Probably best if you reply directly to me, off list, which is why I set the reply-to back to me instead of to the list. Thanks for any time and effort you can put into this on our behalf. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: USS
On 11/18/2011 10:04 AM, Ian wrote: Seeing that it is Friday, we can put the issue to vote and let the democratic process decide for us? Cast vote here : http://cicsworld.com/node/3827 Ah. The tyranny of the majority? You know, 50,000,000 Frenchmen (or any other nationality or group) _can_ be wrong. Ian Folks, If people folllowed the principles used in academia et al, as I understand them, the first usage of a term is spelt out in full followed by in brackets the acromyn or abbreviation that will be used through the paper. For example Unix System Services (USS) United States Ship (USS) Then no one has a valid cause of complaint Ken -- 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 -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-355-2752 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: USS
On 11/16/2011 8:43 PM, Ken Brick wrote: Folks, If people folllowed the principles used in academia et al, as I understand them, the first usage of a term is spelt out in full followed by in brackets the acromyn or abbreviation that will be used through the paper. For example Unix System Services (USS) United States Ship (USS) Then no one has a valid cause of complaint Ken Brackets? Oh, you mean parentheses: ( ) Brackets are: [ ] (not square brackets, just brackets) Braces are: { } (not curly braces, just braces) Oh, wait. It's not Friday yet. Sorry. ;-) -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our new tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: Data encrypt
On 11/15/2011 7:39 AM, Roberts, John J wrote: You have received a secure message from Roberts, John J entitled, RE: Data encrypt. You may view the message (before 12/15/2011) at the following web address: https://dhstw2.dhs.state.ia.us/messenger/msg?x=d-801006-VUpGvX5q - Delivered with Iowa Department of Human Services' Secure Messenger (TM) Server. Secure Messenger is a trademark of Tumbleweed Communications Corp. Well I can see that Tumbleweed Communications is doing its best to prevent communications. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our new tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: C newbie - pass a LDAP handle out to calling routine
On 11/6/2011 1:10 PM, Bernd Oppolzer wrote: When calling C routines from other languages like COBOL or PL/1 (or FORTRAN), you have to take into account that in C the parameters are passed by value, whereas the other languages pass them by reference, that is, addresses of the variables. The solution is simple: to construct your C routines so that they can be called from other languages, put a star on every parameter, so that C expects pointers instead of values. Of course, when accessing the parameters inside the C functions, you have to specify the stars, too. that is: int cfunc (int *x, double *x, struct type *p, ..); Furthermore, the result type should be int, so that other languages can read the return code from the C function result. If the parameter type is pointer, you need two stars, of course (that was your point). Of course, this does not solve all the problems. You have still the issue with char strings, which are in fact vectors of single chars, so there is already a star. And you need to unterstand that when passing vectors as parameter, you normally pass the starting address. And, with languages like PL/1, you have the locator/descriptor problem. But that's another topic and has nothing to do with C. Kind regards Bernd ad We discuss all these issues, and more, in our 3 day course Cross Program Communication in z/OS. Details at: http://www.trainersfriend.com/Language_Environment_courses/m520descr.htm The course covers any mix of these languages that the students want to include: Assembler, COBOL, PL/I, and C. Lectures are set and labs available for all four languages, and you can focus on just one language or any mix you like. /ad Am 06.11.2011 20:08, schrieb Gibney, Dave: With the assistance of several folks over on MVS-OE, I solved my problem. It is clear here that I did fail in the original question to be clear enough that my driving program is not C. The whole intent was to be able to pass that address from ldap_init back out to the non C driver so that it could be reused by the thousands of calls. The solution was: extern int ret2nat (int *back_value, LDAP **ld, char *msg) This pointer to a pointer format allows the fullword in the calling non C program hold the LDAP handle from call to call. -- 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 -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our new tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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
Maintenance at two in the afternoon? On a Friday?
Well, I just tried to do some online credit card account maintenance with my Capital One card, and got the message 'System Unavailable'. I called tech support and they said they were doing maintenance on the system. Regular weekend maintenance. At 2:00 on a Friday afternoon? Does anyone know if they are using mainframes for their online / web based work? Sheesh! Someone should teach them they can use mainframes and do maintenance while the system keeps running! Makes you wonder about staying with them. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our new tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: CRLF in Unix being translated on Mainframe to x'25'
On 10/24/2011 2:10 PM, Lizette Koehler wrote: A programmer I am working with is getting a file from Unix which will be sent to the mainframe. This will be using FTP. The process is we receive the file from the Unix system and it is placed on a Windows 2008 server. Then from the Windows 2008 it is going to be FTP'd to the mainframe. Is there a way to keep the CRLF command at the end of each line? And will the mainframe recognize it as a newline? What we really want is the UNIX file to be individual (FB Lrecl 946) going into the mainframe. It seems the Unix CRLF is x'0A' whereas the mainframe is x'25' Thanks for any advice Lizette Our File RePackager product can handle this. Once you have a file on your mainframe, you can use the utility to convert the file to an HFS or zFS file with a different delimiter, code page, even a different record type. Regarding your post, the Unix CRLF is X'0D0A'; x'0A' is just LF. It seems ambiguous from your post if the final file is to be an MVS dataset with lrecl=946 or a z/OS UNIX file with lrecl=946. Does the 946 include the record delimiter? If you are going to have each file be a single record, why even bother with a record delimiter? So, first, you need to determine the code page of your file, and what delimiters are being used on input. If it really is x'0A' and not x'0D0A', then you could use something like this for utility input commands: ifile path='in_path_name',filedata=T,cp=923,recdelim=lf ofile path='out_path_name',filedata=T,cp=37,recdelim=nl this would convert the file from codepage 923 (ISO-8859-15) to codepage 37 (USA EBCDIC), including converting the record delimiter from ASCII LF to EBCDIC NL. Just a thought. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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
On 10/25/2011 7:36 PM, 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 You'd think IBM would be interested in telling the story. But, sadly, that doesn't seem to be the case. I have been after many IBM'ers to launch an effort to win the hearts and minds of people in IT and to raise the level of awareness of mainframes (especially z/OS) in the general public. But they don't seem to care about it: they are either hopelessly lost or they have a future plan that does not include z/OS. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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
Redbook
The weekly redbooks announcement includes this book: Considerations for Transitioning Highly Available Applications to System z http://www.redbooks.ibm.com/redbooks/pdfs/sg247824.pdf which, on a quick perusal, seems to be really good. Recommended reading, I think. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.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
Re: Transitioning Highly Available Applications to System z (Was: Redbook)
to System z http://www.redbooks.ibm.com/redbooks/pdfs/sg247824.pdf which, on a quick perusal, seems to be really good. Recommended reading, I think. -- Kind regards, -Steve Comstock -- 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 -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.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
Re: Fairwell to a Friend
On 10/8/2011 10:16 AM, Rick Fochtman wrote: Received from another list: -- To those who new him: Gilbert Sain-Flour passed away last night in Montauban France. He will be missed. Carlos Aguilera Sr, 1401 Liggates Road Lynchburg, VA 24502 Cell 434-401-4828 carlos @gsf-soft.com I'm really sorry to hear that. He was a class act. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.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
Re: RES: WTO Sample Program
On 10/6/2011 6:45 AM, Sérgio Lima Costa wrote: Lizette. The people here, think this, because, one job was cancelled, and the operator not seen. So, the Idea , is IF something was wrong, run a JOB, that DISPLAY a warning message , and asks from Operator type something. If have a REXX program , We think more easy do a maintenance. How about COBOL or PL/I? Easy enough to do with those languages. Regards and Thanks again, for your help. Sergio -Mensagem original- De: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] Em nome de Lizette Koehler Enviada em: quinta-feira, 6 de outubro de 2011 09:06 Para: IBM-MAIN@bama.ua.edu Assunto: Re: WTO Sample Program Thanks for your help. I received a lot of samples here in the list, and I Will look for. All samples are write in Assembler, but, do you know, IF have some samples, wrote in another language, like REXX, or COBOL ? Yes there are. Do you have specific language in mind? Do you have automation tools like OPS/MVS or Tivoli Netview or other? These typically have their own built-ins. Sometimes you write the WTO/WTOR in assembler language and then call it from the higher languages. Can you give details on what you want to do with the WTO/WTOR - please be specific. Lizette -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.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
Re: JCL CROSS-REFERENCE Utilities
On 10/5/2011 11:24 AM, Roberts, John J wrote: My current client has long avoided any of the modern JCL enhancements. For example, PROCs are very rare. As are temporary datasets. I am trying to upgrade some of the batch apps with PROC/JCLLIB/SET/INCLUDE/IF etc. One of the impediments to the upgrade is the existence of custom JCL XREF tools. For example, whereas before they may have coded DSN=X470.C100(+1), in the new scheme they are likely to see DSN=C100XDSN(+1) whereC100XDSN is a SET variable within an INCLUDE member. So I am betting that the homebrew XREF tools won't work. So I think my replacement for this homebrew functionality will need to be a commercial (COTS) package. I am familiar with the various Windows-based tools for source analysis (Micro Focus Modernization Workbench, EZSource, etc.). But I think these are overkill for my client's needs. What is really needed is an inexpensive z/OS tool. A bit of Googling turns up JCL/Analyzer from CSI International, XREFplus from SEASOFT, JED from DCMSI, and ASG-DOCU/TEXT from ASG. So my questions for listers: which of these tools is a good value (compromise between cost and functionality)? And which is the most popular? Are there other's I have omitted? Are there any free tools (I will check the CBT list in a moment)? We are a z/OS 1.11 JES3 shop. Thanks. John ad Ooooh. And then you'll need to train the JCL coders in how to use all these 'new' features, right? Consider: http://www.trainersfriend.com/JCL_courses/B620descrpt.htm /ad -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.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
Looking for recommendations for web hosting
I put up our website way back in 1998. From that day to this it has been hosted by Verio. Service has been OK. But lately there is evidence I am not getting all my emails. We get most. But from time to time I hear from someone who has sent me an email and it has never gotten to me. I have lost some business and some personal emails that I wanted to see. The Verio support staff have been giving me runarounds and false promises and lies. I've had enough. So I need to find a new web hosting company, and I'm looking from recommendations from the list, especially from those of you who run small businesses, for good web hosting companies. Requirements include: * Support staff in the U.S.; I am tired of not being able to understand the support people; and I want to encourage companies that hire Americans * Host on UNIX or Linux (actually, host on z/OS or Linux on z would be cool, but I don't think I'm going to find that); not Windows * Ability to run CGIs; support of some common web languages (php, perl, etc.) * Support for some relational data base * Affordable; NOTICE: I did _not_ say cheap. I think we must all start to change the mentality that price is the only criteria. To get value you must pay a fair price. (Actually, if corporations would start to act like they understand this, we would see some improvement in the economy quickly, I believe) * Like to have unique IP address that could host multiple domains. I'm off to run some errands, but if anyone has some recommendations, please send, em to me. You can reply on list or off list. Hope I get your email. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.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
Re: Suggestion for a Job running Under a Loop
On 9/20/2011 4:22 AM, Jake anderson wrote: I am not doing a COMPILE,BIND,LINKLED. Its the application trainee users who perform this task. Not the same user but different users performing same task as part of training. Just curious to know if there are any limitation on TGNUM or CPU time to know if a Job is taking more resources. Jake On Tue, Sep 20, 2011 at 6:04 AM, Lizette Koehlerstars...@mindspring.comwrote: Jake, I am a little confused. Are you doing a COMPLE,BIND,LINKED every time you run your program? Lizette Ah. For trainees running training jobs, you really should put TIME= on JOB statements and OUTLIM= on all SYSOUT DD statements. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.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
New Course Announcement: DB2 Version 10 Differences
DB2 Version 10 is now out, and our DB2 course author, Hunter Cobb, has been hard at work putting together an intense course that explains the new features and helps DBAs and application programmers use these features. This is our most intensive DB2 Differences course ever and includes nine hands on exercises (with an optional tenth exercise if time permits). An overview of this course is available at: http://www.trainersfriend.com/DB2_and_VSAM_courses/G528descrpt.htm and the detailed topical outline can be found at: http://www.trainersfriend.com/DB2_and_VSAM_courses/G528O.htm If your shop is moving to DB2 V10, or if you have it installed and are now ready to exploit V10's new features, this course can save you months of trial and error and provide heavy hands-on experience so you're ready and confident in just four days. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.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
New Course Announcement: DB2 Version 10 Differences
DB2 Version 10 is now out, and our DB2 course author, Hunter Cobb, has been hard at work putting together an intense course that explains the new features and helps DBAs and application programmers use these features. This is our most intensive DB2 Differences course ever and includes nine hands on exercises (with an optional tenth exercise if time permits). An overview of this course is available at: http://www.trainersfriend.com/DB2_and_VSAM_courses/G528descrpt.htm and the detailed topical outline can be found at: http://www.trainersfriend.com/DB2_and_VSAM_courses/G528O.htm If your shop is moving to DB2 V10, or if you have it installed and are now ready to exploit V10's new features, this course can save you months of trial and error and provide heavy hands-on experience so you're ready and confident in just four days. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.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
Re: How to splitting loadmudules
Love the subject line; maybe it should be 'loadmuddles'. On 9/9/2011 8:36 AM, Edward Jaffe wrote: On 9/9/2011 12:39 AM, Thomas Berg wrote: I have a need to split loadmodules into separate modules. E g: a load module, A, is consisting of three submodules, A, B and C. I want to split it into three separate modules into a loadlibrary. Is there a more convenient way to do this other than generate REPLACE cards for the BINDER and - in this example - run it three times. (Other than writing an assembler program using IEW macros.) To split a load module 'A' consisting of CSECTs 'A', 'B' and 'C' into modules 'A', 'B' and 'C': REPLACE A,B INCLUDE SYSLIB(A) ENTRY C NAME C(R) REPLACE A,C INCLUDE SYSLIB(A) ENTRY B NAME B(R) REPLACE B,C INCLUDE SYSLIB(A) ENTRY A NAME A(R) You can do all of the relinking/separating in a single binder step. The approach should work even if SYSLIB and SYSLMOD point to the same library. I know of no other way... Right. But Thomas also said he is checking module size (and bind or compile dates?) to prevent same-named CSECTs from replacing each other if they are different. So you would have to process each load module in a separate job then [manually?] compare the separate modules for others with the same name. Gets pretty complicated from this point on, I think. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.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
Re: subtask recovery
On 9/7/2011 1:01 PM, john gilmore wrote: Most of the disadvantages of hierarchical subtasking can be avoided by using a largely hidden control task that ATTACHes other working tasks, which may sometimes but not often ATTACH their own subtasks. Subtasks of an ABENDing [sub]task are ABENDed, but other subtasks of the control task that do not depend from it are not. The hidden control task can also be used to simplify communication among its many subtasks. In deft hands this hybrid scheme can be used to exploit almost all of the different strengths of both hierarchical and peer-to-peer schemes. John Gilmore Ashland, MA 01721-1817 USA Interesting. How do you 'hide' a control task? What do you mean by 'largely hidden'? -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.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
Re: Cobol and large QSAM record length
On 8/29/2011 11:05 AM, 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 Frank, Since it's a IGY message, it's probably COBOL. Might be worth a try to code as V in your code and then DCB=VBS in your runtime JCL. I don't have a chance to test this right now, but it's the only alternative I can think of. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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 with an LE problem
On 8/26/2011 5:36 AM, Binyamin Dissen wrote: Yeah, I know I can try that. What I really do not understand is why I do not have registers that match the alleged user abend. Also, I cannot find this abend in LE or COBOL. But it says user abend U 802, so I would suspect your code. Do you set any user abends? Or is it someone else's code? Are there any condition handlers involved here? [snip] :From: Binyamin Dissenbdis...@dissensoftware.com :To: IBM-MAIN@bama.ua.edu :Date: 08/25/2011 02:31 PM :Subject:Help with an LE problem :Sent by:IBM Mainframe Discussion ListIBM-MAIN@bama.ua.edu : : : :I have a CEEDUMP with : : CEE3250C The system or user abend U 802 R=NULL was issued. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: Book: What On Earth is a Mainframe?
On 8/26/2011 2:07 PM, Phil Smith III wrote: Anyone read this? I have PC kids I work with who are likely to read it, wonder what others thought. I read the pages Amazon would let me preview, and it didn't seem horrible, though it loses points for being published in 2008 and calling System z zSeries. But who knows, he may have been working on the project since before 2005, and of course (too!) many people still use the old name. http://www.amazon.com/exec/obidos/ASIN/1409225356/pakoracom I bought a copy. It's OK. I've got a lot of nits to pick with it, but it covers a pretty wide spectrum of topics that might be helpful to someone with a Windows or UNIX background. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: FW: CEE0813S Insufficient Storage
On 8/23/2011 8:10 AM, HELIO wrote: Lizette, 1)The version z/OS 1.7 2)The program is Cobol 3)It don't use inspect upper case/lower.. 4)It reads some tables DB2 and add data to a single table. The program does merge some table DB2. 5) yes I increased the region 0M, 32M, 64M and after your e-mail I use 125M and failed. Em 23/08/2011 10:11, Lizette Koehler escreveu: -Original Message- From: Lizette Koehler [mailto:stars...@mindspring.com] Sent: Tuesday, August 23, 2011 8:23 AM To: 'IBM Mainframe Discussion List' Subject: RE: CEE0813S Insufficient Storage I am running a job and I am getting the following message. CEE0813S Insufficient storage was available to satisfy a get storage (CEECZST) request. The traceback information could not be determined. It increased the region and failed. Can anyone help me? Helio, Can you show the calls you are making to request the storage, including the data definitions for the variables you are passing? -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: CLOCK change problem
On 8/21/2011 12:32 AM, Jim Thomas wrote: Hai Shidoshi ... Watashi o keihatsu shite itadaki arigatogozaimasu. Watashi wa sore o shitte ita koto ga nai. Watashi wa nipponjin de wa nai asa ga nai I'm sorry .. I just could not resist ... :-) But it should have been Chinese instead of Japanese, so desu ne? (そですね) 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 Binyamin Dissen Sent: Friday, August 19, 2011 7:47 AM To: IBM-MAIN@bama.ua.edu Subject: Re: CLOCK change problem On Fri, 19 Aug 2011 07:18:28 -0500 Jim Thomasj...@thethomasresidence.us wrote: :Switch ?? .. as in a command or a bit ?. A physical switch, young grasshopper. It had to be in the enable position. No idea how it is done nowadays. Have not IPLed a real machine in a long time. :Default STPMODE is YES and were it set to NO .. he would :not get this prompt. That said, he should not set STPMODE :to NO unless he is prepared to go to STP. :-Original Message- :From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf :Of Binyamin Dissen :Sent: Friday, August 19, 2011 6:56 AM :To: IBM-MAIN@bama.ua.edu :Subject: Re: CLOCK change problem : :On Fri, 19 Aug 2011 13:25:59 +0200 Alvaro Guirao Lopez :alvarogui...@gmail.com wrote: : ::I have z/OS V1R11, I have changed CLOCK to OPERATOR PROMPT to change the ::local and UTC/GMT hour. : ::Whe I IPLed the system it prompt reply : ::* 00 IEA888A UTC DATE=2011.231,CLOCK=11.30.00 :: IEA888A LOCAL DATE=2011.231,CLOCK=13.30.00 REPLY U, OR UTC/LOCAL :TIME : ::I reply with : ::R 00,DATE=2011.231,CLOCK=11.35.00,UTC : ::Then system issues IEA903A to reply U when the time ocurrs, I reply at the ::time: : ::R 00,U : ::and then appears again the CLOCK without my change : ::* 00 IEA888A UTC DATE=2011.231,CLOCK=11.30.00 :: IEA888A LOCAL DATE=2011.231,CLOCK=13.30.00 REPLY U, OR UTC/LOCAL :TIME : :There used to be a switch to allow the TOD to be altered. : :How does the STP affect this? -- Binyamin Dissenbdis...@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. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: CLOCK change problem
On 8/21/2011 4:34 AM, Chase, John wrote: -Original Message- From: IBM Mainframe Discussion List On Behalf Of Jim Thomas Hai Shidoshi ... Watashi o keihatsu shite itadaki arigatogozaimasu. You misspelled Watak[u]shi No. Watashi is a common form of watakushi. It's fine. -jc- Watashi wa sore o shitte ita koto ga nai. Watashi wa nipponjin de wa nai asa ga nai I'm sorry .. I just could not resist ... :-) 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 Binyamin Dissen Sent: Friday, August 19, 2011 7:47 AM To: IBM-MAIN@bama.ua.edu Subject: Re: CLOCK change problem On Fri, 19 Aug 2011 07:18:28 -0500 Jim Thomas j...@thethomasresidence.us wrote: :Switch ?? .. as in a command or a bit ?. A physical switch, young grasshopper. It had to be in the enable position. No idea how it is done nowadays. Have not IPLed a real machine in a long time. :Default STPMODE is YES and were it set to NO .. he would :not get this prompt. That said, he should not set STPMODE :to NO unless he is prepared to go to STP. :-Original Message- :From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf :Of Binyamin Dissen :Sent: Friday, August 19, 2011 6:56 AM :To: IBM-MAIN@bama.ua.edu :Subject: Re: CLOCK change problem : :On Fri, 19 Aug 2011 13:25:59 +0200 Alvaro Guirao Lopez :alvarogui...@gmail.com wrote: : ::I have z/OS V1R11, I have changed CLOCK to OPERATOR PROMPT to change the ::local and UTC/GMT hour. : ::Whe I IPLed the system it prompt reply : ::* 00 IEA888A UTC DATE=2011.231,CLOCK=11.30.00 :: IEA888A LOCAL DATE=2011.231,CLOCK=13.30.00 REPLY U, OR UTC/LOCAL :TIME : ::I reply with : ::R 00,DATE=2011.231,CLOCK=11.35.00,UTC : ::Then system issues IEA903A to reply U when the time ocurrs, I reply at the ::time: : ::R 00,U : ::and then appears again the CLOCK without my change : ::* 00 IEA888A UTC DATE=2011.231,CLOCK=11.30.00 :: IEA888A LOCAL DATE=2011.231,CLOCK=13.30.00 REPLY U, OR UTC/LOCAL :TIME : :There used to be a switch to allow the TOD to be altered. : :How does the STP affect this? -- Binyamin Dissenbdis...@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. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: CLOCK change problem
On 8/21/2011 2:39 PM, Jim Thomas wrote: Sir, My apologies ... 'so desu ne' ?? .. chinese ?? .. Forgive me .. aside from Japanese, I also knew Mandarin but 'so desu ne' is Japanese ... and essentially it just means that you're agreeing (indifferently). I'm just confused why you mentioned Chinese Well, I thought your sentences were in reference to the previous post that mentioned 'grasshopper'; that's an allusion to the Kung Fu series, where the lead was a half-Chinese man raised in a Chinese temple. So I replied in English and Japanese, saying, basically, I think you meant to say it Chinese, right? Ah yes. My wife and I slaughter many languages. :-) ... I'm sorry... I used to versant in about eight or nine languages (in a previous lifetime) but .. have not touched them (save but for a few words every now and then) for well over two decades. 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 Steve Comstock Sent: Sunday, August 21, 2011 7:09 AM To: IBM-MAIN@bama.ua.edu Subject: Re: CLOCK change problem On 8/21/2011 12:32 AM, Jim Thomas wrote: Hai Shidoshi ... Watashi o keihatsu shite itadaki arigatogozaimasu. Watashi wa sore o shitte ita koto ga nai. Watashi wa nipponjin de wa nai asa ga nai I'm sorry .. I just could not resist ... :-) But it should have been Chinese instead of Japanese, so desu ne? (そですね) 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 Binyamin Dissen Sent: Friday, August 19, 2011 7:47 AM To: IBM-MAIN@bama.ua.edu Subject: Re: CLOCK change problem On Fri, 19 Aug 2011 07:18:28 -0500 Jim Thomasj...@thethomasresidence.us wrote: :Switch ?? .. as in a command or a bit ?. A physical switch, young grasshopper. It had to be in the enable position. No idea how it is done nowadays. Have not IPLed a real machine in a long time. :Default STPMODE is YES and were it set to NO .. he would :not get this prompt. That said, he should not set STPMODE :to NO unless he is prepared to go to STP. :-Original Message- :From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf :Of Binyamin Dissen :Sent: Friday, August 19, 2011 6:56 AM :To: IBM-MAIN@bama.ua.edu :Subject: Re: CLOCK change problem : :On Fri, 19 Aug 2011 13:25:59 +0200 Alvaro Guirao Lopez :alvarogui...@gmail.com wrote: : ::I have z/OS V1R11, I have changed CLOCK to OPERATOR PROMPT to change the ::local and UTC/GMT hour. : ::Whe I IPLed the system it prompt reply : ::* 00 IEA888A UTC DATE=2011.231,CLOCK=11.30.00 ::IEA888A LOCAL DATE=2011.231,CLOCK=13.30.00 REPLY U, OR UTC/LOCAL :TIME : ::I reply with : ::R 00,DATE=2011.231,CLOCK=11.35.00,UTC : ::Then system issues IEA903A to reply U when the time ocurrs, I reply at the ::time: : ::R 00,U : ::and then appears again the CLOCK without my change : ::* 00 IEA888A UTC DATE=2011.231,CLOCK=11.30.00 ::IEA888A LOCAL DATE=2011.231,CLOCK=13.30.00 REPLY U, OR UTC/LOCAL :TIME : :There used to be a switch to allow the TOD to be altered. : :How does the STP affect this? -- Binyamin Dissenbdis...@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. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: Security is fun in the PC world....
On 8/20/2011 12:28 PM, Paul Gilmartin wrote: On Sat, 20 Aug 2011 14:17:20 -0400, Gerhard Postpischil wrote: Some installations are supersensitive, and may try to control their employees even when off site, though in this day and age this is getting to be more and more futile. Especially since the companies don't do anything to promote loyalty to the company and don't demonstrate loyalty to their employees. What are they thinking? Or perhaps the opposite as it becomes increasingly difficult to conduct one's personal affairs without leaving a trail of digital crumbs. -- gil That's for sure. Just read an article about super cookies. Yikes! -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: SV: PDS(E) invalid membernames give suprising behaviour in ISPF Data Set List Utility (BROWSE)
On 8/19/2011 3:03 AM, Thomas Berg wrote: A related question: Where can I find documentation about member names in PDSE (and PDS), I mean about technical limitations besides the formal rules that is implemented by the standard programs ? Regards, Thomas Berg _ Thomas Berg Specialist A M SWEDBANK Look at z/OS V1Rnn DFSMS Using Data Sets For PDS: Chapter 26; especially the section titled Creating Nonstandard PDS Member Names For PDSE: Chapter 27; the sections PDSE and PDS Differences and Creating Nonstandard PDSE Member Names -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: Copy z/OS USS pax format file to another z/OS system without FTP
On 8/18/2011 8:01 AM, Ray Overby wrote: Is there a way to copy a z/OS USS pax file to another z/OS system without using FTP and have the pax file still be usable when copy completed? For example: 01) Copy USS file to some type of z/os file on source z/OS system. 02) IND$FILE source system z/os file to USB drive. 03) Plug USB drive into new machine that has TN3270 to target z/OS system 04) IND$FILE file on USB drive to target z/OS. 05) Copy z/os file to a USS directory on target z/os. Notes: 01) FTP or similar products are not available on the target system. 02) INF$FILE is available for file transfer. You can pax a file directly into a member of a PDS; if you have multiple files, each one becomes a separate member. Then XMIT the PDS into a flat file, and download the flat file in binary. To reverse the process, upload the flat file in binary to the target system; issues RECEIVE against the flat file; now you have a PDS whose members are pax files. Under the shell use pax -r to unwind each member into the unix file system. Done it dozens of times. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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 Parm data with embedded slashes
On 8/18/2011 8:45 AM, Donald Johnson wrote: Hi all! I have looked this question up in lots of ways and came up empty. I hope someone here can help. I am trying to pass a parm into a COBOL program, and the parm contains a Unix path name. For example, the parm may contain 'cd /a/myuser/REALLYLONGDIRECTORYNAME/'. However, when the program runs, it thinks everything after the / is LE run-time control options, and produces error messages: CEE3608I The following messages pertain to the invocation command run-time options. CEE3606I The string 'REALLYLONGDIRECTORYNAME was too long and was ignored. My question is how I can use slashes in my parm statement without them being seen as LE options? I have tried PARM='...' and PARM=('...'), but they both produce the same results. Thanks in advance for your suggestions! *don* Interesting, hadn't thought about that. So here's an idea: Build a CEEUOPT module with CBLOPTS=OFF, and bind this to your COBOL main. Then in your EXEC statement, code something like: PARM='/cd /a/myuser/REALLYLONGDIRECTORYNAME/' (notice the leading slash) Don't know if it will work, but it's worth a shot. Otherwise, this seems like a good candidate for a new feature request. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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 Parm data with embedded slashes
On 8/18/2011 9:06 AM, Don Imbriale wrote: Code double slash at the end, followed by any run-time options. Oooh. That'd be cool if works. Let us know. - Don Imbriale On Thu, Aug 18, 2011 at 10:45 AM, Donald Johnsondej@gmail.com wrote: Hi all! I have looked this question up in lots of ways and came up empty. I hope someone here can help. I am trying to pass a parm into a COBOL program, and the parm contains a Unix path name. For example, the parm may contain 'cd /a/myuser/REALLYLONGDIRECTORYNAME/'. However, when the program runs, it thinks everything after the / is LE run-time control options, and produces error messages: CEE3608I The following messages pertain to the invocation command run-time options. CEE3606I The string 'REALLYLONGDIRECTORYNAME was too long and was ignored. My question is how I can use slashes in my parm statement without them being seen as LE options? I have tried PARM='...' and PARM=('...'), but they both produce the same results. Thanks in advance for your suggestions! *don* -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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 Parm data with embedded slashes
On 8/18/2011 9:25 AM, Don Imbriale wrote: A correction to my previous post : Actually a double slash isn't needed; just need to specify a leading or trailing slash based on run-time option CBLOPTS. From the LE Programming Guide: CBLOPTS(ON) allows the existing COBOL format of the invocation character string to continue working (program arguments followed by run-time options). When CBLOPTS(ON) is specified, the last slash in a string delineates the program arguments from the run-time options. Anything before the last slash is interpreted as a program argument. Conversely, when CBLOPTS(OFF) is specified, the first slash delineates the run-time options from the program arguments. Anything after the first slash is interpreted as a program argument. Don Imbriale Well, I'm aware of that. Thought you had some new insight. The OP included a trailing slash and yet the parm parser took exception with the _length_ of the parameter without paying attention to the fact that it was a user parm. This is a bug, it looks like. That's why I suggested creating a CEEUOPT with CBLOPTS(OFF) to see if that would help (although I'm not optimistic). On Thu, Aug 18, 2011 at 11:12 AM, Steve Comstock st...@trainersfriend.comwrote: On 8/18/2011 9:06 AM, Don Imbriale wrote: Code double slash at the end, followed by any run-time options. Oooh. That'd be cool if works. Let us know. - Don Imbriale On Thu, Aug 18, 2011 at 10:45 AM, Donald Johnsondej@gmail.com wrote: Hi all! I have looked this question up in lots of ways and came up empty. I hope someone here can help. I am trying to pass a parm into a COBOL program, and the parm contains a Unix path name. For example, the parm may contain 'cd /a/myuser/**REALLYLONGDIRECTORYNAME/'. However, when the program runs, it thinks everything after the / is LE run-time control options, and produces error messages: CEE3608I The following messages pertain to the invocation command run-time options. CEE3606I The string 'REALLYLONGDIRECTORYNAME was too long and was ignored. My question is how I can use slashes in my parm statement without them being seen as LE options? I have tried PARM='...' and PARM=('...'), but they both produce the same results. Thanks in advance for your suggestions! *don* -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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 Parm data with embedded slashes
On 8/18/2011 9:56 AM, Donald Johnson wrote: Thanks Don and others. The final slash was the winner...the parm now looks like: PARM=('cd /a/myuser/REALLYLONGDIRECTORYNAME/','/') Ah, yes! the final slash _and_ the judicious use of quotes. Excellent. In essence, there are two subparms...the first is all my program looks at, and the second one is just a slash (which needs the quotes to avoid a JCL error). This works like a charm, and is not too onerous for me, as the program is within a proc, and I will hide the extra closing slash there. Thanks to all for your time and help! *don* On Thu, Aug 18, 2011 at 11:48 AM, Don Imbrialedon.imbri...@gmail.comwrote: I think the CEE3606I message is stating that IF it was a run-time option, it would be too long. Without the final slash, part of the path name is being seen as a possible run-time option. With a final slash, none of the path name should be seen as a run-time option and the CEE3606I message should go away. - Don Imbriale On Thu, Aug 18, 2011 at 11:39 AM, Steve Comstock st...@trainersfriend.comwrote: On 8/18/2011 9:25 AM, Don Imbriale wrote: A correction to my previous post : Actually a double slash isn't needed; just need to specify a leading or trailing slash based on run-time option CBLOPTS. From the LE Programming Guide: CBLOPTS(ON) allows the existing COBOL format of the invocation character string to continue working (program arguments followed by run-time options). When CBLOPTS(ON) is specified, the last slash in a string delineates the program arguments from the run-time options. Anything before the last slash is interpreted as a program argument. Conversely, when CBLOPTS(OFF) is specified, the first slash delineates the run-time options from the program arguments. Anything after the first slash is interpreted as a program argument. Don Imbriale Well, I'm aware of that. Thought you had some new insight. The OP included a trailing slash and yet the parm parser took exception with the _length_ of the parameter without paying attention to the fact that it was a user parm. This is a bug, it looks like. That's why I suggested creating a CEEUOPT with CBLOPTS(OFF) to see if that would help (although I'm not optimistic). On Thu, Aug 18, 2011 at 11:12 AM, Steve Comstock st...@trainersfriend.com**wrote: On 8/18/2011 9:06 AM, Don Imbriale wrote: Code double slash at the end, followed by any run-time options. Oooh. That'd be cool if works. Let us know. - Don Imbriale On Thu, Aug 18, 2011 at 10:45 AM, Donald Johnsondej@gmail.com wrote: Hi all! I have looked this question up in lots of ways and came up empty. I hope someone here can help. I am trying to pass a parm into a COBOL program, and the parm contains a Unix path name. For example, the parm may contain 'cd /a/myuser/REALLYLONGDIRECTORYNAME/'. However, when the program runs, it thinks everything after the / is LE run-time control options, and produces error messages: CEE3608I The following messages pertain to the invocation command run-time options. CEE3606I The string 'REALLYLONGDIRECTORYNAME was too long and was ignored. My question is how I can use slashes in my parm statement without them being seen as LE options? I have tried PARM='...' and PARM=('...'), but they both produce the same results. Thanks in advance for your suggestions! *don* -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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 (Unix System Services)
On 8/17/2011 7:18 AM, Daniel McLaughlin wrote: We are a small shop and use mostly traditional ZOS things. It appears that the world is stampeding toward z/OS UNIX based software delivery and installation/maintenance. We are not z/OS UNIX trained or savvy. We are looking for some UNIX for Mainframe Dummies material or classes. Suggestions kindly welcomed. (Sarcastic chuckles may be sent off list.) Thank you. Well, of course, we have some classes; we also have some free papers; and there's the IBM docs. * Application programmer training in z/OS UNIX - Introduction to z/OS UNIX - Shell Script Programmikng in z/OS UNIX - You and z/OS and World Wide Web - Developing applications for z/OS UNIX - Introduction to CGIs on z/OS - Writing z/OS CGIs in Assembler - Writing z/OS CGIs in COBOL (see http://www.trainersfriend.com/UNIX_and_Web_courses/unixcurric.htm ) * Free technical papers addressing some of the issues you mention: - z/OS, Language Environment, and UNIX: How They Work Together - Porting Apache 2.2.9 to z/OS 1.9 - Coding AJAX Applications - Setting Up the IBM HTTP Server - Hosting a Web Site on z/OS - One person's experience and others (see: http://www.trainersfriend.com/General_content/Book_site.htm ) * For IBM z/OS UNIX docs, you can start here: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/Shelves/EZ2ZBK0K then filter on 'unix' * For systems programmers, there are several redbooks: - The ABCs of z/OS System Programming, volumes 1 and 9 specifically That should help. :-) -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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
z/OS V1.13 differences for application developers
/OS A633 TSO/ISPF in z/OS A634 ISPF Update A635 Advanced ISPF in z/OS A700 ISPF and JCL on z/OS A750 TSO REXX Programming in z/OS A810 Developing Dialog Manager Applications in z/OS B610 z/OS JCL and Utilities B620 Advanced Topics in z/OS JCL C500 z/OS Assembler Programming Part 4: z/Architecture and z/OS D732 Enterprise COBOL Debugging and Maintenance M512 Using LE Services in z/OS M520 Cross Program Communication in z/OS U510 Introduction to z/OS UNIX U515 Shell Script Programming in z/OS UNIX U520 Developing Applications for z/OS UNIX U518 You and z/OS and the World Wide Web UC01 Introduction to CGIs on z/OS UC04 Writing z/OS CGIs in COBOL UC06 Writing z/OS CGIs in Assembler You can find links to detailed descriptions of these (and all our) courses at: http://www.trainersfriend.com/General_content/CourseIndex.htm Finally, a reminder: our promotion for DB2 training ends soon - see the signature file below. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: Z Toolkit for z/OS Install
On 8/11/2011 8:25 AM, Scott Rowe wrote: I would be happy to be corrected, but I thought that, by definition, each process was a separate address space. Check out z/OS UNIX System Services Command Reference z/OS UNIX System Services User's Guide z/OS UNIX System Services Programming: Assembler Callable Services for _BPX_SHAREAS On Thu, Aug 11, 2011 at 9:01 AM, Shmuel Metz (Seymour J.) shmuel+ibm-m...@patriot.net wrote: Ina6b9336cdb62bb46b9f8708e686a7ea00afc0ed...@nrhmms8p02.uicnrh.dom, on 08/10/2011 at 09:50 AM, McKown, Johnjohn.mck...@healthmarkets.com said: The OMVS environment DOES NOT RUN IN YOUR TSO ADDRESS SPACE! It doesn't run in the same process, but depending on how you're configured you can have multiple processes in the same address space. Do you know that the OMVS command forces execution in a separate address space, or only that the Unix commands may run in a separate address space? -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: file allocation dcb order
On 8/10/2011 9:17 AM, MONTERO ROMERO, ENRIQUE ELOI wrote: Hi to all, I am looking for which is the DCB order to allocate a dataset. I mean, Program DCB, JCL DCB, Dataset DCB. Is there some IBM doc that explains such order? Best regards Enrique Montero Sigh. DCB's have _nothing_ to do with allocation. DCB information is used by the OPEN routines. SPACE and DATACLAS JCL parameters affect allocation. As far as sources for filling in DCB parameters and the priority of these sources, there was a recent, tedious thread on this listserv. The DCB fields that participate in what is called the DCB merge are: RECFM, LRECL, BLKSIZE, BUFNO, OPTCD, DSORG; ignoring the impacts of the DCBE and OPEN exits and OPEN RDJFCB, the order of priority for DCB sources at OPEN time is: 1. If a parameter has a non-zero value coded in the program, that value is used 2. If a value is omitted from the program but coded in the JCL, the JCL value will be used 3. If a value is omitted from the program and the JCL but exists in a label, the value from the label is used After the merge, OPEN checks for completeness; if only the BLKSIZE remains un-initialized, if a new data set is being created, and if the LRECL and RECFM are supplied, and if RECFM is not U, the system will compute an optimal blocksize and place it in the DCB. Next OPEN checks for consistency; if all is well, OPEN gets buffers and, for input files, primes the buffers. The primary information source is DFSMS Using Data Sets (SC26-7410; from the z/OS Internet library, you can download DGT2D4A0.PDF for the z/OS V1R13 version); check out chapter 21 Specifying and Initializing Data Control Blocks, the section Using OPEN to Prepare a Data Set for Processing; p332 has a diagram with a detailed explanation. Note that high level languages might modify this behavior using exits behind the scenes; check the docs for the language of interest. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: assembler help!
On 8/4/2011 7:02 AM, Crabtree, Anne D wrote: In our IEFACTRT (accounting exit), an assembler program, it has the following commands: L R2,PARMJOBC ICM R1,7,0(R2) If PARMJOBC contains a binary integer length of 4 with 00 00 00 08, what ends up in all bits of R1? Unpredictable. The first instruction picks up data from memory location named PARMJOBC, but the second instruction uses that value as an address not as data. Either the first instruction should be 'LA' or PARMJOBC contains an address. If PARMJOBC contains an address, it should probably not be location 4 in memory! I am trying to add additional values to what is in R1 by doing: MVC WK1(4),SMF30CPS A R1,WK1 Why would you do this instead of just using one instruction: A R1,SMF3OCPS ?? This is not doing what I want it to do! If SMF30CPS, also a binary integer length of 4, has 00 00 00 01, what ends up in R1? Anne D. Crabtree System Programmer WV Office of Technology Data Center 1900 Kanawha Blvd East Charleston, WV 25305 (304)558-5914 ext 58292 (304)558-1441 fax -- 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 -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: assembler help!
On 8/4/2011 7:31 AM, Steve Comstock wrote: [correcting my own post] On 8/4/2011 7:02 AM, Crabtree, Anne D wrote: In our IEFACTRT (accounting exit), an assembler program, it has the following commands: L R2,PARMJOBC ICM R1,7,0(R2) If PARMJOBC contains a binary integer length of 4 with 00 00 00 08, what ends up in all bits of R1? Unpredictable. The first instruction picks up data from memory location named PARMJOBC, but the second instruction uses that value as an address not as data. Either the first instruction should be 'LA' or PARMJOBC contains an address. If PARMJOBC contains an address, it should probably not be location 4 in memory! I meant location 8. I am trying to add additional values to what is in R1 by doing: MVC WK1(4),SMF30CPS A R1,WK1 Why would you do this instead of just using one instruction: A R1,SMF3OCPS ?? This is not doing what I want it to do! If SMF30CPS, also a binary integer length of 4, has 00 00 00 01, what ends up in R1? Anne D. Crabtree System Programmer WV Office of Technology Data Center 1900 Kanawha Blvd East Charleston, WV 25305 (304)558-5914 ext 58292 (304)558-1441 fax -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: IEBGENER QUESTION
On 8/2/2011 7:49 AM, John Dawes wrote: G'Day, I am trying print a dsn via IEBGENER. However when I check the output it is all garbled. I browsed the input dsn via TSO and all looks fine. Would anyone know why the output is garbage? Here is a sample: F * g07/18/11 e853652 nPFS (C2-3421) 11/01/11 h*SR853652 a10 WS-SR-PR-NUMBER hPIC X(06) VALUE '853652'. gSR853652 a10 WS-PROGMR-INITLS hP IC X(03) VALUE 'RBP'. gSR853652 'PFS 11/01/2011 RATE-FILING a'. gSR853652 l* O NE PAY CREDIT PFS e- #104 gSR853652 a* : _ gSR853652 * * gSR853652 a* : _ * g Here is my jcl: /* //HC EXEC PGM=IEBGENER,COND=EVEN //*- //* HARDCOPY PRINT //*- //SYSUT1 DD DSN=SYS2.PUB.TEST.SRAL, // DISP=(SHR,KEEP) //SYSUT2DD SYSOUT=(*) //SYSPRINT DD SYSOUT=* //SYSIN DD DUMMY //*- I tried using a DCB of DCB=(RECFM=FB,LRECL=80,BLKSIZE=23440) however the result is the same. Below is the layout of the dsn: General Data Current Allocation Management class . . : **None**Allocated tracks . : 1 Storage class . . . : **None**Allocated extents . : 1 Volume serial . . . : IDW801 Device type . . . . : 3380 Data class . . . . . : **None** Organization . . . : PS Current Utilization Record format . . . : FB Used tracks . . . . : 1 Record length . . . : 80 Used extents . . . : 1 Block size . . . . : 23440 1st extent tracks . : 1 Secondary tracks . : 2 Dates Data set name type : Creation date . . . : 2011/08/02 SMS Compressible. . : NO Referenced date . . : 2011/08/02 Expiration date . . : ***None*** Thanks in advance Can you show us the data (just a couple of lines) from your browse? -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: disclosing business information on the internet
On 7/28/2011 12:20 PM, Frank Swarbrick wrote: Here's something that I think may be of general interest. Our information security officer sent the following to my manager: The content Frank is positing does not appear to be specific to our environment. However, I am concern by the fact he posts his position, where he works, and phone number. This creates some social engineering risk, as well as discloses information about the operating systems we use. Social engineering risk? What the heck does he (or she) mean? Can s/he explain precisely what the risk might be? And the danger from disclosing the operating system you use? Is there a hacker going to penetrate your z/O S security? Who can I talk with to ask Frank to remove information related to where he works on this conversation thread and future ones? Are these concerns justified or just paranoia? I'd say the latter. I like posting this information because I've received useful contacts and information based on it. I'm curious what policies other businesses have. Frank I like it, too. It helps to get a better picture of a poster's environment when we know something about them. This sometimes changes answers. Especially the information if a poster is using, say, VSE and not z/OS. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: disclosing business information on the internet
On 7/28/2011 12:47 PM, Hal Merritt wrote: IMNSHO, the risk is real. There are some reports that very carefully crafted personalized attacks are growing in number and are enjoying some success. H. Maybe so. Can you give an example of what personalized attack would be? Especially in the context of ibm-main and similar lists / listsrvs. My $0.02 -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Frank Swarbrick Sent: Thursday, July 28, 2011 1:20 PM To: IBM-MAIN@bama.ua.edu Subject: disclosing business information on the internet Here's something that I think may be of general interest. Our information security officer sent the following to my manager: The content Frank is positing does not appear to be specific to our environment. However, I am concern by the fact he posts his position, where he works, and phone number. This creates some social engineering risk, as well as discloses information about the operating systems we use. Who can I talk with to ask Frank to remove information related to where he works on this conversation thread and future ones? Are these concerns justified or just paranoia? I like posting this information because I've received useful contacts and information based on it. I'm curious what policies other businesses have. Frank -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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
Our technical papers
A few people have pointed out to me that the papers on our website that I said were 'not printable' are, in fact, printable under certain pdf reader programs: they don't honor the print security. Sigh. So, what I have done is gone and made all the papers on our main technical papers page officially printable. http://www.trainersfriend.com/General_content/Book_site.htm It didn't seem right to make people who use the official tools (Acrobat reader in this case) have to pay while people who used other tools didn't. So now everyone is on the same setting. We still have four papers that have supporting files available for the person who wants to try out the techniques described in these papers, and these files are only available in our Trainer's Friend Store for a nominal fee. At the same time I have put an option in our store for people to make a contribution / donation to support development and improvement of these papers. If some paper has helped you or your organization, it would be a nice gesture to give back a little. So, think about it. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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
Thanks for the reviews; the paper is now published on our website
Thanks to all the folks who read my new paper, Setting Up the IBM HTTP Server. And special thanks for all the comments. I went from version 1.1 to version 1.4 of the document in a single day! The latest version is now available for free from our website; go to: http://www.trainersfriend.com/General_content/Book_site.htm and help yourself (no 'registration', no fees). This paper is the fifth one in the list. I will still take comments and make appropriate changes if you have some thoughts / corrections. Thanks again. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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
Need reviewers for new paper: Setting Up the IBM HTTP Server
For years I've suggested to folks they should try the free (well, included-in-the-price) HTTP server that comes with z/OS. Several people have replied that would love some training in tailoring z/OS UNIX and in setting up the HTTP server. But those are systems programmer courses and my focus has always been on the applications side of things. Finally I've decided to write a paper, a semi-cookbook if you will, on getting the HTTP server up and running quickly. So I've produced a 38-page paper on exactly this. But I would like some of you systems types to have a look and see if it is clear and accurate and if there are better ways to do things and so on, before I publish the doc on my website. If you'd be interested in reading / critiquing this paper, drop me a line off-list and I'll send you a copy. If you have suggestions that I incorporate I'll include your name on the acknowledgements page. Thanks. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: running Assembler I/O macro code as AMODE 31, RMODE ANY
On 7/15/2011 8:14 PM, Edward Jaffe wrote: On 7/14/2011 12:55 PM, Tom Marchant wrote: On Thu, 14 Jul 2011 08:40:37 -0600, Steve Comstock wrote: yes, there is some penalty for AMODE switching. What penalty is that, Steve? Do BASSM and BSM run significantly slower than BASR/BALR and BR? There is no way the processor can know in advance which bits will be on in a branch target register, so its seems likely that the pipeline must be flushed when 'surprise' AMODE switching occurs for pointer-defined linkage. However, if the BASSM/BSM is executed frequently enough, it's also possible the branch history/prediction logic in the processor can guess the right target AMODE a significant percentage of the time to minimize such 'surprises'. I would not expect this to be an issue at all with the SAMxx instructions. The real issue is what LE uses to switch AMODE when the setting is AMODE31(OFF); it may be more than just a BASSM or SAMxx. I don't really know, but I somehow expect overhead and complexity in that scenario (COBOL interacting with non-LE Assembler, as specified in the OP) -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: running Assembler I/O macro code as AMODE 31, RMODE ANY
On 7/14/2011 8:30 AM, Barkow, Eileen wrote: The programmer has a question about possible TCB switching: Option 2 seems better. DATA(31) should allow most of the callers storage to reside above the line, and switch to below the line processing only when calling the assembler routine. Would excessive TCB switching result if the assembler program is invoked repeatedly for file i/o, or does that not come into play? Your programmer is mis-speaking. I don't know what TCB switching is; they probably mean AMODE switching. And, yes, there is some penalty for AMODE switching. I thought you mentioned the programmer was going to re-write the Assembler code, in which case it can be setup to be AMODE 31 and stay that way and there is no such problem. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Farley, Peter x23353 Sent: Wednesday, July 13, 2011 4:53 PM To: IBM-MAIN@bama.ua.edu Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY Option #1 is simpler, that is true. I also forgot to say that the COBOL compiler option DYNAM will also be required so that if the 24-bit assembler program is called using CALL literal (like CALL 'MYASMIO'), then it will be loaded at run time instead of linked in statically. I assume from your original post that this must be your case, otherwise the programmers would not be worrying about including the 24-bit program as part of the link step. However, Option #2 does have the advantage of allowing the WORKING-STORAGE of the COBOL programs to grow much larger in 31-bit storage without worrying about using up all available 24-bit storage. If growth of internal tables or data in the COBOL programs over time is a possible future maintenance headache for using DATA(24), it might be better (though more work) to bite the bullet and take option #2 now instead of later. OTOH getting that 24-bit assembler I/O program correctly converted to 31-bit is the better long-term option over all, and DATA(24) plus DYNAM gives you time to do that as a priority. When that is done you can switch the COBOL compiles to DATA(31) and you're done. Good luck, and feel free to ask more questions if you need to. HTH Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Barkow, Eileen Sent: Wednesday, July 13, 2011 4:06 PM To: IBM-MAIN@bama.ua.edu Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY Thank you Peter. I missed your post yesterday morning as well as some others. I am beginning to think that there was delay in the email yesterday morning and the msgs were delivered later in the Day so I did not notice the earlier ones. Option #1 sounds simpler than 2 since it does not require any code changes. -- This message and any attachments are intended only for the use of the addressee and may contain information that is privileged and confidential. If the reader of the message is not the intended recipient or an authorized representative of the intended recipient, you are hereby notified that any dissemination of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail and delete the message and any attachments from your system. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to 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 -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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
Schwab members on the list
Anyone on the list from Charles Schwab located in the Denver area? Please contact me off list. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: running Assembler I/O macro code as AMODE 31, RMODE ANY
On 7/13/2011 11:53 AM, Barkow, Eileen wrote: I meant that linking everything AMODE 24 was the 'only' way the users could get it to work - that is why they were asking for other ways to do it. So how have you resolved the problem? -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Shmuel Metz (Seymour J.) Sent: Wednesday, July 13, 2011 1:48 PM To: IBM-MAIN@bama.ua.edu Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY In A826B9FD78356242A9D9595912F9B2323A4468A0EC@DOITTMAIL03.doitt.nycnet, on 07/12/2011 at 11:06 AM, Barkow, Eileenebar...@doitt.nyc.gov said: We have some old Cobol programs that are being upgraded to Enterprise Cobol and the users would like to be able to link them as AMODE 31 RMODE ANY. The problem is that some of these programs call assembler modules to do the i/o via QSAM and VSAM macros (TESTCB, SHOWCB, GET, PUT, PUTX, etc) and the only way these can work is by linking everything as AMODE 24, RMODE BELOW. That is *a* way; it is *NOT* the only way. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: running Assembler I/O macro code as AMODE 31, RMODE ANY
On 7/13/2011 12:32 PM, Barkow, Eileen wrote: I passed all the info I got from this list onto the programmers and they can decide what to do. John Gilmore sent the info about using RMODE(SPLIT) and Charles Mills sent a very comprehensive document (previously presented to the list) that he wrote about how to convert assembler code doing such i/o's to 31 bit rmode(any). I was curious if you saw my post with the three papers mentioned. Thanks to all who responded. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Steve Comstock Sent: Wednesday, July 13, 2011 2:19 PM To: IBM-MAIN@bama.ua.edu Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY On 7/13/2011 11:53 AM, Barkow, Eileen wrote: I meant that linking everything AMODE 24 was the 'only' way the users could get it to work - that is why they were asking for other ways to do it. So how have you resolved the problem? -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Shmuel Metz (Seymour J.) Sent: Wednesday, July 13, 2011 1:48 PM To: IBM-MAIN@bama.ua.edu Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY In A826B9FD78356242A9D9595912F9B2323A4468A0EC@DOITTMAIL03.doitt.nycnet, on 07/12/2011 at 11:06 AM, Barkow, Eileenebar...@doitt.nyc.gov said: We have some old Cobol programs that are being upgraded to Enterprise Cobol and the users would like to be able to link them as AMODE 31 RMODE ANY. The problem is that some of these programs call assembler modules to do the i/o via QSAM and VSAM macros (TESTCB, SHOWCB, GET, PUT, PUTX, etc) and the only way these can work is by linking everything as AMODE 24, RMODE BELOW. That is *a* way; it is *NOT* the only way. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: running Assembler I/O macro code as AMODE 31, RMODE ANY
On 7/13/2011 1:21 PM, Barkow, Eileen wrote: Steve, I am sorry but I did not see your post with the 3 papers mentioned. When was it sent? I hope I did not delete it - I get copies of alot of error msg email that I send out to users and am constantly deleting them so I sometimes delete things by mistake. I wondered. It was sent yesterday at 9:26 am; extracting: VSAM can work AMODE 31 just fine. For QSAM, there are a number of approaches that allow you to code file processing in AMODE 31 without switching back and forth using BSM and the like. Visit http://www.trainersfriend.com/General_content/Book_site.htm check out these papers: * Applications Assembler Programming for z * Writing Reentrant Programs (In Assembler) * I/O and AMODE 31 they're all free and have some tidbits you might find helpful. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Steve Comstock Sent: Wednesday, July 13, 2011 2:56 PM To: IBM-MAIN@bama.ua.edu Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY On 7/13/2011 12:32 PM, Barkow, Eileen wrote: I passed all the info I got from this list onto the programmers and they can decide what to do. John Gilmore sent the info about using RMODE(SPLIT) and Charles Mills sent a very comprehensive document (previously presented to the list) that he wrote about how to convert assembler code doing such i/o's to 31 bit rmode(any). I was curious if you saw my post with the three papers mentioned. Thanks to all who responded. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Steve Comstock Sent: Wednesday, July 13, 2011 2:19 PM To: IBM-MAIN@bama.ua.edu Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY On 7/13/2011 11:53 AM, Barkow, Eileen wrote: I meant that linking everything AMODE 24 was the 'only' way the users could get it to work - that is why they were asking for other ways to do it. So how have you resolved the problem? -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Shmuel Metz (Seymour J.) Sent: Wednesday, July 13, 2011 1:48 PM To: IBM-MAIN@bama.ua.edu Subject: Re: running Assembler I/O macro code as AMODE 31, RMODE ANY In A826B9FD78356242A9D9595912F9B2323A4468A0EC@DOITTMAIL03.doitt.nycnet, on 07/12/2011 at 11:06 AM, Barkow, Eileenebar...@doitt.nyc.govsaid: We have some old Cobol programs that are being upgraded to Enterprise Cobol and the users would like to be able to link them as AMODE 31 RMODE ANY. The problem is that some of these programs call assembler modules to do the i/o via QSAM and VSAM macros (TESTCB, SHOWCB, GET, PUT, PUTX, etc) and the only way these can work is by linking everything as AMODE 24, RMODE BELOW. That is *a* way; it is *NOT* the only way. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: running Assembler I/O macro code as AMODE 31, RMODE ANY
On 7/12/2011 9:06 AM, Barkow, Eileen wrote: We have some old Cobol programs that are being upgraded to Enterprise Cobol and the users would like to be able to link them as AMODE 31 RMODE ANY. The problem is that some of these programs call assembler modules to do the i/o via QSAM and VSAM macros (TESTCB, SHOWCB, GET, PUT, PUTX, etc) and the only way these can work is by linking everything as AMODE 24, RMODE BELOW. Is there any way (like by using LE enabled Assembler), that the assembler macro code can run AMODE 31, RMODE ANY? I know that one way is to reset the mode dynamically via BSM and other mode setting instructions so that the data areas can be moved to 24 bit areas before the macros are issued and then moving them back to AMODE 31 areas to be passed back to the Cobol programs. But is there a simpler way to do this? VSAM can work AMODE 31 just fine. For QSAM, there are a number of approaches that allow you to code file processing in AMODE 31 without switching back and forth using BSM and the like. Visit http://www.trainersfriend.com/General_content/Book_site.htm check out these papers: * Applications Assembler Programming for z * Writing Reentrant Programs (In Assembler) * I/O and AMODE 31 they're all free and have some tidbits you might find helpful. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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's the official announcement?
I've seen comments on stories about the new mainframe, and I knew the announcement was coming. But I haven't seen the official IBM announcement letter. Maybe it's one of those strange email delivery things. In the meantime, does someone have a link to the official announcement letter for the 114? Thanks. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: z114 announcement letter from IBM
On 7/12/2011 11:28 AM, John McKown wrote: http://www-01.ibm.com/common/ssi/cgi-bin/ssialias?infotype=ANsubtype=CAhtmlfid=897/ENUS111-136appname=USN Thanks John. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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
New instructions
Well, OK. The z114 announcement talks about over 100 new instructions. Are these in addition to the z196 instructions or is this just a re-statement of the capabilities of this series of machines? Is there a new PoO (Pops, Props, Poops) available? Anyone know? Thanks. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: New instructions
On 7/12/2011 12:23 PM, Cheryl Walker wrote: It's the same instructions as on the z196. Nothing new. Cheryl Thanks, Cheryl. == Cheryl Watson Watson Walker, Inc. www.watsonwalker.com 941-266-6609 == On Jul 12, 2011, at 1:57 PM, Steve Comstock wrote: Well, OK. The z114 announcement talks about over 100 new instructions. Are these in addition to the z196 instructions or is this just a re-statement of the capabilities of this series of machines? Is there a new PoO (Pops, Props, Poops) available? Anyone know? Thanks. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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
Announcement: Applications development for the web on z/OS
* OK'd by Darren With HTML 5 getting near to becoming a standard, I have updated my courses that relate to developing Web applications on z/OS. These courses do not require using any server other than the free HTTP servers that come with z/OS; they do not require CICS. Classic z/OS application developers (programmers using COBOL, PL/I, Assembler, and C) can quickly learn how to develop interesting, rich web pages to be served from z/OS. Some details: You and z/OS and the World Wide Web - 5 days, includes: * Thorough introduction to HTML and XHTML (based on HTML 4.1 and XHTML 1.0, with info on HTML 5 differences): - Markup - Links and anchors - Style - Lists - Images and maps - Applets - Objects - Multimedia (pdf, mov, swf) - Forms and controls - Cookies and hidden controls - Tables - Frames and framesets - IFrames - Page validation * Introduction to Cascading Style Sheets (CSS) * Introduction to ECMAScript (a.k.a. JavaScript) * The Document Object Model (DOM) and scripting Pre-requisite: Introduction to z/OS UNIX - 3 days or equivalent knowledge. More details: http://www.trainersfriend.com/UNIX_and_Web_courses/u518descr.htm === Other updated courses: Introduction to CGIs on z/OS - 1 day; see http://www.trainersfriend.com/UNIX_and_Web_courses/uc01descr.htm Writing z/OS CGIs in COBOL - 2 days; see http://www.trainersfriend.com/UNIX_and_Web_courses/uc04descr.htm Writing z/OS CGIs in Assembler - 2 days; see http://www.trainersfriend.com/UNIX_and_Web_courses/uc06descr.htm Similar courses can be developed for PL/I, C, REXX, and others, on request. = Updated free technical paper: Coding AJAX Applications (Using XHTML, JavaScript, and COBOL on z/OS) at: http://www.trainersfriend.com/Papers/CodingAJAX_Applications.pdf (although the paper is free, you can also buy the supporting files at The Trainer's Friend Store.) = -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: z/OS 1.13 preview
On 7/6/2011 10:33 AM, Edward Jaffe wrote: On 7/5/2011 1:57 PM, Steve Comstock wrote: WOW! That's a big deal. Is this documented somewhere public? Or is this NDA? Do you what the certain restrictions are? Can you tell us? Can you tell us how it's done? The Feb 15, 2011 announcement preview is the only public information I'm aware of. It tells you a lot if you know how to translate the 'announcementese'. It's been out there four months which proves (I guess) that nobody reads these announcement previews. Many thanks to Jim Mulder for bringing this to light on IBM-MAIN! I read that announcement, and even posted an allusion to it in one of my posts. I was looking for the next level of detail. Guess I'll just have to wait. The previewed enhancement allows 'applications' that need 'virtual storage constraint relief' (i.e., ordinary, enabled, DAT-ON code) to have some 'programs running in 64-bit storage'. From that we can infer that the operating system can now save status over an interrupt for code located above the bar.I agree that is a 'big deal'! The part where IBM talks about this enhancement providing VSCR to applications that 'imbed code in data areas' seems to suggest that applications might have to manually copy eligible code into data areas above the bar. If so, that seems like a pretty big 'restriction' to me. Other possible 'restrictions' immediately come to mind as well. For example, there are hundreds of callable z/OS services. I imagine the process of inspecting, updating, testing and documenting required to make them all work for callers executing above the bar will take years. Enablement and/or approval of each service will likely need to be individually justified for expenditure of necessary development, test and tech-writing resources. In z/OS 1.13, probably only a handful (or possibly none!) of the z/OS services will have been enabled/approved for use by such code. Saving status over an interrupt is indeed a 'big deal', but only the tip of the iceberg... -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: z/OS 1.13 preview
On 7/5/2011 2:17 PM, Edward Jaffe wrote: On 7/5/2011 10:28 AM, Paul Gilmartin wrote: z/OS will be designed to support some programs running in 64-bit storage, provided that they meet certain restrictions. This is intended to provide virtual certain restrictions. Does this restrict ATB execution to contexts such that the PSW needn't appear in a TCB or an RB, or will there be support for unscrunched PSWs in those control blocks? (Or must I wait for the full announcement?) The operating system control blocks now handle 64-bit PSWs such that an interrupt while executing above the bar is supported. No abend occurs. WOW! That's a big deal. Is this documented somewhere public? Or is this NDA? Do you what the certain restrictions are? Can you tell us? Can you tell us how it's done? storage constraint relief to applications, particularly those that imbed code in data areas for performance reasons. Why would there be an advantage to imbedding code in data areas? Sometimes this disrupts pipelining; the conventional wisdom is to keep code and data in separate pages, isn't it? Does it facilitate baseless coding? It is often convenient to embed custom-generated code to handle custom-generated data within the data itself. Without support for above-the-bar execution, such programs would need to manage two areas for each data structure: one above the bar and one below the bar. Of course, code and data must be in separate cache lines. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * Special promotion: 15% off on all DB2 training classes scheduled by September 1, taught by year end 2011 * Check out our entire DB2 curriculum at: http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm -- 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: Obtaining System Information from a COBOL program
On 6/27/2011 7:07 AM, Daniel Rose wrote: I came across this website from IBM that describes how to obtain the System Symbols from inside a COBOL Program. This approach is very simple! Here is the link: http://www-01.ibm.com/support/docview.wss?uid=isg3T1012192 Excellent! Nicely done. -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our new tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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
Announcement: New DB2 courses and DB2 training promotion
We have some really exciting news for our DB2 curriculum, and we are launching a promotion for discounted DB2 training: DB2 for LUW (Linux / UNIX / Windows): two new courses Advanced SQL for DB2 LUW - 2 days; info at: http://www.trainersfriend.com/DB2_and_VSAM_courses/GH56descrpt.htm Introduction to Stored Procedures for DB2 LUW; info at: http://www.trainersfriend.com/DB2_and_VSAM_courses/GH58descrpt.htm Revised z/OS DB2 course: Advanced DB2 Application Programming Now: 10 days! 10 days? Yes, 10 days for one course! See http://www.trainersfriend.com/DB2_and_VSAM_courses/G562descrpt.htm for details. You can tame this monster: tell us what topics to omit and reduce the number of days (and the price) when we teach it to your people. ** * Special promotion: between now and September 1, _any_ * * DB2 course can be scheduled for a 15% discount, as long* * as it is taught by 31 December 2011. * ** * Check out our entire DB2 curriculum at:* ** * http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm * ** ** We are excited! -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our new tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: Obtaining System Information from a COBOL program
On 6/23/2011 3:33 PM, John McKown wrote: Just to jump in, a COBOL program can invoke a REXX program, which can access SYSVARs and MVSVARs. Yes, but the OP wanted the LPAR name, which isn't available through those, as far as I can tell, although I'm not sure what he really wanted or if that was just tossed out there. -- John McKown Maranatha! Sent from my Vibrant Android phone. On Jun 23, 2011 11:40 AM, Haynes, Stanstan.hay...@cra-arc.gc.ca wrote: I feel like I should expand on my query. We use CA-TSS as our security server. All datasets are protected. In this case, the appl owners *need* to do a sec check to control the type of access. In their own words: an application makes a call to our business team (app). We then grant access via their HLQ, server packet name and access level - allowing us some degree of control over the calling config design ... Some of our servers are amalgamated, others are more specific. And there's also interest in logging the jobid of the caller of this program (STCnumber if CICS, otherwise the batch jobid). Sysprogs here believe this security check can be removed in favor of more traditional security permissions but that would require our DBAs to do things differently. Right now the appl is calling a 24-bit assembler program for the TIOT/DSN lookup, and one look at the code revealed they're not using DSECT definitions enough. The appl folks are COBOL people, and as such want to ditch the assembler program in favor of a COBOL routine they found on the net. While the odds of seeing the TIOT (and other system-management control blocks) change are slim, they're not nil either. An application program that uses static mapping of control blocks (in COBOL to boot!) could find itself in a broken state because of new z/OS maint introducing a control block change, and then our ability to deploy and maintain z/OS can be undermined. If the appl is broken, what's the fix ? Appl programming change or software rollback ? Sysprogs don't want to be held hostage by the appl programmers. So I'm hearing assembler code using established APIs like GETDSAB. Comments, anyone ? Stan mailto:stan.hay...@cra-arc.gc.ca (613) 941-8091 -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Beha... On Thu, 23 Jun 2011 11:01:56 -0400, Andy Coburna...@andycoburn.com wrote: I question Walt's... -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our new tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: At which zOS level was the initial save area (TCBFSAB) changed to 144 bits?
On 6/22/2011 6:45 AM, Binyamin Dissen wrote: At which zOS level was the initial save area (TCBFSAB) changed to 144 bits? Well, I believe it was V1R3 when the save area was changed to 144 bytes; I don't think it's ever been 144 bits. :-) -- Binyamin Dissenbdis...@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 -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our new tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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: Obtaining System Information from a COBOL program
On 6/22/2011 11:36 AM, Daniel Rose wrote: I had a COBOL programmer ask me how they could get the LPAR name, SYSNAME, or SMFSID from a COBOL program. I could not find a LE Function that would do that. So, a co-worker located a sample program that chases controls to get that information. Does anybody know of any LE Functions or a cleaner way to do this. BTW, the programmer does not want to add a SORT step before the COBOL program nor do they want to change the execution JCL. Hence the restriction of only obtaining this from inside the COBOL program. I got to wondering about this. Your programmer does know that COBOL stands for COmmon Business Oriented Language, right? It just doesn't seem that obtaining an LPAR name or SMFSID is in the same ballpark as doing accounting or inventory or other business applications. Why not use a tool designed to obtain this kind of information? -- Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com * To get a good Return on your Investment, first make an investment! + Training your people is an excellent investment * Try our new tool for calculating your Return On Investment for training dollars at http://www.trainersfriend.com/ROI/roi.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