Rmm extended dataset
Hello, I am trying to create a rmm report to include: dsn, volser,volseq, volcnt can I use RVUSE as volcnt? regards Victor -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMP/E tool or question
Hi Thank you. I 'm making a GIMAPI for this kind of query. The problem was that I even didn't kown that it is an UTIN type entry. If I can ask you: The ISPF SMPE CSI query without entry name, gave me back, that CELHS003 was an UTIN type. Can I get the same via GIMAPI ? On 22.06.2012 16:07, Kurt Quackenbush wrote: We have now the following problem: Try to install some PTF's for C/C++ compiler and got an error during APPLY LKED, as turned out in the CEE.SCEELIB lib CELHS003 import specification member, some lines are missing. Now I wanted to know, how this CELHS003 member arrived to the target library, so see all the SMPE/ entries with this member. How can I find out this ? I think you want to identify all of the load modules that include CELHS003. If that is the correct, then you can use the LIST command to list all of the LMOD entries and then manually filter/search the output to find occurrences of CELHS003. SET BDY(tgtzone). LIST LMOD. Or you can write a program to use GIMAPI to query the target zone to find LMOD entries with a UTIN subentry of 'CELHS003,SCEELIB'. I believe all of the load modules that include CELHS003 have a CALLLIBS of SCEEBND2. Therefore, if you have want to link edit all the load module that include CELHS003, you can use the LINK command, like this: SET BDY(tgtzone). LINK LMODS CALLLIBS(SCEEBND2) CHECK. Kurt Quackenbush -- IBM, SMP/E Development -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Why is GRS ENQ needed in SMFDUMP program?
You might call the RESERVE macro a special form of ENQ, but the actual reserve was a hardware feature on DASD. When a reserve was initiated by a processor, I/O's from other processors were delayed until the reserve was released. The use of the ENQ was (IIRC) to provide a finer- grained interlock between processes running on the same processor. Nearly 30 years ago (before LPAR's and SYSPLEXes),I was a systems programmer at one installation where we had lots of 3344 dasd units and were running DOS'es under VM. We did a very successful migration to 2 MVS's with no DOS and no VM. However, it we were plagued with reserve lockouts until we found the problems. The first issue was VM's asinine treatment of reserves - we had a choice of configuring VM to either: (1) pass the reserve on to the disk physically, which provided lockout from I/O by another physical processor but did not distinguish between different guests, or (2) to handle the reserves logically (internal to VM) which successfully interlocked guests on the same processor, but did not do the hardware reserve, so there was no interlock between processors. That issue was resolved when we dumped the DOS'es and VM and ran a test and a production MVS on different machines. However, we still had reserve lockouts from time to time. It turns out that the 3340's were configured (as advertised) as 4 3340's each, and defined in MVS as 4 units. However, it turned out that there was only one reserve register (?) per 3344, so a reserve against one of the logical units effectively reserved all 4, and MVS did not recognize the situation. This was ameliorated by careful dataset placement, but was finally resolved when we went to 3350's. I complained about this to the local IBM staff, but I'm not sure they believed me, and software support was done by FE's, so I'm not sure the situation was ever fixed, or even APAR'ed. Dale Miller -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMS processing setup for secondary extents
Or use IEBDG... -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf Of Joel C. Ewing Sent: Thursday, June 21, 2012 6:00 PM To: IBM-MAIN@listserv.ua.edu Subject: Re: [IBM-MAIN] SMS processing setup for secondary extents On 06/21/2012 07:47 PM, Joel C. Ewing wrote: On 06/21/2012 06:42 PM, Lizette Koehler wrote: From: Joel C. Ewing jcew...@acm.org And better yet, also use a DATACLAS with the Extended attribute so you are not constrained to only 16 extents per volume. With Space Constraint Relief. Extended attribute, and Dynamic Volume Count, both primary and secondary allocations will use as many extents and volumes as necessary to get the requested primary or secondary space (not just the 5 extents for primary, 1 for secondary limits of ordinary sequential dataset allocation), so fragmentation of free space is less of an issue. Since you are not guaranteed any minimal amount of space for any individual extent, you also need the larger extent count limit given by the Extended data set attribute to insure that you are not artificially restricted by number of extents from allocating available free space on the assigned volumes. Using these attributes you can even request a primary allocation that spans multiple volumes and guarantee that step execution will not even start if a large minimal primary space is unavailable, but you have to be careful using this because at least in the past the RELEASE option would not release allocated but unused space on volumes that contained no written data, only on the last used volume of the data set (so a multi-volume primary allocation used for a very small dataset could consume a large amount of pool space on subsequent unused volumes even after RELEASE). Joel C Ewing Joel, I am not sure that would apply to a PDS. I know that for nonvsam sequential files that will work, but I am not sure if it is a PDS if it can go beyound 16 extents. I have been looking through the manauls and cannot find a reference (info center - yuck). Can you comment? Lizette No, I'm pretty sure my remarks only apply to Extended Sequential datasets and that there is no Extended support for PDS or PDS/E data sets. VSAM datasets can also be Extended, but they have their own allocation rules. I interpreted the context of the original question to be about sequential datasets since multiple GDG datasets were being merged -- and the ability to create and work with GDG datasets that happen to be a PDS is not really documented and not generally known outside those of us that needed the capability, tried it, and found it worked (obviously you can't specify both a member name and a relative GDG number in JCL because of syntax restrictions). I gathered from discussion at one of the SHARE QA's over a decade ago that PDS/E's can't be a GDS because the PDS/E designers didn't appear to be aware that was one of the features of a PDS and the PDS/E implementation explicitly disallowed such usage. And I forgot to mention earlier that a simple way to test whether your sequential datasets are being allocated as expected is to set up a job to IDCAMS REPRO a moderately sized sequential dataset concatenated to enough copies of itself to build up a sequential dataset equivalent to about half a drive in the pool, and then use that concatenated to itself enough times as input to another REPRO to convince yourself that extents for a multi-volume output dataset are being allocated as expected and multiple volumes are being used -- being careful to delete all your junk datasets after inspecting the results. There is an IBM utility designed explicitly to create a specified number of test records for a sequential dataset, but my recollection is that it is incredibly slow and a CPU hog - much faster to use IDCAMS REPRO. -- Joel C. Ewing,Bentonville, AR jcew...@acm.org -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: AUTOMOUNT with NFS Filesystem
Hello, I tried checking MVSNFSC job log, but there is no error I found. 01.38.36 STC00122 THURSDAY, 21 JUN 2012 01.38.36 STC00122 $HASP373 MVSNFSC STARTED 01.38.36 STC00122 IEF403I MVSNFSC - STARTED - TIME=01.38.36 01.38.36 STC00122 IEE252I MEMBER CTINFC00 FOUND IN SYS1.PARMLIB 01.38.46 STC00122 GFSC284I NETWORK FILE SYSTEM CLIENT COULD NOT GET GSS CREDENT 291 FOR THE NFS CLIENT : GSS API krb5_get_default_realm() FAILED 291 WITH GSS MAJOR STATUS 96C73ADF GSS MINOR STATUS 01.38.46 STC00122 GFSC700I z/OS NETWORK FILE SYSTEM CLIENT (HDZ1D1N) started. O Regards Saurabh On Mon, Jun 25, 2012 at 5:54 PM, Miklos Szigetvari miklos.szigetv...@isis-papyrus.com wrote: For the NFSclient you need the NFS client address space, so if you can't start MVSNFSC you will not have NFS client, and automount . I would check the MVSNFSC joblogs etc . I suspect maybe something with the LE is missing . On 25.06.2012 13:34, saurabh khandelwal wrote: Hello Group, To run automount with NFS file system, I tried setting up NFS client on my z/OS system. For doing this I have made changes to BPXPRM member and added below lines. /*** */ /* Define network file systems and start NFS client.*/ /*** */ FILESYSTYPE TYPE(NFS) ENTRYPOINT(GFSCINIT) PARM('DataCaching(Y)') ASNAME(MVSNFSC) To take these new configuration affect , I have used command to reset the OMVS SETOMVS RESET=(00). but by doing this, not sure why system is not able to find GFSCINIT in my libraries. I have cross verified that, GFSCINIT module placed in SYS1.NFSLIBE library and this library is APF authorized in PROG00 member as below. APF ADD DSNAME(SYS1.NFSLIBE)VOLUME(**) and added this SYS1.NFSLIBE dataset into LNKLIST. After that I tried starting autmount. # /usr/sbin/automount FOMF0107I Processing file /etc/ade_autofs Then I have checked # cd /u/ade_autofs # ls -al total 24 dr-xr-xr-x 2 BPXOINIT TTY0 Jun 20 01:24 . drwxr-xr-x 5 BPXOINIT OEMVS 8192 Jun 20 01:22 .. # cd ade cd: ade: EDC5129I No such file or directory. # I am not able to locate anything in this directory. my master file configuration is . EDIT /SYSTEM/etc/auto.master Columns 1 00072 Command === Scroll === CSR ** * Top of Data ** 01 /u/ade_autofs /etc/ade_autofs ** Bottom of Data and map file config is EDIT /SYSTEM/etc/ade_autofs Columns 1 00072 Command === Scroll === CSR ** * Top of Data ** 01 name * 02 type NFS 03 filesystem shared.utility 04 mode rdwr 05 duration 15 06 delay 10 07 parm abcd:/utility,xlat(n),rsize(**8192),wsize(8192),proto(udp) 08 setuid no TSO mount command to mount NFS file system manually worked fine for me mount filesystem(ade) type(nfs) mountpoint('/u/ade_autofs') parm('abcd:/utility,xlat(n),**timeo(10),rsize(8192),wsize(** 8192),vers(2),proto(udp)') Can you please suggest, how can I test NFS client is in working condition and also not sure, why this is not able to automount this NFS file system Please suggest, If I have missed any steps. --**--**-- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- Thanks Regards Saurabh Khandelwal -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: HMC EoR SWITCH
I just checked: *it is still available* in HMC 2.11.1 (z196 GA2), so it is not yet abandoned. Or maybe there is higher level of HMC without the feature? BTW (theoretical): The modem itself can be still available while call home feature via modem can be abandoned. The modem can be used for other purposes, like time reference. Another example can be optical drive (DVD-RAM). It's still in the HMC hardware, but it cannot be used for backup process. Only USB sticks are supported. -- Radoslaw Skorupka Lodz, Poland W dniu 2012-06-25 16:02, Peter Vander Woude pisze: When was the modem connectivity abandoned? 2. Call home. Modem connectivity is abandoned, so VPN is (will be - depends on your HW level) the only option. That requires connectivity to corpo lan. -- Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku. This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax +48 (22) 829 00 33, www.brebank.pl, e-mail: i...@brebank.pl Sd Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, nr rejestru przedsibiorców KRS 025237, NIP: 526-021-50-88. Wedug stanu na dzie 01.01.2012 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.410.984 zotych. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
SMS Retain Days Extra Backup Versions - question.
Hello, I think I found out what the SMS Retain Days Extra Backup Versions exactly means and want to make sure I am right. If I am right, I am not happy with it. A dataset has a mgmtclas with attribute SMS retain days extra backups = 50. On day 10 backup#1 is taken. On day 100 the dataset is updated and backup#2 is taken. If I am right, backup#1 receives an expiration date of day 60 and will be deleted immediately. So if I discover the next day that the update was incorrect, I want to restore backup#1, but it is not there anymore. Is this how it works? Why is the expiration counter of backup#1 not started at day 100, the day that it becomes the first Extra Backup? This way the backup is deleted on the day it becomes valuable. Kees. For information, services and offers, please visit our web site: http://www.klm.com. This e-mail and any attachment may contain confidential and privileged material intended for the addressee only. If you are not the addressee, you are notified that no part of the e-mail or any attachment may be disclosed, copied or distributed, and that any other action related to this e-mail or attachment is strictly prohibited, and may be unlawful. If you have received this e-mail by error, please notify the sender immediately by return e-mail, and delete this message. Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its employees shall not be liable for the incorrect or incomplete transmission of this e-mail or any attachments, nor responsible for any delay in receipt. Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch Airlines) is registered in Amstelveen, The Netherlands, with registered number 33014286 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMS Retain Days Extra Backup Versions - question.
I have not tested this, but I disagree. To use your example below, ...on day 100 ... elided ... will be deleted immediately. In my experience the extra backup counter will begin at day 100, add 50 and the extra backup will expire on day 151. Since I also run EXPIREBV on a daily basis, this may be setting the extra backup counter. The dfHSM manuals are really quite good about providing the details. See : Availability management of SMS-managed storage in http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2S6A1/CCON TENTS?SHELF=dgt2bkb1DN=SC35-0421-13DT=20120123164451 (watch the wrap) HTH, snip I think I found out what the SMS Retain Days Extra Backup Versions exactly means and want to make sure I am right. If I am right, I am not happy with it. A dataset has a mgmtclas with attribute SMS retain days extra backups = 50. On day 10 backup#1 is taken. On day 100 the dataset is updated and backup#2 is taken. If I am right, backup#1 receives an expiration date of day 60 and will be deleted immediately. So if I discover the next day that the update was incorrect, I want to restore backup#1, but it is not there anymore. /snip -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Is there way to recover Global csi?
On Mon, 25 Jun 2012 21:24:49 +0530 Ravi Kumar.C.Gowda rkcgowda1...@gmail.com wrote: :Hello Everyone! :Is there a way to recover Global csi which was accidently or unknowingly :deleted please? :Appreciate a quick response from someone please.. Thanks well in advance Same as any other VSAM dataset. -- Binyamin Dissen bdis...@dissensoftware.com http://www.dissensoftware.com Director, Dissen Software, Bar Grill - Israel Should you use the mailblocks package and expect a response from me, you should preauthorize the dissensoftware.com domain. I very rarely bother responding to challenge/response systems, especially those from irresponsible companies. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: AUTOMOUNT with NFS Filesystem
Hi You are saying, you got an error message about GFSCINIT. Is it at SETOMVS RESET=(00) time or when ? On 25.06.2012 15:46, saurabh khandelwal wrote: Hello, I tried checking MVSNFSC job log, but there is no error I found. 01.38.36 STC00122 THURSDAY, 21 JUN 2012 01.38.36 STC00122 $HASP373 MVSNFSC STARTED 01.38.36 STC00122 IEF403I MVSNFSC - STARTED - TIME=01.38.36 01.38.36 STC00122 IEE252I MEMBER CTINFC00 FOUND IN SYS1.PARMLIB 01.38.46 STC00122 GFSC284I NETWORK FILE SYSTEM CLIENT COULD NOT GET GSS CREDENT 291 FOR THE NFS CLIENT : GSS API krb5_get_default_realm() FAILED 291 WITH GSS MAJOR STATUS 96C73ADF GSS MINOR STATUS 01.38.46 STC00122 GFSC700I z/OS NETWORK FILE SYSTEM CLIENT (HDZ1D1N) started. O Regards Saurabh On Mon, Jun 25, 2012 at 5:54 PM, Miklos Szigetvari miklos.szigetv...@isis-papyrus.com wrote: For the NFSclient you need the NFS client address space, so if you can't start MVSNFSC you will not have NFS client, and automount . I would check the MVSNFSC joblogs etc . I suspect maybe something with the LE is missing . On 25.06.2012 13:34, saurabh khandelwal wrote: Hello Group, To run automount with NFS file system, I tried setting up NFS client on my z/OS system. For doing this I have made changes to BPXPRM member and added below lines. /*** */ /* Define network file systems and start NFS client.*/ /*** */ FILESYSTYPE TYPE(NFS) ENTRYPOINT(GFSCINIT) PARM('DataCaching(Y)') ASNAME(MVSNFSC) To take these new configuration affect , I have used command to reset the OMVS SETOMVS RESET=(00). but by doing this, not sure why system is not able to find GFSCINIT in my libraries. I have cross verified that, GFSCINIT module placed in SYS1.NFSLIBE library and this library is APF authorized in PROG00 member as below. APF ADD DSNAME(SYS1.NFSLIBE)VOLUME(**) and added this SYS1.NFSLIBE dataset into LNKLIST. After that I tried starting autmount. # /usr/sbin/automount FOMF0107I Processing file /etc/ade_autofs Then I have checked # cd /u/ade_autofs # ls -al total 24 dr-xr-xr-x 2 BPXOINIT TTY0 Jun 20 01:24 . drwxr-xr-x 5 BPXOINIT OEMVS 8192 Jun 20 01:22 .. # cd ade cd: ade: EDC5129I No such file or directory. # I am not able to locate anything in this directory. my master file configuration is . EDIT /SYSTEM/etc/auto.master Columns 1 00072 Command === Scroll === CSR ** * Top of Data ** 01 /u/ade_autofs /etc/ade_autofs ** Bottom of Data and map file config is EDIT /SYSTEM/etc/ade_autofs Columns 1 00072 Command === Scroll === CSR ** * Top of Data ** 01 name * 02 type NFS 03 filesystem shared.utility 04 mode rdwr 05 duration 15 06 delay 10 07 parm abcd:/utility,xlat(n),rsize(**8192),wsize(8192),proto(udp) 08 setuid no TSO mount command to mount NFS file system manually worked fine for me mount filesystem(ade) type(nfs) mountpoint('/u/ade_autofs') parm('abcd:/utility,xlat(n),**timeo(10),rsize(8192),wsize(** 8192),vers(2),proto(udp)') Can you please suggest, how can I test NFS client is in working condition and also not sure, why this is not able to automount this NFS file system Please suggest, If I have missed any steps. --**--**-- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Rmm extended dataset
Victor, If your volumes have only a single file/data set one each volume you can use the volume extract record ('V' - macro EDGRVEXT). If there are more data sets/files, you should use extended extract records ('X' - macro EDGRXEXT). Also if, 'volcnt' is supposed to be the number of volumes in the multi-volume set, you need X records, and to use XVVOLCNT field. RVUSE is the number of time a volume has been used - it equates to the number of times any data set on the volume has been opened. Look at the multi-volume, multi-data set report created by the Rexx reporting - REPORT11. And if you want something different but similar, start with EDGGR11 in the report generator. Mike Wood -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SMF volume - follow-up
On Fri, 22 Jun 2012 11:29:59 -0700, Edward Jaffe edja...@phoenixsoftware.com wrote: On 6/22/2012 7:00 AM, Mark Zelden wrote: Reminds me of a joke in the recording studio when doing a mix and to make everything louder than everything else. :-) Or when on-stage and everyone keeps turning up their volume... :-) That's why my amp goes to 11! :) Art -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Is there way to recover Global csi?
Well the best way I know to recover it would be from a backup tape.. William F. Fields, Jr. - Z/os Software services IBM GLOBAL SERVICES - Pool 3 Pod 1 services group 1505 Windward Concourse Cubicle 2C161-C Alpharetta, Ga 30005 Office phone: (770)-663-9542 Tieline: 564-9542 Email to: wffie...@us.ibm.com Pager 1-800-759- pin 1249438 Personal Cell 770-630-4159 Machines should work, People should think From: Ravi Kumar.C.Gowda rkcgowda1...@gmail.com To: IBM-MAIN@listserv.ua.edu Date: 06/25/2012 11:55 AM Subject:Is there way to recover Global csi? Sent by:IBM Mainframe Discussion List IBM-MAIN@listserv.ua.edu Hello Everyone! Is there a way to recover Global csi which was accidently or unknowingly deleted please? Appreciate a quick response from someone please.. Thanks well in advance -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Catalog Device Type Conversion
I know this must have been discussed in the past but a search of the archives has not turned up a definitive answer. We are working with a tape hardware migration solution that may end up with us needing to change the device type code in MVS catalog records for existing tape data sets. The data sets will not be recreated but the catalog device type codes may need to be updated to direct device allocation to use the new devices rather than the old devices for input data sets. The MVS catalog has never been my area of expertise so this raises a few questions. 1. What do we use for the catalog update? Are there any z/OS provided facilities to do this or does a custom solution need to be developed? Doing some searching has only turned up Dave Cartwright's ICF3490 program from the CBTTAPE File 172 which does direct catalog record updates. This could be adapted, but are there better techniques to get this update done? 2. Does anything need to be done, in the catalog records, for handling of an esoteric (that is, an esoteric used at data set creation time)? I'm not an allocation expert but from recent observations it seems to me that device selection for input tape data set allocation is somehow influenced by the creation esoteric and not just by the device type code. Is this true or was it just happenstance? 3. Are any changes necessary to a tape management system's TMC for a dynamically changed device type? Of the five TMS'es we support, I don't recall any of them doing anything device type dependent that would override or conflict with the MVS allocation selection, but if there is something to be concerned about here I'd like to know about it beforehand. Thanks for any input you may offer. Chuck Arney Arney Computer Systems -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
COBOL Object-Orientation Features: seeking redbook or digest
Can anyone point me to a Redbook or some similar resource which describes the current state of IBM COBOL support of object-orientation features? I haven't coded COBOL in forever (but have been debugging other people's code all that time). Would like to get _caught up_, not have to read through an entire reference which is 60% stuff I already know. --Phil Sevetson -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Catalog Device Type Conversion
There may be other considerations dependant on the device type moving from an to. But when we have gone to a newer drive that was backward compatible, the device type in the MVS catalog didn't get changed. The newer drives would read the older tapes with no change to the MVS catalog. CA-1 doesn't care about the MVS catalog in this regard. We moved from 3480 (18 track) to 3490E (36 track). Thank you and have a Terrific day! Jonathan Goossen, DTM ACT Mainframe Storage Group Personal: 651-361-4541 Department Support Line: 651-361- For help with communication and leadership skills checkout Woodwinds Toastmasters. IBM Mainframe Discussion List IBM-MAIN@listserv.ua.edu wrote on 06/25/2012 12:41:46 PM: From: Chuck Arney ch...@arneycomputer.com To: IBM-MAIN@listserv.ua.edu Date: 06/25/2012 12:43 PM Subject: Catalog Device Type Conversion Sent by: IBM Mainframe Discussion List IBM-MAIN@listserv.ua.edu I know this must have been discussed in the past but a search of the archives has not turned up a definitive answer. We are working with a tape hardware migration solution that may end up with us needing to change the device type code in MVS catalog records for existing tape data sets. The data sets will not be recreated but the catalog device type codes may need to be updated to direct device allocation to use the new devices rather than the old devices for input data sets. The MVS catalog has never been my area of expertise so this raises a few questions. 1. What do we use for the catalog update? Are there any z/OS provided facilities to do this or does a custom solution need to be developed? Doing some searching has only turned up Dave Cartwright's ICF3490 program from the CBTTAPE File 172 which does direct catalog record updates. This could be adapted, but are there better techniques to get this update done? 2. Does anything need to be done, in the catalog records, for handling of an esoteric (that is, an esoteric used at data set creation time)? I'm not an allocation expert but from recent observations it seems to me that device selection for input tape data set allocation is somehow influenced by the creation esoteric and not just by the device type code. Is this true or was it just happenstance? 3. Are any changes necessary to a tape management system's TMC for a dynamically changed device type? Of the five TMS'es we support, I don't recall any of them doing anything device type dependent that would override or conflict with the MVS allocation selection, but if there is something to be concerned about here I'd like to know about it beforehand. Thanks for any input you may offer. Chuck Arney Arney Computer Systems -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN This e-mail message and all attachments transmitted with it may contain legally privileged and/or confidential information intended solely for the use of the addressee(s). If the reader of this message is not the intended recipient, you are hereby notified that any reading, dissemination, distribution, copying, forwarding or other use of this message or its attachments is strictly prohibited. If you have received this message in error, please notify the sender immediately and delete this message and all copies and backups thereof. Thank you. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
WSCON/FILEXFER problems
I've got a set of execs http://www.cbttape.org/ftp/cbt/CBT769.zip that convert legacy languages into fancy HTML and optionally transfer the result of the conversion to a PC and start a browser. Recently someone told me that this latter functionality is broken, and after some investigation it seems that the old method of connecting to the WSA, i.e. ispexec select pgm(ispwscd) parm(wscon,panel) no longer works, although looking at the ISPCMDS command table, this is exactly the action for the WSCON verb. The new method, skeleton X3 tells me to use ispexec wscon ip(ipaddr) title(title) codepage(1140) ||, charset(0695) noguidsp panel(onerror) with ipaddr and title containing an IP address and a string of max 64 characters. When I tried this in a simple exec, i.e. /* REXX */ h = 'prino.#s0c7.exec.html' w = 'd:\#s0c7.exec.html' /* Will start Firefox on doze */ connected = 0 was_connected = 0 /* Is user already connected to workstation? */ ispexec vget (zwscon) shared if rc = 8 |, zwscon = '' then do was_connected = 0 /* Start connection and check that we're really connected */ ip= '192.168.1.2' title = 'Prino' ispexec wscon ip(ip) title(title) codepage(1140) ||, charset(0695) noguidsp panel(onerror) if rc = 0 then connected = 1 end else do connected = 1 was_connected = 1 end /* Issue message if still no connection exists */ if connected = 0 then ispexec setmsg msg(ispp605) else do ispexec filexfer host(h) ws(w) to(ws) text ispexec select wscmd(w) modeless min invis /* Only close connection to the workstation if it hadn't been estabished before this exec */ if was_connected = 0 then ispexec wsdiscon end the code works flawlessly, but when I put the following code replacement code inside EHISUPP (from the above archive on the CBT Tape site), /*** * XFER_AND_SHOW_HTML: * * * * Transfer the html file to the PC via ISPF Workstation Agent and * * start the application associated with extension .html* ***/ xfer_and_show_html: parse value data with sep ',' dir_pc (sep), htmlfile (sep), odsn (sep), start_browser /* * Format the name of the html file for PC* */ if right(dir_pc, 2) \= ':\' then dir_pc = strip(dir_pc, 'T', '/') || '/' w = dir_pc || htmlfile connected = 0 was_connected = 0 /* * Is user already connected to workstation? * */ ispexec vget (zwscon) shared if rc = 8 |, zwscon = '' then do was_connected = 0 /* * Start connection and check that we're really connected * */ title = strip(left(htmlfile, 64)) ip = '192.168.1.2' /* Use your own IP address */ ispexec wscon ip(ip) ||, title(title)||, codepage(1140) ||, charset(0695) ||, noguidsp||, /* panel(yes) /* OK */ panel(no) /* RC = 8 */ */ panel(onerror) /* RC = 8 */ if rc = 0 then connected = 1 end else do connected = 1 was_connected = 1 end /* * Issue message if still no connection exists* */ if connected = 0 then ispexec setmsg msg(ispp605) else do h = odsn /* * Put filenames in the ISPF pool transfer file to PC * */ ispexec filexfer host(h) ws(w) to(ws) text /* * and optionally start the corresponding browser * */ if translate(left(start_browser, 1)) = 'Y' then ispexec select wscmd(w) modeless min invis
Re: HMC EoR SWITCH (mail settings test)
Both looked fine to me, but the replies get excessively flowed by the replier's client. But, then I use an actual email client, none of this web nonsense :) Dave Gibney Information Technology Services Washington State University -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf Of R.S. Sent: Monday, June 25, 2012 5:28 AM To: IBM-MAIN@listserv.ua.edu Subject: Re: HMC EoR SWITCH (mail settings test) I did reply previously, so the this reply should not be different. However I'm doing it now. BTW: I received off-list answer, that the change did NOT help. So one gmail user haven't noticed any change, the second have noticed. I really have no idea... Again, very long test sentence a b c d e f g h i j k l m n o p q r s t u v w x y z aaa bbb ccc ddd eee fff ggg hhh iii jjj kkk lll mmm nnn ooo ppp rrr sss ttt uuu vvv xxx yyy zzz. -- Radoslaw Skorupka Lodz, Poland W dniu 2012-06-25 13:37, Steve Horein pisze: Replying via gmail for Android phones (which forces top posting to the best of my knowledge)... Looks good here! However, the flow usually happens during replies which include the original message. Would you care to reply to this as another test? On Jun 25, 2012 4:20 AM, R.S. r.skoru...@bremultibank.com.pl wrote: I'm sorry for inconvenience, this is the only way to test mail client settings + gmail + listserv. I just changed my client setting mailnews.send_plaintext_flowed = false Previously I have the above set to true, which is default. Any gmail client users are welcome to send me if it helped. Is the message displayed correctly? I think it's better to send the answer off-list to reduce the noise. BTW: I'm not sure whether changing from format=flowed is really good idea, any commenst on that are welcome also. This is very long statement, it is s long just to be flowed in mail program window, I don't know to to type, so I type anything, please take care about the format, not the content. Regards Radoslaw Skorupka Lodz, Poland W dniu 2012-06-20 09:59, R.S. pisze: W dniu 2012-06-20 09:36, Jake anderson pisze: Radoslaw, Could you please send your email in a easily readable format. Its just my Humble Request :) I wish I would. It was discussed here on the forum, as well off-list. The problem occurs ONLY with GMAIL account (and AFAIR it has to be reply, not start of thread). And it regards only the messages sent to listerver. When I send the message directly to GMAIL account the problem does not occur. My email client - Thunderbird is set correctly and the problem is on GMAIL side. THE ABOVE IS OPINION OF SOME FOLKS ON THE LIST, not mine. I can say I use the same client for years and do not play with the settings. However I would be happy to fix the problem (neverming whether it's GMAIL fault), but ...how? What should I change? tej wiadomo ci mo e zawiera informacje prawnie chronione Banku przeznaczone wy cznie do u ytku s bowego adresata. Odbiorc e by jedynie jej adresat z wy czeniem dost pu os b trzecich. Je eli nie jeste adresatem niniejszej wiadomo ci lub pracownikiem upowa nionym do jej przekazania adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie lub inne dzia anie o podobnym charakterze jest prawnie zabronione i mo e by karalne. Je eli otrzyma wiadomo omy kowo, prosimy niezw ocznie zawiadomi nadawc wysy c odpowied oraz trwale usun wiadomo czaj c w to wszelkie jej kopie wydrukowane lub zapisane na dysku. This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax +48 (22) 829 00 33, www.brebank.pl, e-mail: i...@brebank.pl d Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru S dowego, nr rejestru przedsi biorc w KRS 025237, NIP: 526-021-50-88. ug stanu na dzie 01.01.2012 r. kapita zak adowy BRE Banku SA (w ca ci wp acony) wynosi 168.410.984 z otych. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN