Re: Dummy dataset
This triggers a memory from my wayback machine. Back then when symbolic references first became available this little annoyance was noticed by several application developers. Our local circumvention was to code a symbolic reference one of several datasets that were created at various lrecls, kept empty, and used instead of DUMMY. Crude, but effective. On 2/4/2014 9:24 AM, Jousma, David wrote: Chris, Yes, I am aware of that. This thread started from an exit we run that detects this type of concatenation in a DFSORT SORTIN due to fallout encountered years ago involving the use of symbolics to override dataset names in the concatenation at runtime. The fallout that occurred was because it took days for the affected app groups to determine that the concatenated datasets after the DUMMY dataset were never included in the SORTOUT. I was not at this job when it occurred, but we are a bank, some maybe the affect was that someone's bank accounts were not accurate(I don’t know). Some here call it a feature, some call it a shortcoming, regardless, it is the way the system operates. The problem for us then was that the job ended RC(0), and it took a long time to figure out that the input data was ignored. That’s why the exit came to life. I know that the same behavior exits using IEBGENER, and IDCAMS REPRO copying and we don’t have exits for those, and no one has complained. Why do we have the ICE EXIT? Politics. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Blaicher, Christopher Y. Sent: Tuesday, February 04, 2014 10:10 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Dummy dataset David, The use of DD DUMMY in a concatenation ends the processing of input data. The following is from the JCL Reference Manual: Data sets concatenated to dummy data sets: The system treats data sets concatenated to a DUMMY data set as dummy data sets in that I/O operations are bypassed. However, the system performs disposition processing and allocates devices and storage for any concatenated data sets. So, in your example you only read the file once. Without the DD DUMMY it would read the file twice. Chris Blaicher Principal Software Engineer, Software Development Syncsort Incorporated 50 Tice Boulevard, Woodcliff Lake, NJ 07677 P: 201-930-8260 | M: 512-627-3803 E: cblaic...@syncsort.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Jousma, David Sent: Tuesday, February 04, 2014 8:45 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Dummy dataset No, we have users sorting data with path names as input. Just ran a test. Single path input, concatenated, all work fine, unless they add a DD DUMMY between them. As a side note, DFSORT doesn’t do a good job with dynamic sortwk allocations with PATH input because it cannot accurately determine the input filesize. I had opened a ticket with IBM on this, and all I got was this is the way it is. My only option was to tell my developers to hardcode sorkwk datasets in their job. //DFSORT EXEC PGM=SORT //SORTINDD PATHDISP=KEEP, // PATHOPTS=ORDONLY, // FILEDATA=TEXT, // RECFM=VB,LRECL=255,BLKSIZE=25496, // PATH='/etc/httpd1443.conf' // DD DUMMY // DD PATHDISP=KEEP, // PATHOPTS=ORDONLY, // FILEDATA=TEXT, // RECFM=VB,LRECL=255,BLKSIZE=25496, // PATH='/etc/httpd1443.conf' -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Paul Gilmartin Sent: Tuesday, February 04, 2014 8:37 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Dummy dataset On Thu, 30 Jan 2014 20:18:05 +, Jousma, David wrote: We have an exit for DFSORT that scans TIOT to see if someone concatenated a DUMMY dataset as input. Here is what I believe to be the relevant snippet of code: ... * CHECK FOR DUMMY DD STATEMENT * NOTE: COULD ALSO BE DD * DDCHKCLC TIOEFSRT,=AL3(0) Q. REAL UCB ADDRESS ? BEDDBAD A. NO, BAD DD ... How does this behave for DD PATH=...? Is the UCB address nonzero for zFS files? Are you unwittingly prohibiting use of zFS in the SORTIN concatenation? That would be imprisoning your users in the twentieth century. Prohibiting DD * is also unduly harsh. A similar question applies to Shmuel's suggestion of DEVTYPE. The definitive test should be for DSNAME='NULLFILE'. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN This e-mail transmission contains information that is confidential and may be privileged. It is intended only for the addressee(s) named above. If you receive this
Re: OT: Entry Level System Programmer Job Description
Additional requirements: 1. Define USS in all contexts. 2. Explain the merits and deficiencies of system symbols. 3. Write authorized programs that perform unauthorized functions, and more importantly vice versa. 4. Create a new linklist, modify it, delete it, create a new one, repeat 5 times. 5. Have a spare copy of Cannatello's book for sale, cheap. 6. Explain the merits and deficiencies of tab characters. 7. Explain the merits and deficiencies of all code pages in the universe. 8. Determine which of John Gilmore's typos are actually typos. 9. Actually like IBM's new reference manuals format. 10. Happily get by on 1 TSO session. 11. Actually use multiple TSO sessions. On 1/30/2014 11:55 AM, Roberts, John J wrote: John P Kalinich wrote: 1. Graduated from SHARE Assembler Boot Camp. 2. Read and understood the contents of Advanced Assembler Language and MVS Interfaces for IBM Systems and Application Programmers by Carmine A. Cannatello. 3. Fluent in z/OS operator commands. 4. Can IPL a z/OS system. IMO, you don't hire Entry Level System Programmers. You hire Entry Level System Programmer Trainees. Anyone who was practicing as an Entry Level System Programmer for any significant length of time is now an Intermediate Level System Programmer. If they left the position after just a few months they are a System Programmer Dropout. To be a System Programmer Trainee, you need to have been: (a) A successful Application Developer on the platform, or (b) A highly experienced platform Operator. While I consider myself a skilled ASM developer and I would highly recommend this skill for any System Programmer, I know that for many years IMS System Programming tasks have been done by people lacking this skill. Obviously, JCL, Utility Program, REXX, and SMP/E skills come before ASM. Familiarity with the diagnostic tools is important as well. But I know that there are many practicing SysProgs that don't know how to read a SYSUDUMP and become dependent on ABENDAID as a crutch. For setting requirements, you also need to consider the environment. A big installation with a whole team of Sysprogs can afford the time to mentor a new guy. But a small shop with only one or two senior people might not be able to afford the time to raise the newbie. John -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Any way to copy (clone ) a RACF user profile ?
The task of building a RACF user profile (or their equivalents in the CA products) is not that difficult even without the use of add on products. A previous post provided a method to search through the IRRDBU00 output file to build a series of commands. I concocted something quite similar during a TS to RACF conversion some years ago. In that scenario I had to use the TS db unload as the basis to build RACF commands to build users, groups, and various resource profiles. No biggie, and the previous cited example is fine enough for the job. An easier approach, IMHO, is to construct the series of commands, by whatever means, execute them to build the ID, then save them in a PDS member or any type of file. Inevitably, more requests come in and then it's a simple matter of copying the saved set of commands, executing them, and you're done. When I started in security administration way back when, it occurred to me that every command(s) is a 1 line (or more) clist. I then started to save everything unique that I ever did, security related, in a series of members. When a request came in I found a like type member, modified it and ran it. Obviously some ISPF editing skill is required but the OP sounded like he has plenty of that based on his questions. Once I had the add on products I became spoiled instantly, however those products are expensive so any RYO solution can be attractive. On 1/17/2014 9:29 AM, Mark Zelden wrote: I grew up on MVS (SP 1.3) with ACF2. It was the very first thing I ever installed and implemented on an MVS system as a new sysprog (only had OS passwords before that). When I was finally exposed to RACF at a different shop 6 years later (around 1991) I was surprised that there was no way to model an ID after another ID. Here we are 20+ years later and there is still no way to do it without products like Vanguard or BETA88.:-( -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS ITIL v3 Foundation Certified mailto:m...@mzelden.com Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html Systems Programming expert at http://search390.techtarget.com/ateExperts/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Mainframe culture question - how display a tab character?
Well Skip, the quotient is not zero. I use x'05' quite regularly when creating a file that will become TXT then Excel. My favorite is writing a record with DF/SORT: OUTFIL OUTREC=(01,10,X'05',11,10,X'05')etc etc So that's a few hundred occurrences over lots of my years which bears out your math, but maybe a few others here have done something similar. On 1/10/2014 4:19 PM, Skip Robinson wrote: To evaluate the existence of an EBCDIC tab character, let's take the total number of instances in which any member of this list has ever in their career had occasion to code X'05'in a z/OS file for any functional purpose whatever. (For me, that's +0). Then divide that value by the cumulative years of experience among all the members of this list. (For me, that's a nontrivial number.) If that quotient would suffice to persuade Virginia that yes, there is an EBCDIC tab character, then I will cave. Otherwise I stand by my assertion. . . JO.Skip Robinson Southern California Edison Company Electric Dragon Team Paddler SHARE MVS Program Co-Manager 626-302-7535 Office 323-715-0595 Mobile jo.skip.robin...@sce.com From: Charles Mills charl...@mcn.org To: IBM-MAIN@LISTSERV.UA.EDU, Date: 01/10/2014 01:49 PM Subject:Re: Mainframe culture question - how display a tab character? Sent by:IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU the absence of tabs in the conventional EBCDIC character set It occurs to me that what may be meant is the absence of control-character-based formatting in mainframe usage. On UNIX and Windows systems, fields are often delimited by tabs and records very often delimited by some combination of CR and/or LF. Page formatting is often done with embedded control characters. On the mainframe, fields are typically fixed length or of some indicated length, and records are fixed length or described by control words. Reports are formatted with blanks between fields, and the pagination controlled with characters that do not correspond to the nominal EBCDIC control characters. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Skip Robinson Sent: Friday, January 10, 2014 12:05 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Mainframe culture question - how display a tab character? An intriguing question in view of the absence of tabs in the conventional EBCDIC character set. My emulator (Vista3270) is pretty rich, but even if I could somehow type a tab character into an MVS file, what would z/OS do with it? As to your question, I would prefer Parm2=FOOtabBAR because any single character representation would mislead the reader into typing *that* character. Like the old joke about not finding the any key. . . JO.Skip Robinson Southern California Edison Company Electric Dragon Team Paddler SHARE MVS Program Co-Manager 626-302-7535 Office 323-715-0595 Mobile jo.skip.robin...@sce.com From: Charles Mills charl...@mcn.org To: IBM-MAIN@LISTSERV.UA.EDU, Date: 01/10/2014 11:48 AM Subject:Mainframe culture question - how display a tab character? Sent by:IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU I have a started task that (among many other things) will display its own parameters, something like Parm1=WIDGET Parm2=FOOBAR At present all of the values it displays are printable characters. Due to an enhancement it is possible that one of the parameters will contain a horizontal tab character. A C programmer would expect the display to become Parm2=FOO\tBAR. MS Word would say FOO^tBAR. But those of you who are real mainframers through and through, how would you expect a tab to be represented in a display? The value is going to be all printable characters 99% of the time so going to hex and character is probably a clumsy approach. Parm2=FOOtabBAR Parm2=FOO\tBAR Parm2=FOO^tBAR Or what? Thanks, Charles -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Scary Sysprogs
Back in the late 80s I worked with the champion of this benchmark. He alienated absolutely everyone except the boss, with whom he was a personal friend. After the company was bought out and everyone went their separate ways we found out the guy was in a bad way with cancer. We rooted for the cancer. On 1/8/2014 9:35 PM, Ted MacNEIL wrote: I remember, from the early 1980's, a quote along the lines of: If a SYSPROG hasn't p*ssed off at least one person a day, they aren't doing their job! - Ted MacNEIL eamacn...@yahoo.ca Twitter: @TedMacNEIL -Original Message- From: Mark Jacobs mark.jac...@custserv.com Sender: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU Date: Wed, 8 Jan 2014 09:08:02 To: IBM-MAIN@LISTSERV.UA.EDU Reply-To: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Scary Sysprogs I agree. If you've never failed, you haven't tried hard enough to grow yourself. On 01/08/14 09:05, Govind Chettiar wrote: It's pretty creativity-stifling to work in a company where the threat of being fired looms. If one works for a firm that has annual RIFs just as a matter of practice and one is constantly in fear of setting a foot wrong lest one get on that list, then one is not going to do anything more than the bare minimum. No one wants to work a single extra minute in that kind of environment. Absent such a fear, one is more willing to take risks, be innovative. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: JCL and date variables
Years ago I created an application that somewhat resembled your requirement. I had to read a file that contained various values and write each variable value as a PDSE member whose member name reflected that value. I used DFSORT to create an 'include' member of DD cards containing the members names. Since a date is your variable value, DFSORT has many date manipulation capabilities, this may be the way to go if you accept this departure from JCL only as the technique. In my old app, once I created the member that contained the DD cards to be 'included', the following job was submitted as the last step via iebgener to the intrdr. HTH. On 1/7/2014 8:13 AM, גדי בן אבי wrote: As far as know, this is not possible using only JCL. You will have to use a separate job to either create the full job, or a small section that will be included. Any job scheduler will be able to do this easily. Gadi -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Juan Mautalen Sent: Tuesday, January 07, 2014 4:10 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: JCL and date variables Hi: I have a question regarding JCL and date variables. I need to run a job daily, whose output must be written to a partitionned dataset with a member name referring to the day before job execution. Example: If the job runs today, january 7 of 2014, it must create the member F140106 ( and not F140107). That is because the job processes information from the day before (and not from the day it is indeed running). Is there a way to achieve this purely from JCL? we have z/OS 1.13. Thanks in advance for your help, JUAN MAUTALEN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN לשימת לבך, בהתאם לנהלי חברת מלם מערכות בעמ ו/או כל חברת בת ו/או חברה קשורה שלה (להלן : החברה) וזכויות החתימה בהן, כל הצעה, התחייבות או מצג מטעם החברה, מחייבים מסמך נפרד וחתום על ידי מורשי החתימה של החברה, הנושא את לוגו החברה או שמה המודפס ובצירוף חותמת החברה. בהעדר מסמך כאמור (לרבות מסמך סרוק) המצורף להודעת דואר אלקטרוני זאת, אין לראות באמור בהודעה אלא משום טיוטה לדיון, ואין להסתמך עליה לביצוע פעולה עסקית או משפטית כלשהי. Please note that in accordance with Malam and/or its subsidiaries (hereinafter : Malam) regulations and signatory rights, no offer, agreement, concession or representation is binding on the Malam, unless accompanied by a duly signed separate document (or a scanned version thereof), affixed with the Malam seal. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: CA Top secret to RACF conversion
My previous company went through a TS to RACF conversion back in '05. We engaged IBM to do aid the effort and based on my experience and results I would recommend them. There are other companies that can and would do this conversion so it might pay to shop around. I have known of a few (no doubt small) shops that tackled this themselves. It is theoretically possible to achieve this in-house. I'd recommend assessing your own environment in view of the following potential variables. 1. How well does the present staff know RACF, meaning 'really' know RACF. 2. Assuming talent is present, does the present staff have the time? 3. How well does the present staff 'intimately' know the content of the Top Secret database? TS allows some liberties that RACF does not. Significant complications can arise. 4. Are the shop exit-free? If not, is the author(s) still available? Shooting from the hip, even with 4 'yes' answers above, I'd still hire it out. On 12/19/2013 7:37 PM, Mitch wrote: Mark: I agree with Ed. And, make sure they have done this before and preferably, have an automated solution that is proven in the marketplace. My partner and I are about to embark on another such project after the first of the year. Regards, Mitch McCluhan, Legacy Modernization Consultant www.lcmg.us -Original Message- From: Ed Gould edgould1...@comcast.net To: IBM-MAIN IBM-MAIN@LISTSERV.UA.EDU Sent: Thu, Dec 19, 2013 4:39 pm Subject: Re: CA Top secret to RACF conversion Mark: I do not care for consultants in general. ut when you have a project such as conversion like this I will say his. IRE a Good consultant it is well worth the time and the money. Ed On Dec 19, 2013, at 1:33 PM, Mark Zelden wrote: On Thu, 19 Dec 2013 10:03:09 -0600, craig.p...@fotlinc.com wrote: http://www.redbooks.ibm.com/redbooks/pdfs/sg245677.pdf There is also an IBM Tool, which you must license that can help with the migration. There are also Technical Services which can be contracted to help, if that is of interest. On Thu, 19 Dec 2013 16:47:56 +, Burrell, C. Todd (CDC/OCOO/OCIO/ ITSO) (CTR) z...@cdc.gov wrote: We did this a few years ago and I ended up writing a great deal of REXX code to read in Top Secret reports and then create the appropriate RACF commands. It was not an overly painful conversion, but we did spend a couple of months testing out the process on our test system. I don't have the REXX code any more due to our mainframe getting shut down about 18 months ago, but the REXX code was not that hard.Just test - A LOT. I don't often say hire a consultant, but this is one of the few cases I do recommend at least looking at some of the companies that offer these services.They have the experience in doing these conversions and hopefully know about caveats or situations you may have not even thought of. They also have the tool sets like the ones Todd mentioned above they have developed from an array of clients (not just one).Weigh the cost of developing the tools yourself and the risk of missing something or extra time in testing etc. against whatever the consulting company wants to charge you. It's also a good opportunity to create your RACF DB with some standards and perhaps get rid of years of shoe horning in profiles / rules to make things work. This takes more effort than just listing profiles and creating equivalent RACF commands. Regards, Mark -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS ITIL v3 Foundation Certified mailto:m...@mzelden.com Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html Systems Programming expert at http://search390.techtarget.com/ ateExperts/ Regards, Mark -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS ITIL v3 Foundation Certified mailto:m...@mzelden.com Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html Systems Programming expert at http://search390.techtarget.com/ ateExperts/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- or IBM-MAIN subscribe / signoff / archive access instructions, end email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: z/OS is antique WAS: Aging Sysprogs = Aging Farmers
I don't recall the official limit. I did just allocate USER123.A.B.C.D.E.F.G.H.I.J.K.L.M.N.O.P.Q.RS Not sure what this proves.. On 11/29/2013 12:49 PM, Gerhard Postpischil wrote: On 11/29/2013 12:36 PM, Paul Gilmartin wrote: There is no limitation ... of ... 5 levels Hasn't been for a long time; perhaps never was. While I don't remember a 5-level limit, there always was (and will be?) a practical limit. Using every possible legal name, even at a single level, exhausts space available on any early DASD. Gerhard Postpischil Bradford, Vermont -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF 3.4 with HLQ *
So that's TDIAS, correct ? On 11/26/2013 12:17 AM, nitz-...@gmx.net wrote: Doesn't somthing in this thread tend to refutetZe'ev Atlas's recent assertion: Apparently z/OS is capable of finding the file without any manual assistance! ... Well, the devil is a squirrel (as we say in German). While an ADCD system is praised (by IBM) as the best thing for application development since it runs without the buyer having to have sysprog knowledge (and that it does), it is not exactly a shining example of how a z/OS system should be configured to satisfay best practises (health checker coughs up at least 20 severe/errors/warnings when first started; and a few of them cannot easily be remedied). So in general, I would agree with Ze'ev, with the caveat of 'in a well configured system'. Barbara -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: 1403 Printer components manual GA24-3073-3
Ah, what non-fond memories! We had a computer room operator that was sensitive to the IBM provided glue, which had a potent aroma. We found that a 1 inch length of ordinary scotch tape, cut in two lengthwise, worked well and outlasted the actual CC tape itself. Eventually the sprocket holes would wear out and drive mechanism would race out of control. We made a point of creating numerous spares and discarding any suspect ones before it died dramatically. Each shift would inspect the existing CCt for wear, similarly to eyeballing a car's fan belt or serpentine. If in doubt, replace. Cheap insurance. On 9/11/2013 4:01 PM, Gerhard Postpischil wrote: On 9/11/2013 2:39 PM, efinnell15 wrote: in two. The paper tapes for forms control were like gold with special forms. In a pinch could be duplicated with a hole punch and cellophane tape. IIRC, these were mylar tapes, and came fairly late. We used heavy duty paper that came with an attached marking sheet - the programmer or operations staff marked the positions to be punched, the corresponding holes would be punched out, the the tape would be separated and trimmed to length, then glued. We imposed the additional restriction that all channels had to have at least one punch in them, to prevent run-away paper ejection. Gerhard Postpischil Bradford, Vermont -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: NSA foils much internet encryption
But I have heard that they quit monitoring IBM-MAIN, RACF-L, ASSEMBLER-L, et al. Too much stress. On 9/5/2013 2:42 PM, John Gilmore wrote: More Snowden documents have been reviewed by the New York Times, which this afternoon concluded that begin extract The agency has circumvented or cracked much of the encryption, or digital scrambling, that guards global commerce and banking systems, protects sensitive data like trade secrets and medical records, and automatically secures the e-mails, Web searches, Internet chats and phone calls of Americans and others around the world, the documents show. end extract This is not very different from the standard informed conjectures about what the NSA and its counterparts elsewhere can do. It is important that the readers of airline magazines disabuse themselves of the notion that they can keep secrets from these agencies using off-the-shelf technology. John Gilmore, Ashland, MA 01721 - USA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: REXX and CLISTs to generate code to delete empty GDG bases
This beautiful example is gilding the lily. Why not just delete all the
GDG bases? Lots of CC8(12?) but hold your nose and it's done.
On 8/28/2013 1:18 PM, Greg Dorner wrote:
This will report onb GDG's with no GDS's attached. You could alter it to also
delete them if you want.
JCL:
//LISTCAT EXEC PGM=IDCAMS
//SYSPRINT DD DSN=amp;SYSPRINT,
// SPACE=(CYL,(50,20),RLSE),
// LRECL=121,RECFM=FBA,BLKSIZE=0,
// DISP=(,CATLG)
//SYSINDD *
LISTC CATALOG('SYS1.CATALOG.NAME') NAMES
/*
//GDGNULL EXEC PGM=IKJEFT01,PARM='GDGNULL'
//SYSEXEC DD DISP=SHR,DSN=..SYSEXEC LIBRARY ..
//INPUTDD DISP=(OLD,DELETE),DSN=amp;SYSPRINT
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DUMMY
REXX:
/*rexx*/
say ' '
say 'GDGNULL processing started'
say ' '
numgdgs = 0
numnull = 0
execio * diskr input (STEM gdgline. finis)
do g=1 to gdgline.0
if substr(gdgline.g,2,16) = 'GDG BASE -- ' then do
numgdgs = numgdgs + 1
gdgbase = strip(substr(gdgline.g,18,44))
drop idcline.
x = outtrap(idcline.,'*',noconcat)
listc entry('gdgbase') all
x = outtrap(off)
if rc = 0 then do i=1 to idcline.0
if substr(idcline.i,8,9) = 'NONVSAM-- ' then leave
iterate
end
if i = idcline.0 + 1 then do
gdgbase = left(gdgbase,44)
say gdgbase 'has no associated data sets'
numnull = numnull + 1
end
end
end
numgdgs = right(numgdgs,7,' ')
numnull = right(numnull,7,' ')
say ' '
say numgdgs 'GDG base entries processed'
say numnull 'GDG base entries had no associated data sets'
say ' '
say 'GDGNULL processing complete.'
say ' '
say ' '
exit 0
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Is there a TSS mailing list?
At one time there was a sprinkling of traffic on this list, maybe 10 per month. I haven't seen any in a long time so I'd probably utilize IBM-MAIN for TS issues. I'd avoid RACF-L unless the issue has a direct relationship to RACF, i.e. conversion or dual/hybrid administration. On 8/8/2013 10:02 AM, Tony Harminc wrote: On 8 August 2013 10:34, Charles Mills charl...@mcn.org wrote: X-posted to IBM-MAIN and ACF2-L. Is there a mailing list for CA Top Secret? tssad...@yahoogroups.com Alternatively, is ACF2-L suitable for TSS questions? Probably not the best place. Sometimes they get asked on RACF-L too. Tony H. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: PRINTOFF TSO command from File 325
Good story though for a Friday. :-) On 8/2/2013 3:29 PM, Micheal Butz wrote: Sorry sent to wrong party it was a mistake Sent from my iPhone On Aug 2, 2013, at 4:28 PM, Ted MacNEIL eamacn...@yahoo.ca wrote: What does this have to do with anything? - Ted MacNEIL eamacn...@yahoo.ca Twitter: @TedMacNEIL -Original Message- From: Micheal Butz michealb...@optonline.net Sender: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU Date: Fri, 2 Aug 2013 16:14:17 To: IBM-MAIN@LISTSERV.UA.EDU Reply-To: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU Subject: Re: PRINTOFF TSO command from File 325 First off how are you know you had some troubles with your moms apartment you We're renovating I still didn't get to do what you had asked CNCLPG callable as I was involved with the co-op hiring another lawyer to litigate and possibly sue the board as they turned down my Buyer because he refused to pay more For The co-op than what it is worth Also I spent 3 weeks trying to get my ADHD meds approved by my insurance Finally threatening to sue My anniversary date at work is 9/10 If I have some how resolved the co-op I will ask my Section Chief to work 4 days 10 hour M - Th. I don't want to take chance losing this job with the co-op situation some what Unresolved after wards I will push to get out if the predicament which I to a certain extent though not fully got myself into Good Shabbos And let me know when is a good time to call re: CNCLPG Sent from my iPhone On Aug 2, 2013, at 3:41 PM, Sam Golob sbgo...@cbttape.org wrote: Hi Folks, I fixed the old PRINTOFF TSO command (which used to be on the IPO and CBIPO) from CBT File 325 so it now prints correct dates. I know that IBM has now come out with the PRINTDS TSO command which does the same thing (prints out a dataset to SYSOUT), but some of you might still want to go with the old favorite, so you're welcome to download File 325 from the Updates page of www.cbttape.org and install PRINTOFF. BTW its HELP member is imbedded in the assembly code (and skipped over by conditional assembly) so the member PRINTOFF in CBT File 325 is now completely self-contained. All the best of everything to all of you... Sam -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Blame the COBOL, how clich é
What a nice post! Does this mean you guys have kissed and made up? :-) On 7/26/2013 4:30 PM, John Gilmore wrote: Shmuel wrote: begin extract It's corrupted by human beings making sloppy and undocumented code changes, which accrue over time. Any single change doesn't do much damage, but the cumulative corruption can be massive. /end extract This happens, but 'undocumented' is often not the problem. Many COBOL shops are meticulous about noting changes as they are made IN the affected source programs themselves. It is the character of this documentation that makes it problematic. It addresses changed functional requirements instead of processing strategies. One reads, say, that the widget tax rate for West Virginia was chang ed from 2.25% to 2.65% on 2005 October 20 by Ætheltred ap Smith and DdU Caradog; but one is not told how or where, often in several places, this change was made. Moreover, such changes are usually made and procedurally rather than declaratively, by changing a line of code instead of updating a table element. The cumulative effect that Shmuel has already emphasized is disastrous. Even systems that once had explicit designs and processing strategies, and they are few, dissolve into a formless and incoherent welter of ad hoc changes. Worse, there are no easy remedies. In particular, changing programming languages seldom helps unless the people using them are changed too and everything is redesigned. C functions, say, turn out to be COBOL programs tricked out with brackets, braces and semicolons. John Gilmore, Ashland, MA 01721 - USA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMP/E vs. NON SMPE Installs (Was BLKSIZE=3120)
Back when IBM created the FACILITY class resource names for SMPE I surmised there was an obscure hole through which a zone dataset could be updated despite lack of update access via the dataset profile. I started to experiment with a test CSI to try to hack into an answer. I would have been in the position of the minister that sinks a hole-in-one on the Sabbath. Who'd believe me and who can I tell? Lack of time and the company's eagerness to show me the door prevailed. On 7/25/2013 9:47 AM, Shmuel Metz (Seymour J.) wrote: In 014401ce887f$d11bb080$73531180$@mindspring.com, on 07/24/2013 at 08:09 AM, Lizette Koehler stars...@mindspring.com said: I do not want them to be able to rec/app/acc fixes on my zones. Then don't give them write access to the data sets in your zone. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Announcing PCRE 8.33 for native z/OS
Aw krap, now I have to look that up too. :-( On 7/5/2013 9:41 AM, David Crayford wrote: Touché. On 05/07/2013, at 10:33 PM, John Gilmore jwgli...@gmail.com wrote: David Crayford wrote: | I find your grammer more difficult to understand than any regex ;) and I find this entirely understandable and wholly predictable. Presumptive dialectal spelling jocularities aside, I am at least as unsympathetic to his views as he is to mine; and attempting to communicate across this barrier would be a mug's game for either of us.The purpose of my earlier post was only to suggest to others that REs are much easier to learn about than, say, Turing-machine notation, Church's lambda calculus, or Post's normal forms. John Gilmore, Ashland, MA 01721 - USA -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Style (was: Announcing PCRE 8.33 ...)
Hilarious, and understandable to boot! Well done, MacNeil. On 7/5/2013 10:40 AM, Ted MacNEIL wrote: It's rarely the grammar, but frequently the vocabulary and the historical and literary references. But I sometimes learn from looking them up, and all in all I consider the style well within the charter of thls list. But, the purpose of communication is to communicate. Deliberately masking/obscuring your message to the point of the recipient having to seek references to understand it detracts from communication's intent. It is never the receiver's fault if the message is truly not understood; it's the sender's. Professor to class: Anybody who cannot express themselves well enough to be understood is an idiot! Do you understand? Voice from back of class: No Sir! - Ted MacNEIL eamacn...@yahoo.ca Twitter: @TedMacNEIL -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: What programmer's fear (not IBM specific)
Wow! Never heard of the language but I'm envious. On 7/4/2013 5:59 AM, Wayne Bickerdike wrote: Mark IV had a ruler too... On Thu, Jul 4, 2013 at 1:19 PM, Anthony Babonas tonybabo...@icloud.com wrote: Rising to the defense of RPG, what other language had its own ruler? Talk about ease of coding! Ah the nostalgia.sigh. Sent from Tony's iPhone. On Jul 3, 2013, at 9:50 PM, John McKown john.archie.mck...@gmail.com wrote: I've not run across many languages that I considered ugly. RPG II was one. EasyTrieve Plus is not ugly, but I don't much like it. The newest IBM COBOL is rather nice, albeit still wordy. The first COBOL that I learned: ANSI COBOL back in the 1970s made me puke, after learning PL/I of the same era. The main thing that I hate is a manager saying use xyz, but refrain from using the new omega facilities. The reason being that everybody in the shop knows the basic xyz language, but is not familiar with the omega features. So I am chained down to the least common denominator for ease of understanding by those who simply won't learn new stuff. Case in point in my current shop, at least in the past, was not using any z/OS UNIX facilities because they were just too esoteric and complicated. On Wed, Jul 3, 2013 at 8:59 PM, Shmuel Metz (Seymour J.) shmuel+ibm-m...@patriot.net wrote: In CAAJSdjg1jRs6DrNV7xzAftEoGcojyeGf=fvwkbdh_idvozp...@mail.gmail.com, on 07/03/2013 at 07:10 AM, John McKown john.archie.mck...@gmail.com said: http://www.itworld.com/it-management/363424/only-thing-programmers-have-fear-all-these-things I say yes to most. #4 is being forced to learn or use some specific technology What if you consider a language to be ugly but also consider it to be the best tool for the job? I don't care for Perl syntax, but between the expressive power of the language and the modules available in CPAN, I find myself using it regardless. That's not a boss telling me that I have to - it's my own decision. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- This is a test of the Emergency Broadcast System. If this had been an actual emergency, do you really think we'd stick around to tell you? Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
