Re: Why AUTHPGM?
On Mon, 18 Sep 2006 17:51:14 -0600 Paul Gilmartin [EMAIL PROTECTED] wrote: :I am coming to suspect that the reason RETRY fails when I :invoke SMP/E from an EXEC under IKJEFT01 is that GIMSMP :is absent from AUTHPGM NAMES in SYS1.PARMLIB(IKJTSOnn). :I've put in a request to add it. :But, now I'm curious. Is there any good rationale that :any program with AC=1 in an authorized library shouldn't :run with APF authorization when CALLed from TSO. Is the :security provided by the isolated environment incomplete? :What happens when a program with AC=0 is (inadvertently) :entered in AUTHPGM names and CALLed? The issue is that AC=1 programs expect to be called as job-step programs and may not completely clean up after themselves (expecting the initiator to do it). It is a slight exposure, handled by specifying those programs that are known to be well behaved. :Could a systems programmer so inclined simply use :AUTHPGM NAMES( * )? -- Binyamin Dissen [EMAIL PROTECTED] http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Restrict Operator offline command
Ted MacNEIL wrote: anyone got any ideas on how to ensure it does not happen again. Public flogging? Execution? Hire new operators? Well, I'd suggest something more humanitarian. ...no, not poison injection g I would ask: WHY the h.ll they do VARY ... OFFLINE ? probably because it is needed (is it ???) Probably it is a part of repetitive procedure, not ad hoc action. Probably the addresses are not changed frequently. SO, let them start IEFBR14 procedure with proper COMMAND statement. // V -,OFFLINE //STEP1 EXEC PGM=IEFBR14 the above is much less error prone. Of course it is not a solution for random requests, but let's be honest: who is the requestor, why the requestor don't do it himself ? My $0.02 -- 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: CA-Spool Banner Page
I've done a little more research on this and can now formulate a more technical version of the question; Can anyone supply me a sample CA-Spool exit ESFU009 that modifies the LPR control file? TIA Dave -Original Message- * This email is intended solely for the use of the individual to whom it is addressed and may contain confidential and/or privileged material. Any views or opinions presented are solely those of the author and do not necessarily represent those of AGCO. If you are not the intended recipient, be advised that you have received this email in error and that any use, dissemination, forwarding, printing or copying of this email is strictly prohibited. Neither AGCO nor the sender accepts any responsibility for viruses and it is your responsibility to scan and virus check the e-mail and its attachment(s) (if any). * From: Dave Cartwright [mailto:[EMAIL PROTECTED] Sent: 18 September 2006 11:09 To: IBM-MAIN@BAMA.UA.EDU Cc: Cartwright, Dave Subject: CA-Spool Banner Page When CA-Spool sends a print to one of our Xerox IP printers it creates a Banner Page that has the Userid of the CA-Spool task as its main header. This has never worried us before, but now we are getting rinky-dink new Xerox printers that will respond to a RFID tag to output only that User's print. Does anyone know how to get CA-Spool to create a Banner Page with the Userid of the output, not of its own task? -- 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: Static versus dynamic linking
On 18 Sep 2006 17:47:23 -0700, in bit.listserv.ibm-main you wrote: Dynamic linking is by far the better way to go as a general rule of thumb. That is, when in doubt make it dynamic. As always, there are a couple of gotchas. One big one that nipped me was retention of data. It's been a while I seem to recall that static subprograms retain information from call to call. This makes it a convenient place to store status information like the number of times the routine had been called, report heading detail, etc. That all goes away when the module is dynamically linked. Assuming that the subroutine is written in COBOL, unless the caller deletes the subroutine (in COBOL issues a CANCEL for each call) or the subroutine is coded PROGRAM IS INITIAL to cause being entered in original state, data is retained between calls. This is true for both dynamic and static calls. Keep the module as static only in situations where data retention between calls is needed and you don't want to rewrite the calling programs to retain the subprogram's status info. In everything else, dynamic is the better choice. In things like CICS, it's practically a necessity. I have never seen an instance of system performance degradation that could be tied directly to changing over to dynamic calls, especially with WLM helping to smooth things over. Of course, all shops are different. However unlikely, you could run into a situation where changing a module to dynamic could bring your system to its knees. Proceed cautiously by changing well known, low impact subprograms at first until you get a good feel for it, then move on to the more risky modules (like date and currency conversion routines) later on. And like I said before, if you find an instance where static is the better choice, keep it static. Good luck. Let us know how you make out. -- 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 replication to Oracle?
Thanks for the possibilities. Likely I should have also added the phrases cheap and only takes minutes to install with no programmer involvment, plug and play, simple enough for an MCSE to understand nasty, there John Not too nasty, actually. Those are typical requirements (cheap, near zero time, etc.) Not always possible, but almost always desired. I would say that the main appeal of the event publishing technique is the quick/no programming/plug-and-play characteristics. Cheap should be pretty quickly determinable, at least in price terms. (Total cost is another question and, as said so many times, can diverge wildly from price.) There will be more CPU instructions -- somehow you have to get the data from VSAM into Oracle -- so I think that's unavoidable until IBM releases the zRCP (z Reverse Charging Processor) which spits out one gold coin for each 1,000,000 instructions. (Yes, IBM engineers are working on that. :-)) Seriously, if you're sensible about setting event trigger rules then it's fine. (And CPU instructions aren't free on any platform. Folks just can't measure them very well without SMF. :-)) So (architect hat on) I'd look at that technique as one of the options to consider. I can think of yet another way: transparency. That is, for the VSAM files that have content that must be replicated to Oracle, you migrate those specific files to DB2 (using VSAM Transparency for example) then use any of the replication solutions (IBM's II Q Rep as an example, and there are others, even at IBM) to Oracle. That path is probably worth exploring if you're a DB2 shop (or want to be) and you have plans to store data in DB2 anyway. Transparency means your applications aren't changed -- there's that cheap/quick/no programmer part again. The applications still think they're talking VSAM. A slight variation (semi-transparency) is that you go ahead and EXEC SQL code the most I/O intense sections (for performance reasons) and leave everything else alone -- a 90/10 type of approach. If you only have to kick out a limited amount of data and could make minimal code changes to get the job done, that's another way. Oracle Access Manager for CICS provides an EXEC SQL interface to allow CICS programs to write directly to Oracle Database, to pick an example. (OAM4C is an Oracle product. Might be another Oracle z/OS network piece required to access an offboard Oracle server, and maybe also Oracle's Pro* precompiler, but that's the idea.) Not as simple/quick/no programmer for the z/OS programmer, however. And it's not very clean in the sense that you'll have to be in the perpetual coding business when (usually when) the business users decide they need something else kicked out for analysis next month. Yet another way, if the users want to run reporting tools directly against VSAM data, is to get an ODBC/JDBC interface to VSAM. All the popular reporting tools can access data via ODBC or JDBC, even including simple tools like Microsoft Access and Microsoft Excel. (Others: Crystal Reports, Cognos, Business Objects, IBI, etc., etc.) In the IBM catalog WebSphere IICF (Information Integrator Classic Federation) can do that, to pick an example. Another approach in the quick/no programming/plug-and-play zone, I would think. The workload impact will depend on the number of reports, frequency of reports, ad hoc nature of the reports, etc. That could get very interesting very quickly if those reporting numbers are large. Lots and lots of ways, each with pros/cons which will be situationally dependent. John, I think you're in Texas, so if you want to bounce ideas off a z architect type then I'd suggest Ken Wilson in Austin. Holler if you don't know him and need contact info, although the 800-IBM-4-YOU number should work with name and city. - - - - - Timothy Sipples IBM Consulting Enterprise Software Architect Specializing in Software Architectures Related to System z Based in Tokyo, Serving IBM Japan and IBM Asia-Pacific E-Mail: [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: Unicode and DB2 and Enterprise COBOL
OK, I'm looking at the Enterprise COBOL V3R4 Customization Guide chapter 4.4 which has an example of the unicode requirements for both DB2 and COBOL which contains the following statements - CONVERSION 1140,1200; /* Latin-1 to UTF-16, *RECLM* */ CONVERSION 1200,1140; /* UTF-16 to Latin-1, *RECLM* CONVERSION 1140,1200,ER; /* Latin-1 to UTF-16, ER CONVERSION 1200,1140,ER; /* UTF-16 to Latin-1, ER and the following document - http://publib.boulder.ibm.com/infocenter/dzichelp/v2r2/index.jsp?topic=/com.ibm.db2.doc.inst/bjnnmstr458.htm confirms that COBOL uses the RECLM technique and DB2 uses the ER technique. So far so good, except that if you try and run the sample above, there are errors because the second 2 statements are duplicates of the first 2 ie you can only have one conversion from 1140 to 1200 (obviously). Can anyone explain how you are supposed to cater for both the DB2 and COBOL requirements. Is ER just a subset of RECLM. What do you code if you require both. Jim McAlpine On 9/18/06, Brian Peterson [EMAIL PROTECTED] wrote: According to IBMLink, the member CUNSISM6 was shipped in z/OS 1.4 by PTF UA20691 for APAR OA12403. Brian On Mon, 18 Sep 2006 16:36:38 +0100, Jim McAlpine [EMAIL PROTECTED] wrote: Brian, I didn't look to check at the time, but that member does not exist on my z/OS 1.4 system. Can someone with a 1.4 system please confirm or otherwise that SYS1.SAMPLIB(CUNSISM6) exists on your system. 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 -- 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
EBCDIC to ASCII OPTCD=Q? (JCL)
The following is being copied from COMP.LANG.COBOL, with permission. Gah. Thanks much, Mr Klein; I am trying to do this entirely by utilities/JCL and I hope to avoid a dedicated COBOL program... if my hopes are in vain then I'll start down this path. All righty... I've been asked about having a job on an IBM mainframe (z/OS) produce ASCII output. (To those who think to inquire 'Why don't you produce EBCDIC output and then have ftp translate it during transfer to the target?' my response is 'I have made this suggestion and someone who signs my timesheet responded 'That will be considered a possibility; right now you should look into making the ASCII files on the mainframe.''... and yes, all fields are either text or display numerics w/ sign leading separate.) I recall - but my memory is, admittedly, porous - something about the DCB parameter OPTCD=Q being able to accomplish this but it will require more jiggery-pokery than I can come up with; when I code an IEBGENER or a DFSORT with DD statements like: //INDD DDDISP=SHR, // DSN=INPUT.DATASET.INEBCDIC //OUTDDDD DSN=OUTPUT.DATASET.INASCII, //DISP=(,CATLG,CATLG), //UNIT=TAPE,RETPD=0, //DCB=(*.INDD,BUFNO=30,OPTCD=Q) ... I get an ABEND (in the case of DFSORT it is IEC141I 013-70, a problem with the OPEN macro... but the QW text for Return Code 70 (for V=IBM P=Z/OS SYSTEM MSGS R=V1R4 I=IEC141I) reads: --begin quoted text: An OPEN macro instruction was issued for a data set on magnetic tape. A conflict exists between LABEL parameters on the DD statement, and the DCBRECFM, DCBOPTCD, DCBBUFOF, and DCBUSASI fields, which give the appearance of mixed ASCII and EBCDIC attributes for the data set; or TRTCH was specified for a 9-track tape. Some examples of conflicts are that for AL tapes the BLKSIZE must be less than 2048, RECFM=V,U and VB cannot be used. For details about AL tape restrictions see z/OS DFSMS: Using Magnetic Tapes . Note that most utilities (except for IEHINITT) do not support ASCII. --end quoted text (changing UNIT=TAPE,RETPD=0 to UNIT=SYSDA,SPACE=(TRK,(6000,500),RLSE) does not change the error but the salient text for 70 then appears to be 'An OPEN macro instruction was issued for a data set not on magnetic tape. Either OPTCD=Q was specified, or OPEN was issued for an ISAM data set using QSAM.') It appears obvious that under the conditions of my experiment DFSORT is falling into the category of 'most utilities'. Might someone be so kind as to point me towards a resource from which I may be able to glean a solution? Thanks much. (Oh... and among a bunch of Other Stuff a Google search for 'EBCDIC ASCII translation jcl' (no ', included) returns http://www.dbforums.com/archive/index.php/t-327313.html ; this informs, among other things, that 'answering a question with a question is no answer at all'... it's on the Web, it's gotta be right, right?) DD -- 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
RULE OF THUMB ?
Just that I understand correctly the following If I define the vtoc (below) as VTOC(0,1,29) - INDEX(2,0,45) The VTOC starts at cylinder 0 for 29 tracks The INDEX starts at cylinder 2 for 45 tracks. If for some reason the INDEX was set to 5,0,45. Would we have a problem with response time? Is there a set rule that the INDEX must be placed after the VTOC? - On Yahoo!7 Messenger: Make free PC-to-PC calls to your friends overseas. -- 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: IEHLIST LISTPDS in an SMS environment
With hardly any apology to John G.; things such as this make it real hard for me to take the diachronic view. Gee, Gil, if you are going to use words like diachronic you should at least provide a dictionary link gr http://www.onelook.com/?w=diachronic+ls=a -- Bruce A. Black Senior Software Developer for FDR Innovation Data Processing 973-890-7300 personal: [EMAIL PROTECTED] sales info: [EMAIL PROTECTED] tech support: [EMAIL PROTECTED] web: www.innovationdp.fdr.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
Re: RULE OF THUMB ?
John Dawes wrote: Just that I understand correctly the following If I define the vtoc (below) as VTOC(0,1,29) - INDEX(2,0,45) The VTOC starts at cylinder 0 for 29 tracks The INDEX starts at cylinder 2 for 45 tracks. If for some reason the INDEX was set to 5,0,45. Would we have a problem with response time? Is there a set rule that the INDEX must be placed after the VTOC? Currently there is absolutely no ROT regarding physical placement of VTOC/VTOCIX/VVDS structures. Maybe except keeping everything at the beginning of plate - just to have free space unfragmented. 3390 is pure virtual thing nowadays. Size can be discussed, especially if you use different models. Otherwise it is a little bit pointless - you could save few hundreds cylinders which is nothing. IMHO the best ROT is one size for every model, with possible exception for system volumes (SPOOL, PAGE). KISS (Keep It Simple) My $0.02 -- 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: RULE OF THUMB ?
If I define the vtoc (below) as VTOC(0,1,29) - INDEX(2,0,45) The VTOC starts at cylinder 0 for 29 tracks The INDEX starts at cylinder 2 for 45 tracks. If for some reason the INDEX was set to 5,0,45. Would we have a problem with response time? Is there a set rule that the INDEX must be placed after the VTOC? First, the VTOCIX in your example is much too large. It only needs to be a fraction of the size of the VTOC itself, since it is just an index into the real VTOC. The ICKDSF manual has some guidelines for sizing the VTOC/VTOCIX, but there is no penalty if the VTOCIX is too large, so with a 2 cyl VTOC, I would make the VTOCIX 1 cylinder INDEX(2,0,15). As for placement, back in the days when disk head movement and seek time were important, it made sense to put the VTOCIX right after the VTOC (or even right before) since searching for a dataset always involved a lookup in the VTOCIX then a read to the VTOC. This minimized seek time. Today seek time is minimally important, but it still makes sense to put them together to maximize free space on the volume. -- Bruce A. Black Senior Software Developer for FDR Innovation Data Processing 973-890-7300 personal: [EMAIL PROTECTED] sales info: [EMAIL PROTECTED] tech support: [EMAIL PROTECTED] web: www.innovationdp.fdr.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
Re: EBCDIC to ASCII OPTCD=Q? (JCL)
Howard, where is your LABEL parameter on the output tape DD statement. IIRC you need to specify LABEL=(1,AL) or somesuch. Jim McAlpine On 9/19/06, Howard Brazee [EMAIL PROTECTED] wrote: The following is being copied from COMP.LANG.COBOL, with permission. Gah. Thanks much, Mr Klein; I am trying to do this entirely by utilities/JCL and I hope to avoid a dedicated COBOL program... if my hopes are in vain then I'll start down this path. -- 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: EBCDIC to ASCII OPTCD=Q? (JCL)
Howard, Try adding LABEL=(1,AL) or LABEL=(1,NL). I think you are getting the default of 1,SL which does not work with OPTCD=Q. Regards, John -- 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: EBCDIC to ASCII OPTCD=Q? (JCL)
Try adding LABEL=(1,AL) or LABEL=(1,NL). I think you are getting the default of 1,SL which does not work with OPTCD=Q. That is correct. This is from the Macro Instrucionns for Data Sets manual; see the last paragraph and note that LABEL=(,AL) assumes OPTCD=Q Q requests conversion of the tape records between what is stored on tape and what is supplied from/to the problem program. For input requests, conversion is done after the data is read from tape. For output requests, conversion is done just before the record is written to tape. The Q option implies that the character representation of the data on tape differs from that seen by the problem program. Data management converts records according to one of the following techniques: O CCSID Conversion If CCSIDs are supplied from any source for ISO/ANSI V4 tapes, records are converted between the CCSID which represents the data on tape and the CCSID as seen by the problem program. You can also prevent conversion by supplying a special CCSID. O Default Character Conversion If you are using non-ISO/ANSI V4 tapes or if CCSIDs are not supplied by any source, data management converts the records between ASCII code (which represents the data on tape) to EBCDIC code (which is seen by the problem program) using specific tables defined for this default character conversion. Refer to z/OS DFSMS: Using Data Sets, SC26-7410, for a complete description of CCSID conversion and default character conversion. Refer to z/OS DFSMS: Using Magnetic Tapes for more information about ISO/ANSI labels. Q is supported only for a magnetic tape that does not have IBM standard labels. If the tape has ISO/ANSI/FIPS labels (LABEL=(,AL)), the system assumes OPTCD=Q. -- Bruce A. Black Senior Software Developer for FDR Innovation Data Processing 973-890-7300 personal: [EMAIL PROTECTED] sales info: [EMAIL PROTECTED] tech support: [EMAIL PROTECTED] web: www.innovationdp.fdr.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
Re: Why AUTHPGM?
In a recent note, Binyamin Dissen said: Date: Tue, 19 Sep 2006 10:34:18 +0300 On Mon, 18 Sep 2006 17:51:14 -0600 Paul Gilmartin [EMAIL PROTECTED] wrote: :I am coming to suspect that the reason RETRY fails when I :invoke SMP/E from an EXEC under IKJEFT01 is that GIMSMP :is absent from AUTHPGM NAMES in SYS1.PARMLIB(IKJTSOnn). :I've put in a request to add it. :But, now I'm curious. Is there any good rationale that :any program with AC=1 in an authorized library shouldn't :run with APF authorization when CALLed from TSO. Is the :security provided by the isolated environment incomplete? :What happens when a program with AC=0 is (inadvertently) :entered in AUTHPGM names and CALLed? The issue is that AC=1 programs expect to be called as job-step programs and may not completely clean up after themselves (expecting the initiator to do it). That raises more questions than it answers: o How justified is that expectation? Don't numerous authorized utilities and authorized user and vendor programs invoke other authorized utilities? o Isn't it equally true that AC=0 programs may fail to clean up after themselves? o When the TMP ATTACHes an AC=0 program (presumably in the non-authorized leg) does the TMP clean up after it? If so, why doesn't the TMP likewise clean up after programs run in the isolated environment? o Does IBM publish a list of IBM programs which are suitable for naming in AUTHPGM NAMES, or is the presmption that only programs included there as it is distributed by IBM are eligible. My immediate concern is with SMP/E. I've been CALLing it but enduring the failure of RETRY and omitting WAIT. And I know SMP/E fails to clean up -- I must do some FREEs before the next CALL, or it runs with bogus DDNAMEs. (I tried PMRing this; IBM couldn't reproduce it, nor could I in a suitably small test case though it happens regularly in my production. I continue to do OUTTRAP LISTALC, then FREE selected DDNAMEs) It is a slight exposure, handled by specifying those programs that are known to be well behaved. :Could a systems programmer so inclined simply use :AUTHPGM NAMES( * )? Or the like? -- gil -- StorageTek INFORMATION made POWERFUL -- 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: RULE OF THUMB ?
John, I now place the vtoc, vtoc index and vvds at the beginning of the logical volume. I size the vtoc and vvds based on the expected number of datasets that will be allocated to the volume. The size of the index is based on the size of the vtoc. The only reason that I place all together at the beginning is to avoid creating a fragment that may never be used. There is no performance penalty (or gain) for starting the vtoc at a certain cylinder address since we now deal with are emulated devices. Regards, John -- 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
BMC control-m advanced FTP
Hi list, Does anybody out there use BMC's Control-M Advanced FTP product? If so, can you tell me just what the product does and what impact it has on replacing standard FTP? I'm being pushed by mgmt to replace our FTP with this and I can't figure out at first look just what it is that makes this software necessary in my shop. Thanks. Rex -- 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: EBCDIC to ASCII OPTCD=Q? (JCL)
IIRC, even if you code LABEL=(1,NL), OPEN checks to see if a label does in fact exist. And, if it does, OPEN will do some verfication of the content, which could still lead to problems. It's been a long time since I messed with tape labels, so I could be mistaken. John Kington [EMAIL PROTECTED] Sent by: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU 09/19/2006 10:21 AM Please respond to IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU To IBM-MAIN@BAMA.UA.EDU cc Subject Re: EBCDIC to ASCII OPTCD=Q? (JCL) Howard, Try adding LABEL=(1,AL) or LABEL=(1,NL). I think you are getting the default of 1,SL which does not work with OPTCD=Q. Regards, John -- 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: Why AUTHPGM?
On Tue, 19 Sep 2006 08:32:27 -0600 Paul Gilmartin [EMAIL PROTECTED] wrote: :In a recent note, Binyamin Dissen said: : Date: Tue, 19 Sep 2006 10:34:18 +0300 : On Mon, 18 Sep 2006 17:51:14 -0600 Paul Gilmartin [EMAIL PROTECTED] : wrote: : :I am coming to suspect that the reason RETRY fails when I : :invoke SMP/E from an EXEC under IKJEFT01 is that GIMSMP : :is absent from AUTHPGM NAMES in SYS1.PARMLIB(IKJTSOnn). : :I've put in a request to add it. : :But, now I'm curious. Is there any good rationale that : :any program with AC=1 in an authorized library shouldn't : :run with APF authorization when CALLed from TSO. Is the : :security provided by the isolated environment incomplete? : :What happens when a program with AC=0 is (inadvertently) : :entered in AUTHPGM names and CALLed? : The issue is that AC=1 programs expect to be called as job-step programs and : may not completely clean up after themselves (expecting the initiator to do : it). :That raises more questions than it answers: :o How justified is that expectation? Don't numerous authorized : utilities and authorized user and vendor programs invoke other : authorized utilities? Yes, but they are prevented from loading programs from non-APF libraries. :o Isn't it equally true that AC=0 programs may fail to clean up : after themselves? Yes, but they cannot leave things around that may cause an exposure. :o When the TMP ATTACHes an AC=0 program (presumably in the non-authorized : leg) does the TMP clean up after it? If so, why doesn't the : TMP likewise clean up after programs run in the isolated environment? An authorized program has the ability to leave things around that are connected to higher level tasks or that could cause an exposure. :o Does IBM publish a list of IBM programs which are suitable for : naming in AUTHPGM NAMES, or is the presmption that only programs : included there as it is distributed by IBM are eligible. That should be the default. : My immediate concern is with SMP/E. I've been CALLing it but : enduring the failure of RETRY and omitting WAIT. And I know : SMP/E fails to clean up -- I must do some FREEs before the : next CALL, or it runs with bogus DDNAMEs. (I tried PMRing this; : IBM couldn't reproduce it, nor could I in a suitably small test : case though it happens regularly in my production. I continue : to do OUTTRAP LISTALC, then FREE selected DDNAMEs) I do not believe that SMP/E leaves PC routines or SVC bypasses around. : It is a slight exposure, handled by specifying those programs that are known : to be well behaved. : :Could a systems programmer so inclined simply use : :AUTHPGM NAMES( * )? :Or the like? Not aware of any exit that will allow this. -- Binyamin Dissen [EMAIL PROTECTED] http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Why AUTHPGM?
In a recent note, Binyamin Dissen said: Date: Tue, 19 Sep 2006 17:53:46 +0300 :o Isn't it equally true that AC=0 programs may fail to clean up : after themselves? Yes, but they cannot leave things around that may cause an exposure. I see. I believe a better design would mark the programs themselves, such as AC=2 to indicate APF authorized _and_ TMP-clean rather than burdening the administrators with maintaining YA list, such as the ISV entries I see in our AUTHPGM NAMES. -- gil -- StorageTek INFORMATION made POWERFUL -- 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: EBCDIC to ASCII OPTCD=Q? (JCL)
even if you code LABEL=(1,NL), OPEN checks to see if a label does in fact exist. And, if it does, OPEN will do some verfication of the content, which could still lead to problems. If you say NL but the tape that is mounted has labels (standard or ANSI) the mount is rejected -- Bruce A. Black Senior Software Developer for FDR Innovation Data Processing 973-890-7300 personal: [EMAIL PROTECTED] sales info: [EMAIL PROTECTED] tech support: [EMAIL PROTECTED] web: www.innovationdp.fdr.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
Re: Restrict Operator offline command
I don't think it's a question of lack of sense of humour, but rather the excessive noise on this list. Seemingly every thread deteriorates into discussions of ancient hardware/software or semantics and grammar or politics or crime. Hit em up side the head with a bat adds little value to the discussion. So somebody tries to steer it back to relevancy and gets chastized for it. Lose-lose all around. Don Imbriale On Tue, 19 Sep 2006 03:46:18 +, Ted MacNEIL [EMAIL PROTECTED] wrote: The OP talked about an easy-to-make finger check. If you're going to take drastic measures to punish such mistakes: Ya'no! Nobody has a sense of humour anymore! -- 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: Why AUTHPGM?
I think the rule is good programmers clean up after themselves; bad ones don't - AC=1 is irrelevant. There is only a very weak correlation between AC=1 and being a jobstep program. Any programmer who assumes that correlation is strong is I think by definition bad. Anyone who says my program will only ever be run as a jobstep program is either (a.) doing a bad job of designing the program, i.e., designing with limited usefulness; (b.) lacking in vision; and/or (c.) too lazy or rushed to code de-allocates. Charles -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Paul Gilmartin Sent: Tuesday, September 19, 2006 7:32 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Why AUTHPGM? In a recent note, Binyamin Dissen said: Date: Tue, 19 Sep 2006 10:34:18 +0300 On Mon, 18 Sep 2006 17:51:14 -0600 Paul Gilmartin [EMAIL PROTECTED] wrote: :I am coming to suspect that the reason RETRY fails when I :invoke SMP/E from an EXEC under IKJEFT01 is that GIMSMP :is absent from AUTHPGM NAMES in SYS1.PARMLIB(IKJTSOnn). :I've put in a request to add it. :But, now I'm curious. Is there any good rationale that :any program with AC=1 in an authorized library shouldn't :run with APF authorization when CALLed from TSO. Is the :security provided by the isolated environment incomplete? :What happens when a program with AC=0 is (inadvertently) :entered in AUTHPGM names and CALLed? The issue is that AC=1 programs expect to be called as job-step programs and may not completely clean up after themselves (expecting the initiator to do it). That raises more questions than it answers: o How justified is that expectation? Don't numerous authorized utilities and authorized user and vendor programs invoke other authorized utilities? o Isn't it equally true that AC=0 programs may fail to clean up after themselves? -- 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: EBCDIC to ASCII OPTCD=Q? (JCL)
What happens if the tape label is AL and you code LABEL=(1,NL)? Bruce Black [EMAIL PROTECTED] Sent by: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU 09/19/2006 11:15 AM Please respond to IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU To IBM-MAIN@BAMA.UA.EDU cc Subject Re: EBCDIC to ASCII OPTCD=Q? (JCL) even if you code LABEL=(1,NL), OPEN checks to see if a label does in fact exist. And, if it does, OPEN will do some verfication of the content, which could still lead to problems. If you say NL but the tape that is mounted has labels (standard or ANSI) the mount is rejected -- Bruce A. Black Senior Software Developer for FDR Innovation Data Processing 973-890-7300 personal: [EMAIL PROTECTED] sales info: [EMAIL PROTECTED] tech support: [EMAIL PROTECTED] web: www.innovationdp.fdr.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: Why AUTHPGM?
Paul, Personally I am a great fan of IKJTSOxx *and* the fact that TSO CALL de-authorizes the called program by default. Is it that much of a pain? You only need to update it when installing software and IBM even provide a dynamic update facility. Rob Scott Rocket Software, Inc 275 Grove Street Newton, MA 02466 617-614-2305 [EMAIL PROTECTED] http://www.rs.com/portfolio/mxi/ -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Paul Gilmartin Sent: 19 September 2006 11:12 To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Why AUTHPGM? In a recent note, Binyamin Dissen said: Date: Tue, 19 Sep 2006 17:53:46 +0300 :o Isn't it equally true that AC=0 programs may fail to clean up : after themselves? Yes, but they cannot leave things around that may cause an exposure. I see. I believe a better design would mark the programs themselves, such as AC=2 to indicate APF authorized _and_ TMP-clean rather than burdening the administrators with maintaining YA list, such as the ISV entries I see in our AUTHPGM NAMES. -- gil -- StorageTek INFORMATION made POWERFUL -- 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: Restrict Operator offline command
Thanks to all who replied , we look into cmdx. Regards Gerard Ceruti -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Don Imbriale Sent: 19 September 2006 05:15 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Restrict Operator offline command I don't think it's a question of lack of sense of humour, but rather the excessive noise on this list. Seemingly every thread deteriorates into discussions of ancient hardware/software or semantics and grammar or politics or crime. Hit em up side the head with a bat adds little value to the discussion. So somebody tries to steer it back to relevancy and gets chastized for it. Lose-lose all around. Don Imbriale On Tue, 19 Sep 2006 03:46:18 +, Ted MacNEIL [EMAIL PROTECTED] wrote: The OP talked about an easy-to-make finger check. If you're going to take drastic measures to punish such mistakes: Ya'no! Nobody has a sense of humour anymore! -- 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 __ Standard Bank Disclaimer and Confidentiality Note This e-mail, its attachments and any rights attaching hereto are, unless the context clearly indicates otherwise, the property of Standard Bank Group Limited and/or its subsidiaries (the Group). It is confidential, private and intended for the addressee only. Should you not be the addressee and receive this e-mail by mistake, kindly notify the sender, and delete this e-mail, immediately and do not disclose or use same in any manner whatsoever. Views and opinions expressed in this e-mail are those of the sender unless clearly stated as those of the Group. The Group accepts no liability whatsoever for any loss or damages whatsoever and howsoever incurred, or suffered, resulting, or arising, from the use of this email or its attachments. The Group does not warrant the integrity of this e-mail nor that it is free of errors, viruses, interception or interference. Licensed divisions of the Standard Bank Group are authorised financial services providers in terms of the Financial Advisory and Intermediary Services Act, No 37 of 2002 (FAIS). For information about the Standard Bank Group Limited visit our website http://www.standardbank.co.za ___ -- 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: EBCDIC to ASCII OPTCD=Q? (JCL)
What happens if the tape label is AL and you code LABEL=(1,NL)? As I said, if the tape has ANSI labels, and you code NL, the mount is rejected. -- Bruce A. Black Senior Software Developer for FDR Innovation Data Processing 973-890-7300 personal: [EMAIL PROTECTED] sales info: [EMAIL PROTECTED] tech support: [EMAIL PROTECTED] web: www.innovationdp.fdr.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
Re: CA-Spool Banner Page
On 18 Sep 2006 03:09:04 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Dave Cartwright) wrote: we are getting rinky-dink new Xerox printers that will respond to a RFID tag to output only that User's print. So, if you're printing a 200-page report, you have to be near the printer during the whole print time? What an appalling waste! (Or, do you have to merely interrupt what you're doing long enough to be near the printer as it starts printing your output?) I suspect that this was done to try to improve security. I also suspect that it will have the opposite effect. People will leave their ID cards on the printer or give them to someone else. (Hey, Dave, since you're going to the printer, take my ID and bring back my output, too.) Please tell me if I'm wrong in any of my assumptions. This is one case where I'd prefer to find out I'm wrong. Maybe you're each getting your own printer in your own cubicle, so it's not a problem? -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot 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
Re: CA-Spool Banner Page
I suspect that this was done to try to improve security. I also suspect that it will have the opposite effect. I have no idea if what you fear will come to pass, but it sure sounds funny. It's reminiscent of the days when you (or a clerk) down to the output room to pickup the printouts. The surly person in the window would ask whaddya want? and eventually toss you the output. Only, in your case, it's a virtual person in the output window. -- 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
Zos 1.7 Exits
Hi List. We are migrating from Zos 1.4 to Zos 1.7 and now we have encountered the jes2 exits problem. Our exit 3 is 20 years old but I have managed to migrate it. IBM seperated exit 3 into two exits, exit 3 is activated for jobs received via NJE and exit53 is activated for jobs received from internal reader. Exit53 run in the user environment and like so needs to be rent. Since our exit is very big and very old I'm not intersted in making it rent. Exit3 dosen't need to be rent (it runs under jes main task) so I thought that exit53 will call to exit3 which contain our exit code(with minor migration changes) using the $call macro. Is it possible to call from a user env to jes2 env? Does any one have an exaple he can post me? Thanks in advanced Nir. -- 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: Zos 1.7 Exits
-Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Nir Eliyaho Sent: Tuesday, September 19, 2006 10:53 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Zos 1.7 Exits Hi List. We are migrating from Zos 1.4 to Zos 1.7 and now we have encountered the jes2 exits problem. Our exit 3 is 20 years old but I have managed to migrate it. IBM seperated exit 3 into two exits, exit 3 is activated for jobs received via NJE and exit53 is activated for jobs received from internal reader. Exit53 run in the user environment and like so needs to be rent. Since our exit is very big and very old I'm not intersted in making it rent. snip Size and age are not a problem with RENT. I have worked on many things that are LARGE and OLD and are RENT (and have been RENT for a long time for a good reason). I currently don't work on JES(2 or 3) exits, but I have in the past so I am not competent to speak to EXIT3 or EXIT53 specifically at this point. However, from general knowledge, I suggest you take your exit and assemble it using the RENT option and see what falls out if anything. If it passes that test, then I suggest you try it as RENT in a test LPAR. If it is currently linked as REUSe, only one copy will get loaded, but if it is actually modifying itself, things could get ugly. And they could get ugly in weird ways forcing an IPL or corrupted output, or both. Arrg. Thar ye have it, matey. A nickels worth of free advice. Later, Steve Thompson -- 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: static versus dynamic linking
Clark Morris wrote: Assuming that the subroutine is written in COBOL, unless the caller deletes the subroutine (in COBOL issues a CANCEL for each call) or the subroutine is coded PROGRAM IS INITIAL to cause being entered in original state, data is retained between calls. This is true for both dynamic and static calls. Data are retained between calls if they are declared in a COBOL program's WORKING-STORAGE section, i.e., if their storage class is static in the terminology of PL/I and C; and they are not retained between calls if they are declared in that COBOL program's LOCAL-STORAGE section, i.e., if their storage class is automatic. The other advice proffered in this thread has reflected other confusions, misunderstandings, and even radical misconceptions, so many of them as to make it worth little. John Gilmore Ashland, MA 01721-1817 USA _ Get today's hot entertainment gossip http://movies.msn.com/movies/hotgossip -- 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 replication to Oracle?
-Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Timothy Sipples Sent: Tuesday, September 19, 2006 7:48 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: VSAM replication to Oracle? snip I would say that the main appeal of the event publishing technique is the quick/no programming/plug-and-play characteristics. Cheap should be pretty quickly determinable, at least in price terms. (Total cost is another question and, as said so many times, can diverge wildly from price.) There will be more CPU instructions -- somehow you have to get the data from VSAM into Oracle -- so I think that's unavoidable until IBM releases the zRCP (z Reverse Charging Processor) which spits out one gold coin for each 1,000,000 instructions. (Yes, IBM engineers are working on that. :-)) Seriously, if you're sensible about setting event trigger rules then it's fine. (And CPU instructions aren't free on any platform. Folks just can't measure them very well without SMF. :-)) So (architect hat on) I'd look at that technique as one of the options to consider. I can think of yet another way: transparency. That is, for the VSAM files that have content that must be replicated to Oracle, you migrate those specific files to DB2 (using VSAM Transparency for example) then use any of the replication solutions (IBM's II Q Rep as an example, and there are others, even at IBM) to Oracle. That path is probably worth exploring if you're a DB2 shop (or want to be) and you have plans to store data in DB2 anyway. Transparency means your applications aren't changed -- there's that cheap/quick/no programmer part again. The applications still think they're talking VSAM. A slight variation (semi-transparency) is that you go ahead and EXEC SQL code the most I/O intense sections (for performance reasons) and leave everything else alone -- a 90/10 type of approach. If you only have to kick out a limited amount of data and could make minimal code changes to get the job done, that's another way. Oracle Access Manager for CICS provides an EXEC SQL interface to allow CICS programs to write directly to Oracle Database, to pick an example. (OAM4C is an Oracle product. Might be another Oracle z/OS network piece required to access an offboard Oracle server, and maybe also Oracle's Pro* precompiler, but that's the idea.) Not as simple/quick/no programmer for the z/OS programmer, however. And it's not very clean in the sense that you'll have to be in the perpetual coding business when (usually when) the business users decide they need something else kicked out for analysis next month. Yet another way, if the users want to run reporting tools directly against VSAM data, is to get an ODBC/JDBC interface to VSAM. All the popular reporting tools can access data via ODBC or JDBC, even including simple tools like Microsoft Access and Microsoft Excel. (Others: Crystal Reports, Cognos, Business Objects, IBI, etc., etc.) In the IBM catalog WebSphere IICF (Information Integrator Classic Federation) can do that, to pick an example. Another approach in the quick/no programming/plug-and-play zone, I would think. The workload impact will depend on the number of reports, frequency of reports, ad hoc nature of the reports, etc. That could get very interesting very quickly if those reporting numbers are large. Lots and lots of ways, each with pros/cons which will be situationally dependent. John, I think you're in Texas, so if you want to bounce ideas off a z architect type then I'd suggest Ken Wilson in Austin. Holler if you don't know him and need contact info, although the 800-IBM-4-YOU number should work with name and city. - - - - - Timothy Sipples Thanks for all the ideas and the offer. I'm not in a position to take you up on the offer due to the fact that it would likely land me in hot water (poached sysprog, anybody?). I wish DB2 were an option. However, between doctor visits, I'm installing Oracle on z/OS right now. No choice. It was literally no charge due to our Oracle license. I don't know what that license costs us, but it truly is unlimited WRT where we can install an Oracle server. I do plan to use Oracle's AM4CICS. But directing data directly to a remote Oracle database will require programming. And the usual question of what to do if the remote server is down. -- John McKown Senior Systems Programmer HealthMarkets Keeping the Promise of Affordable Coverage Administrative Services Group Information Technology This message (including any attachments) contains confidential information intended for a specific individual and purpose, and its content is protected by law. If you are not the intended recipient, you should delete this message and are hereby notified that any disclosure, copying, or distribution of this transmission, or taking any action based on it,
QUIESCE / RESTART
Does anyone have recent experience with performing a QUIESCE, followed by a PSW Restart? Can this be done on a box running in LPAR mode without affecting the other images, is quiesce merely a relic of the past? The reason I ask is because we had a surprise Quiesce performed on our main production lpar last week. One of the DBA's was running some DB2 QUIESCE TABLESPACE in batch. She was also converting her JCL from using SYSIN DD * to SYSIN DD DATA,DLM='##'. She inadvertantly commented out her control cards...or so she thought! She only had a // in front of her QUIESCE TABLESPACE. Little did she know that our JES2 parms allow MVS commands of this format to be issued. The rest, as they say, is history! We IPL'd the system immediately, but later on I read that a quiesced system can be brought back via a PSW Restart. Can anyone comment on this? Thanks! Terry Bruns -- 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: QUIESCE / RESTART
-Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Terry BRuns Sent: Tuesday, September 19, 2006 12:17 PM To: IBM-MAIN@BAMA.UA.EDU Subject: QUIESCE / RESTART Does anyone have recent experience with performing a QUIESCE, followed by a PSW Restart? Can this be done on a box running in LPAR mode without affecting the other images, is quiesce merely a relic of the past? I have done the z/OS QUIESCE command on our test system, followed by a PSW RESTART on the HMC ICON with no particular ill effects. However, it can result in lost TCPIP sessions and VTAM sessions. In addition, although the QUIESCE command does wait for all outstanding DASD and Tape I/O to end before actually loading the WAIT PSW, it does not concern itself with outstand RESERVEs against DASD volumes. So this can lead to lock outs with other systems. -- John McKown Senior Systems Programmer HealthMarkets Keeping the Promise of Affordable Coverage Administrative Services Group Information Technology This message (including any attachments) contains confidential information intended for a specific individual and purpose, and its content is protected by law. If you are not the intended recipient, you should delete this message and are hereby notified that any disclosure, copying, or distribution of this transmission, or taking any action based on it, is strictly prohibited. -- 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: QUIESCE / RESTART
It still works, but some applications react poorly to a suspension of time. We've done this to our sandboxes when production needed the cycles. Dave Gibney [EMAIL PROTECTED] System Programmer(509) 335-7359 Information Technology Washington State University Pullman, WA 99164-1222 -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Terry BRuns Sent: Tuesday, September 19, 2006 10:17 AM To: IBM-MAIN@BAMA.UA.EDU Subject: QUIESCE / RESTART Does anyone have recent experience with performing a QUIESCE, followed by a PSW Restart? Can this be done on a box running in LPAR mode without affecting the other images, is quiesce merely a relic of the past? The reason I ask is because we had a surprise Quiesce performed on our main production lpar last week. One of the DBA's was running some DB2 QUIESCE TABLESPACE in batch. She was also converting her JCL from using SYSIN DD * to SYSIN DD DATA,DLM='##'. She inadvertantly commented out her control cards...or so she thought! She only had a // in front of her QUIESCE TABLESPACE. Little did she know that our JES2 parms allow MVS commands of this format to be issued. The rest, as they say, is history! We IPL'd the system immediately, but later on I read that a quiesced system can be brought back via a PSW Restart. Can anyone comment on this? Thanks! Terry Bruns -- 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: RULE OF THUMB ?
In [EMAIL PROTECTED], on 09/20/2006 at 12:05 AM, John Dawes [EMAIL PROTECTED] said: The VTOC starts at cylinder 0 for 29 tracks The INDEX starts at cylinder 2 for 45 tracks. If for some reason the INDEX was set to 5,0,45. Would we have a problem with response time? You might have a problem with fragmentation, but if 3 cylinders is enough to make a difference then you need a larger volume. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: VSAM space allocation in KB, MB, and RECORDS
In [EMAIL PROTECTED], on 09/17/2006 at 03:33 PM, john gilmore [EMAIL PROTECTED] said: In 1964 when JCL was introduced most programmers still had engineering and scientific educations, and this approximate equivalence was unproblematic. Context was sufficient to make the necessary distinctions clear: No one supposed that a kilometer might contain 1024 meters (instead of 1000) or that a kilobyte might contain 1000 bytes (instead of 1024). In 1964 people used powers of 10 for tape and disk capacities, not powers of two. They used powers of two for memory sizes. Your argument might justify the misuse of the SI units in REGION, but not the later misuse for DASD space. No one supposed that a kilometer might contain 1024 meters (instead of 1000) or that a kilobyte might contain 1000 bytes (instead of 1024). By 1968 people were using K for 512 ('100'8), which at the time I considered truly obscene. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Why AUTHPGM?
In [EMAIL PROTECTED], on 09/18/2006 at 05:51 PM, Paul Gilmartin [EMAIL PROTECTED] said: But, now I'm curious. Is there any good rationale that any program with AC=1 in an authorized library shouldn't run with APF authorization when CALLed from TSO. Is there any reason why it should? It's easy enough for management to add programs if they wish to do so. Now, there might be a business case for a requirement to allow specifying a program name of * as a wildcard in IKJTSOxx. But I suspect that many shops would prohibit its use. What happens when a program with AC=0 is (inadvertently) entered in AUTHPGM names and CALLed? It runs with AC(0). -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Setting environment variables from Rexx running in OMVS?
In [EMAIL PROTECTED], on 09/18/2006 at 09:05 PM, Paul Gilmartin [EMAIL PROTECTED] said: Indeed. The Last Resort is the eval kludge, as used by tset(1): Cruel, but all very well for a spree (Rev. L D) It may be ugly, but it should work. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Why AUTHPGM?
In [EMAIL PROTECTED], on 09/19/2006 at 10:34 AM, Binyamin Dissen [EMAIL PROTECTED] said: The issue is that AC=1 programs expect to be called as job-step programs and may not completely clean up after themselves (expecting the initiator to do it). Not the ones that I've seen. The standard used to be that all IBM utilities were written to run as subroutines and they typically allowed additional parameters when called as subroutines, e.g., ddname lists. If anything, there are more eyeballs on the behavior of the authorized programs. I see it as a management issue; TSO limits the user to the authorized programs that the installation wants available to him. That has to do with the purposes of the programs, not just how housebroken they are. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Zos 1.7 Exits
In [EMAIL PROTECTED], on 09/19/2006 at 12:27 PM, Thompson, Steve (SCI TW) [EMAIL PROTECTED] said: If it is currently linked as REUSe, only one copy will get loaded, but if it is actually modifying itself, things could get ugly. It could get uglier if it's currently modifying code outside of itself, without serialization. The testing should ensure that multiple copies are running in parallel. -- Shmuel (Seymour J.) Metz, SysProg and JOAT ISO position; see http://patriot.net/~shmuel/resume/brief.html We don't care. We don't have to care, we're Congress. (S877: The Shut up and Eat Your spam act of 2003) -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Why AUTHPGM?
On 9/18/2006 7:51 PM, [EMAIL PROTECTED] wrote: I am coming to suspect that the reason RETRY fails when I invoke SMP/E from an EXEC under IKJEFT01 is that GIMSMP is absent from AUTHPGM NAMES in SYS1.PARMLIB(IKJTSOnn). I've put in a request to add it. But, now I'm curious. Is there any good rationale that any program with AC=1 in an authorized library shouldn't run with APF authorization when CALLed from TSO. We do not know of any integrity problems that would arise if you put AC(1) IBM-supplied programs into the AUTHPGM list. (Note: The AUTHTSF list is a different topic.) Generally it is more a question, I think, of whether the program is doing something that you would want run under TSO, given the dispatching priority of TSO users, and some environmental characteristics (how long the user will be waiting while it runs, for example) that determines whether you allow the programs to run under TSO/E or not. It is, in fact, likely that if a program were to cause an integrity problem when run in TSO that it would also cause an exposure when run in batch. However, I can envision some odd kinds of effects that could pose problems in TSO that would not pose problems in batch, given the differences between normal tasks and jobstep tasks. Is the security provided by the isolated environment incomplete? It's not that it's incomplete. But consider that when a job step terminates it goes through a full set of step termination, and step termination resource managers. Other tasks get less cleanup. TSO/E does have a list of things it resets when an APF-authorized program terminates, but TSO/E can not possibly know everything that an APF program might have decided to do (storage it might allocate from authorized subpools, name/token services, etc.), and some of those things would get undone at jobstep termination but not during other forms of task termination. If you put a program into AUTHPGM, and its documentation does not say that you should not do that, and you experience an integrity problem, you should be able to get an integrity APAR open via the IBM Support Center (assuming it's an IBM program, of course). What happens when a program with AC=0 is (inadvertently) entered in AUTHPGM names and CALLed? It runs unauthorized. Could a systems programmer so inclined simply use AUTHPGM NAMES( * )? I don't think that is valid syntax. Walt Farrell, CISSP z/OS Security Design, IBM -- 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: EBCDIC to ASCII OPTCD=Q? (JCL)
Once again, thanks to all... but I can't even get a tape mounted, the SMC0043 tells me that the unit cannot be allocated. DD -- 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
Why No S0C7?
We are on Z 1.4 and COBOL Rel 3.2.0 The Simple Compile and Go below Allows me to add 1 to 'ABC' and get 124 with no S0C7. Is this normal? Did this test with NUMPROC(NOPFD), NUMPROC(PFD), and NUMPROC(MIG). All were successful. //ZCRSCEJA JOB (DAZC1130,ZCRSCEJ),'COBOL4MVS IVP', // CLASS=A,MSGCLASS=X,NOTIFY=ZCRSCEJ //* //RUNIVP EXEC IGYWCLG,PARM.COBOL=RENT,REGION=1400K, // PARM.LKED='LIST,XREF,LET,MAP', // GOPGM=USECDE //COBOL.SYSIN DD * PROCESS NUMPROC(MIG) 000100 IDENTIFICATION DIVISION. 000200 PROGRAM-ID. USECDE. 003200 ENVIRONMENT DIVISION. 005000 DATA DIVISION. 008400 WORKING-STORAGE SECTION. 77 COUNTERX PIC 999 VALUE 0. 01 BAD-NUMBERPIC 999. 01 BAD-SPACE REDEFINES BAD-NUMBER PIC XXX. 011800 PROCEDURE DIVISION. 013200 001-INITIALIZE. *THIS STATEMENT WILL CAUSE AN LE-SOC7 PERFORM 010-LOOPIT UNTIL COUNTERX EQUAL 100. 034200 601-END-RTN. DISPLAY 'TESTIT EXECUTED WITH NO S0C7 SUCCESSFULY'. GOBACK. 013200 010-LOOPIT. MOVE 'ABC' TO BAD-SPACE. ADD 1 TO BAD-NUMBER. DISPLAY ' BAD-NUMBER: 'BAD-NUMBER ADD 1 TO COUNTERX. 999-END-RTN. EXIT. //LKED.SYSLIB DD //GO.SYSOUT DD SYSOUT=* -- 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: QUIESCE / RESTART
In a message dated 9/19/2006 12:26:06 P.M. Central Standard Time, [EMAIL PROTECTED] writes: It still works, but some applications react poorly to a suspension of time. We've done this to our sandboxes when production needed the cycles. Probably good time to review JES parms too! AUTH=ALL|SYS|IO|CONS|INFO Specifies the MVS operator command groups that are to be executed. The groups include: SYS system commands IO input/output commands CONS console commands INFO information commands (such as display) ALL all operator command types For an explanation of operator command groups and the relationship of JES2 to MVS command groups, refer to _z/OS JES2 Commands_ (http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/DOCNUM/SA22-7526/CCONTENTS?) and _z/OS MVS_ (http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/DOCNUM/SA22-7627/CCONTENTS?) _System Commands_ (http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/DOCNUM/SA22-7627/CCONTENTS?) , respectively. This parameter affects JCL statements only. Use the AUTH= parameter of the INTRDR and RDR initialization statement to specify the authorization for JES2 job entry control (JECL) statements. (JES2 control statements begin with /* in columns 1 and 2. JCL statements begin with // in columns 1 and 2). -- 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: Why No S0C7?
On Tue, 19 Sep 2006 12:48:28 -0500 JONES, CHARLIE [EMAIL PROTECTED] wrote: :We are on Z 1.4 and COBOL Rel 3.2.0 The Simple Compile and Go below :Allows me to add 1 to 'ABC' and get 124 with no S0C7. Is this normal? :Did this test with NUMPROC(NOPFD), NUMPROC(PFD), and NUMPROC(MIG). :All were successful. To force an 0C7, move 'AB ' to BAD-SPACE. Letter will convert to numbers. The machine code for below is PACK TEMP,BAD-NUMBER APTEMP,=P'1' UNPK BAD-NUMBER,TEMP OITEMP+2,C'0' If you wish to verify numeric, do a CLASS test. ://ZCRSCEJA JOB (DAZC1130,ZCRSCEJ),'COBOL4MVS IVP', :// CLASS=A,MSGCLASS=X,NOTIFY=ZCRSCEJ ://* ://RUNIVP EXEC IGYWCLG,PARM.COBOL=RENT,REGION=1400K, :// PARM.LKED='LIST,XREF,LET,MAP', :// GOPGM=USECDE ://COBOL.SYSIN DD * :PROCESS NUMPROC(MIG) :000100 IDENTIFICATION DIVISION. :000200 PROGRAM-ID. USECDE. :003200 ENVIRONMENT DIVISION. :005000 DATA DIVISION. :008400 WORKING-STORAGE SECTION. : 77 COUNTERX PIC 999 VALUE 0. : 01 BAD-NUMBERPIC 999. : 01 BAD-SPACE REDEFINES BAD-NUMBER PIC XXX. :011800 PROCEDURE DIVISION. :013200 001-INITIALIZE. : *THIS STATEMENT WILL CAUSE AN LE-SOC7 : PERFORM 010-LOOPIT UNTIL COUNTERX EQUAL 100. :034200 601-END-RTN. : DISPLAY 'TESTIT EXECUTED WITH NO S0C7 SUCCESSFULY'. : GOBACK. :013200 010-LOOPIT. : MOVE 'ABC' TO BAD-SPACE. : ADD 1 TO BAD-NUMBER. : DISPLAY ' BAD-NUMBER: 'BAD-NUMBER : ADD 1 TO COUNTERX. : 999-END-RTN. : EXIT. ://LKED.SYSLIB DD ://GO.SYSOUT DD SYSOUT=* -- Binyamin Dissen [EMAIL PROTECTED] http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Why No S0C7?
easiest to tell from the generated code but I suspect the cause is the lack of sign for pic 999. COBOL seems to force the sign to x'Fx' before it adds or subtracts anything. 77 COUNTERX PIC 999 VALUE 0. 01 BAD-NUMBERPIC 999. 01 BAD-SPACE REDEFINES BAD-NUMBER PIC XXX. -- Mike -- 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
Question re: CA-1 and SMP/E
This is just a historical question for those of you who may be informed more than I: Does anyone know why CA does not use new FMIDs when they have a new release of CA-1? The FMID seems to stay the same whether you're using CA-1 release 5.2, 11.0, or 11.5 ; I'm just curious if anyone knows the reasons why this method is used. Tim Hare Senior Systems Programmer Florida Department of Transportation (850) 414-4209 -- 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 re: CA-1 and SMP/E
The practice started with R11 and has been carried forward to R11.5. R5.1 and R5.2 had different FMIDs. It has caused me no end of problems at some customer sites. But then 99%+ of their PTFs are coded ++APAR so they appear to be missing some very basic SMPE concepts. -Original Message- From: Tim Hare [mailto:[EMAIL PROTECTED] Sent: Tuesday, September 19, 2006 11:26 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Question re: CA-1 and SMP/E This is just a historical question for those of you who may be informed more than I: Does anyone know why CA does not use new FMIDs when they have a new release of CA-1? The FMID seems to stay the same whether you're using CA-1 release 5.2, 11.0, or 11.5 ; I'm just curious if anyone knows the reasons why this method is used. -- 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: Why No S0C7?
Instead of MOVE 'ABC' try MOVE SPACES On Tue, 19 Sep 2006 12:48:28 -0500, JONES, CHARLIE [EMAIL PROTECTED] wrote: We are on Z 1.4 and COBOL Rel 3.2.0 The Simple Compile and Go below Allows me to add 1 to 'ABC' and get 124 with no S0C7. Is this normal? Did this test with NUMPROC(NOPFD), NUMPROC(PFD), and NUMPROC(MIG). All were successful. //ZCRSCEJA JOB (DAZC1130,ZCRSCEJ),'COBOL4MVS IVP', // CLASS=A,MSGCLASS=X,NOTIFY=ZCRSCEJ //* //RUNIVP EXEC IGYWCLG,PARM.COBOL=RENT,REGION=1400K, // PARM.LKED='LIST,XREF,LET,MAP', // GOPGM=USECDE //COBOL.SYSIN DD * PROCESS NUMPROC(MIG) 000100 IDENTIFICATION DIVISION. 000200 PROGRAM-ID. USECDE. 003200 ENVIRONMENT DIVISION. 005000 DATA DIVISION. 008400 WORKING-STORAGE SECTION. 77 COUNTERX PIC 999 VALUE 0. 01 BAD-NUMBERPIC 999. 01 BAD-SPACE REDEFINES BAD-NUMBER PIC XXX. 011800 PROCEDURE DIVISION. 013200 001-INITIALIZE. *THIS STATEMENT WILL CAUSE AN LE-SOC7 PERFORM 010-LOOPIT UNTIL COUNTERX EQUAL 100. 034200 601-END-RTN. DISPLAY 'TESTIT EXECUTED WITH NO S0C7 SUCCESSFULY'. GOBACK. 013200 010-LOOPIT. MOVE 'ABC' TO BAD-SPACE. ADD 1 TO BAD-NUMBER. DISPLAY ' BAD-NUMBER: 'BAD-NUMBER ADD 1 TO COUNTERX. 999-END-RTN. EXIT. //LKED.SYSLIB DD //GO.SYSOUT DD SYSOUT=* -- 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
Can you provide?
I have a hard copy of W28 Nursery School for the Enterprise-Extender-Impaired -- Please teach me the basicsby Gwen Dente from the zSeries EXPO dated September 19-23, 2005 in San Francisco. I know not from whence it came but I sure could use a PDF copy of it or a link to the PDF copy if someone can provide it. Thanks in advance. ___ Jim Petersen MVS - Lead Systems Engineer Home Depot Technology Center 1300 Park Center Drive, Austin, TX 78753 www.homedepot.com email: [EMAIL PROTECTED] 512-977-2615 direct 512-977-2930 fax 210-859-9887 cell This message may contain confidential information. The information contained in this message and any attachments are intended solely for the use of the addressee(s) named above. If you are not the intended recipient, any disclosure, copying, distribution or other use of the contents of this message is strictly prohibited. If you have received this email in error, please notify the sender immediately by email and delete all copies of this message -- 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: Why No S0C7?
The source data contains a valid sign. You will only get a S0C7 abend for an invalid sign. Source data field contains characters 'ABC' this is represented in hex as x'C1C2C3'. The low order byte contains a sign of 'C' which is interpreted as a valid sign (positive). COBOL will pack the field prior to performing the arithmetic. The result of the pack operations will be x'00123C'. The result of the add-packed would be x'00124C'. So, working as designed. -Original Message- From: JONES, CHARLIE [mailto:[EMAIL PROTECTED] Sent: Tuesday, September 19, 2006 10:48 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Why No S0C7? We are on Z 1.4 and COBOL Rel 3.2.0 The Simple Compile and Go below Allows me to add 1 to 'ABC' and get 124 with no S0C7. Is this normal? Did this test with NUMPROC(NOPFD), NUMPROC(PFD), and NUMPROC(MIG). All were successful. //ZCRSCEJA JOB (DAZC1130,ZCRSCEJ),'COBOL4MVS IVP', // CLASS=A,MSGCLASS=X,NOTIFY=ZCRSCEJ //* //RUNIVP EXEC IGYWCLG,PARM.COBOL=RENT,REGION=1400K, // PARM.LKED='LIST,XREF,LET,MAP', // GOPGM=USECDE //COBOL.SYSIN DD * PROCESS NUMPROC(MIG) 000100 IDENTIFICATION DIVISION. 000200 PROGRAM-ID. USECDE. 003200 ENVIRONMENT DIVISION. 005000 DATA DIVISION. 008400 WORKING-STORAGE SECTION. 77 COUNTERX PIC 999 VALUE 0. 01 BAD-NUMBERPIC 999. 01 BAD-SPACE REDEFINES BAD-NUMBER PIC XXX. 011800 PROCEDURE DIVISION. 013200 001-INITIALIZE. *THIS STATEMENT WILL CAUSE AN LE-SOC7 PERFORM 010-LOOPIT UNTIL COUNTERX EQUAL 100. 034200 601-END-RTN. DISPLAY 'TESTIT EXECUTED WITH NO S0C7 SUCCESSFULY'. GOBACK. 013200 010-LOOPIT. MOVE 'ABC' TO BAD-SPACE. ADD 1 TO BAD-NUMBER. DISPLAY ' BAD-NUMBER: 'BAD-NUMBER ADD 1 TO COUNTERX. 999-END-RTN. EXIT. //LKED.SYSLIB DD //GO.SYSOUT DD SYSOUT=* -- 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
SYSLOG daily setup
Hi all, I have a zos 1.5e systems running a sysplex with 4 lpars. The daily SYSLOG process is screwed up. It reads the 4 syslogs and is suppose to write out to 4 different datasets to dasd. The lastest syslog dataset is from May, 2005. This is when they upgraded to z/os 1.5e and has not worked since. sys2.syslog.sysa.daily.disk sys2.syslog.sysb.daily.disk sys2.syslog.sysc.daily.disk sys2.syslog.sysd.daily.disk -- Thanks, Mike (914) - 388-4334 -- 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: SYSLOG daily setup
In a message dated 9/19/2006 1:40:35 P.M. Central Standard Time, [EMAIL PROTECTED] writes: The lastest syslog dataset is from May, 2005. This is when they upgraded to z/os 1.5e and has not worked since. Not enough INFO. Have to look at the jobs producing the output and either cut and paste the output or give a failing code. -- 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: EBCDIC to ASCII OPTCD=Q? (JCL)
Howard Brazee wrote: Once again, thanks to all... but I can't even get a tape mounted, the SMC0043 tells me that the unit cannot be allocated. DD I think the SMC messages come from SUN/STK SILO (HSC/SMC) software. I don't know how it decides what units are available for allocation, but maybe this will give you a place to look. Richard -- 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: QUIESCE / RESTART
Probably good time to review JES parms too! AUTH=ALL|SYS|IO|CONS|INFO Specifies the MVS operator command groups that are to be executed. The groups include: Yes, I tried to suggest turning off commands from JCL, but management was afraid there may be legitimate commands in production jobs. Whatever. They chose to whack the QUIESCE command via RACF. But getting back to the RESTART, is there a possibility of affecting the wrong lpar? Let's say I have two CPC's each with two lpars - one production and one test (this is how Lands' End is setup!). I QUIESCE one of the test systems. How do I know that the PSW RESTART will restart the right lpar? According to IBM, the PSW Restart Performs a restart operation on the first available central processor(s) of the selected CPC images (except for a coupling facility image). A restart interruption will store the current program status word (PSW) at real address 8 and fetch a new PSW from real address 0 in central storage. So my question is how do you direct the restart to the desired lpar? Terry Bruns Berbee Information Networks (soon to be a part of CDW!) -- 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: SYSLOG daily setup
IEF403I DMPLOGDY - STARTED - TIME=13.05.38 $HASP708 DMPLOGDY SYS1 OPEN ERROR - DATA SET WAS NOT CLOSED 214 RC=06 I/O ERROR READING DATA BUFFER DSNAME=+MASTER+.SYSLOG.STC01644.D229.? On 9/19/06, Ed Finnell [EMAIL PROTECTED] wrote: In a message dated 9/19/2006 1:40:35 P.M. Central Standard Time, [EMAIL PROTECTED] writes: The lastest syslog dataset is from May, 2005. This is when they upgraded to z/os 1.5e and has not worked since. Not enough INFO. Have to look at the jobs producing the output and either cut and paste the output or give a failing code. -- 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 -- Thanks, Mike Szyszka Bear Systems, Inc. http://BearSystems.com (845) 679-5412 -- 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: Why AUTHPGM?
On Tue, 19 Sep 2006 13:40:58 -0300 Shmuel Metz (Seymour J.) [EMAIL PROTECTED] wrote: :In [EMAIL PROTECTED], on 09/19/2006 : at 10:34 AM, Binyamin Dissen [EMAIL PROTECTED] said: :The issue is that AC=1 programs expect to be called as job-step :programs and may not completely clean up after themselves (expecting :the initiator to do it). :Not the ones that I've seen. The standard used to be that all IBM :utilities were written to run as subroutines and they typically :allowed additional parameters when called as subroutines, e.g., ddname :lists. If anything, there are more eyeballs on the behavior of the :authorized programs. :I see it as a management issue; TSO limits the user to the authorized :programs that the installation wants available to him. That has to do :with the purposes of the programs, not just how housebroken they are. There is no SAF call to see if the particular user can invoke the particular program in authorized mode. The list is the same for every user. Thus I fail to see your conclusion. -- Binyamin Dissen [EMAIL PROTECTED] http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: SYSLOG daily setup
Looks like the write log (W L) was never issued. On 9/19/06, Mike Szyszka [EMAIL PROTECTED] wrote: IEF403I DMPLOGDY - STARTED - TIME=13.05.38 $HASP708 DMPLOGDY SYS1 OPEN ERROR - DATA SET WAS NOT CLOSED 214 RC=06 I/O ERROR READING DATA BUFFER DSNAME=+MASTER+.SYSLOG.STC01644.D229.? On 9/19/06, Ed Finnell [EMAIL PROTECTED] wrote: In a message dated 9/19/2006 1:40:35 P.M. Central Standard Time, [EMAIL PROTECTED] writes: The lastest syslog dataset is from May, 2005. This is when they upgraded to z/os 1.5e and has not worked since. Not enough INFO. Have to look at the jobs producing the output and either cut and paste the output or give a failing code. -- 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 -- Thanks, Mike Szyszka Bear Systems, Inc. http://BearSystems.com http://bearsystems.com/ (845) 679-5412 -- Thanks, Mike Szyszka Bear Systems, Inc. http://BearSystems.com (845) 679-5412 -- 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
DLLs in z/OS - sources of information ?
Hi! We have a third party vendor that is beginning to use DLLs in their z/OS product. As it is used to build/generate some of our applications we will have coexistence problems with dynamically called modules. (As the product requires dynamically called modules to be recompiled and linked as DLLs.) The generated source is COBOL (accessing IMS/DB2). I would be grateful if anyone could point me to sources (links) of information usable in this context. (I have searched through Google but the result isn't too good...) Also if anyone have experience of migrating to use DLLs and how to deal with a mixed DLL/non-DLL environment it would be valuable. As I have no experience and very limited knowledge of DLLs, I am interested in both general information about how to manage a DLL/non-DLL environment and technical details about the format, generation and execution of DLLs. TIA Thomas Thomas Berg IT Utveckling Swedbank AB (Publ) -- 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: QUIESCE / RESTART
-Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Terry BRuns Sent: Tuesday, September 19, 2006 2:19 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: QUIESCE / RESTART snip But getting back to the RESTART, is there a possibility of affecting the wrong lpar? Let's say I have two CPC's each with two lpars - one production and one test (this is how Lands' End is setup!). I QUIESCE one of the test systems. How do I know that the PSW RESTART will restart the right lpar? snip So my question is how do you direct the restart to the desired lpar? Terry Bruns Berbee Information Networks (soon to be a part of CDW!) Click on that LPAR's ICON on the HMC screen and make sure that only it is selected. Just like IPL'ing an LPAR. -- John McKown Senior Systems Programmer HealthMarkets Keeping the Promise of Affordable Coverage Administrative Services Group Information Technology This message (including any attachments) contains confidential information intended for a specific individual and purpose, and its content is protected by law. If you are not the intended recipient, you should delete this message and are hereby notified that any disclosure, copying, or distribution of this transmission, or taking any action based on it, is strictly prohibited. -- 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: EBCDIC to ASCII OPTCD=Q? (JCL)
On Tue, 19 Sep 2006 11:59:42 -0600, Howard Brazee [EMAIL PROTECTED] wrote: Once again, thanks to all... but I can't even get a tape mounted, the SMC0043 tells me that the unit cannot be allocated. There are various reasons you might get that message. It is from the SMC component of Sun/STK that is used with their tape robotic software. Without getting into a lot of detail, the easiest way to bypass SMC (which handles all the tape allocations) is to specify a unit address in the JCL instead of an estoeric / generic. Example: //TAPEDD DD DSN=MY.DSN,DISP=SHR,VOL=123456,UNIT=/5200 (slash needed for 4 digit addresses) See the SMC manuals for more details. Mark -- Mark Zelden Sr. Software and Systems Architect - z/OS Team Lead Zurich North America / Farmers Insurance Group mailto: [EMAIL PROTECTED] z/OS and OS390 expert at http://searchDataCenter.com/ateExperts/ Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.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: SYSLOG daily setup
In a message dated 9/19/2006 2:31:45 P.M. Central Standard Time, [EMAIL PROTECTED] writes: Looks like the write log (W L) was never issued. Or not authorized, or didn't complete. Guess I'd take it one step at a time and see if I could get the W L to work manually. Then do ==print odsn 'sys2.bigol.syslog' Might have to look at syslog to see if RACF(ICH) or other messages are ascribed to the DUMP job. -- 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: QUIESCE / RESTART
On Tue, 19 Sep 2006 14:37:38 -0500, McKown, John [EMAIL PROTECTED] wrote: So my question is how do you direct the restart to the desired lpar? Click on that LPAR's ICON on the HMC screen and make sure that only it is selected. Just like IPL'ing an LPAR. Thanks John. We were all hesitant to try this (on one of the test lpars) for fear of once again bringing down the production image. We began to try it and it appeared (or so we thought) that the PSW Restart function didn't work when a single profile was selected. I'll have to go back and check this out (not that I don't believe you!!!). Terry Bruns -- 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: EBCDIC to ASCII OPTCD=Q? (JCL)
In a message dated 9/19/2006 2:39:01 P.M. Central Standard Time, [EMAIL PROTECTED] writes: There are various reasons you might get that message. It is from the SMC component of Sun/STK that is used with their tape robotic software. Without getting into a lot of detail, the easiest way to bypass SMC (which handles all the tape allocations) is to specify a unit address in the JCL instead of an estoeric / generic. Example: //TAPEDD DD DSN=MY.DSN,DISP=SHR,VOL=123456,UNIT=/5200 (slash needed for 4 digit addresses) Can we just FTP to the tape drive as txt and let FTP do the conversion? Don't have this setup, but seems more straightforward. -- 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: DLLs in z/OS - sources of information ?
If the vendor is CA and the product is AllFusion Gen r7.6, then this statement of direction from CA may give you some relief. http://supportconnectw.ca.com/public/cool/gen/infodocs/Gen76zOS-Statement_o f_Direction.pdf -- 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 you provide?
Jim If you Google for Gwen Dente Enterprise Extender, the first hit is a long list of technical documents/presentations in which you will find Enterprise Extender Basics: An Introduction to Architecture and to Coding. Why Gwen changed the title in the abstract to this nondescript text is a question only she can answer. Once you look inside you'll see it's what you want. You can download the .pdf from here: http://www-03.ibm.com/support/techdocs/atsmastr.nsf/WebIndex/PRS1711 Chris Mason - Original Message - From: Petersen, Jim [EMAIL PROTECTED] Newsgroups: bit.listserv.ibm-main To: IBM-MAIN@BAMA.UA.EDU Sent: Tuesday, 19 September, 2006 8:35 PM Subject: Can you provide? I have a hard copy of W28 Nursery School for the Enterprise-Extender-Impaired -- Please teach me the basicsby Gwen Dente from the zSeries EXPO dated September 19-23, 2005 in San Francisco. I know not from whence it came but I sure could use a PDF copy of it or a link to the PDF copy if someone can provide it. Thanks in advance. ___ Jim Petersen -- 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
SV: DLLs in z/OS - sources of information ?
Your'e quite right ! :) Thanks. I'm still interested in information about DLLs though. Thomas Berg IT Utveckling Swedbank AB (Publ) -Ursprungligt meddelande- Från: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] För Schneiderwent, Craig Skickat: den 19 september 2006 21:50 Till: IBM-MAIN@BAMA.UA.EDU Ämne: Re: DLLs in z/OS - sources of information ? If the vendor is CA and the product is AllFusion Gen r7.6, then this statement of direction from CA may give you some relief. http://supportconnectw.ca.com/public/cool/gen/infodocs/Gen76z OS-Statement_o f_Direction.pdf -- 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: QUIESCE / RESTART
You would have to do single object operations from HMC for the CPC you are trying to control. Then you would have to right click on the LPAR IMAGE you would like to issue PSW restart agains and select CP's. Make sure you are only selecting the image you would like your PSW restart directed, if others are selected, then the images are grouped. HTH Natarajan [EMAIL PROTECTED] 9/19/2006 12:46 PM On Tue, 19 Sep 2006 14:37:38 -0500, McKown, John [EMAIL PROTECTED] wrote: So my question is how do you direct the restart to the desired lpar? Click on that LPAR's ICON on the HMC screen and make sure that only it is selected. Just like IPL'ing an LPAR. Thanks John. We were all hesitant to try this (on one of the test lpars) for fear of once again bringing down the production image. We began to try it and it appeared (or so we thought) that the PSW Restart function didn't work when a single profile was selected. I'll have to go back and check this out (not that I don't believe you!!!). Terry Bruns -- 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: Why No S0C7?
On Tue, 19 Sep 2006 11:28:31 -0700, Rankin, Bob [EMAIL PROTECTED] wrote: The source data contains a valid sign. You will only get a S0C7 abend for an invalid sign. Or an invalid numeric But you are still correct because the data also contains valid numerics. As someone pointed out, spaces will cause S0C7. So will HIGH-VALUES. Note: LE might give a different result. Tom Marchant -- 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: SYSLOG daily setup
Hi Tim, No, never worked in WI. Born and bred in Chicago. Now living in NY and working in CT. In the 80's I was working for IBM in Chicago and Kingston, NY. You mean to tell me there is another Mike Szyszka in the world? A SP to top it off? Hi Ed, I was able to issue the W L cammand manually. Then used XDC command in SDSF to save the syslog to a data set. So, somewhere in the scheduling of the daily oper work, the W L is missing. Thanks to you all Mike Szyszka On 9/19/06, Ed Finnell [EMAIL PROTECTED] wrote: In a message dated 9/19/2006 2:31:45 P.M. Central Standard Time, [EMAIL PROTECTED] writes: Looks like the write log (W L) was never issued. Or not authorized, or didn't complete. Guess I'd take it one step at a time and see if I could get the W L to work manually. Then do ==print odsn 'sys2.bigol.syslog' Might have to look at syslog to see if RACF(ICH) or other messages are ascribed to the DUMP job. -- 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 -- Thanks, Mike Szyszka Bear Systems, Inc. http://BearSystems.com (845) 679-5412 -- 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: Restrict Operator offline command
I don't think it's a question of lack of sense of humour, but rather the excessive noise on this list. Seemingly every thread deteriorates into discussions of ancient hardware/software or semantics and grammar or politics or crime. Hit em up side the head with a bat adds little value to the discussion. You're right it does. But, I was trying to point out (in a round about way), that sometimes termination of an employee is the only choice. The OP pointed out that it happened more than once. In some cases, once is barely acceptable. But! Twice? NO WAY! When in doubt. PANIC!! -- 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
ICKDSF ERASE VOLUME Too Slow
I am looking for a fast way to erase (DESTROY) all of the data on a 3390-3 logical drive on a RAMAC 3. Following is a description of what we have tried. Thanks for any info. We attempting to erase all of the data on a RAMMAC 3. We have used the INIT command with the VALIDATE PURGE parameters as well the TRKFMT UNITADDRESS(0169) VERIFY(DBC169) ERASEDATA - FROMRANGE(0,0) TOLERATE(ENQFAIL) CYCLES(1) Both were slower than molasses. It took 3 hours (wall time) to erase a volume. We have 500 volumes to erase. Can you help Mark House (402) 778-1966 Technical Development Services [EMAIL PROTECTED] This e-mail message and any attachments may contain confidential, proprietary or non-public information. This information is intended solely for the designated recipient(s). If an addressing or transmission error has misdirected this e-mail, please notify the sender immediately and destroy this e-mail. Any review, dissemination, use or reliance upon this information by unintended recipients is prohibited. Any opinions expressed in this e-mail are those of the author personally. -- 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: ICKDSF ERASE VOLUME Too Slow
As perhaps many others will point out, try FDRERASE from Innovation (I think I spelled the product name correctly). Tim Hare Senior Systems Programmer Florida Department of Transportation (850) 414-4209 -- 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: SYSLOG daily setup
I'm trying to drum up interest here for using OPERLOG with DASD, rather than our current method of periodic W L commands with an external writer capturing class L output. Has anyone had experience with OPERLOG? Are there tools for browsing/searching the archived data? Tim Hare Senior Systems Programmer Florida Department of Transportation (850) 414-4209 -- 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
Production DB2 Problem
Hi ... I am facing problem in production DB2. 5 Volumes were configured for Database in storage group while creation of tablespace A. Later in 1 month these 5 volumes were full and added another 2 volumes, however Tablespace A could not extend to these newly created volumes. After performing REORG for Tablespace A , Tablespace VSAM dataset got extended to these newly created volumes. Is it necessary to do REORG of Tablespace everytime you add volumes in storage group. *Note : Tablespace were created using Storage group and not using volumes parameter.* ** What could be the reason for the same ? Please reply urgently Jacky -- 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: Unicode and DB2 and Enterprise COBOL
Jim, I remember their was a bug (e.g.APAR) because CONVERSION 1140,1200; /* Latin-1 to UTF-16, *RECLM* */ CONVERSION 1200,1140; /* UTF-16 to Latin-1, *RECLM* */ wasn't the same like CONVERSION 1140,1200,RECLM; /* Latin-1 to UTF-16, *RECLM* */ CONVERSION 1200,1140,RECLM; /* UTF-16 to Latin-1, *RECLM* */ We run z/OS R4 with current maintenance and have CONVERSION 1252,1200,; /* ASCII WINDOWS -- UTF-16 */ CONVERSION 1200,1252,; /* UTF-16 -- ASCII WINDOWS */ for Enterprise Cobol 3.4 and CONVERSION 1252,1200,ER; /* ASCII WINDOWS -- UTF-16 */ CONVERSION 1200,1252,ER; /* UTF-16 -- ASCII WINDOWS */ for DB2V8 D UNI,ALL shows (for these combination) 01252-01200(13488)-R01252-01200(13488)-L 01200(13488)-01252-E01200(13488)-01252-L Just trust the CUNMIUTL utility and run your Cobol and DB2 applications. Seems some parts can be shared between Cobol and DB2 among others like ISPF, NFS. Hopefully in z/OS R8 these conversationt tables will be build undercover on the fly. Roland -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Jim McAlpine Sent: Tuesday, September 19, 2006 3:44 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Unicode and DB2 and Enterprise COBOL OK, I'm looking at the Enterprise COBOL V3R4 Customization Guide chapter 4.4 which has an example of the unicode requirements for both DB2 and COBOL which contains the following statements - CONVERSION 1140,1200; /* Latin-1 to UTF-16, *RECLM* */ CONVERSION 1200,1140; /* UTF-16 to Latin-1, *RECLM* CONVERSION 1140,1200,ER; /* Latin-1 to UTF-16, ER CONVERSION 1200,1140,ER; /* UTF-16 to Latin-1, ER and the following document - -- 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: ICKDSF ERASE VOLUME Too Slow
-Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Mark House Sent: Tuesday, September 19, 2006 3:48 PM To: IBM-MAIN@BAMA.UA.EDU Subject: ICKDSF ERASE VOLUME Too Slow I am looking for a fast way to erase (DESTROY) all of the data on a 3390-3 logical drive on a RAMAC 3. Following is a description of what we have tried. Thanks for any info. We attempting to erase all of the data on a RAMMAC 3. We have used the INIT command with the VALIDATE PURGE parameters as well the TRKFMT UNITADDRESS(0169) VERIFY(DBC169) ERASEDATA - FROMRANGE(0,0) TOLERATE(ENQFAIL) CYCLES(1) Both were slower than molasses. It took 3 hours (wall time) to erase a volume. We have 500 volumes to erase. Can you help snip Just for fun, try IEBDG against a file the size of the volume (outside of the VTOC, VTOC-IX and VVDS etc.). See how long it takes. It erases, by writing over, all the data that is on the volume other than a spot here and there because of inter-record block gaps. If this runs rather quickly (I suspect it will), then you might try re-init of a volume, giving a 1 track VTOC, no Index, and then allocate a single file (or two) and let IEBDG rip. If you use RIPPLE (I think that is the parameter), you will get text that shifts one byte for each record written. And you will get this for block after block on the unit. Later, Steve Thompson -- 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
SMS question - sharing DASD but not SMS environment
We want to share a few DASD among our four Lpars and have SMS doing allocation. Each Lpar runs z/OS as a monoplex seperate from the others. Two are 1.4 and two are 1.7 right now. We do not have any kind of sysplex. Nor do we have an SMSplex, whatever that is. We would update SMS rules in every Lpar to indicate these volsers in an SMS storage group and set up storageclass, dataclass mgmtclass. Each high level qualifier would be setup in every Lpar's master catalog using an existing ucat on a non-SMS dasd that is online to all lpars. Would SMS for lpar-P get confused if SMS for lpar-D was allocating a file on those dasd at the same time she was? Does SMS from one lpar need to know what SMS from the other lpar is doing? John Cullen “'Tis a damn poor mind that cannot think of more than one way to spell a word.” (Andrew Jackson) -- 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: Restrict Operator offline command
On 19 Sep 2006 13:26:21 -0700, in bit.listserv.ibm-main (Message-ID:[EMAIL PROTECTED]) [EMAIL PROTECTED] (Ted MacNEIL) wrote: I don't think it's a question of lack of sense of humour, but rather the excessive noise on this list. Seemingly every thread deteriorates into discussions of ancient hardware/software or semantics and grammar or politics or crime. Hit em up side the head with a bat adds little value to the discussion. You're right it does. But, I was trying to point out (in a round about way), that sometimes termination of an employee is the only choice. The OP pointed out that it happened more than once. In some cases, once is barely acceptable. But! Twice? NO WAY! Yes, even good operators can fat-finger a command more than once, given years in which to do it. And, of course, there are enough operators that even if each gets only one bite, it can wreak havoc on SLAs. We implemented the auto-ops rule after *good* operators made the mistake. Yes, you can fire people for two typos. As I said, though, all that will do is make sure that no command is entered without a lng look to make sure it's right. (Or, you'll have so much turnover that you'll never have to worry about what a good operator will do.) How long do you want system start-up and shut-down to take? As shown by some of the responses, this problem is endemic, rather than the fault of individual operators. I did not object to the humor, per se, but to the idea that *any* punishment is correct for this mistake. There are other errors for which I've jokingly commented about the desirability of breaking someone's thumbs. But it was always when people did things when they should have known (or did know) better. Typos do not fall into that category. (Speaking of people who should know better, how about adding a -- line to separate your sig?) -- I cannot receive mail at the address this was sent from. To reply directly, send to ar23hur at intergate dot 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
Re: SV: DLLs in z/OS - sources of information ?
Thomas Berg wrote: Your'e quite right ! :) Thanks. I'm still interested in information about DLLs though. Thomas Berg IT Utveckling Swedbank AB (Publ) You need our class, of course! Creating and Using DLLs in z/OS; 1 day; multilingual (COBOL, C, PL/I, Assembler: you choose). Details at: http://www.trainersfriend.com/Language_Environment_courses/m525descr.htm Or better, our longer class Hot Catholic High School Girls in Bondage (perhaps better known as Secrets of Inter-Language Communication in z/OS); this three day course includes the content from the above and a lot more. Details at: http://www.trainersfriend.com/Language_Environment_courses/m520descr.htm Kind regards, -Steve Comstock The Trainer's Friend, Inc. -- 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: Restrict Operator offline command
(Speaking of people who should know better, how about adding a -- line to separate your sig?) There's one there. The problem is that I had to switch away from my BlackBerry ID to a yahoo one for my BlackBerry, under POP3. (RIM is learning customer support from CA MS). So, I have two sig lines to deal with, and each e-mailer fighting it. I didn't realise it was a problem, since I don't read my own posts. When in doubt. PANIC!! -- 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: ICKDSF ERASE VOLUME Too Slow
Hi Mark, I have never worked with a RAMAC 3 before, however, a couple of thoughts come to mind: If the RAMAC 3 supports either IBM Flashcopy Ver1 ( Volume Level Flashcopy ) or PPRC Ver1, you could 'setup' some volume(s) with IEBDG as someone else suggested. Then you could specify the 'setup' volume(s) as Flashcopy or PPRC source volume(s) to the volume(s) you want to 'erase/overlay/etc.'. Using Flashcopy or PPRC removes the burden of transfering all the data to/from the control unit to the processor and back again to the same control unit. The control unit would do all the work in the 'background' without a z/OS image being there ( after the initial Flashcopy or PPRC commands, of course ). HTH Glenn Miller --- This message (including any attachments) is confidential and may be privileged. If you have received it by mistake please notify the sender by return e-mail and delete this message from your system. Any unauthorised use or dissemination of this message in whole or in part is strictly prohibited. Please note that e-mails are susceptible to change. ABN AMRO Bank N.V, which has its seat at Amsterdam, the Netherlands, and is registered in the Commercial Register under number 33002587, including its group companies, shall not be liable for the improper or incomplete transmission of the information contained in this communication nor for any delay in its receipt or damage to your system. ABN AMRO Bank N.V. (or its group companies) does not guarantee that the integrity of this communication has been maintained nor that this communication is free of viruses, interceptions or interference. --- -- 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
SV: SV: DLLs in z/OS - sources of information ?
-Ursprungligt meddelande- Från: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] För Steve Comstock Skickat: den 20 september 2006 00:17 Till: IBM-MAIN@BAMA.UA.EDU Ämne: Re: SV: DLLs in z/OS - sources of information ? Thomas Berg wrote: Your'e quite right ! :) Thanks. I'm still interested in information about DLLs though. You need our class, of course! Creating and Using DLLs in z/OS; 1 day; multilingual (COBOL, C, PL/I, Assembler: you choose). Details at: http://www.trainersfriend.com/Language_Environment_courses/m52 5descr.htm I actually saw that course when searching from Google. Unfortunately I supposed You want to be payed for the information... ;) Or better, our longer class Hot Catholic High School Girls in Bondage As we are mostly Lutherans, is it possible foir You to rework that course to Hot Protestantic High School Girls in Bondage ? Details at: http://www.trainersfriend.com/Language_Environment_courses/m52 0descr.htm Your classes seems very interesting though. In the case a miracle happens and my employer is willing to pay for it, what do You take for a course here in Stockholm ? Kind regards, -Steve Comstock The Trainer's Friend, Inc. Regards, Thomas Thomas Berg IT Utveckling Swedbank AB (Publ) -- 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: Production DB2 Problem
something wrong here - my experience was that db2 would start using any sms volume as soon as it was enabled. I would suggest open an incident with IBM. Some things to check in DB2 the STOGROUP should have volumes (*) the priquty and secqty for the db2 tablespace and index spaces should be large enough to get to the next dataset limit (whether it is the default 2G or larger) were there many small extents because the volumes got fragmented? each allocation can take up to 5 extents and DB2 is still limited to 251 extents for a multivolume dataset. once DB2 gets to 251 extents the only way to clear that is reorg or manual copy. was there a failure message? - I always issued a -start database spacenam DB2 command to clear any leftover status from the failure -- Mike -- 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: Restrict Operator offline command
This discussion answer's an age-old question of the universe: Why does VM ( VM/ESA, z/VM, etc. ) restrict the range of the device VARY command? vary offline 2000-2100 17:36:43 HCPCPS6000E The range of device numbers cannot exceed 256. Ready(06000); T=0.01/0.01 17:36:43 vary online 2000-2100 17:36:46 HCPCPS6000E The range of device numbers cannot exceed 256. Ready(06000); T=0.01/0.01 17:36:46 Guess I have an answer. Glenn Miller --- This message (including any attachments) is confidential and may be privileged. If you have received it by mistake please notify the sender by return e-mail and delete this message from your system. Any unauthorised use or dissemination of this message in whole or in part is strictly prohibited. Please note that e-mails are susceptible to change. ABN AMRO Bank N.V, which has its seat at Amsterdam, the Netherlands, and is registered in the Commercial Register under number 33002587, including its group companies, shall not be liable for the improper or incomplete transmission of the information contained in this communication nor for any delay in its receipt or damage to your system. ABN AMRO Bank N.V. (or its group companies) does not guarantee that the integrity of this communication has been maintained nor that this communication is free of viruses, interceptions or interference. --- -- 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: Why AUTHPGM?
In a recent note, Walt Farrell said: Date: Tue, 19 Sep 2006 14:00:51 -0400 ... Generally it is more a question, I think, of whether the program is doing something that you would want run under TSO, given the dispatching priority of TSO users, and some environmental characteristics (how long the user will be waiting while it runs, for example) that determines whether you allow the programs to run under TSO/E or not. Alas, this misses the mark considerably in that it fails to distinguish between interactive TSO sessions and use of the TMP in batch. AUTHPGM NAMES is the same for both, isn't it? Perhaps for this purpose AUTHPGM should govern only calling programs from interactive sessions, and batch TMP should be free to invoke any authorized program, listed or not. There are similar concerns with dynamic allocation of tape drives. The administrators' reasonable desire not to allow drives to be monopolized during programmers' think time should not be addressed by the crude expedient of prohibiting (or allowing) all dynamic allocation and mounting of tapes. -- gil -- StorageTek INFORMATION made POWERFUL -- 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 re: CA-1 and SMP/E
The reason for the same FMID's is because while we are changing the release number; it can be done with a simple maintenance upgrade. For example, going from R5.2 to R11.0 or even to R11.5 does NOT require a complete new install of the product. Instead, you can simply apply APAR's and/or PTF's. Starting with r11.5 all published maintenance is now published as PTF's, not APAR's. Back in R5.2, the published zap's were APAR's and when the modules were replaced with a service-pack it was sent as a PTF. R11.0 was an in between type release. Soon after it was released we switched to load-module only maintenance but there were still some zaps published as well. But with r11.5, all published maintenance is a module-replacement in PTF form. So there shouldn't be any problems with that (except for those clients that want a non-SMP format). And since official support for r11.0 ends this month, all maintenance going forward will be PTF format only and module replacement. Russell Witt CA-1 Level-2 Support Manager -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] Behalf Of Schwarz, Barry A Sent: Tuesday, September 19, 2006 1:34 PM To: IBM-MAIN@BAMA.UA.EDU Subject: Re: Question re: CA-1 and SMP/E The practice started with R11 and has been carried forward to R11.5. R5.1 and R5.2 had different FMIDs. It has caused me no end of problems at some customer sites. But then 99%+ of their PTFs are coded ++APAR so they appear to be missing some very basic SMPE concepts. -Original Message- From: Tim Hare [mailto:[EMAIL PROTECTED] Sent: Tuesday, September 19, 2006 11:26 AM To: IBM-MAIN@BAMA.UA.EDU Subject: Question re: CA-1 and SMP/E This is just a historical question for those of you who may be informed more than I: Does anyone know why CA does not use new FMIDs when they have a new release of CA-1? The FMID seems to stay the same whether you're using CA-1 release 5.2, 11.0, or 11.5 ; I'm just curious if anyone knows the reasons why this method is used. -- 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: SMS question - sharing DASD but not SMS environment
On Tue, 19 Sep 2006 17:02:25 -0500, John M. Cullen [EMAIL PROTECTED] wrote: We want to share a few DASD among our four Lpars and have SMS doing allocation. Each Lpar runs z/OS as a monoplex seperate from the others. Two are 1.4 and two are 1.7 right now. We do not have any kind of sysplex. Nor do we have an SMSplex, whatever that is. We would update SMS rules in every Lpar to indicate these volsers in an SMS storage group and set up storageclass, dataclass mgmtclass. Each high level qualifier would be setup in every Lpar's master catalog using an existing ucat on a non-SMS dasd that is online to all lpars. Would SMS for lpar-P get confused if SMS for lpar-D was allocating a file on those dasd at the same time she was? Does SMS from one lpar need to know what SMS from the other lpar is doing? You can run your four monoplexes in a shared SMS configuration with a single shared SCDS/ACDS and common ACS routines. SMS is aware of the other systems, but each acts independantly. That's what an SMS-Plex is. This kind of configuration goes back to the early days of SMS, and I'd recommend that you do it that way. When I set up SMS in just such an environment, we also had a GRS ring in place among the MVS images. I forget whether or not it is a requirement. Are you already running SMS on your four LPARs? I have never shared volumes between different SMS environments. Perhaps someone else has something to say about that. Tom Marchant -- 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
ServerPac on 3592 tape
Does anyone know when we can order z/OS V1.8 ServerPac on a 3592 tape via ShopzSeries. The 10/15/06 date indicates when manufacturing will begin. Key dates September 15, 2006 : First date for ordering z/OS V1.8 ServerPac, SystemPac, and CBPDO using CFSW configuration support, or ShopzSeries, the Internet ordering tool. Note that most z/OS media (executable code) is shipped only through Customized Offerings (ServerPac, SystemPac, and CBPDO). September 29, 2006 : z/OS V1.8 planned general availability via ServerPac, CBPDO and SystemPac. October 15, 2006 : Manufacturing of orders on 3592 tape media will begin. -- 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
Fw: Why No S0C7?
Neither COBOL nor IBM's COBOL *guarantee* a S0C7 (or other abnormal termination) when you reference incompatible data - all they promise is results are undefined. Having said that, try your sample with both ZWB and NOZWB. See: http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/igy3pg31/2.4.58 JONES, CHARLIE [EMAIL PROTECTED] wrote in message news:[EMAIL PROTECTED]... We are on Z 1.4 and COBOL Rel 3.2.0 The Simple Compile and Go below Allows me to add 1 to 'ABC' and get 124 with no S0C7. Is this normal? Did this test with NUMPROC(NOPFD), NUMPROC(PFD), and NUMPROC(MIG). All were successful. //ZCRSCEJA JOB (DAZC1130,ZCRSCEJ),'COBOL4MVS IVP', // CLASS=A,MSGCLASS=X,NOTIFY=ZCRSCEJ //* //RUNIVP EXEC IGYWCLG,PARM.COBOL=RENT,REGION=1400K, // PARM.LKED='LIST,XREF,LET,MAP', // GOPGM=USECDE //COBOL.SYSIN DD * PROCESS NUMPROC(MIG) 000100 IDENTIFICATION DIVISION. 000200 PROGRAM-ID. USECDE. 003200 ENVIRONMENT DIVISION. 005000 DATA DIVISION. 008400 WORKING-STORAGE SECTION. 77 COUNTERX PIC 999 VALUE 0. 01 BAD-NUMBERPIC 999. 01 BAD-SPACE REDEFINES BAD-NUMBER PIC XXX. 011800 PROCEDURE DIVISION. 013200 001-INITIALIZE. *THIS STATEMENT WILL CAUSE AN LE-SOC7 PERFORM 010-LOOPIT UNTIL COUNTERX EQUAL 100. 034200 601-END-RTN. DISPLAY 'TESTIT EXECUTED WITH NO S0C7 SUCCESSFULY'. GOBACK. 013200 010-LOOPIT. MOVE 'ABC' TO BAD-SPACE. ADD 1 TO BAD-NUMBER. DISPLAY ' BAD-NUMBER: 'BAD-NUMBER ADD 1 TO COUNTERX. 999-END-RTN. EXIT. //LKED.SYSLIB DD //GO.SYSOUT DD SYSOUT=* -- 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: ICKDSF ERASE VOLUME Too Slow
Thanks, Tim. Mark, see our web site www.innovationdp.com for details on FDRERASE -- Bruce Black Senior Software Developer Innovation Data Processing -- 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: ICKDSF ERASE VOLUME Too Slow
If the RAMAC 3 supports either IBM Flashcopy Ver1 ( Volume Level Flashcopy ) or PPRC Ver1, RAMAC 3 is an old subsystem, no flashcopy -- Bruce Black Senior Software Developer Innovation Data Processing -- 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: BMC control-m advanced FTP
Pommier, Rex R. wrote: Hi list, Does anybody out there use BMC's Control-M Advanced FTP product? If so, can you tell me just what the product does and what impact it has on replacing standard FTP? I'm being pushed by mgmt to replace our FTP with this and I can't figure out at first look just what it is that makes this software necessary in my shop. Thanks. Rex If this is the same thing that BMC has attempted to sell us, it is a program they have that acts like a ftp client, but it runs on distributed OS's. It does NOT run on z/OS, nor does it replace anything on z/OS. If you have a file that resides on z/OS you want to tranfer, this product connects to the mainframe FTP sever, issues a get then connects to the remote server and issues a put. It detects if the ftp fails and then, based on your rules will retry sending the file. -- 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: EBCDIC to ASCII OPTCD=Q? (JCL)
Does the output have to be tape? Does it have to be written in ASCII from the Cobol program? What about doing OCOPY under TSO to a HFS file? Howard Brazee wrote: The following is being copied from COMP.LANG.COBOL, with permission. Gah. Thanks much, Mr Klein; I am trying to do this entirely by utilities/JCL and I hope to avoid a dedicated COBOL program... if my hopes are in vain then I'll start down this path. All righty... I've been asked about having a job on an IBM mainframe (z/OS) produce ASCII output. (To those who think to inquire 'Why don't you produce EBCDIC output and then have ftp translate it during transfer to the target?' my response is 'I have made this suggestion and someone who signs my timesheet responded 'That will be considered a possibility; right now you should look into making the ASCII files on the mainframe.''... and yes, all fields are either text or display numerics w/ sign leading separate.) I recall - but my memory is, admittedly, porous - something about the DCB parameter OPTCD=Q being able to accomplish this but it will require more jiggery-pokery than I can come up with; when I code an IEBGENER or a DFSORT with DD statements like: //INDD DDDISP=SHR, // DSN=INPUT.DATASET.INEBCDIC //OUTDDDD DSN=OUTPUT.DATASET.INASCII, //DISP=(,CATLG,CATLG), //UNIT=TAPE,RETPD=0, //DCB=(*.INDD,BUFNO=30,OPTCD=Q) .. I get an ABEND (in the case of DFSORT it is IEC141I 013-70, a problem with the OPEN macro... but the QW text for Return Code 70 (for V=IBM P=Z/OS SYSTEM MSGS R=V1R4 I=IEC141I) reads: --begin quoted text: An OPEN macro instruction was issued for a data set on magnetic tape. A conflict exists between LABEL parameters on the DD statement, and the DCBRECFM, DCBOPTCD, DCBBUFOF, and DCBUSASI fields, which give the appearance of mixed ASCII and EBCDIC attributes for the data set; or TRTCH was specified for a 9-track tape. Some examples of conflicts are that for AL tapes the BLKSIZE must be less than 2048, RECFM=V,U and VB cannot be used. For details about AL tape restrictions see z/OS DFSMS: Using Magnetic Tapes . Note that most utilities (except for IEHINITT) do not support ASCII. --end quoted text (changing UNIT=TAPE,RETPD=0 to UNIT=SYSDA,SPACE=(TRK,(6000,500),RLSE) does not change the error but the salient text for 70 then appears to be 'An OPEN macro instruction was issued for a data set not on magnetic tape. Either OPTCD=Q was specified, or OPEN was issued for an ISAM data set using QSAM.') It appears obvious that under the conditions of my experiment DFSORT is falling into the category of 'most utilities'. Might someone be so kind as to point me towards a resource from which I may be able to glean a solution? Thanks much. (Oh... and among a bunch of Other Stuff a Google search for 'EBCDIC ASCII translation jcl' (no ', included) returns http://www.dbforums.com/archive/index.php/t-327313.html ; this informs, among other things, that 'answering a question with a question is no answer at all'... it's on the Web, it's gotta be right, right?) DD -- 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: Slow Mainframe Print Output
It sounds like they are doing a screen print. I am not sure about Extra, but I know PCOMM has an option to do screen prints in text or graphic mode. In text mode, it just dumps the text characters, in graphics mode it generated a graphic picture of the screen. Least to say, graphics mode was slow, slow, slow. [EMAIL PROTECTED] wrote: Hey there, I'm wondering if anyone out there can help me out. Here's the short version: Any user printing from a program called Attachmate EXTRA! 3270 Emulator (version 8) to an IBM series printer (Infoprint 1352/1552) will have slow output. I'm talking about 1-2 minutes for one page to print. First the header page will print...fast...then the printer will churn and churn and churn...until the page will SLOWLY print. We've opened tickets with Microsoft, IBM, and Attachmate, with the expected results. Microsoft states that it's a problem with the way IBM reads the data from the Attachmate program. IBM states that it's a problem with the default Microsoft pcl.sep file used for the seperator page. Finally, Attachmate says it's a problem with the way IBM emulates the mainframe data into a PCL format. Keep in mind, the users are simply clicking the Print button in the emulation terminal, and aren't keying in specific mainframe print commands. Here's our environment: Users - Windows 2000 SP4 / Windows XP Pro SP2 on a standard company LAN. Printing to: Printer entries added to a clustered print server running Windows 2003 Server. Each printer is added to the server using Direct IP ports and shared to the users of the network. It only affects users of IBM printers printing from the Attachmate program. All other print operations from other programs print normally. The problem goes away when we disable the seperator page on the server. Since management has deemed this unacceptable, we have to find a way to work around it. We've taken apart the pcl.sep file and tried adding commands in line-by-line with no change in results. Has anyone out there encountered this before? -- 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: SYSLOG daily setup
In a message dated 9/19/2006 5:00:23 P.M. Central Standard Time, [EMAIL PROTECTED] writes: was able to issue the W L cammand manually. Then used XDC command in SDSF to save the syslog to a data set. So, somewhere in the scheduling of the daily oper work, the W L is missing. OK! Don't you just love it when they disappear for years at a time...Have a good one. -- 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 re: CA-1 and SMP/E
Dare I ask what was really gained in calling it R11.0 R11.5 vs just different gen levels? It's not written anywhere, but I'd say most think if the FMID is the same, it's the same release. Was the R11 just a marketing mandate? It seems to be a common issue in a lot of CA products. But then someone made millions knocking the Ford off a car and putting Mercury in it's place, so let's hoist one to those Edsel marketers! The reason for the same FMID's is because while we are changing the release number; it can be done with a simple maintenance upgrade. For example, going from R5.2 to R11.0 or even to R11.5 does NOT require a complete new install of the product. Instead, you can simply apply APAR's and/or PTF's. --- [This E-mail scanned for viruses by Declude Virus] -- 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: SMS question - sharing DASD but not SMS environment
Absolutely, SMS would get confused. Either use one SMS across all four lpars or stay with one per lpar. The purpose of a shared COMMDS is to communicate allocation activity between lpars to avoid allocation collisions such as you envisioned. If you are going to share the usercat across all lpars anyway, why not merge the four separate SMS' in to one SMSPLEX? Bob Richards -Original Message- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of John M. Cullen Sent: Tuesday, September 19, 2006 6:02 PM To: IBM-MAIN@BAMA.UA.EDU Subject: SMS question - sharing DASD but not SMS environment We want to share a few DASD among our four Lpars and have SMS doing allocation. Each Lpar runs z/OS as a monoplex seperate from the others. Two are 1.4 and two are 1.7 right now. We do not have any kind of sysplex. Nor do we have an SMSplex, whatever that is. We would update SMS rules in every Lpar to indicate these volsers in an SMS storage group and set up storageclass, dataclass mgmtclass. Each high level qualifier would be setup in every Lpar's master catalog using an existing ucat on a non-SMS dasd that is online to all lpars. Would SMS for lpar-P get confused if SMS for lpar-D was allocating a file on those dasd at the same time she was? Does SMS from one lpar need to know what SMS from the other lpar is doing? John Cullen 'Tis a damn poor mind that cannot think of more than one way to spell a word. (Andrew Jackson) -- 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 LEGAL DISCLAIMER The information transmitted is intended solely for the individual or entity to which it is addressed and may contain confidential and/or privileged material. Any review, retransmission, dissemination or other use of or taking action in reliance upon this information by persons or entities other than the intended recipient is prohibited. If you have received this email in error please contact the sender and delete the material from any computer. Seeing Beyond Money is a service mark of SunTrust Banks, Inc. [ST:XCL] -- 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