Re: Rexx
Ed - PARSE is very powerful and I think I do keyword parsing in a simple manner. A few more keystrokes than CLIST, but not many more. I might point out I do things in REXX that mere mortals will never accomplish AND I will also wonder how people do some of what they do. Everyone else - I presented some of the wild and crazy things I have done one at SHARE. Other presenters have done a whole session on PARSE. If your company is a SHARE member then you can find the presentations in the archives. If they are not, get them to spend a few bucks. I have found it worthwhile. And I do not get a kick-back. On Fri, 3 Apr 2009 23:36:53 -0700, Edward Jaffe edja...@phoenixsoftware.com wrote: The worst thing about REXX is that is has no interface to IKJPARS. CLIST keyword parameter parsing is unmatched. Emulating this processing in REXX code is a fairly large undertaking. -- Edward E Jaffe -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Rexx
REXX is not smart enough to parse quoted strings the way we see them, but
once you have a routine that can do that, as I do, you do not have to write it
new every time you want to use it. Other than quoted strings, PARSE is very
powerful at handling keyword tag value processing. Easier in assembler if
you are good at assembler and not good at REXX. Easier REXX if you are not
good in assembler.
On Sat, 4 Apr 2009 08:58:23 -0400, P S zosw...@gmail.com wrote:
I think he means parsing things like:
COMMAND OPTION(VALUE) OPTION(VALUE(SUBVALUE)) OPTION(VALUE
('SUBVALUE
look, a close paren)'))
is non-trivial. This is easier (FSVO easier) in assembler, where you
can keep track of whether you're in quotes etc. more naturally. It's
doable in Rexx, but you wind up with all kinds of sub-parsing that
feels unnatural and makes you want to wash your hands.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Rexx
Sounds like an opportunity to open a SHARE requirement after you login. On Sat, 4 Apr 2009 08:54:37 -0700, Edward Jaffe edja...@phoenixsoftware.com wrote: Don't get me wrong. I agree the REXX PARSE statement is *extremely* powerful. But, all REXX parsing must be done by the REXX program itself. CLIST gets the benefit(?) of IKJPARS processing before it even gets control. And, the TSO/E positional and keyword parameters paradigm, while sometimes problematic (how many quotes do I need?), also has tremendous advantages. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: AW: EMC Centera for HSM?
Thanks for what looks like a real response to my post. Offline I was contacted by opentechsystems who wants to sell a solution we are not looking to buy and offered they have hundreds of customers but came up with none actually doing what I asked. A suggestion EMC should provide a reference - duh! If we had a reference from them then I would not be asking the community at large. And even if EMC had a reference I would rather find someone on our own as they maybe more willing to speak openly. Had one person check within his organization and found they don't. Had one real response of someone doing it - thanks for that! On Tue, 10 Mar 2009 09:26:00 +0100, Dietmar Ley diet...@ley- APENSEN.COM wrote: In this case the Centera is connected via OSA-Adapter. There is no need for any adapter (emulator) like Bus-Tech MAS.The Centera Mainframe HSM Migrator operates within the existing DFSMShsm address space. It uses three HSM exits (ARCMDEXT, ARCPEXT, ARCINEXT). Dietmar Ley -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SHARE Proceedings
Posting a presentation for the SHARE Proceedings is an entirely optional choice of the speaker. Some projects do better at getting their speakers to choose to share than others. Some vendors choose to post on their own website so they can harvest your e-mail address. Some speakers procrastinate and have a few more days. Letting them know you want it on the SHARE website might encourage them to do so. On Tue, 10 Mar 2009 12:16:29 -0700, Mark T. Regan, K8MTR netsfw- ibmm...@yahoo.com wrote: Not all of VM or Linux ones are out there yet. I was hoping to see this one 9162 - x86 Virtualization Technology for System z http://ew.share.org/proceedingmod/abstract.cfm?abstract_id=19229 Mark T. Regan, K8MTR CTO1 USNR-Retired (1969-1991) From: Edward Jaffe edja...@phoenixsoftware.com To: IBM-MAIN@bama.ua.edu Sent: Tuesday, March 10, 2009 2:39:26 PM Subject: SHARE Proceedings I can't speak for other projects. But, 100% of the SHARE MVS/SCP Project presentations are now available in the Proceedings area at http://www.share.org. Austin was a great event. Lots of new and interesting information was presented. Hopefully, the proceedings will give those of you unlucky enough to have missed Austin a taste of what was presented and even more justification to come to Denver and hear all about z/OS 1.11 and related topics. -- Edward E Jaffe -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: How to use CSI Catalog Search Interface
You should get an error code if your workarea is too small and a value of what
size you need. Bigger is better.
Hanging? Did you cause it to scan all your catalogs which takes a fair amount
of time?
Not working? It has always worked for me, but I did not always get the results
I wanted if I asked for date fields with both a two and four digit year.
Removing one of those requests got the data I wanted. The return codes
explain what you get, so you need to know what they mean.
I updated the REXX0003 code I previously mentioned. And I noticed I have
REXX0054 out there too. They both were created to help dump the fields that
are returned to visualize what comes back and as a model for how to break
out what the WORKAREA returns. From that you can modify them when
necessary. I have a note in one that z/OS 1.9 needed some updates. You
need to tailor them based on what you are running. And use the manual to
understand what you are getting back.
These are samples, like the one in SAMPLIB, it worked on the system I last ran
it on, it may not run on your system without changes. It is an API, which
means you call it and handle what you get back.
On Tue, 10 Mar 2009 14:46:33 -0500, L D Owen ldowen2...@yahoo.com
wrote:
It may be that your WORK area is too small. I had issues with the CSI code
hanging or just plain not working. I used the following values and it helped.
WORKLEN = 64000
dwork = 'FA00'X || COPIES('00'X,WORKLEN-4)
LDO
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SHARE Proceedings
Hope I can read them, some of the writing is atrocious. On Tue, 10 Mar 2009 14:51:49 -0400, Bill Fairchild bi...@mainstar.com wrote: I agree fully. Glad we finally got to meet. Hoping to see you again in Denver. As soon as I get the session evaluation forms' comments, I'll tell you what all the various topics were requested for future sessions. Bill -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: EMC Centera for HSM?
Two have a Centerra? One is using it? Does that mean neither are using it for HSM? Would like to get in touch with someone who is doing it? So far just getting responses from people who know someone who might be doing it. Broker the person who is and I will steer them to someone who wants to. I'm not really interested in being in the middle, nor talking to someone who wants to sell me something (nor does the person I am trying to help want to be sold some other solution). On Sat, 7 Mar 2009 16:12:26 +0100, R.S. r.skoru...@bremultibank.com.pl wrote: Kenneth E Tomiak pisze: Is anyone is using an EMC Centera device as a target for HSM ML1 or ML2 data. The vendor claims some of you are, if so, I would like to hear from you. Did you do anything special, does it perform okay, or other opinions you can to share. At least two companies in Poland have it, one of them is using it. -- Radoslaw Skorupka Lodz, Poland -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
EMC Centera for HSM?
Is anyone is using an EMC Centera device as a target for HSM ML1 or ML2 data. The vendor claims some of you are, if so, I would like to hear from you. Did you do anything special, does it perform okay, or other opinions you can to share. I'll stress 'opinions' to alleviate your concerns that I am not looking to sell you something else, I will not hold our possible future experience up against yours and feel you led us astray. We just have this nagging concern based on past claims from some vendors that they have no one else doing the solution they want to sell us when they are unable to provide a real reference. So, anyone doing this? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: [TSO-REXX] How to use CSI Catalog Search Interface
SYS1.SAMPLIB(IGGCSIRX) is the IBM sample I started with and found it does not handle multiple catalogs well. To help myself with breaking down the workarea I coded this: http://www.ktomiak.biz/ORG/STUFF/tips/REXX003.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: OOREXX and USS/TSO
Ought to, because we want it, is not going to make it so anytime soon. Six months ago I was asked if a certain requirements system could be used just to discuss if anyone wants it. We need some big customer to present a business case to IBM and then the rest of us climb onboard and be vocal to the IBM Representatives for our installations to get any traction on this. I know someone who is just waiting for this to happen so he can begin work on porting it, but the customer base needs to let IBM know they need, not want, this before he can start. Try coming up with how your company is losing money because you do not have it or your company is feeling the pain of not being able to do something ooRexx would easily solve in that business case. Otherwise you need many volunteers to try and get ooRexx working under z/OS Unix Services and z/OS TSO/E with all the extensions like SYSCALLS, DSNREXX, ISFEXEC, ISPEXEC, ISREDIT, STORAGE, FTPAPI, and SOCKET. On Tue, 3 Mar 2009 10:20:37 +, Martin Packer martin_pac...@uk.ibm.com wrote: More importantly it OUGHT to be ported to z/OS, preferably not just USS. Volunteers? Martin -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Rexx / edit macro bug?
We still did not see what the rest of the OP code's does, despite claiming to just remove the FIND. A return code of 1 will not produce an error, it is documented as how to get the cursor on the command line. If I believed everything a user told me they did I would never be able to solve problems. After claiming they changed nothing I look at the link-edit date and when I see 'todays' date they suddenly start remembering changed they made. I'd rather see the full source to explain the behavior then just the bits the OP cared to share and their claims. Removing the find may have affected some error handling in a way they were not concerned with. I stand by my post, a return code of zero will leave your cursor where the code left it and a one will put the cursor on the command line, as documented. On Fri, 20 Feb 2009 09:21:01 -0600, Big Iron billlalo...@rocketmail.com wrote: That behaviour is defined in the ISPF EDIT macro publication in the section Return Codes from User-Written Edit Macros: 12 and higher Error return codes. The cursor is placed on the command line I think that an error message also normally appears saying that the EDIT macro failed. However, the OP did state that simply removing the FIND command changed the behaviour. Bill On Fri, 20 Feb 2009 06:27:55 -0600, Kenneth E Tomiak jackofalltra...@ktomiak.biz wrote: I would go with wrong expectations (or user error) based on the result the OP says they got. Edit macros have a documented feature where ending the edit macro with a zero return code (I favor RETURN 0) will leave the cursor positioned and a non-zero return code will place the cursor on the command line. It is not evident from the OP original snippet how their edit macro terminates. On Wed, 18 Feb 2009 17:02:44 +0200, Itschak Mugzach imugz...@gmail.com wrote: Haven't tried that, but why not just doing: find xxx' locate 401 find xxx It will put the cursor on the start of the found string without changing the screen position as the find value is in the LVLINed area. ITschak On Wed, Feb 18, 2009 at 4:45 PM, Clark Pearson clark.pear...@ventura- uk.com wrote: Hello. Can anyone explain why the following code snippet doesn't work as expected? (This has prev gone to Google Groups, was advised to wait until our z/OS upgrade from 1.7 to 1.9 had been completed - it has - but the same thing still happens.) I would expect it to leave the member with line 401 at the top, and the cursor on line 412, pos21. The FIND string is on line 412 - I want the cursor to stay with the FOUND string, but to change the line that appears at the top of the display. /* rexx */ address isredit macro FIND WS-MODULE-IDENTIFIER locate 401 cursor = 412 21 If I *remove* the FIND command, it correctly locates and positions the cursor. That is, line 401 is at the top of the display, the cursor appears on line 412. *With* the FIND command, it positions the display according to my EDITSETting Target Line for Find/etc, ignoring the LOCATE command. If I place the CURSOR command *before* the LOCATE command, it obeys the LOCATE but loses the cursor placement (cursor in command line). Same if I remove the CURSOR line completely. Is this a bug in ISPF, or an undocumented feature in the generally not-very-good IBM documentation, which I have explored in depth? http://publibz.boulder.ibm.com/cgi- bin/bookmgr/BOOKS/ISPZEM40/3.3.31 Thank you, Clark. Clark Pearson Senior Analyst/Programmer (Oracle Mainframe) IT Systems, Ventura ( 0113 2073564 (x33564) 8 mailto:clark.pear...@ventura-uk.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Rexx / edit macro bug?
I would go with wrong expectations (or user error) based on the result the OP says they got. Edit macros have a documented feature where ending the edit macro with a zero return code (I favor RETURN 0) will leave the cursor positioned and a non-zero return code will place the cursor on the command line. It is not evident from the OP original snippet how their edit macro terminates. On Wed, 18 Feb 2009 17:02:44 +0200, Itschak Mugzach imugz...@gmail.com wrote: Haven't tried that, but why not just doing: find xxx' locate 401 find xxx It will put the cursor on the start of the found string without changing the screen position as the find value is in the LVLINed area. ITschak On Wed, Feb 18, 2009 at 4:45 PM, Clark Pearson clark.pear...@ventura- uk.com wrote: Hello. Can anyone explain why the following code snippet doesn't work as expected? (This has prev gone to Google Groups, was advised to wait until our z/OS upgrade from 1.7 to 1.9 had been completed - it has - but the same thing still happens.) I would expect it to leave the member with line 401 at the top, and the cursor on line 412, pos21. The FIND string is on line 412 - I want the cursor to stay with the FOUND string, but to change the line that appears at the top of the display. /* rexx */ address isredit macro FIND WS-MODULE-IDENTIFIER locate 401 cursor = 412 21 If I *remove* the FIND command, it correctly locates and positions the cursor. That is, line 401 is at the top of the display, the cursor appears on line 412. *With* the FIND command, it positions the display according to my EDITSETting Target Line for Find/etc, ignoring the LOCATE command. If I place the CURSOR command *before* the LOCATE command, it obeys the LOCATE but loses the cursor placement (cursor in command line). Same if I remove the CURSOR line completely. Is this a bug in ISPF, or an undocumented feature in the generally not-very-good IBM documentation, which I have explored in depth? http://publibz.boulder.ibm.com/cgi-bin/bookmgr/BOOKS/ISPZEM40/3.3.31 Thank you, Clark. Clark Pearson Senior Analyst/Programmer (Oracle Mainframe) IT Systems, Ventura ( 0113 2073564 (x33564) 8 mailto:clark.pear...@ventura-uk.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: How Official are Supplied Sample Exits? (was Assembler Question)
If you look at SAMPLES that IBM provides, it refers to more than exits. It is code that was considered to have worked (although it may have bugs) at the time it was written. It is not 'supported' in that as mentioned below, you can take it and change it to do what you want it to do. While not supported, if you find it fails (not that it does not do what you would like it to do), you might get lucky and find IBM will correct the bug. I did. They had some code with a loop of major items (SMP/E related) that called a routine to loop through minor items but failed to set a register when driving back through and therefore the 2nd through nth major item never showed all the minor items. The sample is going to be updated. They are not changing it to do something different, merely fixing a bug that was there from day one. There is no obligation to update samples as products evolve. Wish there were. The key word here may be exit. I have no experience with RACF exits but I do - or used to - with VTAM exits - Out of the abundant kindness of their hearts, VTAM developers have supplied *samples* Nevertheless, it was always my understanding that the purpose of those *sample* exits was to inspire a customer systems programmer in implementing his or her -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: REXX error ***** I WIN!!!!!! ******
Don't change settings you don't understand. On Fri, 17 Oct 2008 22:53:21 -0200, Claudio Marcio [EMAIL PROTECTED] wrote: I got it!!! run the pack off command inside member the now it´s OK! very, very thank´s to all what helped me! regards -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: REXX error
That depends on the Rexx interpreter being used. On my windows/XP system I need nothing on the first line. It is surprising how many people who know Rexx so well, know so little. On Mon, 13 Oct 2008 06:21:22 -0400, Shmuel Metz (Seymour J.) [EMAIL PROTECTED] wrote: I use Rexx on other platforms. On other platforms you need an extroc, shebang or equivalent. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Fwd: DB2 for z/OS WLM stored procedure setup
I have been taking the parms out of WLM because I have them in the PROC and they get found and used just fine. z/OS 1.7 and 1.9. Much easier to change in the PROC anyway. On Fri, 10 Oct 2008 16:31:19 +0100, Jim McAlpine [EMAIL PROTECTED] wrote: Problem sorted. In my WLM application environment definition I hadn't specified anything in the start parameters field. I figured that if the information was in the proc then it wasn't required here. Anyhow I added DB2SSN=IWMSSNM,APPLENV=JDBCENV and bingo it worked. Procedure not found was a very strange symptom though. Jim McAlpine -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: REXX error
No, you do not need rexx in a comment. It depends. TSO will read them from SYSEXEC and run them without rexx in the comment. z/OS UNIX Services, in my limited testing, requires rexx to be lower case where any other environment/platform could care less about the case. So RExx, REXX, REXx, rexX, reXX, rEXX, rexx in a comment from TSO and read from SYSPROC will all work. Any of those or even not using it from TSO SYSEXEC, and the PC based versions I use, do not need rexx in a comment. As was pointed out, if you get an IRX message than TSO already figured out it is rexx and the comment is unnecessary. On Wed, 8 Oct 2008 01:51:32 -0400, Scott Ford [EMAIL PROTECTED] wrote: Claudio, You need a '/* RExx */' line as your first line like below: -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: REXX error
I put my money on he is changing it. To get the first error I did a cut and paste of his code and changed the leading x40 to x20 and got the same first error. It then works. Changing anything outside the apostrophes caused the same problem. Thus his second error is coming from somewhere else. Why would you expect someone who can not code a simple say statement to turn on trace and find his own problems when he has the listserv to do his work? On Wed, 8 Oct 2008 09:04:52 -0500, Paul Gilmartin [EMAIL PROTECTED] wrote: Date: Tue, 7 Oct 2008 02:12:59 -0300 Content-Type: text/plain when I run my exec REXX the error appears: 1 +++ ? IRX0013I Error running BRAS, line 1: Invalid character in program ... clearly a Rexx message. Is Claudio changing the conditions of the problem without informing us? Or is his script being interpreted as a CLIST, or open code in SYSTSIN, which contains a token which causes an invalid Rexx exec to be invoked? Is this being done in batch? Foreground TSO? Other (specify)? We need more context. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: TCP hanshake problem
And the problem is? Does FTP from any other platform to z/OS work? Does the FTP client from that system to itself work? On Tue, 23 Sep 2008 14:55:12 -0500, Clay Hinzman [EMAIL PROTECTED] wrote: Hello, I am having what appears to be a TCP handshake issue. One of our clients recently upgraded to z/OS 1.7. Since the upgrade, we have not been able to establish a connection for FTP's from our mainframe (z/VM TCPIP level 430). 1) We send a SYN to open the connection. 2) We receive a SYN/ACK from the z/OS system. 3) We send a RST. Prior to the clients z/OS upgrade, the connection worked fine. I was wondering if anyone may have encountered this problem before. Regards, Clay -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: A STP question
I thought the CECs (pre-STP) would only get time from a Sysplex Timer or a special hardware device that knew how to dial NIST for the time. STP is a replacement for that, so if all 4 CECs play with STP then they need to be able to communicate with one another if only two of them are running the NTP Client. I do not believe the CECs share time to update clocks through other connections. The operating systems running in LPARs use the coupling facility and Fibre connections, not the CECs themselves. The fourth CEC does not have to be part of the 3 CEC STP environment, it can have its own ethernet connectivity to the NTP Server and run its own single CEC NTP Client. Don't all of your z9 and z10 support elements have two ethernet ports? Are you by chance trying to get a non-STP capable CEC to do NTP? I've heard that question often since STP and the NTP Client were releases. The old CECs can only do what the old CECs could do. Several SHARE sessions from a year or two ago covered how to mix STP and Sysplex Timers while migrating towards all STP capable CECs. On Fri, 19 Sep 2008 09:58:33 -0400, Petersen, Jim [EMAIL PROTECTED] wrote: I have 4 CEC's in my shop that are all wired together. The laptops on 3 of the CEC's have a spare Ethernet port. If I don't use the 4th CEC for the Primary, Backup, or Arbiter, do I really need to connect the 4th CEC via Ethernet so it can get to NTP? Won't it get its timing pulses via the Coupling Facility or Fibre connections ___ Jim Petersen MVS - Lead Systems Engineer -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: can the ENTER key be simulated in an ISPF panel
If you want TSO/E REXX to wait only a certain duration after having called another program (ISPEXEC), there is no such function. REXX waits for the called program to return control. Sounds like you want ISPF to have an option that when a panel is displayed it would 'timeout' if the user did not press an interrupt key (ATTN). Not the normal behavior for an interactive application. Similar to how some other functions, CONSOLE() and SOCKET() come to mind, have their own settings for how long they can have control before returning control back to the caller. ISPF was designed to be interactive, so it waits for the user to interact, not optionally interact. Just like CICS displaying a map and waiting for the user to do something, then running the transaction without letting the user start another transaction or press a PFKEY. In CICS it could ugly if users tried running three transactions at the same time that all displayed a different map to be used for data entry. Same with ISPF. The CONTROL LOCK option seems to be trying to match the windows 'progress bar' method of keeping the user occupied while doing things that take awhile and let them know the system is fine, just has a lot to do. That is how ISRDDN search uses it, and I use it to display which member my PDSEDIT code is currently executing on. Since you have just the one active TCB doing your work there is no ISPF reason to let them press any keys while your Rexx code is doing your work. They could not swap to another screen because you did not spin off a disconnected process under another TCB. You can't scroll around because your code is still executing. Generically it makes no sense to let the user change the display if your program is going to display a different panel. ISPF is not a multi-tasking operating system, only one TCB is active at a time, when control returns to them, they can swap to another ISPF session/screen and do something else, there are no swap but leave the session running in the background options. It stops running when they swap. Although I have wanted the ability to scroll down a long data set list while something else was chugging away. And having to press the attention key to break out to my multi-session monitor so I can swap logical terminal sessions is dangerous if I hit it twice, it sends the attention to my rexx code. Ask John L. to open an ISPF Requirement for a TIMEOUT parameter on ISPEXEC SELECT and DISPLAY PANEL(). It would be nice to have some code running under session 1, swap to session 2 and leave session 1 running while continuing to do work under session 2. The lack of that functionality is what led users to have multiple tso userids and being able to logon with the same userid on multiple systems in a JESPLEX. And more recelty asking why not use the same userid more than once on the same system. On Fri, 19 Sep 2008 14:28:25 -0400, Barkow, Eileen [EMAIL PROTECTED] wrote: Dave, thank you very much for your synopsis on this. we were trying to find a way whereby the process can be interrupted. The programmer did manage to do this with an assembler program that waits and accepts an interrupt from the attention key - if none is received the panel is jus reinvoked with the time updated. unfortuneatly, I do not see a WAIT facility in TSO REXX - there is one in Netview- which would have eliminated the need for an assembler program. you are correct about the attention key, but that can be set with emulators. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Taking Image Copy of base tablespace,LOB Tablespace and all the indexspaces in DB2V8
And take advantage of search engines like GOOGLE and ASK. A search of the message id and COPY YES turned up this hit which explains why you received the message. If you are aDBA then from there you should know what to do or get a DBA to fix it. There are DBa consultants available if you are still stuck. http://www.redbooks.ibm.com/redbooks/pdfs/sg246289.pdf P.Sabarish Kannan You should post on the DB2 List [EMAIL PROTECTED] -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: REXX Porblem - OUTTRAP function
X is always a bad choice for a variable name in Rexx. Sooner or later you will try to append it to a literal and complain it does not work. do x = 1 to 25 say ' 'x end The ' 'x says you want a hex value, not a blank and the value of x. When you come back to the code you may wish you had used longer and meaningful names. Then again some coders like to struggle and figure out what their code was supposed to do. Rexx Style has been presented at the SHARE Conference Meetings, maybe you should get a copy and avoid some other problems headed your way. On Sat, 6 Sep 2008 04:22:08 -0500, SUBSCRIBE IBM-MAIN Neo [EMAIL PROTECTED] wrote: Strange things happened when I executed the code below. After I entered 2 for OPTS to ran OBJ_D2, I could never leave the loop. But if I comment out the OUTTRAP statements, everything will go fine. So could anyone explain what OUTTRAP has done to my loop? Thanks in advance. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Y2K Leftovers
I'm not constrained by the limitations of the ISO standard. All you really showed was an alternate display format, which could easily be Y10K compliant. 020080905 also sorts as one field. How one displays the field does not mean it had to be stored that way. On Sat, 6 Sep 2008 02:11:32 -0400, Gerhard Postpischil [EMAIL PROTECTED] wrote: Kenneth E Tomiak wrote: I wasn't joking when I jumped over Y2K and went to Y10K, it has not caught on, but today is 09/05/02008. Why is everyone waiting? The ISO standard is 2008-09-05. Among other things it has the advantage of making date sorting faster by reducing three fields to one. Gerhard Postpischil Bradford, VT -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Y2K Leftovers
So does anyone know if the CBTTAPE has a Gregorian to Star Date conversion routine? Is it too soon for a Requirement? On Sat, 6 Sep 2008 19:21:25 -0500, Chase, John [EMAIL PROTECTED] wrote: -Original Message- From: IBM Mainframe Discussion List On Behalf Of Kenneth E Tomiak I wasn't joking when I jumped over Y2K and went to Y10K, it has not caught on, but today is 09/05/02008. Why is everyone waiting? Heck, by then we should be on the Star Date calendar. :-) -jc- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Need some SMP help.
Not getting someone who knows basic SMP/E to do it? On Fri, 5 Sep 2008 16:20:14 -0400, Howard Rifkind [EMAIL PROTECTED] wrote: Not an expert with SMP and I'm trying to do an Apply/Check against the sysmod below and getting the following out of SMP. Any insight/help in resolving this and where I've gone off the track is appreciated. Thanks. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: ACS Write Statement Limitations
On Tue, 2 Sep 2008 13:58:01 -0500, Mark Zelden [EMAIL PROTECTED] wrote: I empathize that you would like to write a novella to explain why it did not work, but then they won't need to call for help so that line could be removed. When faced with a limitation on what you can write out, use the IBM example - write your brief it failed call us mesage, followed by your own internal message id and fields you need to decipher why it failed and explain it when they call. Just look at an IOS* message for an example. And remember it takes time to process all that lengthy code your acs routines will be running through, slowing down your processor from doing real work. On Tue, 2 Sep 2008 14:51:09 -0400, Lizette Koehler [EMAIL PROTECTED] wrote: According to the DFSMS manual I am only allowed 110 characters. If it hurts, don't do it. :-) What's wrong with something like this: WRITE '** DATA SET DOES NOT CONFORM TO SYSTEM STANDARDS.' + '** CONTACT STORAGE MGMT IF NEEDED' They should already know the allocation failed by the IGD* messages. Mark -- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: REXX GIMAPI Interface / CBT778
All you need to do is know how to present what you find. I reported GIMASAMP returns incorrect output as a SEV(4). Don't make a big deal out of a sample not working and IBM will listen. Level 2 tested the code with and without my corrections and understood it really is broken and I was not looking to sneak in an enhancement. They contacted the developers who were more than willing to listen and I was asked did I want an APAR or could it be fixed in the next release. It has likely been broken since the day it was released so I was reasonable and closed the ETR with the understanding it will be fixed in the next release. Since DB2 9 is current, it might be a few years before the sample is fixed. But then it was broken for so long, I can wait. I would think no one else brought it IBM's attention so how urgent is it, really! I also submit requests to fix documentation and get responses. Submitting requests following the proper procedure does work. Low priority changes might take a few months, but IBM does listen and act. They just have to prioritize what they can get done with the resources they have. And I always consider if it has been broken for years then it can get fixed in the next release. Even samples and examples in manuals can be corrected if they are wrong. If the text is not clear then submit your comment as the manual describes. I offered a local non-USA phrase in the manual was not clear and offered a more generic way of explaining some material. They agreed. On Sun, 31 Aug 2008 09:06:12 -0500, Paul Gilmartin [EMAIL PROTECTED] wrote: A few questions: o Does IBM accept APARs on SAMPLIB members? Many (though not GIMAPI) bear an as-is disclaimer. -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Y2K Leftovers
I wasn't joking when I jumped over Y2K and went to Y10K, it has not caught on, but today is 09/05/02008. Why is everyone waiting? On Fri, 5 Sep 2008 22:41:01 +0100, Jose Rosario [EMAIL PROTECTED] wrote: Wow ! Being a Y2K Project Manager during those troubled times, I remember all the boys and girls' hard team work, and also some jokes that circulated inside the group: One joke was : - Hey, guys : why don't we just take from now on: 8 bytes for the year, 4 for the day and another 4 for the month ? lol ! Rgds, José Rosário Retired Airline Ops Mgr. and Y2K Proj Mgr. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: REXX GIMAPI Interface / CBT778
Yes. As far as I know. They are looking at it according to the ETR. I wouldn't know. On Sun, 31 Aug 2008 09:06:12 -0500, Paul Gilmartin [EMAIL PROTECTED] wrote: A few questions: o Is the relevant SAMPLIB member GIMASAMP? o I'm surprised at the 1981 copyright date. Isn't the SMP/E API considerably newer than that? I'd not expect a sample to so antedate the underlying function. (The CSECT name, BALAPI, hints at even older technology.) The earliest change log entries in the similar C and PL/I members are dated 1996, and I thought all appeared concurrently. o Does IBM accept APARs on SAMPLIB members? Many (though not GIMAPI) bear an as-is disclaimer. o Doesn't the copyright notice prohibit creating and distributing derivative works? I recognize that prohibiting derivative works much defeats the purpose of supplying samples. But I don't expect IBM's lawyers to have much more common sense than typical lawyers. Is there, perhaps, elsewhere a blanket statement cedeing IBM's copyright rights for code distributed as samples? Might IBM routinely on request grant such permission? -- gil -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: XML Toolkit MKDIR install problem.
Look at the error you posted: Problems creating following directories: /usr/lpp/xml19/usr/lpp/ixm/ Are you really trying to create /usr/lpp/xml19/usr/lpp? Do you see the usr/lpp listed in there twice? On Sun, 31 Aug 2008 06:31:47 -0700, Howard Rifkind [EMAIL PROTECTED] wrote: /usr/lpp was already there and I create /usr/lpp/xml19 This didn't work. Only the did I try /usr/lpp and this too didn't work. I believe the instructions indicated that you have to have the path already defined??? --- On Sat, 8/30/08, Kenneth E Tomiak [EMAIL PROTECTED] wrote: From: Kenneth E Tomiak [EMAIL PROTECTED] Subject: Re: XML Toolkit MKDIR install problem. To: IBM-MAIN@BAMA.UA.EDU Date: Saturday, August 30, 2008, 12:06 PM Your pathnames look like the problem, why are you creating ../usr/lpp/.. ? /usr/lpp/xml19/usr/lpp/ixm/ would look better as /usr/lpp/xml19/ixm/ Did you create all three to match what you are failing at? /usr/lpp/xml19 /usr/lpp/xml19/usr /usr/lpp/xml19/usr/lpp On Sat, 30 Aug 2008 07:24:44 -0700, Howard Rifkind [EMAIL PROTECTED] wrote: Thanks Mark, I already have the /usr/lpp directory set up and it's in the root. I create the following /usr/lpp/xml19 which is off of the root but got the messages below... Problems creating following directories: /usr/lpp/xml19/usr/lpp/ixm/ Not created. RC=81RSN=594003D /usr/lpp/xml19/usr/lpp/ixm/IBM Not created. RC=81RSN=594003D -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: dynamically generating Netview global variable names
So in your sample, the variable CHECKING contains the value of the actual variable name? That is what I understand Eileen is trying to do. Fred = Some value CHECKING = Fred 'GLOBALV PUTT CHECKING' Fred = another value 'GLOBALV GETT CHECKING' Say Fred Should show Some value not another value. On Sat, 30 Aug 2008 10:37:28 -0500, Chris Mason [EMAIL PROTECTED] wrote: Eileen John Giltner's sample Clist shows exactly how what you want can be done. Is there something about his example you don't understand? His sample is very, very clear to me and does precisely what you want. Setting and Storing checking = 'ON' 'GLOBALV PUTT CHECKING' Retrieval and Reference 'GLOBALV GETT CHECKING' if checking = 'ON' then ... The global variable naming issue -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: REXX GIMAPI Interface / CBT778
I have the answer to the original posted answer, not the twisted whining the discussion went to, that I failed to comprehend was the intent of the OP according to Shane. But Jurgen will soon have a fixed version. The non-api front-end that calls the API is to blame for not returning all the output it should. I reported the defect to IBM because the RXGIMAPI base code comes out of SAMPLIB with a 1981 copyright and is broken. Likely has been and either no one noticed or those that did failed to report the error. On Wed, 27 Aug 2008 22:26:03 -0500, Kenneth E Tomiak [EMAIL PROTECTED] wrote: The first best place to try for help for stuff found on the CBTTAPE is the author who submitted it. Perhaps he is unaware of the flaw. I see where he sets up the loop to get all entries and then all subentries, but not where he positions for the subentries of the 2nd through nth entry. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: REXX GIMAPI Interface / CBT778
I will send you an update and lengthy explanation of what I found today. You will be happy. The API works fine. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: signing off my corporate email account
I view email in text mode only. So you can be forced to send html, but I don't have to view it that way. So Corporate has their head up ... Anyway, Ktomiak.biz is more relaxed and allows me to do what I want on my own time using my own personal email accounts. I could not stand to receive every email from this listserv, so the web digest is perfect. I can ignore those whose everypost is just whining and not really offering any help. And I spend more time looking at the names of people who have proved themselves. We might all make a mistake in a post once in awhile, but some people seem to be out to break the record. So I would hate to see you disappear from here. On Thu, 28 Aug 2008 18:41:25 -0400, Arthur T. [EMAIL PROTECTED] wrote: On 28 Aug 2008 11:38:29 -0700, in bit.listserv.ibm-main (Message-ID:Pine.LNX.4.44.0808281333400.2903- [EMAIL PROTECTED]) [EMAIL PROTECTED] (John McKown) wrote: They are now not only demanding that stupid disclaimer, but demanding that all email be posted in HTML so that the disclaimer is sent with the corporate approved font and color scheme. FUP to my recent reply: -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: XML install questions.
CICS TS 3.2 requires the XML Toolkit dataset as part of the SYSLIB concatenation, so it becomes the same as any cross-SREL usage, putting a PTF on XML Toolkit, wherever it is, means you might have to look at relinking something under CICS TS. How many shops are doing that? On Thu, 28 Aug 2008 15:58:11 -0500, Mark Zelden [EMAIL PROTECTED] wrote: On Thu, 28 Aug 2008 15:08:23 -0500, Walt Farrell [EMAIL PROTECTED] wrote: On Wed, 27 Aug 2008 16:52:30 -0400, Howard Rifkind [EMAIL PROTECTED] wrote: Anyone out there familiar with the installation of the of the XML 1.9 product might be able to help me out with this. My manager wants this product installed in its own CSI. As far as I know it's not a separate product, but a part of z/OS. So I'm curious why he wants it installed in a separate CSI. That seems likely to cause problems when you install PTFs, or do upgrades of z/OS, etc. -- Walt, You may be confusing XML services with the XML Toolkit that Howard is referring to. Mark -- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SREL For XML 1.9
Which is why you can order it with a z/OS ServerPac and not have the hassle of installing it separately. You will receive maintenance into the global zone you have the target zone connected to, right? Much simpler if it is with z/OS to begin with. I only went separate because of time constraints, it is now with out z/OS target zone. On Thu, 28 Aug 2008 15:53:40 -0400, Howard Rifkind [EMAIL PROTECTED] wrote: No, it's SREL and I guess it looks like the same for z/OS. And thanks Mark Z. for the SMPE JCL... Varun Manocha [EMAIL PROTECTED] 8/28/2008 3:49 PM Howard, The SREL is for XML Toolkit 1.9 is Z038. If you meant to ask the FMID it is HXML190. Varun -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: z10 BC announcement
How long as the z9 BC been out that you have these fears? Are you needing to upgrade for something the z10 has while also being on a tiny mainframe? If so, make noise to your IBM sales rep. On Fri, 8 Aug 2008 11:22:39 -0400, David Andrews [EMAIL PROTECTED] wrote: Tom Marchant: The smallest z10 EC is just a bit faster than the smallest z9 EC. I don't see anything smaller than 27 MSU here: http://www- 03.ibm.com/servers/resources/servers_eserver_zseries_library_swpriceinfo_pdf_ swp_ibm.pdf We little z9 BC (15 MSU) guys could use a bit o' reassurance that we are not forgotten. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: XML install questions.
I also needed to have the XML Toolkit installed for CICS TS 3.2. So I downloaded it, built a global zone, defined some DDDEFs, did the receive, apply, and accept. Pretty basic SMP/E stuff. It does not just come with a z/OS 1.9 ServerPac, you have to select it with the order. We did not, so we ordered it separate after the fact and then put it in the z/OS zone. More than one way to get it and put it where you want. Ordering with the Serverpac is the easiest if you hav a new z/OS coming in. If not, do te way system programmers have done it for years. (Is claiming you are not good with SMP/E a way to build up your manager's confidence in you?) On Wed, 27 Aug 2008 16:52:30 -0400, Howard Rifkind [EMAIL PROTECTED] wrote: Anyone out there familiar with the installation of the of the XML 1.9 product might be able to help me out with this. My manager wants this product installed in its own CSI. The problem is that the first install job included with the CBPDO doesnât have a job to allocate and set up a new CSI and other files. The job requests that you download everything into a currently created global csi. I think they might be thinking about the global csi for z/OS as the first job is to do a receive into some csi and then extract the installation job, starting with IXMALLOC. Doesnât make scense to me to skip the job (s) required to install into a separate csi. Does this mean what I think it does? I installing this for the CICSTS32 install. Need some suggestions as Iâm not really sharp with SMP/E -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: REXX GIMAPI Interface / CBT778
I read more than your post before responding. The source code clearly states RXGIMAPI is a front-end to the GIMAPI. On Wed, 27 Aug 2008 18:20:13 +1000, Shane [EMAIL PROTECTED] wrote: On Tue, 2008-08-26 at 16:57 -0500, Kenneth E Tomiak wrote: You mistake someone working for IBM and donating sample code to CBTTAPE as an API from IBM. It is not. I did not. I am well aware of what an API is - including this one. Don't foist your own misunderstanding of discussions onto others. Shane ... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Problem with FTP transfer to MVS (ZOS 1.5)
Missing blocks in the middle? Have never run into that on z/OS, the FTP would always fail if there was a problem, not skip blocks. Does your client not care if a block was received on theother end? Look for a pattern if it is reproducible. Are you using the correct lrecl/blksize? Any warnings for truncated records? I've seen that with ASCII if the pc record is larger than the lrecl. Same file every time? What strange character pattern is in the missing blocks? Can you send it to someone to try and upload to a supported z/OS release? On Wed, 27 Aug 2008 21:14:43 -0400, John Giltner [EMAIL PROTECTED] wrote: [EMAIL PROTECTED] wrote: We are having a problem transferring data files in binary mode from a Windows or UNIX system to a ZOS 1.5 system. Have you seen this type of problem at your installation? Is there a workaround or APAR? With certain large files, the destination file is 15-20% shorter than the original file. Inspection of the files shows that the beginning and ending data blocks have correct contents, but there appears to be blocks missing from the middle of the file. The problem was intermittent but is now 100% reproducible on certain files. Other binary data files, both larger and smaller will transfer without problems. The source and target machines are both on the same network segment without any intervening firewalls. We have tried several FTP clients on the source machines with the same results. I am aware of IBM problem report #PQ29921 (FTP to MVS Data Loss). The APAR for that fix reportedly applies only to OS/390 v2.7 What can I look for next? How large is large? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: REXX GIMAPI Interface / CBT778
The first best place to try for help for stuff found on the CBTTAPE is the author who submitted it. Perhaps he is unaware of the flaw. I see where he sets up the loop to get all entries and then all subentries, but not where he positions for the subentries of the 2nd through nth entry. Assuming the GIMAPI is returning more. His email address is in FILE788 and you might want to ask him to look at the specific parameters you pass in as you may have written the FRONT END for something far simpler. I have no usermods in my zone so it was hard to test, but I did get the same results you show after finding another CSI with usermods in it. If the author does not respond, try Sam Golob off the CBTTAPE web site, he is a sharp guy and might have time to take on the challenge of fixing the code. In the interim, you could make repeated calls to it, passing the 2nd through nth entry to get the subentries. I'm sure the sales rep would be happy to help you purchase an additional engine. GOOGLE shows some hits on GIMAPI and performance. Give the author a try, I have found anyone who recently donated code is happy to try and correct any flaws. I should send him some assemble and link JCL to make that process easier. He may even send you source to test for him. Good luck. On Wed, 27 Aug 2008 10:03:36 +0200, Jürgen Kehr [EMAIL PROTECTED] ONLINE.DE wrote: Hi, I think I have to clarify, what in detail my problem with the prgram from CBT file 778 is: I modified the sample REXX to point to my CSI dataset: This program should list all USERMODs for a specific target zone. That means, that for the first match (here USERMOD S1AXR01) all subentry fields are displayed, as requested by GIMSENTRY='*', for all other only the its name and the name of the the target zone are displayed, which is the default value. Because I'm not an assembler programmer, I'm not able to locate the error in the the assemler program, so I would be very thankful for any help. BTW: I do know, that this program is neither an IBM program nor the API itself, but if I would find a solution for the above problem, this program would fulfill my needs. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: REXX GIMAPI Interface / CBT778
You mistake someone working for IBM and donating sample code to CBTTAPE as an API from IBM. It is not. I'll give it a try tonight. I assume the OP did notice the sample Rexx code traps the output into a compound variable, not a singular variable. You did display from stem.1 thru stem.[stem.0]? I had in mind to do what I did for the CICS DFHCSD vsam file, repro it to a flat file and then read it. It only takes about a month to figure out what it is you are looking at. A Rexx API to SMP/E is long overdue. RXGIMAPI file778 is not really from IBM nor an API. It is a starting point for people who want to try and tackle using assembler code to get to the real API. On Tue, 26 Aug 2008 21:28:33 +1000, Shane [EMAIL PROTECTED] wrote: On Tue, 2008-08-26 at 12:49 +0200, Jürgen Kehr wrote: I know we keep harping on to IBM (et al) to provide us with (documented !!!) APIs, but I have to consider this one a less than outstanding success. And like the CSI, the documentation is (was) average at best. Playing with it is about the only way to figure it out. I seem to recall a year or two back I tried the assembler interface, and even had a lash at the C sample when I was trying to get my head around that. Don't ever recall having tried Rexx, but there is going to be a fair slog involved in getting it to work generically methinks. Good luck. Shane ... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Find out allocations of current MSTJCL
I followed the control blocks up and found them using the supported releases of z/OS. On Mon, 25 Aug 2008 03:25:54 -0400, Gerhard Postpischil [EMAIL PROTECTED] wrote: Volkmar Langer wrote: I wonder if there's a way to find out which datasets are allocated to master jcl (some control block or something like that). The official ones are in the master scheduler TIOT. In some versions of OS that TIOT is also used in the top level TCB (region control task) in your address space. Gerhard Postpischil Bradford, VT -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: REXX GIMAPI Interface / CBT778
I tried it and am not sure what the complaint really is. Right in the source code it advertises it is a front-end to the GIMAPI. It is not the API itself. So it does what it does. If you want to do something different then you should write a better front end and donate it on CBTTAPE.org. That is how things get shared. I changed the Rexx code to use my CSI dataset name, my zone name, and a valid FMID and got lots of output back. All the PTFs I have applied to the FMID I supplied. If you have a valid requirement for IBM to provide functionality then follow the supported methods to communicate it to them. I believe any legit customer can submit a Marketing Request and any member of SHARE can submit a requirement thru www.share.org. Industrious individuals have created products where IBM was slow to act. On Tue, 26 Aug 2008 16:57:05 -0500, Kenneth E Tomiak [EMAIL PROTECTED] wrote: I'll give it a try tonight. I assume the OP did notice the sample Rexx code traps the output into a compound variable, not a singular variable. You did display from stem.1 thru stem.[stem.0]? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Question on how to order z/OS
n+2 is supported. But yes, you can install 1.10, shutdown anything lower than 1.8, IPL 1.10 and never look back. Sounds pretty risky. On Wed, 20 Aug 2008 15:24:43 -0500, Pat Mihalec [EMAIL PROTECTED] wrote: I have finally gotten permission to upgrade the software on the Mainframe. It has been too many years since I have done this. I thought you went out the IBM Software ShopSeries and placed the order, but all I see avail from there is service. Can someone send me the link so that I can order z/OS 1.9? I'm on 1.4 and have the service pac for 1.7 but I know I need to get off 1.7 before I move to production. Does anyone know if I can go from 1.7 to 1.10? Thanks in advance for the help. Pat -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Unbelievable Patent for JCL
Then you have not spent enough time at looking at patents. Our legal system encourages things like this, not because we should, but because we can. I know someone who complains about how the Olympic committee is trying to stop anyone else from using Olympic in anything. Darn, they'll be after me for using it now. On Mon, 18 Aug 2008 17:24:17 -0700, Ron Hawkins [EMAIL PROTECTED] wrote: I simply don't believe someone had the audacity to patent this. http://www.patentstorm.us/patents/6120553/description.html Ron -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: cbt
COBANAL is wonderful, I found reading load modules using REXX was fun, and putting the parts together as compound variables was a learning experience, but I have not not kept up withy any new signatures to identify which language the csects might be and the options used to create them. Maybe he should write his own program as he will learn so much more. On Mon, 4 Aug 2008 03:59:31 -0500, Roland Schiradin [EMAIL PROTECTED] wrote: Look at CobAnal FILE#321. It use the IEWBIND interface. Version 1.41 is on the Update site Roland I have to write a program that lists the csects of a program object and their properties, such as size, address, etc. Is there something I can use on the cbt tape? Thanks -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SHARE MVS/SCP (z/OS) Project Get Involved Meeting! Sun Aug 10 5:30pm at SHARE in San Jose http://www.share.org/
I did in 1998 and they have not been able to get rid of me yet. And then there is the secret handshake, too! On Mon, 4 Aug 2008 13:26:58 -0400, Knutson, Sam [EMAIL PROTECTED] wrote: Hi, You may find that if you get involved a little bit even doing small jobs and get to know other folks that you will get a lot more out of SHARE. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Share Attendance
I was too busy snubbing Sam to get them all. Not really, I got the lowdown on the peel-off labels. From what I saw, three of the Route 22 labels were taken. I had to ask why 22, and learned the age. And the relevance of the elephant? Twelve of those appeared to be taken. So did the twelve to 15 of you who took labels ever find someone wearing one? On Sat, 2 Aug 2008 01:12:43 EDT, Ed Finnell [EMAIL PROTECTED] wrote: If you see Sam Knutson he's got a couple hundred ibm-main peel-off labels for virtual and real easels-won't cost a thing. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Share Attendance
Yes Ed, it is. So is saying 'put up open easels' without thinking through how to make that happen. (Patience - I'll get to what happens these days.) These open easels need to come from somewhere. Since SHARE is a User Group, it takes users with ideas to help move it along into an action. Just throwing out the idea and hoping someone will pick up your flag and carry it (old military process) does not get things done. When getting the easel takes money then another set of users get involved. SHARE, like any corporation/company, can't just wave the wand and have things happen. (Patience - I'm getting to today.) I'm lucky to sit low on the org chart and not have to deal with how money gets spent. But I can think, 'would you be happy if we raised registration by a buck per person so these easels can just be put up?' And then by another buck for the next idea tossed out there? And another buck, and another? Somewhere we get bogged down in trying to keep costs low for a User run conference and what can be done. (Not my job.) These kinds of road blocks exist. What has recently been happening is that the same easels that are outside of the sessions are being brought into the reception for these things. Laugh as I tell how long it took for something as simple as that to happen. Somebody empowered themselves to think outside the box. My guess is that staff turnover and the MEET THE PROJECTS RECEPTION where we need lots of easels clicked in someone's head. So maybe now we need to find who has the IBM-MAIN banner and get it into SHARE's hands if we want it up. It makes me wonder though, since projects usually have a table and the project volunteers try to hang out there to meet and greet, who is it (if we need someone) that is hanging out at IBM-MAIN. In the days I was carting the IBM-MAIN and MVSE banner from one day to the next day I had no idea what it stood for nor who would choose to sit there. Nowadays I do. SHARE needs users with ideas and the backbone to try and make them happen. And then I have to put a disclaimer that I do not speak for SHARE, I'm just involved and doing things. Sometimes throwing out ideas and hoping someone else will pick up my flag and carry it into battle, sometimes kicking the hornets nest and getting the bees buzzing. Get to a SHARE Conference, get to the MVS table(s) and hook up with us. (But look for me over by Rexx - I'm with three projects now and still help MVS/SCP (MVSE). Now if I can only remember who had IBM-MAIN ... On Fri, 1 Aug 2008 01:03:10 EDT, Ed Finnell [EMAIL PROTECTED] wrote: In a message dated 7/31/2008 9:55:13 P.M. Central Daylight Time, [EMAIL PROTECTED] writes: was sheparding banners for other projects and the MVS banner is now handled in this fashion. We still have our own stand. IBM-MAIN is sitting in someone's house. Seems silly to me. Put up open easels and let the projects print their goodies. Sam K. sent Darren the IBM-Main sign several years back... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Problems that occur in production
User guides are full of how to do things correctly. On Wed, 30 Jul 2008 04:07:30 -0500, J. Chiampi [EMAIL PROTECTED] wrote: Do you want someone to give you a list of of silly things not to do like divide by zero, use non-numeric fields in numeric operations, don't use subscripts wisely, and ignore checking file-status/SQLCODE/return code? Hello, I agree with you that it is very interesting to check if return codes are used. I can detect potential severe bugs like this. About your last question, it could be useful if you have a list of silly things not to do. Do you have such a list? Even if it is partial, it would be interesting. Thanks in advance. Regards -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Share Attendance
There used to always be an IBM-MAIN table at SCIDS. I think it had disappeared last time I was there. ... I heard SHARE requested it be disbanded because only SHARE projects or programs were allowed official tables. This may have happened when SCIDS was replaced by Meet the Projects. Rumors are fun to read. As with anything you read or hear, check the facts. Being a little closer to the truth - SHARE never really had tables, Projects and Programs had a volunteer who carted the banner and method to keep it upright to and from the conference. If a Project did not bring a banner then they had no banner. Over time, banners (flags) have been extended to include a card for Rexx, a dinosaur, a spider, and some other variations. Somewhere before my time, the MVS SCP Project was carting the IBM-MAIN banner (flag) and stand and the MVS banner and stand. In my time we discussed coming up with something lighter and newer. Then the volunteer who had it, left it home since we were still talking about the redesign. So when it wasn't brought to one conference, no one seemed to notice, and we just stopped bringing it. No one at SHARE asked us to stop putting it up as far as I know. More recently we learned the company that supports SHARE in running the user group was sheparding banners for other projects and the MVS banner is now handled in this fashion. We still have our own stand. IBM-MAIN is sitting in someone's house. A few years back, SHARE started a Meet the Projects Reception and prints a poster card for each Project that is willing to 'staff' the table on Sunday night. That card is not put on tables, projects still need their own thingy. And where Projects were supposed to pick up their own thingy from the HQ room on Sunday afternoon, or bring it to the conference, the staff are now putting them up on Sunday. MVS SCP then handles taking down the MVS banner each night and setting it up at the next reception. After Thursday it goes back in a case, off to Chicago, and shows up at the next conference. Trying to get one volunteer to take it home worked while they made it to the next conference. If they could not, then they had to ship it someone who thought they would be going. That ws getting tricky, so letting it go with the cases of conference stuff back to Chicago is working quite well. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: FILTER cmd not working in batch SDSF?
On Fri, 18 Jul 2008 19:09:30 -0400, Farley, Peter x23353 [EMAIL PROTECTED] wrote: I guess I'll have to wait until Monday and give it to my sysprogs. Thanks for trying to help. Peter I use PGM=SDSF and have two ways to capture job output in batch dating back to early SDSF. 1) Using FILTER and FIND //* //* CAPTURE SPOOL OUTPUT TO SEQUENTIAL DATA SET //* //CAPTURE EXEC PGM=SDSF,PARM='' //ISFINDD * PREFIX MYJBNM* H FILTER JOBID EQ JOB02785 FIND MYJBNMP ++S PRINT FILE OUTDD01 PRINT PRINT CLOSE /* //ISFOUT DD SYSOUT=* //OUTDD01 DD DISP=(NEW,CATLG),DSN=MYJBNM.JOB02785, // UNIT=SYSALLDA,SPACE=(TRK,(20,2)), // DCB=(DSORG=PS,RECFM=VBA,BLKSIZE=0,LRECL=255) //* // 2) Using Select. //* //STEP001 EXEC PGM=SDSF //ISFOUT DD SYSOUT=* //ISFINDD * PRE KTOMIAK* OWNER * H S KTOMIAKK JOB00207 F KTOMIAKK ++? F JESJCL ++S PRINT FILE DDNAME PRINT PRINT CLOSE END /* //DDNAME DD DISP=(NEW,CATLG),DSN=KTOMIAK.JOBOUT.JOB00207, // UNIT=SYSDA,SPACE=(TRK,(45,45),RLSE), // DCB=(DSORG=PS,RECFM=VB,BLKSIZE=0,LRECL=255) //* -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: PUT Method of z/os HTTP Web Server
On my non-z/OS web server I have a web page with a form using the methed=post option. The action points to a CGI program that has to be smart enough to store the incoming data. You can set up your web server to use datasets but you might find using a file (z/OS UNIX Services) is easier on the web server. On Fri, 18 Jul 2008 14:59:01 -0400, Mary Kay Tubello [EMAIL PROTECTED] wrote: To all, I am looking into having a server application send data to the mainframe via the z/OS HTTP web server PUT method. I want to store the data in a dataset so that a batch job can process it. I have used HTTP for a server app to retrieve mainframe files. This is pretty easy. But, writing to the mainframe seems to be much more complicated. Anyone out there who can advise? Thanks, Mary Kay -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Terminal SYSIN in TSO Logon Proc
I would say running your CLIST, REXX, or any other language code is not TSO itself, so if other DD statements are allocated in a logon proc it is for the application, not for TSO. Sometimes people add things to a logon proc not understanding true needs, too. I have seen SYSPRINT added into steps that never use it because someone thought that is where output goes. And SYSIN is where input comes from. And then it gets propagated to zillions of other steps. So a vendor provided logon proc might include them because they know an application they designed the logon proc for will need them. On Thu, 17 Jul 2008 15:38:42 -0400, Thompson, Steve [EMAIL PROTECTED] wrote: SYSIN and SYSPRINT are not used by TSO. Meanwhile, they CAN BE used by CLIST and REXX when invoking programs. Does that constitute TSO (in CLIST case)? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DSN wirh LRECL 32760 on Z/OS
No idea how to learn assembler? Or are you asking us to write the program for you? The old tried and true method works, tell the developer to devise a way to break his record up into smaller pieces. Alternatively, put the data into z/OS UNIX Services files and process it with a language that can handle it. JAVA comes to mind. On Fri, 18 Jul 2008 13:39:04 +0200, Sarel Swanepoel [EMAIL PROTECTED] wrote: Hi We received a request from the developers to create a dataset with LRECL 32727. They will be receiving data from the open systems environment that will be + 52000 bytes long and need to process that data. I found the following in the archives but have no idea how to do it. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: State of IDAHO feedback
And no mention of ROI - Return On Investment. How would you even track when the $28 Million paid for itself? As for efficient, don't most systems add bloat and complexity instead of simplifying them? Have you ever seen a really get-off-the-mainframe project that saved money? Not when they add all te expenses in rather than just the ones they want to incude. But maybe they do enter an application and reach a go/nogo decision quicker. That is good for the few deserving recipients, for $28 million. Notice the 'plan' only needed $5 million. On Thu, 17 Jul 2008 23:01:21 -0400, Doug Fuerst [EMAIL PROTECTED] wrote: I think every buzz word on that new fangled project management stuff is in there. This is such bull.Can't they just say we made the process more efficient, and eliminated waste? No, too simple... And probably not the case. Inertia is pretty strong -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Moving 3390-3 to 3390-9
Having recently used a dataset mover we had a few tasks crash, so it was not transparent. Which caused an unscheduled outage. Your results may vary. On Wed, 16 Jul 2008 15:31:51 -0500, Mark Zelden [EMAIL PROTECTED] wrote: On Wed, 16 Jul 2008 15:32:27 -0400, Jousma, David [EMAIL PROTECTED] wrote: The dataset is moved once LDMF completes, and new allocations of the moved datasets go to the new volume, and those tasks that had it allocated still get it at the old location until they are recycle, and LDMF takes care of keeping them in sync. The old datasets are allocated, but the I/O is diverted to the new dataset. So the bounce is needed to free the old allocation, but if the system crashed for example, the new dsn is the good one (the 2 datasets are not kept in-sync after the diversion is complete). -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: RRS/DB2 JDBC definition and implementation
www.ibm.com then look for the manuals. There is not one to do all that you ask for, there are several. Check Redbooks too. On Wed, 16 Jul 2008 12:54:04 -0500, Carlos Cordero [EMAIL PROTECTED] wrote: Hi everybody! I need your help for this: to get a detailed documentation on how to know: 1) All z/OS Resources required to implement the RRS 2) RRS detailed implementation considerations 3) RRS configuration 4) DB2 JDBC/SQLJ Driver for z/OS, with the version that belongs DB2 8, detailed implementation and configuration. (JCC) 5) How to validate WLM application environment. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: FILTER cmd not working in batch SDSF?
I have REXX code for pre-z/OS 1.8 that accepts a jobname and jobnumber and allocates the output file dynamically that I use so one jobb step can grab several outputs. z/OS 1.8 and above has a wonderful API to SDSF for REXX, too. Glad it helped. On Sat, 19 Jul 2008 10:36:03 -0400, Farley, Peter x23353 [EMAIL PROTECTED] wrote: Reporting back as promised. Using PGM=SDSF and Ken's examples as a model, I was able to get the result I wanted. Herewith a sanitized version of what worked for the archives, and a big Thank You to Ken. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: FILTER cmd not working in batch SDSF?
You proved how being flexible in accepting a solution to a goal beats forcing a pre-chosen method. The other way may just need another command here or there. (I'm not logged on to check but was trying to recall if the PGM=name used is just an alias on the other.) On Sat, 19 Jul 2008 10:10:28 -0400, Farley, Peter x23353 [EMAIL PROTECTED] wrote: Thanks again for the excellent examples. You made me re-think the problem, and that's a Good Thing(tm). Regards, Peter -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Edit macro to support jcl set commands in instream inputs
You lost me. You were talking about CICS regions, then maint jobs, then IMS, then CRC. And yet still provided no clear example of what good it would be. Perhaps you have a tool and are trying to force it to be used somewhere? On Fri, 4 Jul 2008 14:37:23 +0200, Itschak Mugzach [EMAIL PROTECTED] wrote: Kenneth, This rexx is for the maint. Jobs. If you run the same job for every region, for example if you have several IMS regions each of which has a different naming convention, CRC etc., but all the rest is the same, why to handle several copies? | Itschak Mugzach | Director | SecuriTeam Software | | Email: [EMAIL PROTECTED] | Mob: +972 522 986404 | Skype: Itschak Mugzach | Web: www.Securiteam.co.il | -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Kenneth E Tomiak Sent: Friday, July 04, 2008 3:45 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Edit macro to support jcl set commands in instream inputs Can you give an example of why running rexx code on tens of CICS regions every time they start up day after day to change a variable in SYSIN which is stored in a permanent dataset is productive? After all, I know have to go add SET statements to started task JCL for variables that are only in SYSIN, maybe. On Tue, 1 Jul 2008 17:44:53 +0200, Itschak Mugzach [EMAIL PROTECTED] wrote: Dave, This is not an application. The is standart JCL stored in your librabry. Suppose that you have some tens of CICS environments. All have the same charcturistics execpt some prefix. JCL SET command will take care of the JCL variables, but what about the sysin data? This rexx exec take care of the sysin data only and let MVS take care of the JCL side, but both areusing the same set of values visa JCL SET commands. Regards, | Itschak Mugzach | Director | SecuriTeam Software | -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html __ NOD32 3240 (20080704) Information __ This message was checked by NOD32 antivirus system. http://www.eset.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DB2 V8 and Unicode
Problem is usually defined as something is broken. So it is not a problem that a huge pre-built image is loaded when you might use less than 2% of it. You can always buy more memory to support all the waste that takes place for non- problems. So this is purely an option for those shops that do not want to waste all that memory by loading conversion techniques they will never use. Letting DB2 cause the pre-built image to be loaded did cause a problem if more then one DB2 was started in a short space of time, so a PTF was made available. I'll stick with a CUNUNI00 member loading one always used conversion technique and let z/OS load others. I did hit a problem where an off-the-shelf vendor application running in CICS has a problem getting the conversion techniques they need loaded. Because of time constraints and an inability to recreate the problem outside of their application I ended up running a PLT program at startup time that performed the same instructions as their failing program, but only those, and they load just fine and then the application works. Is having a CUNUNI00 member really confusing to people? Or has IBM made it confusing because the DB2 people are not on the same page as the UNICODE folks who know better? Shouldn't we unconfuse the DB2 people? And the IBMer who suggested letting DB2 consume the machine? I have always believed if a recommendation helps waste resources then they should be provided for free. On Thu, 3 Jul 2008 19:04:10 -0500, Mark Zelden [EMAIL PROTECTED] wrote: On Thu, 3 Jul 2008 16:52:25 -0500, Brian Peterson [EMAIL PROTECTED] wrote: Well, if you *don't* initialize Unicode On Demand by issuing a simple command at IPL time, DB2 Version 8 will detect that Unicode has not been initialized and will attempt to load the huge pre-built image. Again, I don't see this as a problem. Apparently either does IBM since the migration guide recommends removing CUN* members from parmlib. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SYSREXX and SDSF REXX support together: is it possible ?
Max? What was your error? I gave it a try and ISFCALLS(ON) worked, my first
ISFEXEC from working code got a RC(08). The code works outside of the
System REXX environment so I started thinking about what could be the
cause. The first thought is what USERID is your code running from? Mine is
currently running as *, which is not a userid we gave permissions to in
ISFPARMS. I'm waiting on the security team to define a real userid for the AXR
task. Then we can add it to ISFPARMS and I will try again. I expected RC(16)
for not authorized.
On Sat, 28 Jun 2008 11:31:11 -0500, Kenneth E Tomiak
[EMAIL PROTECTED] wrote:
On Wed, 18 Jun 2008 09:48:37 -0500, Max Scarpa
[EMAIL PROTECTED] wrote:
Hi All
I'm playing for first time with new z/OS 1.9 SYSREXX support and with REXX
SDSF support.
Both work great but (among others) I've a problem to 'combine' or 'mix'
these 2 features, i.e. to execute a SYSREXX (say via command @rexx1 from
SDSF panel)
that executes some commands (say D ASM, some unit commands..) and
displays
some SDSF panels, something like this (quite simple sample):
..
RESCMD = AXRCMD('$D JQ,SPOOL=(V=MSJN00,PERCENT1)','LINE2.',10)
.
RC=ISFCALLS(ON)
ADDRESS SDSF ISFEXEC RM
SAY 'ISFCOLS='ISFCOLS
DO J=1 TO ISFROWS
LINE.J= RESNAME.J STATUS
SAY LINE.J
END
RC=ISFCALLS(OFF)
SDSF interface doesn't work while ARXCMD (of course) yes.
I think it's possible in some way but after some tests and searches in
manuals I wasn't able to find something useful. Any example/hint/manual
from
list ?
Thank you in advance
Max Scarpa
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Edit macro to support jcl set commands in instream inputs
Can you give an example of why running rexx code on tens of CICS regions every time they start up day after day to change a variable in SYSIN which is stored in a permanent dataset is productive? After all, I know have to go add SET statements to started task JCL for variables that are only in SYSIN, maybe. On Tue, 1 Jul 2008 17:44:53 +0200, Itschak Mugzach [EMAIL PROTECTED] wrote: Dave, This is not an application. The is standart JCL stored in your librabry. Suppose that you have some tens of CICS environments. All have the same charcturistics execpt some prefix. JCL SET command will take care of the JCL variables, but what about the sysin data? This rexx exec take care of the sysin data only and let MVS take care of the JCL side, but both areusing the same set of values visa JCL SET commands. Regards, | Itschak Mugzach | Director | SecuriTeam Software | -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: zAAP engine Benefit Question
And Redbook authors really only know/write about the facts they know from doing the effort they set out to do, they are not updated as time goes on to be living documents. Some Redbooks get updates if the authors are till around and have the time, but not advances in general. So there may be other things that can use a zAAP these days that will not get retrofitted into the Redbook. IBM is allowed to authorize other users to take advantage of the zAAP and zIIP. You should try and contact an author of the Redbook to ask what they mean if you want the best answer. They may not subscribe to IBM-MAIN, but often list a way to contact them in the Redbook. While I could make the assumption something in the IP stack uses JAVA, the developers are the ones who really know. On Fri, 27 Jun 2008 12:52:09 -0400, Knutson, Sam [EMAIL PROTECTED] wrote: Hi Dennis, I think the author is talking about the benefit of running the Websphere J2EE stack local on z/OS rather than off platform. You save by not having to talk to a web server/app server across the LAN or WAN that is on another box maybe traverse a firewall or two instead you go directly from some z/OS transaction manager to Websphere on z/OS. At worst case hopefully between LPARs in the same CEC. zIIP engines however are enabled for much more than Java and priced the same as zAAP engines. Best Regards, Sam Knutson, GEICO -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Longnecker, Dennis Sent: Friday, June 27, 2008 12:38 PM To: IBM-MAIN@BAMA.UA.EDU Subject: zAAP engine Benefit Question In the March 2008 Redbook title System Programmer's Guide to: Workload Manager it has a section that reads: 3.6.3 zSeries Application Assist Processor (zAAP) The benefits of using a zAAP processor to execute Java code are saving CPU cycles in IP stacks and in the firewalls due to the connectivity simplification. I understand the JVM is the only authorized zAAP user. Does the above part from the manual imply that the IP stack and firewalls are written in JAVA, thus the CPU savings? And, what is the connectivity simplification being referenced? Thanks, Dennis -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Problems that occur in production
Any language can have problems if the author lacks basic programming skills for error handling. Make sure data is correct and use every available file- status/SQLCODE/return code instead of assuming an operation worked. It will bloat your code and make it run longer than not taking such precautions. Even check file-status on a WRITE as you may have run out of space. How many programmers ever do that? The best system design principles I learned are that the programs handling data input handle validation, so that the other programs that merely handle data do not have to revalidate what is supposed to be already validated data. That reduces the run-time of the back end programs but raises the risk some future design change will get overlooked as to all of the affected programs and an abend will be in your future. Every program sstill needs to check file- status/SQLCODE/return code for the potential of a problem. Do you want someone to give you a list of of silly things not to do like divide by zero, use non-numeric fields in numeric operations, don't use subscripts wisely, and ignore checking file-status/SQLCODE/return code? On Fri, 20 Jun 2008 08:58:07 -0500, J. Chiampi [EMAIL PROTECTED] wrote: Hello, I'm looking for information about problems that could occur in production with Cobol programs and that could generate abend. I would like to find a description and how to prevent them before they occur. For instance, I think that it could be interesting to avoid moving alphanumeric variables into numeric variable without checking them by using a IF NUMERIC or moving data into another that is shorter or avoid closing file or never check array boundaries... Do you see other important cases related to performance or robustness? Thanks in advance. Regards -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: TSO EDIT QUESTION - CUT PASTE
ISPF cut paste will do lines, not characters, so the 'INSERT is on' should be irrelevant. There is no 'rest of the data on the right' since you will have pasted an entire line. If INSERT is on, you will have to had placed the 'a'/b' on the line already, since you can not insert inthe line number field. Type PROFILE and look at whether you have NULLS ON if your concern is trailing blanks or nulls. A windows cut/copy paste will work with INSERT on, however your emulator settings are what determine how paste works and the ISPF NULLS settings. On Mon, 23 Jun 2008 11:14:21 -0700, esmie moo [EMAIL PROTECTED] wrote: It is a ISPF cut and paste and I am doing this in the same member. What I am trying to do is add 3 characters in the line i.e. SYSVSM.SOVDSSU.TPRS1.COPY1(+1), SYSVSM.SOVDSSU.TPRS1NPL.COPY1(+1), --- On Tue, 6/24/08, Jerry Durbin [EMAIL PROTECTED] wrote: From: Jerry Durbin [EMAIL PROTECTED] Subject: Re: TSO EDIT QUESTION - CUT PASTE To: IBM-MAIN@BAMA.UA.EDU Received: Tuesday, June 24, 2008, 6:09 AM Is this a Windows cut and paste or an ISPF cut and paste? If ISPF, is the Paste to file set with the same DCB LRECL as the Cut from file? -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of esmie moo Sent: Monday, June 23, 2008 10:53 AM To: IBM-MAIN@BAMA.UA.EDU Subject: TSO EDIT QUESTION - CUT PASTE Good Day Gentle Readers, Whenever I perform a cut paste (insert key is on) the rest of the data (right hand side) is truncated or erased. I checked my settings another partition and it is identical and I encounter no problem. For some reason when I try the same in this environment the paste causes an EOF. Is there a way of fixing this problem? I did an ieb-eyball of the settings in other partions and everything is identical. Thanks in advnce. __ Instant Messaging, free SMS, sharing photos and more... Try the new Yahoo! Canada Messenger at http://ca.beta.messenger.yahoo.com/ -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html __ Yahoo! Canada Toolbar: Search from anywhere on the web, and bookmark your favourite sites. Download it now at http://ca.toolbar.yahoo.com. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Set JobId on Submit..
And if you populate your RACF TSO segment you can also affect the outcome of submitting something without a JOBCARD. On Thu, 19 Jun 2008 13:27:31 EDT, Ed Finnell [EMAIL PROTECTED] wrote: In a message dated 6/19/2008 11:32:27 A.M. Central Daylight Time, [EMAIL PROTECTED] writes: Wait a minute, guys. Isn't there something in ISPF SUBMIT that, if your JCL member does not contain a jobcard, the default jobcard stored in ISPF Settings somewhere is automatically inserted on top of your JCL? I seem to There's that, there's also the native TSO/E behavior documented in the user's guide. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SYSREXX and SDSF REXX support together: is it possible ?
System REXX is not the same environment as TSO, so there are limitations of
what you an do. Don't assume evey component that comes out with a REXX
API (like TCP/IP, SDSF, IGGCSI00) is going to work under System REXX. Nor
that the z/OS manuals (not REXX manuals) that document System REXX are
going to be updated to say which components won't work. Likewise I do not
expect the SDSF REXX folks will make a claim about whether it works under
System REXX as they would have written it for TSO REXX.
I'm not quite ready to jump into the same type of testing but will be soon. You
say you can not mix them, so I trust you took working SDSF REXX code and
placed it into your System REXX code and have all the necessary load modules
available to AXR? And looked up the error status from whatever failed?
On Wed, 18 Jun 2008 09:48:37 -0500, Max Scarpa
[EMAIL PROTECTED] wrote:
Hi All
I'm playing for first time with new z/OS 1.9 SYSREXX support and with REXX
SDSF support.
Both work great but (among others) I've a problem to 'combine' or 'mix'
these 2 features, i.e. to execute a SYSREXX (say via command @rexx1 from
SDSF panel)
that executes some commands (say D ASM, some unit commands..) and
displays
some SDSF panels, something like this (quite simple sample):
..
RESCMD = AXRCMD('$D JQ,SPOOL=(V=MSJN00,PERCENT1)','LINE2.',10)
.
RC=ISFCALLS(ON)
ADDRESS SDSF ISFEXEC RM
SAY 'ISFCOLS='ISFCOLS
DO J=1 TO ISFROWS
LINE.J= RESNAME.J STATUS
SAY LINE.J
END
RC=ISFCALLS(OFF)
SDSF interface doesn't work while ARXCMD (of course) yes.
I think it's possible in some way but after some tests and searches in
manuals I wasn't able to find something useful. Any example/hint/manual from
list ?
Thank you in advance
Max Scarpa
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Controlling the execution sequence of dependant jobs in JES2 (a suggested fix)
Or even try to turn a product that does one thing to incorporate another product for free. Job schedulers exists to manage the serialization and coordination of jobs beyond mere submittal. The free alternative is already there, they can put an IEBGENER step at the end of the a job to submit the next one. Just because David would JES2 to handle scheduling does not mean implementing it would be easy. Laying out how he would like the interface is but the tip of the iceberg. Entering real requirements to IBM is one way. He can also get a job with IBM, become the head of JES2 and fight for his cause. On Fri, 23 May 2008 22:16:41 -0500, Paul Gilmartin [EMAIL PROTECTED] wrote: On Fri, 23 May 2008 14:16:55 -0400, David Cole wrote: As noted in my prior post, I think it is a shame that the IBM-JES2 folks make it so difficult ... Of course, it's only human nature to wish that one's only favorite feature were added as an enhancement to the lower priced product. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: How to cancel with just the JES jobid?
How is it you came to have a jobid and not know the jobname? Maybe instead of fighting to find the name you can backtrack to what captured the jobid, it must have had a jobname at that point too. On Fri, 9 May 2008 14:34:39 -0500, Mark Jones [EMAIL PROTECTED] wrote: From an authorized assembler program, I've got just a JES jobid (JOBn) and need to cancel it. This needs to work with both JES2 and JES3. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DSNUTILB from REXX scripts
Can you cut and paste the full line you used? You are not showing how you passed the PARM data. On Wed, 7 May 2008 06:37:29 -0500, Karol Filipowicz [EMAIL PROTECTED] wrote: Hi I want to call DSNUTILB from REXX (of course by TSO CALL command like ADDRESS TSO CALL *(DSNUTILB) ) and: 1.in STEPLIB DD I've ONLY x.SDSNLOAD and x.SDSNEXIT (DB2 v8) 2.pgm DSNUTILB is in PPT table in SCHED00 3. DSNUTILB is in IKJFT00 member for auth. from CALL. and finally I get abend 04E with reason 00E40002. Anybody knows what should be done? Thanks! Karol Filipowicz - Poland -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DSNUTIL from REXX scripts
They ran this to the ground over on the DB2-L listserv - start writing assembler to create your own program that can be called by the rexx seemed to be a possible answer. http://www.idugdb2-l.org/cgi-bin/wa?A2=ind9912DL=db2-lP=3092 Looks like anyone who really wants to use REXX to invoke a DB2 utility will use DSNREXX to call call a stored procedure. I've gotten that to work, DB2, WLM, and Stored Procedures are a mess. The V9 Redbook is a step in the right direction, even if you are on V7 ro V8. By the way, DSNUTILB is in IEFSDPPT, so you do not need to put it in SCHEDxx unless you are trying to mangle what IBM provided. On Wed, 7 May 2008 06:37:29 -0500, Karol Filipowicz [EMAIL PROTECTED] wrote: Hi I want to call DSNUTILB from REXX (of course by TSO CALL command like ADDRESS TSO CALL *(DSNUTILB) ) and: 1.in STEPLIB DD I've ONLY x.SDSNLOAD and x.SDSNEXIT (DB2 v8) 2.pgm DSNUTILB is in PPT table in SCHED00 3. DSNUTILB is in IKJFT00 member for auth. from CALL. and finally I get abend 04E with reason 00E40002. Anybody knows what should be done? Thanks! Karol Filipowicz - Poland -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: VSAM / COBOL question - redux (fwd)
My understanding of HIPAA is access to data is not denied to everyone, knowing who accessed it is the requirement. For 'confidential' data, logging who accessed it even if they are AUTHORIZED is done in some hospitals. Think audit trail. And of course they try to limit access. But if the developers have access to production does it matter what file it is in, they still accessed it. Proper logging would then have to log everyone that accesses the copies. And th snowball starts rolling. Once you give access to someone, it is hard to control what they do with it. What does HIPAA (or whatever the spelling is) say about having test access to true production data? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Business Recovery Exercise
Since you said initialize, for those who who might be curious:
PGM=ICKDSF,PARM='NOREPLYU'
What does the DFSMSdss manual suggest for RESTORE? I do not recall any
ignore racf option. There are bypassacs options. I recover from a system with
RACF and IBMUSER has SPECIAL and OPERATIONS, so never hit your problem.
On Tue, 22 Apr 2008 20:54:25 +, John P Donnelly
[EMAIL PROTECTED] wrote:
â¦we are about 10 days into a BRE aka Disaster Recovery
Exerciseâ¦couple
things if mayâ¦
- one of our procedures is to initialize all the DASD; establish a
SYS1.VTOCIX.what and a SYS1.VVDS.Vwhat; restore the DASDâ¦during this
restore process we received prompts as
ADR369D (ttt)-m(yy), AUTHORIZE FOR {READ | WRITE} ACCESS {A
CHECKPOINT/RESTART DATA SET | A RACF DATA SET ON NON-RACF
SYSTEM|A
VVDS | A VTOCIX | ICF VSAM DATA SET ON NON-ICF SYSTEM} ON
volume_serial_number, job_name, step_name, REPLY U OR T
for VTOCIX
..we are executing a basic out of the box Recovery System and submit the
restores with LOGONID IBMUSERâ¦anyway to avoid the prompt?
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DB2 V7.1 going down
H - CICS TS 2.2 was on my brain, thinking it was also DB2 V7.1 because we recently rushed to get off of it. But that was more wanting to get to 8.1. My apologies - I'll flog myself. On Sun, 20 Apr 2008 12:55:00 -0400, Bob Shannon [EMAIL PROTECTED] wrote: Here in the USA that means you should have migrated to V8 before V7 went past end-of-support last month I show DB2 V7 EOS as 30 June 2008. Bob Shannon Rocket Software -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: action in UK33496
Programs can write to SYSPRINT as long as the blksize is compatible with LRECL so if an installation previoulsy hardcoded a valid blksize instead of using a system determined blksize then no action is required. This is one of those annoying actions we spend too much time researching only to learn we can ignore it. It is a shame when one IBMer could not put sufficient information in the HOLD data causing thousands of us to go hunt down the APAR. On Sun, 20 Apr 2008 05:00:13 -0500, Big Iron [EMAIL PROTECTED] wrote: Since the blocksize that would have been used before this PTF was not the System Defined Blocksize, then some installations may have already adjusted their procedures to be compatible with the previous incorrect behaviour. They may now need to take some action to deal with the change in behaviour introduced by this PTF. In other cases, similar (or even more drastic) changes are classified as documentation change which can cause grief when people assume that applying those PTFs will not require changes to existing production applications. Also, the information contained on the HOLD may not always be sufficient to understand all the implications of applying the maintenance and it may sometimes be necessary to examine the APAR/PTF text. Bill On Sat, 19 Apr 2008 21:12:13 +0200, R.S. [EMAIL PROTECTED] wrote: HOLD(UK33496) SYS FMID(HCI6500) REASON(ACTION) DATE(08037) COMMENT (If the SYSPRINT file is being written to a data set, please note that a System Defined Blocksize will be allocated if no BLKSIZE is defined or a BLKSIZE of 0 is defined on the DD card. My humble questions: 1. Is it really ACTION to perform ? 2. Isn't the behaviour obvious and expected ? If yes, then why to mention it under any HOLD type ? 3. Is it funny ? I also found ACTION which was ...documentation change (in other PTF). -- Radoslaw Skorupka Lodz, Poland -- -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: COBOL / VSAM question.
The timing of it happening and being diagnosed with a recent unrelated change. On Fri, 18 Apr 2008 16:20:42 -0700, CICS Guy [EMAIL PROTECTED] wrote: IIRC (early VSAM DOS) What is it about the sysplex that prompts the 97? -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Clark Morris Sent: Friday, April 18, 2008 2:30 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: COBOL / VSAM question. snip Given that the problem has been around since VSAM started doing implicit verifies on OPEN when a verify situation existed (well over 20 years ago), I am surprised that the problem hadn't surfaced long before this year. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Untrusted Access (Was how to log IND$FILE)
Keystrokes and mouse clicks go only so far, you need the program that captures screen images too. The additional security you mention only permits access to data, which like auditing is not proof of anything if they are working with data pertinent to their job. You need to catch them transferring the data to a medium they should not be. Adding the audit of programs that help copy data is part of that. And tracking how data is used. The notion that monitoring IND$FILE does anything by itself falls short. I can use a program by any name to make a copy of production data to sysuid..test.data and then file transfer that by any of several methods to a thumb drive. If IND$FILE shows I transfered test.data, does a red flag go up? So if you think someone stole data, you need to follow the data from file to file to end point. On the PC side they could rename the file from test.data to puzzle.log and then copy it to the thumb drive or even junk.txt and include it as an attachment in an email. How did you track that? What if junk.txt was in an hfs and your web server allowed anyone who knew the name to use a web browser from home to retrieve the file. Next day they delete the hfs file, so even though your web server log shows the file was fetched, it no longer exists to see what it was. Back to trying to follow how it got created. Catching them with data they should not have on a non-company device would help. Accessing what they should is proof they were doing their job. Retina scanners, RACF, or other measures only help ensure the people who should access data do, nothing about what they do with it. And I still add on, pencil/pen and paper were used to copy data long before FTP. Do you install cameras overhead? On Fri, 18 Apr 2008 16:55:08 -0400, Lizette Koehler [EMAIL PROTECTED] wrote: Thought I would see if this might be expanded to what do you do if you had someone in your organization you thought was stealing company priority information (source code, data, etc) I would think that if that person were working on a company supplied PC then the company could install some sort of SPYWARE that would trace key strokes and mouse movements (?). They would then have a complete audit trail of what was accessed during that persons access time. They might even go further and have installed the optic readers for retina or finger prints that would not allow access to those items unless they passed the scan. Of course we could go one more level with security and RFID chips, but I thought I would stop here. Any thoughts? Lizette -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: how to audit the usage of IND$FILE
This post: Use of SPFEDIT in my own program Bob Rutledge [EMAIL PROTECTED] is a fine example of how to educate the OP instead of doing their work for them. On Sun, 20 Apr 2008 10:29:28 -0500, Kenneth E Tomiak [EMAIL PROTECTED] wrote: After awhile I start to spot a trend from some people posting here that they are not trying to learn how to do something, they have figured out how to get IBM-MAIN to do their job for them. So if someone asks how to audit a program 'A' and then later asks how to audit program 'B', did they learn anything the first time? If they ask for a program to use the SMF data and someone directs them to a working assembler sample on cbttape.org but it isn't the exact report they want, fixing the program for them makes the fixer an enabler and unpaid-consultant. That goes beyong sharing knowledge. Showing how to fix a few lines of code is sharing, rewriting the program is doing their job for them. Feeling like a hero for providing the answer does not mean they original poster learned anything. If the auditors are truly coming up with all of these problems, maybe they need to provide the solution for the fee they are paid, too. Is the LISTSERV to share information or do the job for someone else for free? On Fri, 18 Apr 2008 12:27:00 -0500, Tom Schmidt [EMAIL PROTECTED] wrote: We all read post here to both seek share our knowledge, don't we? Or have I completely misunderstood ibm-main's purpose? -- Tom Schmidt -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: DB2 V7.1 going down
Go back in your change mgmt system and see what you changed during the last 3 months. The manual states: Determine the module that failed and the registers at the time of the error. If you suspect an error in DB2, refer to Part 2 of DB2 Diagnosis Guide and Reference for information on identifying and reporting the problem. Here in the USA that means you should have migrated to V8 before V7 went past end-of-support last month. Check LOGREC, the SVCDUMP, and since V7 is past support, make sure you have all good maintenance on. If you find you changed something in the past 3 months, see if you can undo it. On Fri, 18 Apr 2008 11:03:29 +0330, Farzad E. Yazdi [EMAIL PROTECTED] BANK.COM wrote: Could anyone offer any help with this repeated DB2 V7.1 failure? We have had failures of DB2 sometimes in Prod since 3 months ago and during the last two weeks It has happened every 2 days. The reason code is 00F30420 and after that the Abend 0D7 04F or just 04F in DBM1 address space. As I found , the problem can be related to storage leakage and released more storage for this address space via decreasing the buffer space (VP allocations) ,since we had high VP Allocations for them much more than the required amount According to the Omegamon monitoring.with this change, we released 300M from 600M allocation for BPs. Also, the following parameters have been set in DB2 zparm too: ContSTOR = Yes MinStor = Yes Here is the messages in system log: *DSNV086E + DB2 ABNORMAL TERMINATION REASON=00F30420 --- this was for DB2PDBM1 IEA989I SLIP TRAP ID=X13E MATCHED. JOBNAME=DB2PDBM1, ASID=005C. IEA995I SYMPTOM DUMP OUTPUT 558 SYSTEM COMPLETION CODE=0D7 REASON CODE=0024 TIME=14.26.15 SEQ=06870 CPU=0041 ASID=005B PSW AT TIME OF ERROR 077C 9713A7F2 ILC 4 INTC 24 NO ACTIVE MODULE FOUND - PRIMARY NOT EQUAL TO HOME NAME=UNKNOWN DATA AT PSW 1713A7EC - 05DDB20A 2000B228 003E AR/GR 0: 935B4396/2533_ 1: /_0B80 2: /_8B241870 3: /_805B 4: /_ 5: /_158BD280 6: /_13F82E78 7: /_57ED8030 8: /_158B2418 9: /_ A: /_0C20 B: /_58F01380 C: /2533_97139FAC D: /_7EE71DA0 E: 958A62DE/_935B4396 F: 13F82E78/_ END OF SYMPTOM DUMP IEA989I SLIP TRAP ID=X13E MATCHED. JOBNAME=DB2PDIST, ASID=005D. IEA989I SLIP TRAP ID=X13E MATCHED. JOBNAME=DB2PDBM1, ASID=005C. Regards -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: COBOL / VSAM question.
'Now'? I fixed that problem in a COBOL program in Jan 2000. Eight years ago. Someone has not been keeping up to date with the state of the COBOL compilers. Do you expect the system programmer to tell the application programmer every change in how COBOL is working or that there is a new COBOL compiler and they should look at how it impacts them? I usually share the migration documentation with them so they can determine the impact on how they code. On Tue, 15 Apr 2008 12:06:34 -0400, Don Leahy [EMAIL PROTECTED] wrote: The fact that file status '97' has now become 'normal' isn't the fault of the original programmer. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Xephon, are they still in business?
No magic link nor telephone number, I wrote an article for Xephon in CICS Update and they recently contacted me to get some information. The email address used tcipubs.com and www.tcipubs.com shows both xephon and z Journal. Perhaps the president of z Journal also snubbed you. By November 2007 I understood they had acquired xephon. On Tue, 15 Apr 2008 09:32:02 -0700, Mark Yuhas [EMAIL PROTECTED] wrote: Tell me how you got them to respond. I had a subscription to z/OS Update. I had problems with delivering the issues on time. Finally, I had to send emails requesting the issues. I tried calling but the message box always was full. Eventually in November of 2007, my subscription expired. I tried to renew, but, no answer. I spoke to the president of z Journal at CMG amp; SHARE about Xephon's reluctance, indifference and/or antipathy to respond. Still, no response. I only wanted to give them money and Xephon wasn't interested. Xephon wouldn't even respond to our accounting office. So, if anyone has a magic link or phone number... -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: how to audit the usage of IND$FILE
Do you strip search them as they leave the building to ensure paper is not in their posession? Ignoring the possibility of print-screen like functions, I can take a pen and a piece of paper and copy a file byte by byte and get a copy. Let me memorize a few lines of code every day and I can write them down when I get to my car. It isn't always about stopping someone, sometimes it is having data to show you know who did access the data and how. Even when they are allowed to access the data. Tommy Tsui has had posts before, IIRC, that indicate a complete lack of knowledge about how an operating system works. I believe he has been asking how to audit just about everything. Ignorant of what SMF can record, how to process SMF data, and how to report on the data. There are lots of manuals that discuss this stuff. On Thu, 17 Apr 2008 17:11:13 -0400, J R [EMAIL PROTECTED] wrote: It is better to protect the data, rather than the method of copying. That doesn't help if you want the programmer to work on a program but you don't want him to take it with him. Date: Thu, 17 Apr 2008 20:41:35 + From: [EMAIL PROTECTED] Subject: Re: how to audit the usage of IND$FILE To: IBM-MAIN@BAMA.UA.EDU But the exposure exists because you gave the user READ access to the data. This has been discussed before on the RACF-L forum. It is better to protect the data, rather than the method of copying. - Too busy driving to stop for gas! _ Get in touch in an instant. Get Windows Live Messenger now. http://www.windowslive.com/messenger/overview.html? ocid=TXT_TAGLM_WL_Refresh_getintouch_042008 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMF System Logger - limitations of MANx
What is the best color - purple. What is too high? That is for each of us to decide for ourselves. Return on investment rules. I would start with if it takes longer to dump than it takes to fill then it is too high. There is nothing wrong with a 100 cylinder MANx or a 750 cylinder MANx dumping once or one hundred times a day. What do you dump to and how you process it are factors for you to consider. If you are still manually mounting tapes, then less frequent is better. When the actual process of switching uses too many cycles for you, that is too high. I am at a site where once a day is the goal. If you are collecting record types you never use, and never will, that adds to too high a volume. If you feel you need it (actually this is a high desire to have it) then you need it and you won't consider it too high a volume. The SMF data is being collected based on your workload, so the more work your system does the more records you can produce. Busier shops put more thought into what they capture and how long they retain it than simpler shops with less experienced people. On Sat, 29 Mar 2008 19:47:28 -0700, Mark Yuhas [EMAIL PROTECTED] wrote: I have been following this thread with some interest. The one aspect I have not seen mentioned has been what constitutes too high of volume of SMF data? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Multivolume Dataset Question
Each piece is not a separate dataset as far as the catalog is concerned. Ideally you are SMS managed so the politically correct answer is what you call reorg the entire file. I understand that to be just copy to a newname and then you can delete the current and rename the new to current. Now if you want to play with fire, list the catalog entry so you know exactly what order the pieces are in, uncatalog the dataset, move the piece on the volume you want moved, then catalog the dataset back again using the new volser for the piece you moved. I assume you are not talking any type of CLUSTER. Get it wrong and you will wish you did the copy to a new name method. On Thu, 27 Mar 2008 10:53:49 -0400, Dean Montevago [EMAIL PROTECTED] wrote: Hi, If a dataset spans multiple volumes, can you move one piece of it to another volume ? or must you reorg the entire file ? TIA Dean Dean Montevago -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Convert EBCDIC to ASCII in batch?
I once had a problem FTPing a large dump to IBM. It kept timing out, and since I could not list the IBM side, thought it failed and sent it to a new name, which also timed out. I let IBM know and both files were the same size and complete, so that connection seemed to just be there to let me know at the end whether it worked or not. I want to believe it does more than that. Too long ago to remember if this was a mainframe to IBM ftp or a windows to IBM ftp. I then started using a larger TIMEOUT value in my batch JCL. Not sure what the upper limit is. And these days do lpar to lpar FTP without it. Usually completing in uder 5 minutes. // EXEC PGM=FTP,REGION=2048K, // PARM='ftp.site.name.or.ip.address -v (EXIT TIMEOUT 1200' On Tue, 25 Mar 2008 15:20:05 -0500, McKown, John [EMAIL PROTECTED] wrote: Well, the firewall theory has bitten the dust. The LAN people have done a packet trace on each side of the firewall. The results are identical. no packets are being lost. And I transferred another really huge file to the bad server which took over 4 minutes successfully. [blech] Another weirdness: I can ftp the same data to a different Windows server fine. I can ftp it to a Linux server fine. I can then ftp it from the Linux server to the broken Windows server fine. If I convert the data to ASCII on the mainframe and do a binary transfer to the bad Windows server, it fails the same way. The ASCII data on the mainframe, when binary ftp'ed to my Linux server is identical to ftp'ing the EBCDIC file using the ASCII command on the ftp. I'm really tired of this problem. -- John McKown -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMF in logstream and IFASMFDL
The current complaints are you do not clear the logstream. A problem for shops that do not IPL for months on end. I have not heard of anyone forcibly reming logstreams, System Logger rules! On Sat, 22 Mar 2008 13:13:18 +0100, R.S. [EMAIL PROTECTED] wrote: I'm trying to learn more about new feature: SMF in logstream instead of SYS1.MANx. Q: Does IFASMFDL utility clear logstream, or it is tunnel-type log (deletion of oldest entries is up to logstream administrator) ? Happy Easter -- Radoslaw Skorupka Lodz, Poland -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Need MASS recall advice
Have the CIO key the names into the JCL. I caught you said 100,000's of files. So write a program to read the list and build what your solution method is. Either a job with IEFBR14 or if you used REXX to read the list you could issue the HRECALL command, not caring if it worked or not, you could use LISTDSI with an option to wait and then you know if it worked or not. That REXX code could run IKJEFT1B as a batch job so you do not tie up your TSO session. Letting REXX submit 500+ HRECALL commands will flood HSM but you can get better throughput as multiple recalls from the same tape requested in the right sequence will just go from file to file. TSO allocate may dismount the tape before your next allocation, and certainly the tape will be rewinding. Try batching requests by the tape they are on in the sequence they are on the tape. On Fri, 21 Mar 2008 17:23:09 -0500, Bruno Sugliani [EMAIL PROTECTED] wrote: On Fri, 21 Mar 2008 10:25:01 -0500, Rugen, Len [EMAIL PROTECTED] wrote: Is there a faster way? If I had a list of files they wanted, could I send the recalls in tape - file sequence somehow to batch them? AFAIK , you do not even need to do explicit Hrecall If you have the list , you just run a BR14 and it will trigger an implicit hrecall . The list sorted by volume , in order to reduce the number of mount should improve performance . Bruno Bruno(dot)sugliani(at)groupemornay(dot)asso(dot)fr -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Unable To Delete Archived Dataset
Rename would require the dataset to be recalled which is failing. The catalog entry is easily changed, but renaming a migrated dataset would require intelligence in the HSM/DMS software to update it's data about the dataset, which could be on tape. The tape would have to be rewritten in order to adjust for the possible change to the length of the DSN. A time consuming prospect for the ever increasing size of cartridges. I think she should call the vendor who supports DMS and ask what to do. On Thu, 20 Mar 2008 10:40:30 +0800, Cobe Xu [EMAIL PROTECTED] wrote: very interesting... can the dataset be renamed?? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SDSF GIVING ACCESS TO THE LOG COMMAND
Try and narrow down whether you are using a PARMLIB(ISFPARM) member to control SDSF access or RACF with commands. You do not use both unless you want to stay confused. our results may vary, sometimes have the user logon again helps refresh that access you might be lacking. RDEFINE and PERMIT are standard Security Server (RACF) commands documented in the manuals for that product. You issue the commands from TSO environment. On Fri, 14 Mar 2008 14:15:24 -0500, John C. Wolf [EMAIL PROTECTED] wrote: I am trying to give a user access to the SDSF LOG display command and I am having trouble doing so. I have added the LOG keyword to the AUTH part of his ISPFPARM member but try as I mite I can't get it to show up on his SDSF menu. Now this user is just a user and not a sysprog or any thing like that. I looking in the SDSF Operation and Customization book on page 160 there is a a section that talks about setting up generic profiles and an example of protecting commands complete with REDEFINE and PERMIT commands but no were, that I can find, does this book explain how to go about and do this. I know that I am over looking something but for the life of me I can't find it. This book is the only one that I can find on the IBM web site which covers SDSF.This is the site which has all the books per release of z/OS. We are on z/OS 1.7. Thanks for any help you guys/gals can give me. John Wolf sysprog v. 513-556-0009 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SMPE error in FROMNET
I was getting that error last week, starting around 4 PM MST on a Thursday. It continued until Tuesday. We slowly pieced together what our problem was, your results may vary. A combination of a DNS server change on our part and the domain registrar broadcasting some IP addresses for DNS servers that were retired years ago. Once we flushed the DNS cache on our servers, Tuesday, it magically started working again. During this time, inbound mail was arriving slowly, too. At first I suggested the IBM servers might be overwhelmed if everyone jumps to receive the RSU maintenance after we get notified it is available. A year ago we used to alternate which site we went to if it failed on one. We stopped having to do that six months ago. On Fri, 14 Mar 2008 08:43:07 -0400, Kurt Quackenbush [EMAIL PROTECTED] wrote: I used the example on the IBM website to get the maintenance for z/OS V1R8. I am getting the following message: Connecting to: dispsd-76.boulder.ibm.com 207.25.253.76 port: 21. Connection to server interrupted or timed out. Initial connection Std Return Code = 1, Error Code = 8 Is there a way to place a WAIT in the SERVER parameter to extend connection time? I received similar errors yesterday myself, so I suggest this error may be transient and caused by the IBM FTP server and not by your z/OS system or network. Maybe. Try again today and see if the problem persists. Even so, there are options you can tweak in your FTP.DATA file that affect FTP connect time, etc. I don't remember the specific keywords, but you can find them in the Communications Server IP User's Guide. BTW, check out the FTPOPTIONS tag in your SMP/E CLIENT data set in case you want to override the default FTP.DATA file. Kurt Quackenbush -- IBM, SMP/E Development -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Unable To Delete Archived Dataset
IEFBR14 basically returns with R15=0, so it should always return with a code 0. The only other expectation you could have is getting a JCL error in the step. It never opens the DD statements you include. It cares not if your allocation requests work or not. Thus as long as allocation for datasets works, COND CODE is quite normal. On Mon, 10 Mar 2008 14:01:49 -0400, esmie moo [EMAIL PROTECTED] wrote: Ulrich, I tried your suggestion. The job ran successfully with a code 0. But it did not delete the dsn. I also tried the suggestion to -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Unable To Delete Archived Dataset
I notice there is no MSGID with the :ITEM DOES NOT ADHERE TO RESTRICTIONS text. Is that a DMS message? Maybe DMS is unable to delete it's recorded entry of it being migrated? The IEFBR14 suggestion should have caused a RECALL to occur and then the delete to happen. If it was not deleted, why isn't DMS recalling it properly? On Mon, 10 Mar 2008 12:57:53 -0400, esmie moo [EMAIL PROTECTED] wrote: Good Day Gentle Readers, I am trying to delete this dataset MILDCOP.NPR256D.CNTLNLDSVOLD. Yes, the last qualifier is correct. This dsn was migrated by DMS. I tried a del nscr purge but I got the error message :ITEM DOES NOT ADHERE TO RESTRICTIONS. I also tried IEHPROGM to no avail. I cannot understand as to how this dsn was created. However, my immediate problem is deleting this dsn. Could anybody suggestion -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Rexx - TRAP errors / Exception handling ?
Would someone please verify if z/OS (or any other) REXX yields not valid for any month numbers other than 2, 13, 14, or 15? Those are the only ones invalid in my test. - snip - Executing your REXX code with OpenObject Rexx on my Windows/XP system: 01/01/08 is valid 01/02/08 is valid 01/03/08 is valid 01/04/08 is valid 01/05/08 is valid 01/06/08 is valid 01/07/08 is valid 01/08/08 is valid 01/09/08 is valid 01/10/08 is valid 01/11/08 is valid 01/12/08 is valid 01/13/08 is not valid 01/14/08 is not valid 01/15/08 is not valid -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Is 00000000 a valid sequence number?
On Mon, 3 Mar 2008 10:01:25 -0600, Paul Gilmartin [EMAIL PROTECTED] wrote: But if I intend to write a sequence number validator, I'm concerned less with what the producers generate than with what the consumers (IEBUPDTE, ISPF, ISRSUPC, other?) accept. ISPF is both a generator and a consumer. In ISPF EDIT, with NUM ON STD, if you try to change a sequence number to 0, you get 'Some input data ignored'. Turn NUM OFF and you can change the data to 0, then turn NUM ON STD and EDIT is still okay with it. I then turned NUM ON COB, could not change the number, NUM OFF, changed it, and turned NUM ON COB and EDIT was still happy with it. IEBUPDTE happily added a member with sequence number 0. Edit turned NUM ON and it happily showed sequence 0. Other programs' results may vary. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Sorting Hex Data - ISPF or Batch
My way - http://www.ktomiak.biz/ORG/STUFF/tips/REXX036.html Adding a column for non-displayable data was not an option I wanted to do. Nor was writing my own specialized sort. I also submitted a requirement through the SHARE ISPF Project to have ISPF do something as simple as this. How long ago was that, I forget. On Thu, 6 Mar 2008 19:33:43 +0200, Binyamin Dissen [EMAIL PROTECTED] wrote: On Thu, 6 Mar 2008 11:31:11 -0500 Lizette Koehler [EMAIL PROTECTED] wrote: :I have gone through several iterations and just cannot see the forest for the trees. :I need to sort hex data in ISPF and batch. I have tried a couple of variations but the x'A' - x'F' always go to the top of the sorted list. I really would like 0-9, x'A' - x'F' :I have not found on the ISPF sort command a hex option for sorting. And I am not sure what control cards I can use in batch sort to make it happen. :Any one willing to point me in the right direction? If not, I will write a sort process in REXX. A simple approach for ISPF is to add a non-displayed column which has the binary value and sort on it. For batch the better options have already been mentioned. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
