Rmm extended dataset

2012-06-25 Thread Victor Zhang
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

2012-06-25 Thread Miklos Szigetvari

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?

2012-06-25 Thread Dale Miller
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

2012-06-25 Thread Ron Hawkins
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

2012-06-25 Thread saurabh khandelwal
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

2012-06-25 Thread R.S.
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.

2012-06-25 Thread Vernooij, CP - SPLXM
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.

2012-06-25 Thread Staller, Allan
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?

2012-06-25 Thread Binyamin Dissen
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

2012-06-25 Thread Miklos Szigetvari

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

2012-06-25 Thread Mike Wood
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

2012-06-25 Thread Art Gutowski
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?

2012-06-25 Thread William Fields Jr
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

2012-06-25 Thread Chuck Arney
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

2012-06-25 Thread Sevetson, Phil
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

2012-06-25 Thread Jonathan Goossen
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

2012-06-25 Thread Robert Prins
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)

2012-06-25 Thread Gibney, Dave
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