Re: critical (to me): 3494-B10 error messages
Should any care, the problem turned out to be weird (to me). I was told that the SSA adapter to the internal disk (3494-B10 uses a some sort of pSeries w/AIX) was bad. Unfortunately, this type of error is not reported at all to the z system as anything that we could determine. I guess that this is the cost of the internals being a closed black box. -- Wasn't there something about a PASCAL programmer knowing the value of everything and the Wirth of nothing? Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: z/OS WIKI access from a mianframe (TSO)
Ouch! I can imagine such a thing. But it would really only work properly if the writer of the TSO program is an expert in how to use GDDM in order to render multiple fonts as well as GIF, PNG, or JPEG images on a TN3270 emulator which supports GDDM graphs. In my opinion, this is a serious waste of talent. I don't know what a z/OS WIKI really is. We don't host a Wiki on z/OS, although I do have a Wiki running on a blech Windows IIS box which is z/OS oriented (internal use only). Instead of a Wiki being on z/OS, I (personally) would probably just keep the Wiki entries in z/OS UNIX files in Markdown format ( http://en.wikipedia.org/wiki/Markdown ) Basically markdown is a very simple, human readable, format for documentation. It's main plus is that if it is done correctly, it is simple to render into HTML (there are programs to do this) while being perfectly readable as-is by people. On Mon, Mar 3, 2014 at 11:27 AM, Shmuel Metz (Seymour J.) shmuel+ibm-m...@patriot.net wrote: In 531475fd.8070...@isis-papyrus.com, on 03/03/2014 at 01:30 PM, Miklos Szigetvari miklos.szigetv...@isis-papyrus.com said: Is it possible to access the z/OS WIKI from a mainframe application ? The real question is whether there is a browser that will run under TSO and render a z/OS wiki page on a 3270; simple access should not be an issue. -- 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 -- Wasn't there something about a PASCAL programmer knowing the value of everything and the Wirth of nothing? Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF storage protection
It has to do with the fact that the APF code itself could become corrupted (if loaded into key-8 storage) by some user code running under a different TCB. Or that some key 8 storage area used by the APF code could be corrupted by user code running on a different TCB. This corruption could be either due to poor coding, or even a malicious attempt to get non-APF code running in APF mode. TSO has an interface, IKJEFTSR, which can run APF safely under TSO. But it does this my using a separate TCB structure to run the APF code and doing a STATUS STOP on all the other TCBs in the address space. Well, most of them, anyway. However, things running via IKJEFTSR cannot do ISPF functions for the very same reason. The ISPF code runs on a different TCB and that TCB is in a more or less hard wait. ref: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ikj4b780/23.1 http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ikj4b780/23.1.2 On Tue, Mar 4, 2014 at 9:51 AM, Leonardo Vaz leonardo@cn.ca wrote: True, I have never understood that either, gil. It might more to do with executing the program in the appropriate TCB than a security exposure. Leo -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Paul Gilmartin Sent: Tuesday, March 04, 2014 10:25 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: ISPF storage protection On Tue, 4 Mar 2014 08:54:43 -0500, Shmuel Metz (Seymour J.) wrote: In 9819019940159674.wa.paulgboulderaim@listserv.ua.edu, on 03/03/2014 at 06:14 PM, Paul Gilmartin paulgboul...@aim.com said: I have no idea why APF authorized library and link edit with AC=1 alone don't suffice. Because it would be a major security breach. That doesn't tell me much. Why? How? Would it be any less a security breach to invoke such a program from JCL with EXEC PGM=... which likewise causes it to run in the authorized state? -- gil -- 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 -- Wasn't there something about a PASCAL programmer knowing the value of everything and the Wirth of nothing? Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF Storage Protection
If this is part of a vendor product, and we were looking at said product, and I learned that it did this, I would _strongly_ recommend against acquiring the product. Having this around is like having small bottles of fulminate of mercury scattered around in the kids' play room. It is most likely going to explode and do a lot of damage. On Wed, Mar 5, 2014 at 9:12 AM, Rob Scott rsc...@rocketsoftware.com wrote: Do NOT do this ! This is a serious system integrity exposure. Rob Scott Lead Developer Rocket Software 77 Fourth Avenue . Suite 100 . Waltham . MA 02451-1468 . USA Tel: +1.781.684.2305 Email: rsc...@rs.com Web: www.rocketsoftware.com -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of dpewen Sent: 05 March 2014 15:10 To: IBM-MAIN@LISTSERV.UA.EDU Subject: ISPF Storage Protection Hello, I started this thread and I appreciate all the input I received from this list. I have solved the problem by adding code to my user svc that is part of the product. I added two functions to the svc: 1. to turn on the APF-auth bit in the job step TCB 2. to turn off the APF-auth bit in the job step TCB This allows me to issue the MODESET svc successfully. -- 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 -- Wasn't there something about a PASCAL programmer knowing the value of everything and the Wirth of nothing? Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: OPS/MVS Command to Stop IDMS?
We don't have IDMS. But we do have some other products with hang a WTOR that needs to be replied to in order to shut them down (IMO, poor architecture!). We use CA-OPS/MVS. What we do is look at each outstanding WTOR and look for the proper MSGID to which to reply. The code looks something like: temp = OPSTATUS(R,S,*) /* scan all WTORs */ DO WHILE QUEUED() 0 PARSE PULL WTOR PARSE PULL LINE2 FROMSYS=WORD(LINE2,4) /* Check that the message is from this z/OS system */ IF FROMSYSOPSINFO(SYSNAME) THEN ITERATE PARSE VAR WTOR REPLYNO MSGID . IF MSGID = 'CA-7.574' THEN DO ADDRESS OPER , R REPLYNO,STOP END END END Hopefully this will be of some help, should no one else have an an exact IDMS rule available. On Fri, Mar 7, 2014 at 6:45 AM, Steve Conway steve_con...@ao.uscourts.govwrote: Morning, All. Does anybody have a command to shut down IDMS regions by responding to their WTORs they are willing to share? I'm kinda pressed for time, and don't have a test region to test rules on, giving me one shot per night; it's not going quickly enough to keep everyone happy. Cheers,,,Steve Steven F. Conway, CISSP Hosting Services Division, Cloud Technology and Hosting Office, AO-DTS-CTHO-HSD z/OS Systems Support Phone: 703-295-1926 Mobile: 703-402-2650 steve_con...@ao.uscourts.gov -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Wasn't there something about a PASCAL programmer knowing the value of everything and the Wirth of nothing? Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: OPS/MVS Command to Stop IDMS?
In our case, we don't _do_ that. As you might have noticed, I check that the WTOR that I am replying to was issued on the same system as the OPS command is executing on. In any case, it would be the same as having two operators enter replies to the same WTOR at the same time. One would would be accepted, which would eliminate the WTOR number, so that the other would get a message like:IEE704I REPLY nn NOT OUTSTANDING On Fri, Mar 7, 2014 at 7:10 AM, Elardus Engelbrecht elardus.engelbre...@sita.co.za wrote: John McKown wrote: We use CA-OPS/MVS. What we do is look at each outstanding WTOR and look for the proper MSGID to which to reply. Curiousity question: What happens when you have CA-OPS/MVS (or Control-O [1] or such WTOR scanner) on two or more LPARS [ in the same SysPlex] and they both pick up the WTOR and then try to reply? (Warning: I have zero experience on OPS/MVS and IDMS. ;-p ) Just curious of course. Groete / Greetings Elardus Engelbrecht [1] - I can try that out on a test sysplex, but I don't have now access to it for now. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Wasn't there something about a PASCAL programmer knowing the value of everything and the Wirth of nothing? Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Timing issue with Automation product (CA OPSMVS)
The others have given good advice. I would suggest finding out which rule is doing the start of the server. I would then see why that rule is being triggered multiple times. This is the proper way. However, I'll also give you my improper way. We used to have operators who would do multiple START commands for CICS regions. This was irritating because it was somewhat difficult to get the extra regions out of the system. Yes, we could cancel with an A=. But that generated problem reports. Which caused management to bug us. So I wrote up a CA-OPS/MVS rule to control the START command. You, and others, might find it interesting. Or you might not. )CMD START )PROC smfid=OPSINFO('SMFID') EasyRuleCmdText = TRANSLATE(CMD.TEXT,' ',',') upper EasyRuleCmdText WhatIsStarting=word(EasyRuleCmdText,2) WhatIsStarting=TRANSLATE(WhatIsStarting, ,.) WhatIsStarting=word(WhatIsStarting,1) /* Do not allow Production or Clone CICS regions to start on the Development system */ if (smfid='DEV1') then do if 'PCICS' = LEFT(WhatIsStarting,5) then return REJECT if 'CCICS' = LEFT(WhatIsStarting,5) then return REJECT end /* Do not allow non-Production CICS regions on the Production system */ if (smfid='LIH1') then do if 'TCICS' = LEFT(WhatIsStarting,5) then return REJECT if 'MCICS' = LEFT(WhatIsStarting,5) then return REJECT IF 'IMCM' = WhatIsStarting then return REJECT end /* Some things require multiple instances 2b started. List them here. */ MULTIPLEOK=INIT BMCCAS OPSOSF BBISSA1 DUMPSMF C41PDUMP CMRDJCL MULTIPLEOK=MULTIPLEOK TS13DUMP SCHSRVR ATTSRVR CCITCPGW /* Test to see if multiple starts are OK. If so, allow the start */ if (0WORDPOS(WhatIsStarting,MultipleOK)) then return NOACTION /* if multiple starts are not allowed, then check to see if the STC is already running. If so, abort the start, else allow it. */ if (0OPSTATUS(A,A,WhatIsStarting)) then do Msg_Start.1=Dude! Msg_Start.2=Notice. Msg_Start.3=Achtung! Msg_Start.4=Oh, WOW! Msg_Start.5=Heavy, Msg_Start.0=5 Msg_End.1=is already running! Msg_End.2=is currently running. Msg_End.3=is, like, you know, already doing it''s thing. Msg_End.0=3 Msg_Number_S = 1+RANDOM(Msg_Start.0-1) Msg_Number_E = 1+RANDOM(Msg_End.0-1) MS = Msg_Start.Msg_Number_S ME = Msg_End.Msg_Number_E Address WTO TEXT('MS WhatIsStarting ME') , DESC(5) LOWLITE MCSFLAGS(RESP) ROUTE(MSTRINFO) return REJECT end else return NOACTION OK, you might want to clean up the message that I put out when the START is aborted due to the STC already running. I was in a winsome mood that day. On Sun, Mar 9, 2014 at 10:57 PM, baby eklavya baby.ekla...@gmail.comwrote: We are running z/os 1.11 and also have SAS 8.2 in our shop .Each time after IPL ,automation issues the start command for SAS server3 started task repeatedly ( more than 100 times).But the fun part is that , the task is actually started with one of the start commands issued initially . But automation still keeps issuing the start command for this task and eventually gives up saying the task cannot be started . Is this a timing issue ? or a communication problem between the task and automation product ( CA OPSMVS) . How can i fix this ? Regards, Baby -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Wasn't there something about a PASCAL programmer knowing the value of everything and the Wirth of nothing? Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Another reason to hate the time change
We produce reports on our z/OS CPU utilization. They are reported in local time, with a.m. and p.m.. Because apparently only military (and pilots) understand Zulu time. So, twice a year, I must explain why we never seem to have any activity on Sunday from 02:00 to 03:00 in the spring, and how we manage to run so much work on one Sunday from 02:00 to 03:00 in the fall. The reason, of course, is the stupid time change. 02:00 to 03:00 does not exist on Spring Forward Sunday, and from 02:00 to 03:00 is a two hour period on Fall Backwards Sunday. And every year, I hear the WTF??? on Monday morning. sigh/ -- Wasn't there something about a PASCAL programmer knowing the value of everything and the Wirth of nothing? Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Force indivdual job to ABEND on LINES EXCEEDED
I use OUTLIM on the individual SYSOUT= statements to force an S722. But that can be PITA. On Tue, Mar 11, 2014 at 1:54 PM, Barry Merrill ba...@mxg.com wrote: It appears that there is no JCL option for an individual job that can be enabled to cause the job to terminate when /*JOBPARM LINES=10 is used and the job has produced 10,001 lines of output. I can only find references to JES2 EXIT 9 where the decision is made for lines exceeded. I never needed this before, but then I never completely filled my spool before with a runaway job. The circumvention was to point SYSOUT file to a CYL(1) disk file and force the B37 ABEND to get control of the job and to read the log messages. Barry Merrill Herbert W. Barry Merrill, PhD President-Programmer MXG Software Merrill Consultants 10717 Cromwell Drive Dallas, TX 75229 ba...@mxg.com http://www.mxg.com - FAQ has Most Answers ad...@mxg.com - invoices/PO/Payment supp...@mxg.com- technical tel: 214 351 1966 - expect slow reply, use email fax: 214 350 3694 - prefer email, still works -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Missed Alarms and 40 Million Stolen Credit Card Numbers: How Target Blew It
On Thu, Mar 13, 2014 at 12:36 PM, Chase, John jch...@ussco.com wrote: How is one supposed to read a multi-page article when each page takes 15 - 20 minutes to load??? I can't recall any other web site that downloads so much irrelevant garbage with every page. -jc- Ah. The joys of Firefox with Ad Block Plus, NoScript, and FlashBlock installed. -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: building text messages with substitutions
On Thu, Mar 13, 2014 at 12:58 PM, Tony Harminc t...@harminc.net wrote: On 13 March 2014 11:08, Donald Russell russell@gmail.com wrote: I've been using WTO ROUTCDE=11 to display various message in the job log of assembler language batch applications that's great/easy for fixed text messages. VM/CMS has the APPLMSG macro which makes it ridiculously simple to build in storage, or display messages with various types of substitutions... I would like to display a message like: Records read: Items found: Hit rate: zzz% Where the value for x,y and z come from registers or fields. Of course I can do it myself with CVD/EDMK etc, but this seems like such a common sort of thing, I hoping there's a macro to do that stuff for me. Even if the macro builds the message in storage, then I can use WTO ROUTCDE=11 pointing to the text result. How about the C library sprintf function? If you use the Metal C version, it can probably be called from assembler in a non-LE environment. It does require a stack (R13 save area) of around 4KB, iirc. Tony H. Wish I had thought of using the Metal C version of sprintf(). I actually ended up figuring out how to write a number of z/OS UNIX commands using LE enabled assembler so that I could use things such as sprintf() or snprintf(). -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
curious: volsers 6 non-blank chars non-numeric tape
There is a thread over on TSO-REXX about splitting up a string into volume serials. This has occasioned two questions to me. 1) Has anybody ever had a VOLSER which was not exactly 6 non-blank characters for a regularly used volume? Especially any trailing blanks? 2) Has any commercial shop ever used non-numeric tape volume serials for normal in-house tapes? If so, why? I ask because, at least historically, CA-1's support of non-number tape serials was difficult (needed some sort of mapping exit as I recall). Just curious. -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Can we logon to TSO witout having TN3270 up ?
Sounds weird to me. Have you tried simply starting TN3270 by hand? E.g. enter S TN3270 (or whatever you call if it not TN3270) on a z/OS operator console. If you don't have any operator consoles, perhaps you could use the HMC operating system messages function. I use it all the time to IPL from home. VTAM is a prerequisite to starting up the TSO started task. Which is what does the TSO logon set up. The TN3270 server simply allows connection from a system (usually a desktop) using a TN3270 emulator via the TCPIP protocol to _VTAM_; not just connect to TSO, but also CICS, CA-7, TWS, and others. Also, if VTAM is up _and_ you have a cross domain set up from the broken z/OS to at least one other z/OS, then you should be able to log on to the broken z/OS system by first connecting TN3720 to one of the systems which is not broken. On the VTAM logon screen (sometimes called the MSG10 screen), you should be able to then log on cross domain to the broken z/OS system. Unfortunately, since I don't know your systems, I have _no_ idea how to tell you do this beyond this vague help. On our VTAM screen, we actually have the value(s) to enter in order to log on to other z/OS systems. Oh, at our shop, the TSOs are called TSO8 and TSO9. So if SY8 has a TN3270 problem, I can connect to SY9 and on that system's initial screen enter the command: LOGON APPLID(TSO8) This causes VTAM on SY9 to send a logon request to VTAM on SY8 which then logs me on to TSO on SY8, even though the terminal is actually connected to SY9. Our VTAM cross domain is implemented by connecting the z/OS systems together using CTC devices (well, sort of pseudo-devices which no physical hardware is involved, just a cable between two CHPs on the box). Last, and least, would be if you actually have a local non-SNA 3270 ability. This could be via something like a Visara controller or an OSA-ICC connection. These are normally used for z/OS consoles, but they theoritically can be used for TSO. But ONLY IF VTAM IS SET UP PROPERLY to do this. Again, since I don't know your systems, I don't know if you can do this sort of thing. Being a old timer, I have set up in VTAM already just in case. === I really think the first paragraph should work for you. On the rare occasion when somebody messed up my automated IPL, I end up IPL'ing and starting up everything by hand. I have this documented, but since I set up it, I can usually remember exactly what to do. Just to mention, you can also due TSO like work using RD/z and ZOSMF, if you have either of those products running. Well, it is a bit at 23:00 locally and I am turning in. Hope I was of at least some help. On Sat, Mar 15, 2014 at 9:59 PM, baby eklavya baby.ekla...@gmail.comwrote: Hello all , We are running z/os 1.11 and had a strange issue on one of our systems today . Our shop is a sysplex of 4 LPARS . Today after IPL , In one of the LPARS which came up last , TCPIP started fine ,but OPSMVS didn't mark it up and several other dependent tasks were waiting . The surprising thing to me which happened was TN3270 was never started ,but TSO was up and I was able to logon to the system . The other 3 LPARS were fully functional with all the tasks up as expected . But the last system which came up had this problem I always thought that TN3270 was pre-requisite for anybody to logon via TSO , Am i missing something here ? Can somebody clarify my doubt please ? Regards, Baby -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Wasn't there something about a PASCAL programmer knowing the value of everything and the Wirth of nothing? Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Can we logon to TSO witout having TN3270 up ?
On Mon, Mar 17, 2014 at 9:19 AM, Paul Gilmartin paulgboul...@aim.comwrote: On Mon, 17 Mar 2014 13:12:05 +, Staller, Allan wrote: VTAM is the pre-req, not TN3270. It depends on the method of *TERMINAL* attachment. If via VTAM, TN3270 is not needed for anything/ TN3270 is merely TCPIP on one side and SNA on the other... VTAM? SNA? I don't know the distinction. VTAM is the software. SNA is the protocol. Yes, they are usually intertwined. Like TCP and IP. But TCP is a protocol over IP. And no one has mentioned that it's possible to log on to TSO (the posed question) at the READY prompt with TELNET, but without TN3270. (Or is TN3270 part of the TELNET daemon nowadays?) TN3270 is a separate STC from the TELNET daemon. If, by TELNET daemon, you mean the INETDn started task. I actually have used TSO from a line mode telnet session. Yes, you can use the very old ways. If you actually know how to use things like the EDIT command. And the FIB JES commands (SUBMIT, OUTPUT, STATUS). I sincerely doubt anybody wants to do this. IMO, if you are willing to do line mode things in TSO, I would think that a UNIX shell prompt and the tsocmd UNIX command would be far more powerful. But it still makes me shudder. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Can we logon to TSO witout having TN3270 up ?
On Mon, Mar 17, 2014 at 9:36 AM, Shmuel Metz (Seymour J.) shmuel+ibm-m...@patriot.net wrote: In CAAJSdjhYGYLdfmP94DHw2SQuCUTYDG9devhC+qh=S=dyey7...@mail.gmail.com, on 03/15/2014 at 11:17 PM, John McKown john.archie.mck...@gmail.com said: Last, and least, would be if you actually have a local non-SNA 3270 Local SNA will work just as well for TSO and SMCS consoles. Very true. I guess I totally forgot about that because it is hard to believe that some shops still have real 3174 type controllers. Actually, I even forgot that we have the SNA versions of the Visara controllers because we used to have 3287 coax attached printers on them. We now use VVP and JQP to do that type of printing function (from CICS transactions). -- Shmuel (Seymour J.) Metz, SysProg and JOAT -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Help with IEBCOPY?
I don't understand exactly what you want. Do you have a data in a sequential data set and you want to put that same data into a member of a PDS? If yes, then IEBCOPY is the wrong utility. It copies members from one PDS to another, or from an unloaded PDS, which was created with IEBCOPY from a PDS, into a PDS. If you want to copy the data, as is, then used IEBGENER. Point SYSUT1 to the sequential DSN. Point SYSUT2 to the PDS with a member name, e.g. DSN=PDS(MEMBER),DISP=OLD On Wed, Mar 19, 2014 at 11:40 AM, Hansen, Dave L - Eagan, MN dave.l.han...@usps.gov wrote: Dear listeners, I am trying to use IEBCOPY to copy a sequential data set to a partitioned dataset. We are running z/OS V1R13. I looked in the DFSMSdfp Utilities (SC26-7414-07). I found Example 8: Loading a Data Set. However this example says the sequential data set was created using an IEBCOPY unload operation. I found Example 9: Unload Selected Members, Load, Copy and Merge. However the sequential datasets are used as output. I tried C I=INDD1,O=OUTDD1 and S M=(DRSSKEY,KEYLRS). I would like the flat file to be copied into two PDS members in the same dataset. If I can get one member created that would be nice. My problem may be IEBCOPY can't do that. My messages are: FCO105I C I=INDD1,O=OUTDD1 FCO105I S M=(DRSSKEY,KEYLRS) FCO110I LOADING TO PDSE OUTDD=OUTD1 VOL=xxx DSN= xxx FCO111I FROM PDSU INDD=INDD1 VOL=xx DSN=xxx FCO710A SYNADAF DATA - 618F,D,INDD1 ,UNKNOWN,WRNG.LEN.RECORD,087800,BSAM FCO702A DSN IN ERROR = xxx FCO701A DDNAME INDD1 PERMANENT I/O ERROR WHEN READING UNLOADED DATASET BLOCK 1 The first message FCO710A says there is more information in FCO700A. The second message FCO701A says it's trying to read from the unloaded dataset. Q). Can I use IEBCOPY to copy a flat file to a PDS? Q). I am running a REXX exec using IEBCOPY. Would you recommend a different approach for my REXX exec? Thank you, Dave -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Java -Xdump:tool option on z/OS
Steve, I did a fast check by trying to do a TSO SUBMIT command from a UNIX shell. Which is effectively what Java is doing. It fails with the message: IKJ79204I You attempted to run an unsupported function in a dynamic TSO Environment. However, I can do a submit using the tsocmd command instead of the tso command. So I'd try using: -Xdump:tool:events=vmstart,exec=tsocmd submit 'sa.jcl(apfauth)' instead. I don't _know_ for certain that this will work. But it can't hurt to try. On Thu, Mar 20, 2014 at 8:49 AM, Steve Austin steve.aus...@macro4.comwrote: I'm attempting to use this option to issue a command at JVM start; -Xdump:tool:events=vmstart,exec=tso submit 'sa.jcl(apfauth)' I can see the BPXAS address space being started on my behalf; JOB07776 0090 BPXM023I (SA) 786 786 0090 JVMDUMP039I Processing dump event vmstart, detail at 2014/03/20 786 0090 13:06:26 - please wait. 786 0090 STC0 00080281 £HASP100 BPXASON STCINRDR STC0 00080290 £HASP373 BPXASSTARTED STC0 0090 IEF403I BPXAS - STARTED - TIME=13.06.26 STC0 0290 BPXP024I BPXAS INITIATOR STARTED ON BEHALF OF JOB SAJNIJVM RUNNING IN ASID 001A STDERR contains; JVMDUMP039I Processing dump event vmstart, detail at 2014/03/20 13:06:26 - please wait. JVMDUMP007I JVM Requesting Tool dump using 'tso submit 'sa.jcl(apfauth)'' JVMDUMP011I Tool dump created process 65649 JVMDUMP013I Processed dump event vmstart, detail . However the job in question is not submitted and the BPXAS address space remains wonderfully inscrutable . Has anyone done this successfully, or have any idea how to get diagnostics on why the command is failing? Thanks This e-mail message has been scanned and cleared by Postini / Google Message Security and the UNICOM Global security systems. This message is for the named person's use only. If you receive this message in error, please delete it and notify the sender. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Java -Xdump:tool option on z/OS
Hum, I just noticed that the OP had the DSN in ticks. I wonder if the DSN is supposed to be prefixed by his TSO id? Perhaps it's just me, but SA.JCL seems to be just be begging to be prefixed with SYSUID for some reason grin. On Thu, Mar 20, 2014 at 9:27 AM, Barkow, Eileen ebar...@doitt.nyc.govwrote: The xdump command worked for me - started up IEFBR14 job. BPXM023I (ACSCEXB) 938 JVMDUMP039I Processing dump event vmstart, detail at 2014/03/20 10:22:38 - please wait. $HASP100 IEFBR14 ON INTRDR 10CICMLJ FROM TSU04969 ACSCEXB IRR010I USERID ACSCEXB IS ASSIGNED TO THIS JOB. ICH70001I ACSCEXB LAST ACCESS AT 09:26:53 ON THURSDAY, MARCH 20, 2014 $HASP373 IEFBR14 STARTED - INIT 1- CLASS S - SYS MVSZ - --TIMINGS (MINS.)-- PAGING COUNTS--- -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Steve Austin Sent: Thursday, March 20, 2014 9:49 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Java -Xdump:tool option on z/OS I'm attempting to use this option to issue a command at JVM start; -Xdump:tool:events=vmstart,exec=tso submit 'sa.jcl(apfauth)' I can see the BPXAS address space being started on my behalf; JOB07776 0090 BPXM023I (SA) 786 786 0090 JVMDUMP039I Processing dump event vmstart, detail at 2014/03/20 786 0090 13:06:26 - please wait. 786 0090 STC0 00080281 £HASP100 BPXASON STCINRDR STC0 00080290 £HASP373 BPXASSTARTED STC0 0090 IEF403I BPXAS - STARTED - TIME=13.06.26 STC0 0290 BPXP024I BPXAS INITIATOR STARTED ON BEHALF OF JOB SAJNIJVM RUNNING IN ASID 001A STDERR contains; JVMDUMP039I Processing dump event vmstart, detail at 2014/03/20 13:06:26 - please wait. JVMDUMP007I JVM Requesting Tool dump using 'tso submit 'sa.jcl(apfauth)'' JVMDUMP011I Tool dump created process 65649 JVMDUMP013I Processed dump event vmstart, detail . However the job in question is not submitted and the BPXAS address space remains wonderfully inscrutable . Has anyone done this successfully, or have any idea how to get diagnostics on why the command is failing? Thanks This e-mail message has been scanned and cleared by Postini / Google Message Security and the UNICOM Global security systems. This message is for the named person's use only. If you receive this message in error, please delete it and notify the sender. -- 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 -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Java -Xdump:tool option on z/OS
If you're in the mood to experiment, you might also try: -Xdump:tool:events=vmstart,exec=submit //sa.jcl\(apfauth\) The above definitely says that the DSN is 'SA.JCL', not prefixed with your RACF/TSO id. The \ escape the ( and ) which have meaning to the shell. I am not sure if they are needed or not in this case. I don't know why the tso and tsocmd commands are not working for you when then do for Eileen. What release of Java and z/OS? On Thu, Mar 20, 2014 at 9:55 AM, Steve Austin steve.aus...@macro4.comwrote: Thanks for that I'll keep trying. However, it would be nice if the process that that is not submitting the job could be persuaded to say something. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Barkow, Eileen Sent: 20 March 2014 14:28 To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Java -Xdump:tool option on z/OS The xdump command worked for me - started up IEFBR14 job. BPXM023I (ACSCEXB) 938 JVMDUMP039I Processing dump event vmstart, detail at 2014/03/20 10:22:38 - please wait. $HASP100 IEFBR14 ON INTRDR 10CICMLJ FROM TSU04969 ACSCEXB IRR010I USERID ACSCEXB IS ASSIGNED TO THIS JOB. ICH70001I ACSCEXB LAST ACCESS AT 09:26:53 ON THURSDAY, MARCH 20, 2014 $HASP373 IEFBR14 STARTED - INIT 1- CLASS S - SYS MVSZ - --TIMINGS (MINS.)-- PAGING COUNTS--- -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Steve Austin Sent: Thursday, March 20, 2014 9:49 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Java -Xdump:tool option on z/OS I'm attempting to use this option to issue a command at JVM start; -Xdump:tool:events=vmstart,exec=tso submit 'sa.jcl(apfauth)' I can see the BPXAS address space being started on my behalf; JOB07776 0090 BPXM023I (SA) 786 786 0090 JVMDUMP039I Processing dump event vmstart, detail at 2014/03/20 786 0090 13:06:26 - please wait. 786 0090 STC0 00080281 £HASP100 BPXASON STCINRDR STC0 00080290 £HASP373 BPXASSTARTED STC0 0090 IEF403I BPXAS - STARTED - TIME=13.06.26 STC0 0290 BPXP024I BPXAS INITIATOR STARTED ON BEHALF OF JOB SAJNIJVM RUNNING IN ASID 001A STDERR contains; JVMDUMP039I Processing dump event vmstart, detail at 2014/03/20 13:06:26 - please wait. JVMDUMP007I JVM Requesting Tool dump using 'tso submit 'sa.jcl(apfauth)'' JVMDUMP011I Tool dump created process 65649 JVMDUMP013I Processed dump event vmstart, detail . However the job in question is not submitted and the BPXAS address space remains wonderfully inscrutable . Has anyone done this successfully, or have any idea how to get diagnostics on why the command is failing? Thanks This e-mail message has been scanned and cleared by Postini / Google Message Security and the UNICOM Global security systems. This message is for the named person's use only. If you receive this message in error, please delete it and notify the sender. -- 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 This e-mail message has been scanned and cleared by Postini / Google Message Security and the UNICOM Global security systems. This message is for the named person's use only. If you receive this message in error, please delete it and notify the sender. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMS Question
My first guess is that the STORCLAS associated with the data set being restore had the GUARANTEED SPACE attribute. Either remove that from the STORCLAS or in the restore parameters include a VOLUME(*) parameter to override the volume that DFDSS wants to use. On Fri, Mar 21, 2014 at 9:36 AM, Nathan J Pfister npfis...@aessuccess.orgwrote: Hello; I am relatively new to SMS, and rather ignorant (read: uneducated) about how it fully works. I'm learning more and more by reading, but I've hit an issue which I can't find a quick solution to using google or finding in the manuals. We just set up a new SANDBOX system, and set up SMS from scratch. When we dump with ADRDSSU some datasets (from a production lpar) to be restored to the Sandbox LPAR, we are getting errors where it is trying to select the volume that it came from (which is not online on the Sandbox). Shouldn't SMS be choosing a volume based on the ACS routines of the Sandbox system? What are we missing? Thanks in advance. Thanks; Nathan Pfister zOS Systems Programmer AES\PHEAA - Tech Services npfis...@aessuccess.org This message contains privileged and confidential information intended for the above addressees only. If you receive this message in error please delete or destroy this message and/or attachments. The sender of this message will fully cooperate in the civil and criminal prosecution of any individual engaging in the unauthorized use of this message. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Difference between MVS and z / OS systems
Would you be interested in a slightly used, but very lucrative stake in a bridge in NYC? grin/ On Mon, Mar 24, 2014 at 11:04 AM, zMan zedgarhoo...@gmail.com wrote: No, no, Bill. You're mistaken. That never happens. People are much too ethical for that. On Mon, Mar 24, 2014 at 11:41 AM, DASDBILL2 dasdbi...@comcast.net wrote: When the MVS RAS group originally tracked me down and called me up ... I thought they were going to ask me for help on correcting all the problems ... but the first thing they wanted to know was who my management chain was ... I then realized I was going to be in trouble ... they didn't actually want to know how to fix things ... they were interested in much more important things. One of the much more important things, as Lynn Wheeler has mentioned in earlier posts, to any given highly placed executive is the maximization of his own compensation under whatever specific details are in his signed contract with his employer. Sometimes such people make decisions that maximize their own immediate compensation at the long-term minimization of other less important things, such as the continued existence of the employer. Bill Fairchild Nolensville, TN - Original Message - From: Anne Lynn Wheeler l...@garlic.com To: IBM-MAIN@LISTSERV.UA.EDU Sent: Monday, March 24, 2014 10:23:43 AM Subject: Re: Difference between MVS and z / OS systems one of the side-effects was that some of the organizations started carefully managing information up the executive chain ... any reference to MVS MTBF of 15mins (even internal only) would have disturbed a carefully managed image. When the MVS RAS group originally tracked me down and called me up ... I thought they were going to ask me for help on correcting all the problems ... but the first thing they wanted to know was who my management chain was ... I then realized I was going to be in trouble ... they didn't actually want to know how to fix things ... they were interested in much more important things. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- 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...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Dynamic Allocation Subroutine
I use BPXWDYN. It is _simple_ to use (in _any_ language, even REXX and COBOL) and distributed by IBM with every z/OS system. ref: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/BPXZB6A0/6.0 On Mon, Mar 24, 2014 at 11:30 AM, Mike Kovach mrmach...@yahoo.com wrote: Can someone out there provide me with a link to a Z/OS Dynamic Allocation Subroutine? Thanks Mike Kovach -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Two new z/OS 2.1 redbooks
z/OS Version 2 Release 1 Technical Updates http://www.redbooks.ibm.com/Redbooks.nsf/RedpieceAbstracts/sg248140.html?Open TOC Chapter 1. IBM z/OS Version 2 Release 1 Chapter 2. z/OS V2R1 Installation and Migration Chapter 3. IBM Health Checker for z/OS Chapter 4. Virtual Lookaside Facility (VLF) Chapter 5. SMP/E Chapter 6. Dynamic Channel Path Management Chapter 7. HCD and HCM Chapter 8. BCPii Chapter 9. SDSF Chapter 10. Security Server Chapter 11. PKI Services Chapter 12. System SSL Chapter 13. z/OS Batch Runtime Chapter 14. Consoles and Auto-Reply Chapter 15. Generic Tracker Facility Chapter 16. JES2 Chapter 17. JES3 Chapter 18. XCF and XES Chapter 19. GRS Chapter 20. SMF Chapter 21. RMF Chapter 22. TSO/E and TSO/E REXX Chapter 23. Workload manager (WLM) Chapter 24. DFSORT Chapter 25. z/OS Binder Chapter 26. z/OS XL C/C++ Chapter 27. Language Environment Chapter 28. RRS Chapter 29. BCP supervisor and timer supervisor changes Chapter 30. Scheduler and Device Allocation Chapter 31. RTM (Recovery Termination Manager) Chapter 32. Service Aids Chapter 33. Hardware Instrumentation Services Chapter 34. System REXX Chapter 35. ISPF Chapter 36. z/OS Unix System Services Chapter 37. dbx Chapter 38. z/OS Unix Shell and Utilities Chapter 39. zFS (System z File System) Chapter 40. SMB Chapter 41. NFS Chapter 42. z/OS Font Collection Appendix A. Additional material /TOC === z/OS Management Facility http://www.redbooks.ibm.com/Redbooks.nsf/RedbookAbstracts/sg247851.html?Open TOC Part 1. Introduction Chapter 1. Introduction Chapter 2. Overview and architecture Part 2. Installation Chapter 3. Planning and prerequisites Chapter 4. IBM z/OS Management Facility installation and configuration Chapter 5. High availability Part 3. Usage Chapter 6. Getting help in IBM z/OS Management Facility Chapter 7. Configuration Assistant Chapter 8. Workflows Chapter 9. Links Chapter 10. Performance monitoring with IBM z/OS Management Facility Chapter 11. Workload Management Chapter 12. Problem determination monitoring by using the IBM z/OS Management Facility Incident Log task Chapter 13. Software Management Chapter 14. ISPF Chapter 15. Capacity provisioning Part 4. Exploitation Chapter 16. Using the IBM z/OS Management Facility programmable interfaces Appendix A. Migration Appendix B. Diagnostic tests Appendix C. Secure FTP using Application Transparent Transport Layer Security Appendix D. Additional material /TOC -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Metal C vs. HLASM - for C callable subroutine?
Yes, I am reading the book on Metal C. But I often appreciate other peoples' opinions and ideas. So I'm just asking. I am porting some C code to z/OS (nedit thread on MVS-OE). I need to be able to do z/OS enqueues and dequeues. I don't see any C subroutine to do this. So I need to write something. This is not a big deal to me. Normally, I'd just whip something up in HLASM and go on with it. But I was thinking that it might be better to try to use Metal C simply because everything else is written in normal C. Yes, I know how to write LE assembler code. The C code is xplink, so I think in either case, I will need to use #pragma linkage to set the routine up as having OS linkage. Thanks for your opinions. -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Metal C vs. HLASM - for C callable subroutine?
But that's only in Metal C, if I'm reading it correctly. I may do this for a learning experience. What I may learn is don't _do_ that! grin/ On Tue, Mar 25, 2014 at 2:36 PM, Scott Ford scott_j_f...@yahoo.com wrote: John: I have to look but can you do : __asm ….inline Regards, Scott From: John McKown Sent: Tuesday, March 25, 2014 1:29 PM To: IBM Mainframe Discussion List Yes, I am reading the book on Metal C. But I often appreciate other peoples' opinions and ideas. So I'm just asking. I am porting some C code to z/OS (nedit thread on MVS-OE). I need to be able to do z/OS enqueues and dequeues. I don't see any C subroutine to do this. So I need to write something. This is not a big deal to me. Normally, I'd just whip something up in HLASM and go on with it. But I was thinking that it might be better to try to use Metal C simply because everything else is written in normal C. Yes, I know how to write LE assembler code. The C code is xplink, so I think in either case, I will need to use #pragma linkage to set the routine up as having OS linkage. Thanks for your opinions. -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan 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 -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: STOW member list format?
The closest that I can find is IHAPDS in SYS1.MODGEN. But you must expand it with PDSBLDL=NO. The default is YES. The first 8 bytes are the member name. The next 3 bytes are the TTR. The next byte is an indicator byte. Therefore the list must be at least 12 bytes. The number of bytes, up to 62, follow after. struct stowlist { char[8] member; char[3] ttr; char indic; char[] user_data; } int size_of_user_data = (indic 0x1F) 1; int number_of_ttrs_in_user_data = (indic 0x60) 5; On Tue, Mar 25, 2014 at 3:03 PM, Paul Gilmartin paulgboul...@aim.comwrote: I'm looking at the STOW description in: http://pic.dhe.ibm.com/infocenter/zos/v2r1/topic/com.ibm.zos.v2r1.idad500/d5166.htm This gives the Member List Format for several directory actions, but not, AFAICT, for Add or Replace. Where can I find this information. Is there a data area macro for the Member List? Thanks, gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Ever see automatic 30-day trials for mainframe software?
On Thu, Mar 27, 2014 at 12:38 AM, Ed Jaffe edja...@phoenixsoftware.comwrote: On 3/26/2014 9:20 AM, Charles Mills wrote: Right. Good input. Thanks. I have shipped software with a hard-coded expiration date. What I am looking for is a floating expiration date that would be 30 days after installation, whether installed today or a year from today. Our trial software expires n days after download. The key is stored in a load module. It would not be difficult to use the SHSCRIPT function of SMP/E to create a module in a z/OS UNIX directory with expiry date relative to install date. Food for thought for the future. :) However, I really don't like the idea of an expiry date relative to first execution. Implementation could get messy. Much easier to have an expiry date relative to the download date. What occurs to me to do is have a customized module. The web site asks the person for the CPUID of the z machine. This is used to encrypt one of the CSECTs. The CPUID is also recorded on the vendor's site so that the application cannot simply be downloaded multiple times (limit to something like n times from the date/time of the first download for a maximum of n days, then deny another download for the same CPUID after those n days. The code would decrypt the CSECT at execution time using the running system's CPUID. Then validate some offset in the CSECT to make sure it has the proper eye catcher to validate that the decryption gave back the proper information. A different, worse?, way would be to distribute that CSECT as object code. At execution time decrypt the object code and invoke the Binder API to convert it on-the-fly into executable code. I don't know if the Binder API can do a load and go like this or not. -- Edward E Jaffe Phoenix Software International, Inc 831 Parkview Drive North El Segundo, CA 90245 http://www.phoenixsoftware.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Ever see automatic 30-day trials for mainframe software?
A bit OT for this, but I buy e-books (PDF) from a publisher who has some really good stuff. It is not DRM'ed. But what the publisher does is take my order on the Web. And I must pay for it with a credit card. No big deal. But that means that he knows my name. A short time later, I get an email with a URL to download my book(s). And on each page of that book is a lower border which says somthing like: This book was purchased by John McKown for his use. Please don't steal! No, it won't stop a criminal. But, really, how many criminals are going to buy a customized book and resell it? Especially a technical programming book. I think it is rather clever. -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Compiler error in z/OS C compiler
On Thu, Mar 27, 2014 at 10:51 AM, Bernd Oppolzer bernd.oppol...@t-online.de wrote: Hello mainframe C users, today I observed an error in the C compiler, which made me think again about the optimization strategy of the z/OS C compiler. I wrote a small C function; the purpose was to translate pointer values coming from PL/1 modules from NULL() values - PL/1 builtin NULL() yields 0xFF00 - to real NULLs - 0x - or PL/1 SYSNULL. This is what I did: /**/ /* */ /* PLI/1 NULL () = SYSNULL () */ /* */ /**/ static void *pli_null_to_sysnull (void *ptr) { unsigned int ppli = (unsigned int) ptr; #ifdef COMPERR printf (Ausgabe in pli_null_to_sysnull wg. Comp-Fehler: %x\n, ppli); #endif if (ppli == 0xff00u) I would replace the line above with: if ( (unsigned int)ppli == 0xff00u) /* coerce ppli to an unsigned int */ { return NULL; } else { return ptr; } } snip -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Compiler error in z/OS C compiler
Sorry, I missed that you already did that. On Thu, Mar 27, 2014 at 11:05 AM, John McKown john.archie.mck...@gmail.comwrote: On Thu, Mar 27, 2014 at 10:51 AM, Bernd Oppolzer bernd.oppol...@t-online.de wrote: Hello mainframe C users, today I observed an error in the C compiler, which made me think again about the optimization strategy of the z/OS C compiler. I wrote a small C function; the purpose was to translate pointer values coming from PL/1 modules from NULL() values - PL/1 builtin NULL() yields 0xFF00 - to real NULLs - 0x - or PL/1 SYSNULL. This is what I did: /**/ /* */ /* PLI/1 NULL () = SYSNULL () */ /* */ /**/ static void *pli_null_to_sysnull (void *ptr) { unsigned int ppli = (unsigned int) ptr; #ifdef COMPERR printf (Ausgabe in pli_null_to_sysnull wg. Comp-Fehler: %x\n, ppli); #endif if (ppli == 0xff00u) I would replace the line above with: if ( (unsigned int)ppli == 0xff00u) /* coerce ppli to an unsigned int */ { return NULL; } else { return ptr; } } snip -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Ever see automatic 30-day trials for mainframe software?
This has been an interesting discussion. I understand why vendors lock software to specific machines and dates. Especially in the non-corporate world. But I had another evil thought. I wonder how many z/OS system exist which are not connected to the Internet. Not accessible to the Internet, but can access the Internet, to do things such as software delivery such as IBM's SMPE can do. Evil idea: 1) Have an execution key which encodes the valid CPUID and run date interval (upper and lower date). 2) If the key is good, just run - but tell the user if the key is going to expire within 30 days, via a nice WTO. 3) if the CPUID validates, but the date is expired: 3.1) IP connect to support site to log key expiration and then run normally. Don't tell the user anything. 3.2) if you can't connect to the support site the key expiration is less than 31 days, issue a strong warning via a WTO. 3.3) if you can't connect to the support site the key expiration is greater than 30 days, refuse to run. 4) if the CPUID is invalid the program _can_ IP connect to the vendor site. 4.1) Use GeoIP to validate the incoming IP's country of origin. 4.1.1) If in a good country, allow software to run. Vendor documents and sues user's company. 4.1.2) if in a bad country, execute nasty user code (see below) 5) if the CPUID is invalid the program cannot IP connect to the vendor site, execute nasty user code. Nasty user code: Write some code which burns some CPU, the amount to burn would need to be something that the nasty user would expect. Then go through a fairly long chain of branches (to complicate branch tracing), and finally abend with an S0C4-4 trying to overlay low core. If the user is indeed a thief, then what is the likelihood that they will have an expert which could resolve this problem? And they can't call your support because that would give them away. Evil quotient: too little; just right; too extreme. -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Ever see automatic 30-day trials for mainframe software?
On Fri, Mar 28, 2014 at 9:06 AM, Joel C. Ewing jcew...@acm.org wrote: snip I seem to recall a case where the vendor wanted to change contract terms at renewal in a way that was unacceptable to our corporate management and it took several months of negotiations past the formal expiration of license between our lawyers and theirs before a renewal agreement was finally reached. We had been a customer for at least a decade, had other products from the vendor, and it was clear it was in both party's interest that some agreement would eventually be reached; but we lived on temporary keys for several months. Any sort of automated validation system would have to be flexible enough to allow for unusual cases like this. -- Joel C. Ewing, Bentonville, AR jcew...@acm.org Yes. I forgot to mention temp keys and DR keys which, if would guess, would be valid on _any_ processor until a given date, encoded in the key. Any valid key results in execution without IP connection to the outside world. I also like a previous poster's mention that a key file can contain any number of keys and the program will run quietly so long as at least one checks as valid. And, of course, stops checking keys once a valid keys is read. But all of this is just if the software is key locked. Personally, I don't like such. But, then again, I am an FSF member. -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Compiler error in z/OS C compiler
-- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
OT? New slimy computers?
http://www.sciencedaily.com/releases/2014/03/140327100335.htm quote A future computer might be a lot slimier than the solid silicon devices we have today. Researchers have revealed details of logic units built using living slime molds, which might act as the building blocks for computing devices and sensors. /quote -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DSF INIT STGR
The VTOC format 4 DSCB. Documented in SYS1.MODGEN(IECSDSL1). Field DS4SMSFG, mask DS4SMS. ref: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/dgt2s370/1.1.1.5 On Fri, Mar 28, 2014 at 12:44 PM, Mark Pace pacemainl...@gmail.com wrote: Is there a way to find out if a DASD volume has been initialized with the STORAGEGROUP attribute? -- The postings on this site are my own and don't necessarily represent Mainline's positions or opinions Mark D Pace Senior Systems Engineer Mainline Information Systems -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
A PC programmer who understands!
A very good sort article with comments. http://arstechnica.com/information-technology/2014/03/information-overload-i-know-too-much-to-program-quickly-what-can-i-do/ Basically the author is saying that he has a problem. He knows so much now, especially trying to anticipate problems, that his coding is slower. And so he is NOT PRODUCTIVE! quote Lately, I've been noticing that the more experience I gain, the longer it takes me to complete projects or certain tasks in a project. I'm not going senile yet. It's just that I've seen so many different ways in which things can go wrong. And the potential pitfalls and gotchas that I know about and remember are just getting more and more. Trivial example: it used to be just okay, write a file here. Now I'm worrying about permissions, locking, concurrency, atomic operations, indirection/frameworks, different file systems, number of files in a directory, predictable temp file names, the quality of randomness in my PRNG, power shortages in the middle of any operation, an understandable API for what I'm doing, proper documentation, etc. In short, the problems have long since moved from how do I do this to what's the best/safest way of doing it. /quote -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Software (compiler) PTF or maintenance level
Closest I can find is this: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/cbclr1b0/19.2 But that doesn't show the PTF level. Perhaps _someone_ (hint, hint) should put in a request that the C compiler include the PTF level in the compile listing? HLASM does. On Mon, Mar 31, 2014 at 2:31 AM, Miklos Szigetvari miklos.szigetv...@isis-papyrus.com wrote: Hi We would like to document the actual maintenance or PTF level or software level of the compiler, we are using to compile our product. How can I find this ? (It is the C/C++ compiler) -- Kind regards, / Mit freundlichen Grüßen Miklos Szigetvari Research Development ISIS Papyrus Europe AG Alter Wienerweg 12, A-2344 Maria Enzersdorf, Austria T: +43(2236) 27551 333, F: +43(2236)21081 E-mail: miklos.szigetv...@isis-papyrus.com Info: i...@isis-papyrus.com Hotline: +43-2236-27551-111 Visit our brand new extended Website at www.isis-papyrus.com --- This e-mail is only intended for the recipient and not legally binding. Unauthorised use, publication, reproduction or disclosure of the content of this e-mail is not permitted. This email has been checked for known viruses, but ISIS Papyrus accepts no responsibility for malicious or inappropriate content. --- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
OT? Another reason to hate DST
http://www.reuters.com/article/2014/03/29/us-heart-daylightsaving-idUSBREA2S0D420140329 quote Switching over to daylight saving time, and losing one hour of sleep, raised the risk of having a heart attack the following Monday by 25 percent, compared to other Mondays during the year, according to a new U.S. study released on Saturday. /quote IMO, this calls for making the following Monday a go in late day. -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Compiler error in z/OS C compiler
Of all the languages which I have personally used. I loved Borland's Delphi (loosely base on Modula II) the best. On Sun, Mar 30, 2014 at 8:22 AM, Shmuel Metz (Seymour J.) shmuel+ibm-m...@patriot.net wrote: In 533766af.3000...@t-online.de, on 03/30/2014 at 01:34 AM, Bernd Oppolzer bernd.oppol...@t-online.de said: And my experience is that over 90 percent of them have no clue what the descriptor logic of PL/1 is all about, Nor should they. They should, however, understand the DECLARE statement. in C you have to do by reference explicitly by passing pointers That's by value, and one of the pitfalls of C. This is different from every other programming language. Neither ALGOL 60 nor Ada allows mismatched parameters, and they are far from the only ones that type-check. BTW: is this kind of flexibility - adjustable lengths inside structures - really useful? Yes. -- 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 -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Software (compiler) PTF or maintenance level
David, Thanks! I added that compile parm to my make file and got messages like: CCN(I) Product(5694-A01) Phase(CCNEOPTP) Level(UI15229.z1r13) CCN(I) Product(5694-A01) Phase(CCNDRVR ) Level(UI15229.z1r13) CCN(I) Product(5694-A01) Phase(CCNEP ) Level(UI15229.z1r13) CCN(I) Product(5694-A01) Phase(CCNETBY ) Level(UI15229.z1r13) On Mon, Mar 31, 2014 at 6:33 AM, David Crayford dcrayf...@gmail.com wrote: Check out the PHASEID compiler option. On 31/03/2014 3:31 PM, Miklos Szigetvari wrote: Hi We would like to document the actual maintenance or PTF level or software level of the compiler, we are using to compile our product. How can I find this ? (It is the C/C++ compiler) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Compiler error in z/OS C compiler
On Mon, Mar 31, 2014 at 8:10 AM, David Crayford dcrayf...@gmail.com wrote: On 31/03/2014 8:44 PM, Shane Ginnane wrote: On Mon, 31 Mar 2014 06:58:46 -0500, John McKown wrote: Of all the languages which I have personally used. I loved Borland's Delphi (loosely base on Modula II) the best. I was absolutely blown away when I first saw Delphi - not so much with the language itself, but that IDE !!! What an eye opener. I see a couple of versions still with doco in the bookcase in the (home) office - next to the CD of battle-chess. Ahhh, thems was the days ... :0) Now every time you turn around there's another language to look into. Lua, now what did I do with that lua ... You will pleased to know that Lua on z will be coming this year (compliments from my employers) with lots of goodies and execution speed that can show Java a clean pair of heels in 8 out of 10 benchtests that run sub-second. I hate to have to ask, but will it have a cost, or be freely licensed? This place won't spend money. Even to save money. Especially on the z. It's small, it's fast and it's dead easy to learn! I will pencil you in as an alpha tester Shane! How about this for iterating a 500 cylinder QSAM file in 1 cpusec? local f, msg = io.open(arg 1 , rb, type=record, noseek) if not f then error(msg) end repeat local rec = f:read(*r) until not rec Shane . -- 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 -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Getting into ISPF/Edit from TSO
You'll need to start up ISPF from the REXX program pass it the proper parameters. I would create a second REXX program which does the EDIT. Then have the first REXX program start up ISPF with something like: ISPSTART CMD(%REDIT dsn.to.edit) Where REDIT would be something akin to: /* rexx */ parse dsn . address ispexec edit dataset(dsn) Unfortunately, I don't know if ISPF terminates when the user exits the EDIT, or if it goes back to the the ISPF primary option menu. I would _hope_ the former (terminates). On Wed, Apr 2, 2014 at 3:31 PM, Micheal Butz michealb...@optonline.netwrote: Hi, Running a Rexx exec from the READY prompt and creating a dataset would anyone know how to display it in ISPF/Edit Thanks Sent from my iPhone -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Using DB2 and MQ under JZOS
Just a wild guess on my part would be that the OP should not be using JZOS, which does not use RRS for any kind of two phase commit, but perhaps should run his application under the control of a transaction manager such as WAS, CICS, JBOSS (whatever it's called now), or maybe even Tomcat. Of course the start up and shutdown overhead of such a product is _expensive_. On Wed, Apr 2, 2014 at 10:41 PM, Rob Schramm rob.schr...@gmail.com wrote: Sounds to me like the ssue has nothing to do with JZOS. Refer to the DB2 Application Programming Guide for JAVA. Covers limitations of type-4 jdbc driver. Rob Schramm On Apr 2, 2014 11:06 AM, Denis Gäbler denisgaeb...@netscape.net wrote: Hi, what you are trying to achieve is the task of a transaction manager. Keep multiple resources (MQ, DB2) in sync. What would you do to do the same thing from a COBOL application? TSO batch does not provide this functionality either. RRS provides this functionality, but there is no API for it that you could use from pure Java. As an example, instead of using JZOS you could run the Java application in IMS Java Regions, CICS, DB2 Java Stored Procedure or WebSphere z/OS. What can also be considered is using a Java based persistence framework, e.g. Spring to keep the resources in sync. In the end you could also write your own transaction manager. Hope that helps, Denis. -Original Message- From: Mohammad Khan mkkha...@hotmail.com To: IBM-MAIN IBM-MAIN@LISTSERV.UA.EDU Sent: Wed, Apr 2, 2014 4:11 pm Subject: Using DB2 and MQ under JZOS I have a batch program that runs under JZOS ( on z/OS 1.13 ) which connects to DB2 using jdbc type 2 connection and connects to a local MQ queue in binding mode. It updates DB2 data as well as writes to MQ. It seemed to work ok until it encountered an error writing to MQ and abended. More important was the fact that DB2 updates still got committed. Apparently the updates to the two resources are being managed in isolation rather than being coordinated in a global transaction. I guess I haven't figured out how to properly code for this scenario. I haven't found any guidance or sample code in MQ, DB2 or JZOS documents or have failed locate it. Any help, sample code or links to relevant documents will be highly appreciated. Regards Mohammad -- 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 -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF dynamically allocating dataset with DISP=OLD?
ISPF option 3.4, doing a z on a PDS to compress it will result in a DISP=OLD type allocation. This is the only thing that _I_ know of which does this. Of course doing a TSO ALLOCATE command in a REXX program, CLIST, or using the TSO command option (option 6), the user can directly do it directly. As a curiosity answer, ISPF has three possible resource names used with the qname of SPFEDIT. For the member of a PDS, it is 52 bytes long consisting of the DSN, padded with blanks to 44 characters followed by the member name, padded to 8 characters by blanks. For a sequential DSN, or a PDS when actually saving a member, it is the 44 character, blank padded, DSN. For a UNIX file, it is 12 bytes consisting of a 4 byte inode number, 4 byte device number, and 4 bytes sysplex indicator value (x'' - no UNIX sysplex, x'0020' - UNIX sysplex file sharing active). The above isn't relevant to the question, but I felt like running off at the keyboard. On Thu, Apr 3, 2014 at 12:41 PM, Chase, John jch...@ussco.com wrote: Hi, List, z/OS 1.13 at RSU1312. The other day, a user did something in ISPF that caused allocation of a Production JCL library to his TSO session with DISP=OLD instead of DISP=SHR, causing a hiccup in batch processing when the scheduler was locked out for a few seconds. So far, we have not been able to replicate locking out another user at the dataset level via any combination of manipulations using (primarily) ISPF EDIT. Here's a SMF14 record formatted by DAF (Thank you, Michael J. Cleary!!): 014 VOL=volser DD=ISP15297 OPE=15.30.06.51 CRTDT=02045 EXPDT=0 DISP=Old BUFNO=16 DSORG=PO RECFM=FB BLKSIZE=7520 LRECL=80 NVOL=1 CTRI=CYL SQTY=50 NTU=00582800 NTA=6000 VOL=OPER9A DEVTYPE=3390 NEX=1 EXCP=4001 STEP=tsoproc PGM=IKJEFT01 14XF1=192 14CIS=18090271 14TKL=58051 The SMF 42-006 that immediately follows: 042 006 JDCOD=Close DSTYP=PDS DSFL1=Non-VSAM_fixed_length_records VOL=volser DSDEV=ccuu DSBSZ=256 DSIOR=9 DSIOC=7 DSIOP=1 DSION=256 DSSEQ=256 DSMXR=58 DSMXS=57 AMSRB=4000 AMSRR=2562 The timestamps on those two records are identical down to hundredths of a second, so maybe the user was running a SuperC search? We can't tell from evidence available to us today. We've tried every combination we can think of with multiple users ISPF EDITing the same dataset, and the only time we get any conflict is if a second user tries to open a MEMBER for EDIT that is already opened for EDIT by another user; and we believe that lockout at the member level is accomplished via an ENQ named SPFEDIT.membername or something like that. IOW, we have been unable to cause a dataset (PDS or PDSE) to be dynamically allocated with DISP=OLD using any variant of ISPF EDIT. Is there any other way within ISPF that an existing dataset can be dynamically allocated with DISP=OLD? If there is, we apparently have never encountered it before. TIA, -jc- ** Information contained in this e-mail message and in any attachments thereto is confidential. If you are not the intended recipient, please destroy this message, delete any copies held on your systems, notify the sender immediately, and refrain from using or disclosing all or any part of its content to any other person. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ISPF dynamically allocating dataset with DISP=OLD?
On Thu, Apr 3, 2014 at 12:54 PM, John McKown john.archie.mck...@gmail.comwrote: ISPF option 3.4, doing a z on a PDS to compress it will result in a DISP=OLD type allocation. This is the only thing that _I_ know of which does this. Oh. How this is relevant to this scenario is if the user was editing a member in the PDS and tried to save it. At this point, the DSN is allocated and ENQ'd with a DISP=SHR. The user gets an Sx37 abend because the PDS is out of space. So s?he splits the screen, goes into option 3.4, does a z to compress the PDS. At this point, ISPF upgrades then already existing ENQ on the already allocated PDS from a SHR to an OLD. Remember that the user still has the DSN allocated in EDIT on the other screen. The compress finishes. Until z/OS 2.1, it was _impossible_ to downgrade from an exclusive ENQ (DISP=OLD) back to the shared ENQ (DISP=SHR). So the DSN is now allocated to the user with a DISP=OLD until such time as it is freed. Which may __OR MAY NOT__ happen when the user exits the EDIT on the member. -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Redirecting stdout to a data set?
Try SYSPRINT. Ref: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/cbcpg1c0/2.8.9.1.2 quote When you use DD statements to redirect standard streams, the standard streams will be associated with ddnames as follows: - stdin will be associated with the SYSIN ddname. If SYSIN is not defined, no characters can be read in from stdin. - *stdout* will be associated with the SYSPRINT ddname. If SYSPRINT is not defined, the C library will try to associate *stdout* with SYSTERM, and if SYSTERM is also not defined, the C library will try to associate *stdout* with SYSERR. If any of the above DDstatements are used as the MSGFILE DD, then that DD statement will not be considered for use as the *stdout* DD. *Restriction:* The reference to the MSGFILE does not apply to AMODE 64 applications. - stderr will be associated with the MSGFILE, which defaults to SYSOUT. See z/OS Language Environment Programming Guidehttp://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/DOCNUM/SA22-7561/CCONTENTS? for more information on MSGFILE. *Restriction:* The reference to the MSGFILE does not apply to AMODE 64 applications. - If you are running with the run-time option POSIX(ON), you can redirect standard streams with ddnames only for MVS data sets, not for UNIX file system files. - If the ddname for *stdout* is not allocated to a device or data set, it is dynamically allocated to the terminal in an interactive environment or to SYSOUT=* in an MVS batch environment. Table 13http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/cbcpg1c0/2.8.9.1.2?SHELF=CBCBS1C0.bksDT=20110614131446#TBLDDSTD summarizes the association of streams with ddnames: Table 13. Association of standard streams with ddnames *Standard* *stream* *ddname* *Alternate* *ddname* stdinSYSIN none *stdout* SYSPRINT SYSTERM, SYSERR stderr DD associated with MSGFILE. For AMODE 64 applications stderr is SYSOUT, and there is no alternate ddname. None /quote On Thu, Apr 3, 2014 at 2:27 PM, Phil Smith p...@voltage.com wrote: If I have a C program running in batch that does printf(), that output appears in a SYS1 data set in SPOOL. Is there a way to redirect that to a DASD data set? I tried STDOUT DD ... but it didn't seem to make a difference. Some Googling didn't find anything. Just seems so...obvious, but obviously I'm missing something?! -- ...phsiii Phil Smith III p...@voltage.commailto:p...@voltage.com Voltage Security, Inc. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Redirecting stdout to a data set?
On Thu, Apr 3, 2014 at 3:15 PM, Phil Smith p...@voltage.com wrote: Thank you John! Armed with that knowledge, this worked a treat: //SYSPRINT DD DISP=SHR,DSN=PHS.PDS.DATA(STDOUT) ...where that PDS is VB 1024 (but presumably doesn't need to be that long an LRECL). That page you pointed to is what I had tried to find; it's sort of written sideways - When you use DD statements to redirect standard streams, the standard streams will be associated with ddnames as follows: seems like it would have made more sense as something like, When you write to standard streams, be aware that they map to the following DD names, and thus output written to those streams will be redirected if the matching DD is defined: RCF time? I like the example program, named HOCKEY! Owe ya a beer at SCIDS. It'll need to be a virtual beer. I don't attend Share (unless _I_ pay all expenses and use vacation time - IDTS), and I don't drink alcohol (diabetic). ITDS == I Don't Think So. -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Executing a remote TSO command or CLIST with FTP?
On Thu, Apr 3, 2014 at 4:03 PM, Charles Mills charl...@mcn.org wrote: Just confirming what I RTFM: there is no way for an FTP client to directly execute a TSO command on a remote z/OS system - is that right? Is there some clever hack that I am missing? There is no clever hack to allow remote execution via ftp. Other than submitting a batch job to do something and then getting the output back via ftp. This would be real useful, no? The ability - in this case, what I am trying to do - to upload a TSO XMIT file and then run a RECEIVE on it. Yes, people who hack systems would love such a facility. Yes, I know I can run a job on the remote machine and the job could be batch TSO. I am looking for something a little more straightforward than that. This is the right an proper way to do this when using ftp. Thanks, Charles -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Unload CA-1TMC data into flat file for insert into RDMS?
Sorry, CA, but I don't like EARL. And I am no longer very CA-1 literate. What I would like to do is to be able to unload the TMC to a flat file which is columnar. I would like something akin to what IRRDBU00 does for the RACF data base. I could then write a simple program to read the data in the columns and insert it into my favorite data base (in my case PostgreSQL on Linux). Is there a simple way to do this? I have used an EARL program, but that results in a report which is limited in line length (too short) and has junk in it (page headings). No, I don't want to write an HLASM program to do it myself, but will if that is the only answer. -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Executing a remote TSO command or CLIST with FTP?
On Fri, Apr 4, 2014 at 8:37 AM, Dale R. Smith dale-sm...@columbus.rr.comwrote: On Thu, 3 Apr 2014 14:03:24 -0700, Charles Mills charl...@mcn.org wrote: Just confirming what I RTFM: there is no way for an FTP client to directly execute a TSO command on a remote z/OS system - is that right? Is there some clever hack that I am missing? This would be real useful, no? The ability - in this case, what I am trying to do - to upload a TSO XMIT file and then run a RECEIVE on it. Yes, I know I can run a job on the remote machine and the job could be batch TSO. I am looking for something a little more straightforward than that. Thanks, Charles How about defining a Batch Job in your Scheduler product that is setup to run when a specific dataset is created? FTP creates the file, the Scheduler submits the Batch Job, Batch Job runs whatever you want, RECEIVE, etc. There is no immediate feedback to the user in that case. Which is what I _believe_ the OP would really like. I have my methods to do this sort of thing, using the freely licensed products from Dovetailed Technologies (am I becoming a shill for them? I really appreciate the tools!), but that would be totally off-topic for this thread. I can make my z/OS system look like I'm running it from my Linux desktop, at a BASH shell prompt. -- Dale R. Smith -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Unload CA-1TMC data into flat file for insert into RDMS?
On Fri, Apr 4, 2014 at 11:43 AM, Gibney, Dave gib...@wsu.edu wrote: Copy/format with your SORT product. As already said the TMC is already pretty much a flat file Thanks for the reminder. That would be easier than coding up an HLASM routine. Just didn't occur to me. Bad case of Fridayitis, I guess. -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
OT: How would you like _this_ as your z/OS has hard waited message?
The Linux developers are considering using QR codes to encode Kernel OOPS (hard wait) information. Snap a picture of it on the old cell phone, then decode it. It could encode a URL and debug data so that the user could open a bug report using it. In our case, such a thing would need to come up on the HMC. http://www.phoronix.com/scan.php?page=news_itempx=MTY1NjI -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
z9BC - HMC access via Chrome or FireFox?
I've tried to access the system messages function on the HMC (z9BC) via the web interface using the I.E. , Chrome, and Firefox browsers. I can do everything on all of them _except_ for the system messages function; which I use as the z/OS console to IPL from home. This functions only works properly with I.E. (7.0.5730.13 to be exact). Does anybody use Chrome or Firefox with the system messages function on the HMC? Did you need to do anything special, such as enabling something? I keep getting messages about an obsolete Java, but I dare not touch it because it is used for critical management reporting and that application requires this old version of Java (and we have no one competent enough in Java to fix it). -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Logical Choices (was: ISPF dynamically allocating dataset with DISP=OLD?)
On Sat, Apr 5, 2014 at 8:34 AM, Paul Gilmartin paulgboul...@aim.com wrote: On Fri, 4 Apr 2014 20:11:59 +, Chase, John wrote: Update from the vendor: The scheduler DOES NOT attempt to acquire exclusive allocation of a JCL member; it only needs READ access to the JCL library. So, the entire incident is now explained by the errant user somehow obtaining an allocation of that library with DISP=OLD, which locks out everybody from that library for the duration. Sometimes source of similar problems: the C RTL updating a PDS member obtains ENQ EXC SYSDSN. C programs are pretty commonplace now; someone ought to submit a Requirement that the C RTL should use ISPF-style ENQs on PDS members, at least optionallly. Definitely optionally. What to do if the ENQ fails becomes a question as well. Fail the fopen() with some sort of in use (EBUSY?) return? Do a wait? If wait, then how long? Unlimited (well, an S522 is likely in this case)? User specified? Hum, now we need to change the parameters to fopen() or come up with a new fopen() function. How does this affect portability? More wishful: JCL should support a new DISP keyword to select ISPF-style ENQs on PDS members so any program could benefit from the facility with no code changes needed. My personal opinion is that the advantage of this is not worth the cost to implement. And there are more questions. Is this a SHARED or EXCLUSIVE enqueue? Oh, that would be the DISP-equivalent, I guess. Hum, when is the ENQ issued? At start of job, like for SYSDSN, or at start of STEP? If this is an exclusive ENQ, should there be two ENQs; one for the entire DSN one for the DSN+MEMBER? The DSN-only is what ISPF uses before it does a SAVE. This is to serialize writing into a PDS (which is not needed for a PDSE) to avoid member data interleaving. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How would you like _this_ as your z/OS has hard waited message?
On Mon, Apr 7, 2014 at 8:19 AM, Charles Mills charl...@mcn.org wrote: How would they display it? Aren't most *nix consoles simple ASCII-type terminals? Not any more. In the olden days, most *nix terminals were RS232 connected teletype-like devices. Then came the glass ttys, the most popular of which were the DEC VT line. But the majority of Linux systems today are PC based (yes, I know that there are versions for the IBM i, p, and z series of machines), or head less (no display at all). And all current PCs have a graphics card and display. The Linux kernel can display graphics (DRM - Direct Rendering Manager) directly (no user space application such a X or Wayland). Charles -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Logical Choices (was: ISPF dynamically allocating dataset with DISP=OLD?)
On Mon, Apr 7, 2014 at 10:14 AM, Paul Gilmartin paulgboul...@aim.comwrote: On Mon, 7 Apr 2014 09:53:03 -0500, John McKown wrote: Hum, I don't see the need to downgrade. From what I understand, when a user does an ISPF editor SAVE command, ISPF does: ENQ SPFEDIT dsn OLD write out to PDS STOW to update the PDS directory DEQ SPFEDIT dsn That is, ISPF does not have a SHR enqueue on the DSN alone except while doing a SAVE. This provides little or no protection against batch jobs' updating the PDS and interleaving member data. Be careful. JWG's comments about PDSE noted. Very true. In general, from the olden daze, if you wanted to update a PDS, you were expected to do a DISP=OLD on the DSN in your JCL. They did not design the original PDS or OPEN to do this type of integrity. Likely, at the time, it would have been too expensive (in CPU / code size / money) I use LM services for background updates of PDS. (And once was caught by a MIM failure.) Soon, it may be time for a(nother) rant about the difficulty of LMCOPY from a UNIX file to a PDS member. The best I can do is first copy it to a temp DS (or SYSCALL readfile, then LMPUT in a loop). Seems to me that extending LMINIT to a UNIX file should not be too difficult. To do it properly would require new UNIX code. But I don't know why ISPF could just do an ALLOCATE to a DD name and use the QSAM interface to read or write the data. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Logical Choices (was: ISPF dynamically allocating dataset with DISP=OLD?)
On Mon, Apr 7, 2014 at 10:14 AM, Paul Gilmartin paulgboul...@aim.comwrote: snip I use LM services for background updates of PDS. (And once was caught by a MIM failure.) Soon, it may be time for a(nother) rant about the difficulty of LMCOPY from a UNIX file to a PDS member. The best I can do is first copy it to a temp DS (or SYSCALL readfile, then LMPUT in a loop). IBM should enhance the UNIX cp command to do the ISPF enqueues. Or, at the very least, have an option to have it do them. -- gil -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How would you like _this_ as your z/OS has hard waited message?
On Mon, Apr 7, 2014 at 11:01 AM, Charles Mills charl...@mcn.org wrote: I have several Linux VMs here and they all have a console that looks EXACTLY like the one that illustrates the article -- straight ASCII, straight out of the 80's. If the illustration in the article illustrates the problem, how could that display be used to implement the described solution? Charles That shows what is coming out presently, on the Linux virtual terminal (most Linux systems come with multiple logical terminals on one physical display - like the old 3278 with MLT could switch the entire display from one 3270 application to a different one). If you ever boot RedHat Fedora , you would see a graphics boot indicator on the PC's screen. The Linux kernel does have the frame buffer which is graphics capable. Look at the picture in the upper right hand of the Wikipedia page - URL below. It shows the Knoppix boot screen. In the upper left corner is a picture of the Linux Penguin mascot, Tux. Below that is the line mode output from the kernel as it displays boot messages. This is how Linux would display the QR codes. http://en.wikipedia.org/wiki/Linux_framebuffer -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How would you like _this_ as your z/OS has hard waited message?
They won't benefit? Their choice. From what I gather, it is really supposed to be so that an average Linux user, who is not a real techie, can get better support from their vendor. Places which ban devices such as you mentioned will just be forced to do things the older way. On Fedora, I run abrt. This functionality can be used to package up all the information from an application (not system) crash and format it up to do a Bugzilla search and also open a new Bugzilla issue. That is, if you have a Bugzilla account with the vendor. Which I don't. I really need to set that up. On Mon, Apr 7, 2014 at 12:22 PM, retired mainframer retired-mainfra...@q.com wrote: I wonder about those facilities which ban all cameras, including cell phones, for security reasons. :: -Original Message- :: From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On :: Behalf Of John McKown :: Sent: Monday, April 07, 2014 5:03 AM :: To: IBM-MAIN@LISTSERV.UA.EDU :: Subject: OT: How would you like _this_ as your z/OS has hard waited :: message? :: :: The Linux developers are considering using QR codes to encode Kernel :: OOPS :: (hard wait) information. Snap a picture of it on the old cell phone, :: then :: decode it. It could encode a URL and debug data so that the user could :: open :: a bug report using it. In our case, such a thing would need to come up :: on :: the HMC. :: :: http://www.phoronix.com/scan.php?page=news_itempx=MTY1NjI -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: z9BC - HMC access via Chrome or FireFox?
On Mon, Apr 7, 2014 at 1:53 PM, Ken Smith featse...@gmail.com wrote: I can confirm operating system messages doesn't work for me in Firefox (22) but does in IE 8. The popup window doesn't pop under Firefox. This is HMC 2.11 on a z/10. All other pop ups work in Firefox. I have so many extensions active in Firefox, I don't know _where_ the problem lies. But altering the Java security profiles (in Java) allows me to use Chrome successfully. I am considering replacing both Firefox and Chrome with Iron. It is based on the Chromium source. Supposedly better because they promise not to track you like Chrome is purported to do. http://www.srware.net/en/software_srware_iron.php Unable to find any info on supported browsers. If they support firefox this is a defect. Ken -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Logical Choices (was: ISPF dynamically allocating dataset with DISP=OLD?)
In case anybody is interested. I looked at the RedHat Fedora initramfs which is the boot image used by the GRUB boot loader to start up my Linux/Intel system at home. This is basically a compressed archive. The file itself is 41 meg compressed. It expands to 103 meg. The boot loader in Linux creates a RAM resident file system image and then extracts the files in the boot image into the RAM disk. It then runs a program in that system, passing it the IPL parms. This RAM resident file system contains all the drivers necessary to boot the full Linux kernel and start up the system. This boot image is what I think of as being conceptually equivalent to NIP on z/OS. IBM could totally rearchitect NIP to do something similar. In the past, this would not have worked because the main memory was too small. Now, I would guess that the main hold up is not really technical, but marketing. Show of hands: Who is willing to increase the license cost of z/OS on their machine by 2% to rewrite IPL NIP to do this? OK, now another show of hands for those willing to pay 5% more for FBA support (FICON attached). Good? What about another 5% to support iSCSI or SAN attached disk, like z/VM does? Note that none of these changes will result in your applications running faster. They may or may not, who knows? None of these changes will add any new functionality for user applications. So, any takers for about a 10% hike in fees _just_ to support FBA or SAN disk? On Mon, Apr 7, 2014 at 8:03 PM, Clark Morris cfmpub...@ns.sympatico.cawrote: On 7 Apr 2014 10:41:50 -0700, in bit.listserv.ibm-main you wrote: Why is it that SYS1.NUCLEUS can't be a PDSE? SYS1.LINKLIB? SYS1.LPALIB, SYS1.PARMLIB? Could it be the short sighted and inadequate implementation? Common Clark. You should already know that NIP is too early in the IPL process to use PDSEs. I doubt that anyone would object to a 10 megabyte IPL text (and 1 should be sufficient) that would know what to do with a PDSE. The problem is the same shortsightedness that caused the MVS developers not to support FBA devices for at least the FBA file types (VSAM, PDSE, Unix, Linear, etc.). I find it ludicrous that the code that runs a vital service is a started task. Even if it makes sense for the full complement of PDSE functionality to be in a started task at IPL time, it makes no sense to not have the code needed to read PDSEs available at NIP and IPL time. For those who think 1 megabyte is a large amount of space in these days, take a look at how many megabytes of solid state storage can be bought for $100 in the consumer market, and how many more of portable spinning storage. While z reliability needs would make that storage a lot more expensive it still would probably be pennies per megabyte. Clark Morris Bob Shannon Rocket Software -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: OT: How would you like _this_ as your z/OS has hard waited message?
On Tue, Apr 8, 2014 at 3:27 PM, Ken Porowski ken.porow...@cit.com wrote: How large would the QR code have to be to replace a stand alone dump? Yeah. I guess the HMC would need to have a 60 screen with a 4K (UltraHD) resolution. Of course, any QR code from z/OS would likely only encode relevant data. Kind of like an indicative dump or maybe a CEEDUMP does. -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Rather nice article on COBOL on Vulture Central
http://www.theregister.co.uk/2014/04/08/cobol_s_360_anniversary/ One big typo was calling MVS VMS. And really enjoyed this paragraph quote If you can remember COBOL in the '60s, you probably were there as it quickly became the language of choice for online data processing for handling payments, stock control and real-time air defence systems. No I’m not making that up. We scared the Russians so much with our sophisticated COBOL-based defence that they never dared attack and it may or may not be coincidence that President Putin started throwing his weight around just as we retired them. They held on for decades because, despite the sneering of the cool kids (like me) who pushed C C++ and the Quiche Eating Pascal/Java fanbois, the mainframe Cobol stuff focused on being rock solid rather than interesting; ask yourself if you want a more reliable air traffic control system or one that’s more exciting? /quote -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Another Golden Anniversary - Dartmouth BASIC
OK, not a big mainframe impact. But how many of us started programming by using Basic on something like an Apple ][? https://www.dartmouth.edu/basicfifty/ -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Accessing DASD areas that have no DSCB (UNCLASSIFIED)
3) allocate a new data set and be sure that the DSORG is _not_ specified either in the JCL or via the DATACLAS, or that it is DA. This tells DADSM to _not_ write an EOF or anything else in the newly allocate disk space. If you need to inspect some specific tracks, _and the disk is not SMS managed_, then use ABSTR allocation. Once allocated, you can use BSAM or BDAM to read the data as RECFM=U to simply read the uninterpreted blocks of data (physical blocks). Or, once allocated, you can use ADRDSSU to DUMP the tracks in HEX format. Again, you are simply fishing and hoping to see something interesting. Back, long ago, I have a manager who did this for _every_ disk volume we ever installed just because he was curious. This was in the 3350 days. In today's environment where the back end is usually RAID 5, I would say the likelihood of someone getting one of the array drives, inspecting it, and finding proprietary information of any use is very unlikely. But if you have credit card data, or HIPAA data then it _might_ be a good idea for CYA. On Wed, Apr 9, 2014 at 9:27 AM, Storr, Lon A CTR USARMY HRC (US) lon.a.storr@mail.mil wrote: Classification: UNCLASSIFIED Caveats: NONE Hello List, Due to an audit requirement, we shall be enabling the ERASE function provided by RACF. We know better than to resist this mandate but it did make me wonder about the purpose of this feature. When a dataset is deleted, it is scratched and its DSCB in the VTOC is freed. Hence, as far as I know, the dataset's data can only be accessed in one of two ways: 1) Via a utility like AMASPZAP that accepts CCHHR addresses 2) Via a program that uses EXCPVR (or SSCH) In case #2, the program must be authorized in some way (i.e. key 0-7, supervisor state or APF-authorized). In case #1, most installations (including us) use program protection to restrict users of these utilities. A user would have to be authorized in some way (i.e. key 0-7, supervisor state or APF-authorized) to bypass that protection. It therefore seems to me that a user must have the ability to become authorized in some way to access areas of DASD (in which a deleted dataset resided) by CCHHR. A user who has become authorized in some way can also access any live (undeleted) dataset. Why then are we worried that a user who can access any live dataset in the system may attempt to access a deleted dataset? If the aforementioned is true and complete, the ERASE functionality doesn't appear to have any practical purpose other than to slow down the scratch process. So, I assume that I'm missing something. Can someone please identify the flaw in my logic? Can a non-authorized user gain access to these scratched areas of DASD? Thanks, Alan Classification: UNCLASSIFIED Caveats: NONE -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Logical Choices (was: ISPF dynamically allocating dataset with DISP=OLD?)
What I, personally, think would be neat would be some sort of R/O page data set. It would be something like the LPA. It would be created and updated to basically contain the z/OS nucleus. NIP would simply allocate the fixed real memory for this nucleus. It would read the data into this memory from this page data set . It would then create the page tables necessary to properly map the real memory into shared virtual memory. The page data set would actually be maintained by some z/OS system generation program from the contents of SYS1.NUCLEUS, plus anything else that NIP uses to create the z/OS nucleus. NIP would also read in the HCD infomation for the UCBs et al. But, again, this will cost up-front money to design and implement. What we have now works; works rather well; and is reliable. What the above is based upon is vaguely based on the VM concepts of NSS or DCSS segments. On Wed, Apr 9, 2014 at 11:03 AM, Paul Gilmartin paulgboul...@aim.comwrote: On Wed, 9 Apr 2014 10:11:46 -0500, Tom Marchant wrote: Why do YOU need PDSE support at IPL time? As far as I know, it makes no sense to _require_ that PDSE support be available at IPL time. If you have a business case, or a requirement for your code, please state it. I suspect the objective is to eliminate PDS entirely. Simpler is better, and PDSE is simpler than PDSE + PDS. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Accessing DASD areas that have no DSCB (UNCLASSIFIED)
On Wed, Apr 9, 2014 at 11:44 AM, Paul Gilmartin paulgboul...@aim.comwrote: snip Is there any way to limit authorized invocation of a utility to selected users and allow all others to invoke it unauthorized? Of course a copy could be installed in a non-authorized library. At present, there is no way to have a single copy of a program run with APF authorization based simply on a RACF profile. As I understand it, the program loader in the initiator will set the APF auth bit if (1) the program from the EXEC PGM= is marked AC(1), and (2) it is loaded from an authorized library. (Several years ago, I discovered that SMP/E worked pretty well unauthorized as long as I avoided functions that invoke IEBCOPY (I know), ahd used NOWAIT on all my DDDEFs. Don't know about AMASPZAP; skeptical about ADRDSSU. But I disagree strongly with those who will probably argue here that only storage administrators have justifiable use for ADRDSSU. Elitism.) I don't mind _anybody_ using a program _which they know how to use_. ADRDSSU is generally not one of those. Unfortunately, around here, I sometimes wonder about the COBOL compiler too. -- gil -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Logical Choices (was: ISPF dynamically allocating dataset with DISP=OLD?)
I think the reason is not to reduce system start up (IPL) time, but to remove the PDS dependency from IPL/NIP. And perhaps even to replace the need for PDSEs. Many people here _still_ seem to dislike them. I, personally, don't have any problem with them. If fact, 90+% of all our non-system libraries are PDSE. The only thing that is weird about them, to me, is that a PDSE can contain either executable programs, or non-executable data. The reason may be in the documentation somewhere, but I have not run across it. The main delay on my systems at system start up time is long after NIP is complete. But even on my _old_ z9BC, from IPL until I can logon to TSO is less than 5 minutes. There also seems to be a large amount of wistfulness to eliminate ECKD disk architecture. With modern processors and DASD, the time spent loading the nucleus is such a small part of system initialization time that it is not worth spending significant development resources to make it faster. How small is it on your system? Under IPCS, do IPLDATA STATUS Jim Mulder z/OS System Test IBM Corp. Poughkeepsie, NY -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Using DB2 and MQ under JZOS
I don't want to put words in Mohammad's mouth, but from what I gather, he simply would like JZOS itself to have RRS capabilities. But that is _not_ what it is designed to do. JZOS, to my limited understanding, is designed as a way to easily run Java programs in a batch job. Wanting RRS capabilities in JZOS would be similar to being upset that Language Environment does not come with RRS capabilities built in. On Thu, Apr 10, 2014 at 1:15 AM, Peter Ondruška pondru...@csas.cz wrote: :-) actually, Mohammad, you have received answers to make your (work) life easier (and deliver results); in the end it is your decision which way to go. On 10 April 2014 06:19, Timothy Sipples sipp...@sg.ibm.com wrote: Mohammad Khan writes: Nice argument and something not unexpected of a salesman. Now it's (inaccurate) ad hominem attacks? Gee, thanks. How about debating the merits of the arguments instead of (inaccurately) attacking the messenger? The merits are considerable. I'm not the only one who recommended a transaction manager in this very same discussion. In my experience users are getting increasingly frustrated with software developers writing (usually substandard) code to replicate existing functions well implemented in popular, standard application environments. Not every problem ought to be solved as a programming exercise. Unless perhaps a software vendor is trying to sell a lifetime of customer dependency on their uniquely implemented code and associated maintenance services. (Aren't ad hominem attacks fun?) Even so, after providing that important context, I directly answered your questions with two candidates for non-transaction manager solution approaches. A simple thank you is optional but would be appropriate in the circumstances, in my view. Timothy Sipples VCT Architect Executive (Based in Singapore) E-Mail: sipp...@sg.ibm.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- S pozdravem * Mit freundlichen Grüßen * Sincerely, Peter Ondruška Česká spořitelna, a.s. CEN 8650_04, tým řešitelské centrum pro Operations Antala Staška 32/1292, Praha 4, 140 00 mobile: +420 724 500 286 mailto: pondru...@csas.cz http://www.csas.cz -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Email disruption, brought to us by Yahoo!
http://tech.slashdot.org/story/14/04/09/2047205/yahoo-dmarc-implementation-breaks-most-mailing-lists quote On April 8, Yahoo implemented a new DMARC http://www.dmarc.org/ policy that essentially bars any Yahoo user from accessing mailing lists hosted anywhere except on Yahoo and Google. While Yahoo is the initiator, it also affects Comcast, ATT, Rogers, SBCGlobal, and several other ISPs. Internet Engineering Council expert John R. Levine, a specialist in email infrastructure and spam filtering, said, 'Yahoo breaks every mailing list in the world including the IETF'shttp://www.ietf.org/mail-archive/web/ietf/current/msg87153.html' on the Internet Engineering Task Force (IETF) list. DMARC (Domain-based Message Authentication, Reporting Conformance) is a two-year-old proposed standard previously discussed on Slashdothttp://yro.slashdot.org/story/12/01/30/1629241/big-internet-players-propose-dmarc-anti-phishing-protocol that is intended to curb email abuse, including spoofing and phishing. Unfortunately, as implemented by Yahoo, it claims most mailing list users as collateral damage. Messages posted to mailing lists (including listserv, mailman, majordomo, etc) by Yahoo subscribers are blocked when the list forwards them to other Yahoo (and other participating ISPs) subscribers. List members not using Yahoo or its partners are not affected and will receive posts from Yahoo users. Posts from non-Yahoo users are delivered to Yahoo members. So essentially those suffering the most are Yahoo's (and Comcast's, and ATT's, etc) own customers. The Hacker News has details about why DMARC has this effect on mailing listshttp://thehackernews.com/2014/04/yahoos-new-dmarc-policy-destroys-every.html#. Their best proposed solution is to ban Yahoo email users from mailing lists and encourage them to switch to other ISPs. Unfortunately, it isn't just Yahoo, although they are getting the most attention. /quote -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ZFS - Allocation Failure
Simple answer: No. If you have _any_ VSAM data set to grow beyond 4Gigs, you must assign a DATACLAS which has Extended Addressing. The default, which cannot be changed, is no extended addressing. On Wed, Apr 16, 2014 at 4:22 AM, Christian D christianfe...@gmail.comwrote: Hello Group, I was getting the below error while allocating ZFS, I understand that VSAM has a limit of 4GB and the below allocation is more than 4GB. We have not defined a DATACLAS to honour allocation more than 4GB. Is there a other way to allocate 4G of VSAM without having a dataclas ? IDCAMS SYSTEM SERVICES TIME: 304/16/14 PAGE 1 DEFINE CL - (NAME(CHRIS.DB2.LOG) LIN SHR(3,3) - CYL(8000 1000) - STORCLAS(SCSTOR) - ) IGD01010I ALLOCATION SET TO SGSTOR STORAGE GROUP IGD17103I CATALOG ERROR WHILE DEFINING VSAM DATA SET CHRIS.DB2.LOG RETURN CODE IS 140 REASON CODE IS 110 IGG0CLEV IGD306I UNEXPECTED ERROR DURING IGG0CLEV PROCESSING RETURN CODE 140 REASON CODE 110 THE MODULE THAT DETECTED THE ERROR IS IGDVTSCU SMS MODULE TRACE BACK - VTSCU VTSCT VTSCH VTSCG VTSCD VTSCC VTSCR SSIRT SYMPTOM RECORD CREATED, PROBLEM ID IS IGD00475 IGD17219I UNABLE TO CONTINUE DEFINE OF DATA SET CHRIS.DB2.LOG IDC3014I CATALOG ERROR IDC3009I ** VSAM CATALOG RETURN CODE IS 140 - REASON CODE IS IDC3009I IGG0CLEV-110 IDC3003I FUNCTION TERMINATED. CONDITION CODE IS 12 IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 12 *** Chris -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Command Scheduling
Automation products, such as CA-OPS/MVS, usually have Time Of Day rules which could be used to do this. Or you might have a scheduling package such as CA-7 which could schedule a batch job on the 2nd of each month. This batch job would issue the z/OS operator command. Or, going way left field, you could use a z/OS UNIX crontab entry. I use cron all the time to schedule my weekly batch jobs which are not production. Saves me the bother of filling out change requests. On Wed, Apr 16, 2014 at 6:59 AM, Jake anderson justmainfra...@gmail.comwrote: Hello All, I am looking for some possibility of issuing a MVS command On every Month of 1st week. Its like : /I DEL on every 2nd of Each Month. I am trying to search under JES2 Time command but not able to get a right syntax. Could someone please point me to the right command or any new approach. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: ZFS - Allocation Failure
Yes, you can alter an existing DATACLAS to have the Extended Addressing attribute. HOWEVER! This does not affect _any_ existing data sets. It only affect _NEW_ allocations. Every DATACLAS we have in our house has Extended Addressing set. We have not noticed any impact from doing this. We did this because we had programmers use the non-Extended DATACLAS for VSAM data sets, then get upset 8 months later when their small data set had to exceed 4Gig. When told to unload/delete/define/reload, they got quite incensed On Wed, Apr 16, 2014 at 7:53 AM, Christian D christianfe...@gmail.comwrote: Thank you sir. Is it possible to alter the existing Data clas to address the extended format ? Will there be any impact to the existing Datasets ? On Wed, Apr 16, 2014 at 6:14 PM, Staller, Allan allan.stal...@kbmg.com wrote: *NO* snip I was getting the below error while allocating ZFS, I understand that VSAM has a limit of 4GB and the below allocation is more than 4GB. We have not defined a DATACLAS to honour allocation more than 4GB. Is there a other way to allocate 4G of VSAM without having a dataclas ? IDCAMS SYSTEM SERVICES TIME: 304/16/14 PAGE 1 DEFINE CL - (NAME(CHRIS.DB2.LOG) LIN SHR(3,3) - CYL(8000 1000) - STORCLAS(SCSTOR) - ) IGD01010I ALLOCATION SET TO SGSTOR STORAGE GROUP IGD17103I CATALOG ERROR WHILE DEFINING VSAM DATA SET CHRIS.DB2.LOG RETURN CODE IS 140 REASON CODE IS 110 IGG0CLEV IGD306I UNEXPECTED ERROR DURING IGG0CLEV PROCESSING RETURN CODE 140 REASON CODE 110 THE MODULE THAT DETECTED THE ERROR IS IGDVTSCU SMS MODULE TRACE BACK - VTSCU VTSCT VTSCH VTSCG VTSCD VTSCC VTSCR SSIRT SYMPTOM RECORD CREATED, PROBLEM ID IS IGD00475 IGD17219I UNABLE TO CONTINUE DEFINE OF DATA SET CHRIS.DB2.LOG IDC3014I CATALOG ERROR IDC3009I ** VSAM CATALOG RETURN CODE IS 140 - REASON CODE IS IDC3009I IGG0CLEV-110 IDC3003I FUNCTION TERMINATED. CONDITION CODE IS 12 IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 12 /snip -- 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 -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Extended Addressibility (was: ZFS - Allocation Failure)
I double checked. There are _some_ DATACLAS constructs which do NOT have Extended Addressing. Basically, these are for tapes, PDS data sets, and PDSE libraries. It is all the _VSAM_ related DATACLAS constructs which have Extended Adressing on. Except for one, which is not generally used but can be selected by the user if needed. On Wed, Apr 16, 2014 at 8:37 AM, Nathan J Pfister npfis...@aessuccess.orgwrote: John et al; You say that EVERY DATACLAS you have is set to Extended Addressing? Man, we must have screwed something up when we tried that. On our sandbox, we created all of our DATACLAS to have Extended Addressing, and quite a few different things broke. Temporary datasets, Recovery datasets, certain software datasets...Did none of that break for you? Does any one else have experience changing over to Extended Addressing? Are there other things that definitely will NOT work with Extended Addressing? Thanks; Nathan Pfister zOS Systems Programmer AES\PHEAA - Tech Services npfis...@aessuccess.org (717) 720-2663 From: John McKown john.archie.mck...@gmail.com To: IBM-MAIN@LISTSERV.UA.EDU Date: 04/16/2014 09:00 AM Subject:Re: ZFS - Allocation Failure Sent by:IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU Yes, you can alter an existing DATACLAS to have the Extended Addressing attribute. HOWEVER! This does not affect _any_ existing data sets. It only affect _NEW_ allocations. Every DATACLAS we have in our house has Extended Addressing set. We have not noticed any impact from doing this. We did this because we had programmers use the non-Extended DATACLAS for VSAM data sets, then get upset 8 months later when their small data set had to exceed 4Gig. When told to unload/delete/define/reload, they got quite incensed On Wed, Apr 16, 2014 at 7:53 AM, Christian D christianfe...@gmail.comwrote: Thank you sir. Is it possible to alter the existing Data clas to address the extended format ? Will there be any impact to the existing Datasets ? On Wed, Apr 16, 2014 at 6:14 PM, Staller, Allan allan.stal...@kbmg.com wrote: *NO* snip I was getting the below error while allocating ZFS, I understand that VSAM has a limit of 4GB and the below allocation is more than 4GB. We have not defined a DATACLAS to honour allocation more than 4GB. Is there a other way to allocate 4G of VSAM without having a dataclas ? IDCAMS SYSTEM SERVICES TIME: 304/16/14 PAGE 1 DEFINE CL - (NAME(CHRIS.DB2.LOG) LIN SHR(3,3) - CYL(8000 1000) - STORCLAS(SCSTOR) - ) IGD01010I ALLOCATION SET TO SGSTOR STORAGE GROUP IGD17103I CATALOG ERROR WHILE DEFINING VSAM DATA SET CHRIS.DB2.LOG RETURN CODE IS 140 REASON CODE IS 110 IGG0CLEV IGD306I UNEXPECTED ERROR DURING IGG0CLEV PROCESSING RETURN CODE 140 REASON CODE 110 THE MODULE THAT DETECTED THE ERROR IS IGDVTSCU SMS MODULE TRACE BACK - VTSCU VTSCT VTSCH VTSCG VTSCD VTSCC VTSCR SSIRT SYMPTOM RECORD CREATED, PROBLEM ID IS IGD00475 IGD17219I UNABLE TO CONTINUE DEFINE OF DATA SET CHRIS.DB2.LOG IDC3014I CATALOG ERROR IDC3009I ** VSAM CATALOG RETURN CODE IS 140 - REASON CODE IS IDC3009I IGG0CLEV-110 IDC3003I FUNCTION TERMINATED. CONDITION CODE IS 12 IDC0002I IDCAMS PROCESSING COMPLETE. MAXIMUM CONDITION CODE WAS 12 /snip -- 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 -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN This message contains privileged and confidential information intended for the above addressees only. If you receive this message in error please delete or destroy this message and/or attachments. The sender of this message will fully cooperate in the civil and criminal prosecution of any individual engaging in the unauthorized use of this message. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive
Re: Enterprise COBOL v5.1 and RDz v9.x
For whatever reason, such as insanity?, I have always viewed a VSAM LDS as a private, permanent paging space. Similar in concept to using the UNIX shmat() series of functions on a UNIX file to do I/O basically just using paging operations. At times, I wish that using DIV windowing services were simpler. On Mon, Apr 21, 2014 at 11:09 AM, Ed Jaffe edja...@phoenixsoftware.comwrote: On 4/21/2014 7:59 AM, Joel C. Ewing wrote: DB2 required greater flexibility and control to achieve its performance and data consistency goals than was possible with VSAM keyed-access support. A very cursory look at Experiences Installing Oracle Database 10g on z/OS would suggest Oracle on z/OS makes use of VSAM LDS for table storage as well. As does zFS. -- Edward E Jaffe Phoenix Software International, Inc 831 Parkview Drive North El Segundo, CA 90245 http://www.phoenixsoftware.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Sorry state of IT education?
Not too surprising to me. I imagine this is the norm for today because a well educated, intelligent, worker costs a lot more than a preprogrammed drone. http://www.informationweek.com/strategic-cio/executive-insights-and-innovation/the-sorry-state-of-it-education/d/d-id/1204552 quote Our profession is rife with people capable of performing procedures they've been taught, but incapable of thinking through a problem. Here's what we need to do. /quote -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: JES2 NJE IP connection
In the JES2PARM for the LIH1 node, I have: LINE(16) UNIT=TCP NETSRV(1) SOCKET=LOCAL SOCKET(LIHT) IPADDR=192.168.151.5, LINE=16,NETSERV=1,NODE=19,CONNECT=YES APPL(LIH1) NODE=4 APPL(LIHT) NODE=19 NODE(4) NAME=LIH1 NODE(19) NAME=LIHT 192.168.151.5 is the IP address (hipersocket) for the LIHT system. In the LIHT JES2PARM, I have LINE(16) UNIT=TCPIP NETSRV(1) SOCKET=LOCAL,RESTART=YES,START=YES SOCKET(LIH1) IPADDR=192.168.151.1, LINE=16,NETSERV=1,NODE=4,CONNECT=YES APPL(LIH1) NODE=4 NODE(4) NAME=LIH1 APPL(LIHT) NODE=19 NODE(19) NAME=LIHT 192.168.151.1 is the IP address (hipersocket) of the LIH1 system. On Tue, Apr 22, 2014 at 6:58 AM, Bill Widmayer bill.widma...@wipro.comwrote: Is there a Redbook or configuration hints for installing a JES2 NJE IP connection? I read the JES2 Configuration Guide where it talks about the JES2 parameter NETSERV. How would you code the socket parameter? Thanks. Bill W The information contained in this electronic message and any attachments to this message are intended for the exclusive use of the addressee(s) and may contain proprietary, confidential or privileged information. If you are not the intended recipient, you should not disseminate, distribute or copy this e-mail. Please notify the sender immediately and destroy all copies of this message and any attachments. WARNING: Computer viruses can be transmitted via email. The recipient should check this email and any attachments for the presence of viruses. The company accepts no liability for any damage caused by any virus transmitted by this email. www.wipro.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Sorry state of IT education?
Dude! That is, like, so awesomely kewl! On Wed, Apr 23, 2014 at 6:49 AM, Chase, John jch...@ussco.com wrote: -Original Message- From: IBM Mainframe Discussion List On Behalf Of DASDBILL2 At least we still have decent technical publications from some vendors. Here's an example of what we might expect in 10 more years of dumbing down: The displacement for LA is, like, treated as, ya know, a 12-bit unsigned like binary integer. The, ya know, displacement for LAY is like treated as a totally 20-bit signed, like, binary integer. No storage, like, references for, ya know, operands take place, and the, like, address is not, like, inspected for access exceptions. [possible partial description of the Load Address instruction in an alternate universe in the near future] You left out a bunch of Well, I mean, you know interjections. -jc- ** Information contained in this e-mail message and in any attachments thereto is confidential. If you are not the intended recipient, please destroy this message, delete any copies held on your systems, notify the sender immediately, and refrain from using or disclosing all or any part of its content to any other person. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Sorry state of IT education?
I will do the RTFM response. But, in my defense, I will usually try to include a URL to the proper FM to R. At times, I will even try to quote a paragraph or two. Now, my usual response to a question which, to me, implies an abysmal lack of knowledge (Something on the order of I'm trying to install z/OS and need to know what JOB card used for.), my usual response is ... silence. On Wed, Apr 23, 2014 at 6:55 AM, Shmuel Metz (Seymour J.) shmuel+ibm-m...@patriot.net wrote: In 985166dbd01445be809d22441b29b...@db3pr02mb219.eurprd02.prod.outlook.com, on 04/23/2014 at 08:47 AM, Sankaranarayanan, Vignesh vignesh.v.sankaranaraya...@marks-and-spencer.com said: and most of the experts just say - R.T.F.M If it's not important enough to you to justify consulting the manuals, then it's not important to anybody else. You might get a different response if you wrote what you found in the manuals, what was missing and what you didn't understand, or if you asked where is foo documented?. -- 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 -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Sorry state of IT education?
On Wed, Apr 23, 2014 at 7:56 AM, Sankaranarayanan, Vignesh vignesh.v.sankaranaraya...@marks-and-spencer.com wrote: Kind of obvious that it's to be expected. And what a convenient way to call it - resentment. The point is, they don't stand up for the tech folks when under fire. A: I can do x (truth is, they can do only 0.2x and they know it) B: Sold. Here's my business. . On the day of a problem . A: Hey! Why can't you do x. Isn't that what I pay you for ?! Are we supposed to magically grow skills when it's known that there's a massive competency gap? I think you got it exactly! Management should _know_ that expertise costs money. But paying money to the people at _our_ (you me) level seriously impacts _their_ bonus. Which is totally unacceptable to them. I think I digress ... - Vignesh Mainframe Admin -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Inquire SPACE/DIR allocation attributes
Ah, yes, I was thinking more about a single, specific DSN. But I do use IEHLIST, still, to get the allocation information for all the DSNs on an entire volume. I also like to use DFDSS to get a volume map of how the tracks on a volume are physically used. This is a DEFRAG run with the PARM='TYPRUN=NORUN'. On Wed, Apr 23, 2014 at 8:16 AM, Tim Brown tbr...@cenhud.com wrote: How about just using IEHLIST to get formatted vtoc output! Sent from my Android phone using TouchDown (www.nitrodesk.com) -Original Message- From: John McKown [john.archie.mck...@gmail.com] Received: Wednesday, 23 Apr 2014, 9:11am To: IBM-MAIN@LISTSERV.UA.EDU [IBM-MAIN@LISTSERV.UA.EDU] Subject: Re: Inquire SPACE/DIR allocation attributes for a disk resident data set, that information is kept in the VTOC on _each_ volume upon with the DSN resides. And only describes the space _on that particular volume_. The way to get the information is most easily done using the TSO LISTDS command or the REXX LISTDSI function. If you really need the raw information, you need to use the OBTAIN service or the CVAF service. refs: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IKJ4C5B0/1.23TSO LISTDS command http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IKJ4A390/4.3.37REXX LISTDSI function http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2S370/1.4CVAF http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2S370/1.3OBTAIN On Wed, Apr 23, 2014 at 7:58 AM, Gabor Hoffer gabor.hof...@gmail.com wrote: Hi, How can I get allocation attribs for an existing dataset? PRI/SEC Space, space unit (CYL,TRKS,etc), DIR (in case of PDS) Where are these informations stored? Do you have any example ASM code for it? Regards, Gabor -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan 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 -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Dynamic TSO Submit Exit
Our IKJEFF10 (TSO submit exit) exists in LINKLIST. As I recall, in the past, I have simply replaced the module in the proper library and did an F LLA,REFRESH to start using the new version. Again, IIRC, this exit is invoked by the TMP using a simple LINK (or something like LINK) instruction. It may be necessary to have your TSO users logoff and back on to pick up the new copy of the exit. On Thu, May 1, 2014 at 7:25 PM, Jon Perryman jperr...@pacbell.net wrote: TSO exits are not designed to be dynamic but you can do things to make it work dynamically. I don't use these exits so I can't say specifically what will work. Here is what I would try. Be sure to consider overhead when implementing your exits. 1. Try placing the the exit into LPA and use SETPROG to replace it as needed. Each user may need to logoff/logon to get the new version of the exit. 2. If that does not work, then CSVDYNEX was designed specifically to implement / call exits. This method would require you create a stub submit exit that simply calls CSVDYNEX REQUEST=CALL passing the R0/R1 that was received by the stub. This method has more overhead and could possibly be high overhead for very large jobs. To reduce the overhead, you could have use REQUEST=CALL at JOB (and first time) and have it return the address you actually want to call. Your stub exit would then save this address in the exit parms for subsequent calls and call this address from the stub. There are other methods available but try these before you use them. Those methods were specifically disabled by IBM for a reason (e.g. security exposures). If you must use insecure methods, then only use them for development purposes on a standalone system. Jon Perryman From: Dno snipers5...@gmail.com Can it be done? Install a new version, back off if necessary without an IPL? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: non-IBM: SONY new tape storage - 185 Terabytes on a tape.
On Fri, May 2, 2014 at 6:38 AM, Elardus Engelbrecht elardus.engelbre...@sita.co.za wrote: John McKown wrote: http://www.itworld.com/storage/416783/sony-develops-tape-tech-could-lead-185-tb-cartridges Hmmm , interesting, but the webpage is slow. Just how long would it take to _find and restore_ an individual file backed up on such a monster? Or even just do a backup to it? What good is it, unless there is some I/O channel fast enough to do backup and restores which utilize at least most of the tape? I quickly looked at Sony's LTO tape drives (PetaSite) which uses IBM LTO specifications. Nice expensive things, but nothing, absolute nothing is written about transfer rates unless I missed it somewhere. Or am I, once again, missing something? What if the tape itself is broken or teared? Granted, it is years ago I encountered a teared tape, but ... Good point! We had a 3592J tape cart tear just last year. What was especially bad is that it was a 3494 VTS back store tape. So by losing this one physical tape, we lost about 50 virtual 3490 volumes. We were very lucky that the tape was not full and that the virtual volumes lost contained mainly test data. I had argued at the time of installation that we should separate VTS virtual volumes by environment with each environment having its own set of back store tapes. And then duplexing the back store tapes which contained production data. I was shot down in flames because: (1) 3592J tapes are _expensive_ and duplexing would not be cost effective; and (2) it's too difficult to set up! (by the storage admin at the time). Groete / Greetings Elardus Engelbrecht -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: non-IBM: SONY new tape storage - 185 Terabytes on a tape.
What a kind way to say that I'm near sighted :-} . It is very true that I am not used to thinking in terms of a mega center. Your thoughts opened up a whole new realm for me. I'm too used to a small, cost conscious (cheap) environment. On Fri, May 2, 2014 at 7:03 AM, Russell Witt res09...@verizon.net wrote: True if you look at this as a primary media for a single user. But instead, look at this as the back-end storage media for a multi-user virtual-tape environment (virtual-tape in the cloud configuration). Now, instead of having hundreds of Tbytes of data from one customer on the tape you have a Tbyte of data from hundreds of customers. So if customer A wants to retrieve their 100-Tbytes of data it is spread across 100 of these tapes; all retrieving at the same time. Now, if a dozen clients all try to retrieve at exactly the same time you might have a performance issue. But if only 1 or 2 of those clients retrieve at any one time, no problem at all. And you wouldn't (I hope) keep all your eggs in one basket, but instead the Cloud-Virtual-Tape back-end would create at least 2 (3 or 4?) copies onto a super-high capacity cartridge. As the final back-end storage for has migrated through 2 or 3 other faster access media, this would be great. For the data that was written once, read often for the first 30-90 days; seldom for next year; and then will most likely never be read again but must be maintained for 100+ years - perfect. And there is a LOT of data that is falling into this category. Russell Witt -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Do not FTP DFDSS dump files without tersing them first
I agree that is the best. I have, so far, been successful simply by using the STRU R command. That is not a SITE option, but a z/OS ftp server command. On May 2, 2014 5:37 PM, Pinnacle pinnc...@rochester.rr.com wrote: To those who have advocated sending DFDSS dumps in FTP with block mode and EBCDIC, it works great, except when it doesn't. Got an I/O error today during a restore. DFDSS level 2 said to terse it first, and viola! It worked. So I'm done with block mode FTP for DFDSS dump files. Keep using it at your own risk. You're on borrowed time. Regards, Tom Conley -- -- 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: RMM and tape dataset block size
Create a new DSN. Assign that new DSN to have a DATACLAS which is not compressed. Use a utility such as IDCAMS REPRO, IEBGENER, or DFSORT to copy the data from the old DSN to the new DSN. Back up the new DSN. //COPY EXEC PGM=ICEGENER //SYSPRINT DD SYSOUT=* //SYSIN DD DUMMY //SYSUT1 DD DISP=SHR,DSN=compressed.dsn //SYSUT2 DD DSN=new.uncompressed.dsn, // DISP=(NEW,CATLG),DCB=compressed.dsn, // SPACE=(...),UNIT=sysda, // DATACLAS=dcnocomp Where the data in lower case in the JCL is what you need to specify yourself. I used ICEGENER which is DFSORT's high speed copy program. Of course, this assumes you have the proper authority to create a DSN with a given DATACLAS. For example, Production Control can do this (override the DATACLAS), but our programmers cannot. On Sun, May 4, 2014 at 10:20 PM, Victor Zhang victor_wor...@aliyun.comwrote: What I am facing a problem is : When I tried to backup compressed dataset that have compression set to be on in its data class, the backup speed will slow down dramatically. For example, when I backup z/os 1.13 sysres volume, I got speed of about 40MB/s, however, when backup data that have its data class with compression set to be on, the speed dropped to 20MB/s, the backup program is ADRDSSU. In RMM, I can see the tape block size is 262144 bytes, however from DAT, I can't see 262144, which is very strange.That's the reason I am asking this question again. I am trying to copy the compressed data to be an uncompressed one, however, I failed to do that, can anyone give me suggstion on how to uncompress a dataset and copy it to a new loacation, so that I can backup the uncompressed data? Regards Victorh -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: RMM and tape dataset block size
Silly me. I assumed your DSN is on DASD. If it is on tape, then you should be able to use ICEGENER to copy the data to another tape, but do something like: //COPY EXEC PGM=ICEGENER //SYSPRINT DD SYSOUT=* //SYSIN DD DUMMY //SYSUT1 DD DISP=SHR,DSN=compressed.tape.dsn //SYSUT2 DD DCB=TRTCH=NOCOMP, // other parameters for the output tape ... The main thing is to use DCB=TRTCH=NOCOMP which _should_ result in an uncompressed tape data set. You might also need to use the proper DATACLAS if this is an SMS managed (tape library) tape. On Mon, May 5, 2014 at 9:07 AM, John McKown john.archie.mck...@gmail.comwrote: Create a new DSN. Assign that new DSN to have a DATACLAS which is not compressed. Use a utility such as IDCAMS REPRO, IEBGENER, or DFSORT to copy the data from the old DSN to the new DSN. Back up the new DSN. //COPY EXEC PGM=ICEGENER //SYSPRINT DD SYSOUT=* //SYSIN DD DUMMY //SYSUT1 DD DISP=SHR,DSN=compressed.dsn //SYSUT2 DD DSN=new.uncompressed.dsn, // DISP=(NEW,CATLG),DCB=compressed.dsn, // SPACE=(...),UNIT=sysda, // DATACLAS=dcnocomp Where the data in lower case in the JCL is what you need to specify yourself. I used ICEGENER which is DFSORT's high speed copy program. Of course, this assumes you have the proper authority to create a DSN with a given DATACLAS. For example, Production Control can do this (override the DATACLAS), but our programmers cannot. On Sun, May 4, 2014 at 10:20 PM, Victor Zhang victor_wor...@aliyun.comwrote: What I am facing a problem is : When I tried to backup compressed dataset that have compression set to be on in its data class, the backup speed will slow down dramatically. For example, when I backup z/os 1.13 sysres volume, I got speed of about 40MB/s, however, when backup data that have its data class with compression set to be on, the speed dropped to 20MB/s, the backup program is ADRDSSU. In RMM, I can see the tape block size is 262144 bytes, however from DAT, I can't see 262144, which is very strange.That's the reason I am asking this question again. I am trying to copy the compressed data to be an uncompressed one, however, I failed to do that, can anyone give me suggstion on how to uncompress a dataset and copy it to a new loacation, so that I can backup the uncompressed data? Regards Victorh -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Lack of IBM development resources [was:RE: PFA (Now, an HZR subject)]
IMO, most investors today have more the mind set of a gambler than a true investor (long term profit). They want a fast payback, with a nice adrenaline or endorphin jolt for a financial high. On Tue, May 6, 2014 at 10:16 AM, John Gilmore jwgli...@gmail.com wrote: I suspect that IBM has two, related problems. Like all companies of its sort it is expected to show significant earnings-per-share growth from quarter to quarter. When it does not its share price suffers, and it feels strong pressure to restore earnings growth. It has addressed this problem using 1) share buybacks, which reduce the denominator in earnings-per-share calculations, and 2) expense cuts, which in the short term raise the earnings numerator in the same calculations. If the new mainframe models that are shortly to appear raise IBM revenues significantly the climate for significant mainframe-related software investments within the company will probably improve, at least in the short term, as it has in the past. Anything more is not very likely. Very short-term thinking is now the norm in the financial community; and IBM's senior management is aware that it is, among other things, a bouc émissaire available for sacrifice/replacement if that will make important outsiders feel better about the company. (Target's replacement of its CEO, announced in this morning's Times, will propitiate the analysts in the short term; but iit does not do much to address Target's real problems.) 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 -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Automated JES Spool FTP
Bottom line: No. And you say you don't want alternatives, so I'll say no more. On Wed, May 7, 2014 at 2:24 PM, Sproull, George J CTR DISA ESB (US) george.j.sproull@mail.mil wrote: Hi, Is there a way to set up a JES2 output class so that output written to that class is automagically sent via FTP to a server? It seems that there may be third party products that do this, but is anything native to JES available? I realize there are other ways to skin this cat, but that is the question I was asked. Thanks in advance for any input. -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Automated JES Spool FTP
That's an interesting idea. I wonder how you would specify the ftp server, userid, password, and remote file name (with path) to such a WRITER. But, from what I read, the OP want something out of the box from IBM integrated into JES itself. On Wed, May 7, 2014 at 2:51 PM, Barkow, Eileen ebar...@doitt.nyc.govwrote: Maybe you can write a writer routine that when specified gets control and ftp's or does whatever. JES2MAIL gets control via the WRITER= parm specified for the output and can be programmed to ftp and do other things, so you can probably write your own WRITER routine. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of John McKown Sent: Wednesday, May 07, 2014 3:40 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Automated JES Spool FTP Bottom line: No. And you say you don't want alternatives, so I'll say no more. On Wed, May 7, 2014 at 2:24 PM, Sproull, George J CTR DISA ESB (US) george.j.sproull@mail.mil wrote: Hi, Is there a way to set up a JES2 output class so that output written to that class is automagically sent via FTP to a server? It seems that there may be third party products that do this, but is anything native to JES available? I realize there are other ways to skin this cat, but that is the question I was asked. Thanks in advance for any input. -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan 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 -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: z10 IPL from Utility Tape
OP did not mention z/VM, but z/OS. So I'll bet DDR is not in the picture. The OP would need a standalone ADRDSSU (or FDR) IPLable tape. And maybe an IPLAble ICKDSF tape. Which, if his system is _down_, he cannot create. On Wed, May 7, 2014 at 2:53 PM, Karl Severson karl_j_sever...@raytheon.comwrote: Last summer we had a DS6800 go casters up. IBM couldn’t fix it. We ended up restoring everything to a DS8800. So is the DS8800 a more robust unit? I'm beginning to think the DS6800 on this system is a lemon. doubt you can IPL from tape because you don't have some of the requisite volumes, e.g., page packs, available. In your environment I would perform standalone restores until I had an IPLable system. Then I would IPL and restore whatever is left. The UTILITY UTILTAPE command will create a bootable tape which will start a DDR session so that volumes backed up with DDR can be restored. Karl -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: z10 IPL from Utility Tape
OOPS, my bad. I should have realized from the VOLSERs that it was z/VM. BTW - I, personally, _never_ IPL via an activation profile. I just use the LOAD function on the Recovery page. I drag the LPAR icon onto the LOAD icon. This gives me a pop up in which I can put the IPL volume and LOAD parameters (it remembers what I put in last time, however, and initializes the popup with those values). I don't know if trying the above would give you a better message than using the activation profile. But, hey, you're down, so it can't really hurt to try, right? On Wed, May 7, 2014 at 3:08 PM, Karl Severson karl_j_sever...@raytheon.comwrote: OP did not mention z/VM, but z/OS. So I'll bet DDR is not in the picture. The OP would need a standalone ADRDSSU (or FDR) IPLable tape. And maybe an IPLAble ICKDSF tape. Which, if his system is _down_, he cannot create. Yes, sorry I didn't mention zVM 6.1. I mentioned 610RES as the main resident OS pack. zVM and VM ESA name their main res packs after the version and release of the OS. zVM 6.1 = 610RES, VM/ESA 2.3 = 230RES, etc. Karl -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Automated JES Spool FTP
That is the simplest way. At our shop, the job which creates the dataset will then usually do the ftp in a later step, using a DD type put. On Wed, May 7, 2014 at 3:05 PM, Sproull, George J CTR DISA ESB (US) george.j.sproull@mail.mil wrote: Yes, that would be an interesting project to do. I was just asked this question by a user who doesn't do development and has no budget for additional products, so I told him that I would run it by you folks. I think I'll recommend that he create an output file and have our scheduling system trigger an FTP upon file creation. Thanks for all your input -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of John McKown Sent: Wednesday, May 07, 2014 15:55 To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Automated JES Spool FTP That's an interesting idea. I wonder how you would specify the ftp server, userid, password, and remote file name (with path) to such a WRITER. But, from what I read, the OP want something out of the box from IBM integrated into JES itself. On Wed, May 7, 2014 at 2:51 PM, Barkow, Eileen ebar...@doitt.nyc.gov wrote: Maybe you can write a writer routine that when specified gets control and ftp's or does whatever. JES2MAIL gets control via the WRITER= parm specified for the output and can be programmed to ftp and do other things, so you can probably write your own WRITER routine. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of John McKown Sent: Wednesday, May 07, 2014 3:40 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Automated JES Spool FTP Bottom line: No. And you say you don't want alternatives, so I'll say no more. On Wed, May 7, 2014 at 2:24 PM, Sproull, George J CTR DISA ESB (US) george.j.sproull@mail.mil wrote: Hi, Is there a way to set up a JES2 output class so that output written to that class is automagically sent via FTP to a server? It seems that there may be third party products that do this, but is anything native to JES available? I realize there are other ways to skin this cat, but that is the question I was asked. Thanks in advance for any input. -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan 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 -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan 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 -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Just a Question On Texting
We use XMITIP to do that very thing. But it works by sending a email to a email-to-SMS-text gateway server in the cloud somewhere. Basically we send the email from z/OS to our MS Exchange email server with a name. The MS Exchange server transforms that name into something like: 8175551...@tmomail.net . The tmomail.net is the email to SMS text server for the T-Mobile (my cell provider). This server then transforms that into an SMS text message which it sends to 817-555-1212 (not my real telephone number, not that you're likely to have thought that it was). More info at: http://en.wikipedia.org/wiki/SMS_gateway This references some sort of hardware you might be able to buy, but it would be a server on your LAN (I guess) not something on the z/OS system itself. On Thu, May 8, 2014 at 8:26 AM, George Rodriguez george.rodrig...@palmbeachschools.org wrote: Is there a program that can text a phone, just like XMITIP? *George Rodriguez* *Specialist II - IT Solutions* *IT Enterprise Applications* *PX - 47652* *(561) 357-7652 (office)* *(561) 707-3496 (mobile)* *School District of Palm Beach County* *3348 Forest Hill Blvd.* *Room B-251* *West Palm Beach, FL. 33406-5869* *Florida's Only A-Rated Urban District For Eight Consecutive Years* -- *Congratulations** Class of 2014 https://vodcast.palmbeachschools.org/player/8JWPB! For Graduation dates, times and locations, click here http://www.palmbeachschools.org/academics/documents/2014PBCGraduationSchedulev304-17-14.pdf. Watch Graduations Live May 14 - 23 on Comcast 235 and online http://www.palmbeachschools.org/**.* * Follow us on * [image: Facebook] http://www.palmbeachschools.org/links/facebook.html [image: Twitter] http://www.palmbeachschools.org/links/twitter.html *Disclaimer: *Under Florida law, e-mail addresses are public records. If you do not want your e-mail address released in response to a public records request, do not send electronic mail to this entity. Instead, contact this office by phone or in writing. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IBM C and Cobol Threading question
Tom, Looking here: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/igy3pg31/4.4 quote For the data that you want to isolate to an individual program invocation instance, define the data in the LOCAL-STORAGE SECTION. In general, this choice is appropriate for working data in threaded programs. If you declare data in WORKING-STORAGE and your program changes the contents of the data, you must take one of the following actions: Structure your application so that you do not access data in WORKING-STORAGE simultaneously from multiple threads. If you do access data simultaneously from separate threads, write appropriate serialization code. /quote But there doesn't seem to be any hint of how to write appropriate serialization code. Too bad COBOL can't declare a variable ATOMIC or have some sort serialization primitive like some other languages. I rather like the synchronized in Java. But, of course, COBOL is not really designed for multi-threading. If I want to do heavy duty threading and concurrency, I'd choose Clojure. Why? Because it is designed for it _AND_ it runs on the JVM which means it can run on a zAAP. On Thu, May 8, 2014 at 1:02 AM, Tom Ross tmr...@stlvm20.vnet.ibm.comwrote: I have written a C program using threads and have a question. I have an ext= ernal message table that I need to be persistent between threads. The mess= age table is loaded from an external QSAM file. Program in Cobol loads the = table. I want to be able to use the message table in other threads. Does an= yone know is Working-Storage from one thread available to other threads ?=20 Yes! In fact, all of your COBOL threads would be using a single copy of WORKING-STORAGE, so if one of them wants to do something that does not affect the others then the programs need LOCAL-STORAGE variables. Normally with multi-threading you would not use WORKING-STORAGE because of this. In your case, defining your table in WORKING-STORAGE and your other variables in LOCAL-STORAGE would work great! Cheers, TomR COBOL is the Language of the Future! -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: z10 IPL from Utility Tape
/ signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Vendor Source Code
This has been an interesting thread. I rather like the escrow idea. For smaller ISVs, I wonder if it would be helpful to integrate something like git or subversion into their processing, with a secure (are there any?) off site backup master. When a change is pushed to production, it would update the local and backup master repository. The problem, of course, is security of the backup repository. But then, most companies are worried about other companies stealing their source. Do many reputable companies hire commercial espionage hackers? I do know of a case - actually _two_ cases, but I don't think it would be wise of me to shoot off my mouth. === Say! Here's a neat sleep-deprived idea: In the above scenario, keep the offsite repository in the NSA ultra-center in Utah! This would require a commercial aspect to the NSA. But they're going to intercept and store the information any way if it is transmitted on the Internet. This way companies can help pay for the ultra-center, in addition to the U.S. taxpayer. And the companies would have a fairly secure backup. Well, ignoring the healthcare.gov fiasco, that is. Also, the U.S. Congress could pass yet another Federal law about interfering with software entrusted to a U.S. government facility (similar to interfering with the U.S. Mail). They like passing this sort of legislation. So do we all agree that I need more sleep? -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Vendor Source Code
On Fri, May 9, 2014 at 7:54 AM, Bob Shannon bshan...@rocketsoftware.comwrote: For smaller ISVs, I wonder if it would be helpful to integrate something like git or subversion into their processing, with a secure (are there any?) off site backup master. Why do you think this is an original idea? All ISVs deal with source code management. Some use open source solutions; some use RYO methods. Most, if not all, escrow the source on release boundaries. Our CVS repositories are replicated to three different locations daily. I'm sure we're not unique. I didn't mean for it to come across as being an original thought (there is nothing new under the Sun). It was just to toss out an idea which I hadn't seen discussed on this thread before. Kind of along with the idea of the software escrow and how some said that the software in escrow becomes out of date, sometimes quite quickly. So perhaps a software escrow company could be the host for the off site repository backup system. This should keep the software in the escrow account up to date. And, with an SCM, make it possible for a company or client (if the vendor goes out of business) to get a specific level of the software. This would be much easier if the build process included the SCM level (git commit or whatever for other SCMs - I think subversion has some special indicator which is replaced on checkout by the level) was used to generate the executable. It would also be helpful if the build process itself created some sort of object (don't know what) which detailed how the build was actually done (make file, scripts, JCL, other). And this may be what your company, and others, are already doing. I'm am not all that knowledgeable about such, unless they are brought up here. Bob Shannon Rocket Software -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Vendor Source Code
Go Debian! It installs from source. On May 10, 2014 2:44 PM, Duffy Nightingale du...@soundsoftware.us wrote: I agree with John Gilmore. Once the paranoia starts, it never ends. Having an updated copy of source or a copy that matches the version in use at your site with compiling/assembly instructions and some basic architecture sure beats the heck out of nothing. Big companies, such as IBM, typically drop support and many sites end up with nothing Duffy Nightingale -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of John Gilmore Sent: Friday, May 09, 2014 7:16 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Vendor Source Code Radoslaw Skorupka is right to emphasize that an escrow agreement is not a panacea. Such an agreement may be all but useless, but an able lawyer who understands the software-development process can write one that is useful in extremis. Moreover, the availability of such agreements sometimes makes it possible for initially small, startup ISVs to sell their new products to organizations that would otherwise be wary of buying them. They can certainly be problematic; but it is possible, even easy, to make long lists of potential inadequacies for just about any undertaking. (There are even some boilerplate lists of this sort available.) 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: Handle RACF abend in LE C
-- 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 -- There is nothing more pleasant than traveling and meeting new people! Genghis Khan Maranatha! John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN