Hi,
I am new in DFSMS, trying to do a validate against my SCDS, got a
warning msg
IGD06023I STORAGE GROUP ZFSCLASS IS NOT REFERENCED BY THE STORAGE GROUP
ACS ROUTINE
But in Storage Group ACS routine as below;
PROC STORGRP
Your validate seems to be indicating that this code is not actually part
of your translated routines.
I'd say that either -
1. This code was never actually translated to the SCDS that you are using
for this Validate .
2. Your code actually ends before this section. Take a close look at the
Starting with:
WHEN (HLQ = ZFS_HLQ) /* MANAGE MULTI VOLUME ZFS DATA SETS
It's all comment until the */ on the last line.
Dave Gibney
Information Technology Services
Washington State University
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu]
Good catch Dave.
I would like to add the following observation:
Why use a SELECT structure, and then use
DO
SET STORGRP = ''
EXIT
END
When you could code it more like this:
SELECT
WHEN (HLQ = HSM_HLQ) /* MANAGE MULTI VOLUME HFS DATA SETS */
SET STORGRP =
Right, and translation won't be successful. Therefore, it won't activate.
Greg Shirey
Ben E. Keith Company
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of
Gibney, Dave
Sent: Thursday, August 04, 2011 12:00 PM
To:
But in Storage Group ACS routine as below;
PROC STORGRP
/**
/
FILTLIST HSM_HLQ INCLUDE('HFS1')
FILTLIST ZFS_HLQ INCLUDE('ZFS')
FILTLIST HS1_HLQ INCLUDE('CICSTS1X')
I would like to add the following observation:
Why use a SELECT structure, and then use
DO
SET STORGRP = ''
EXIT
END
When you could code it more like this:
SELECT
WHEN (HLQ = HSM_HLQ) /* MANAGE MULTI VOLUME HFS DATA SETS */
SET STORGRP = 'HFSCLASS'
WHEN
My personal preference, for what it's worth, is to follow IBM's examples. They
appear to prevent re-assignments later by coding only one SELECT statement
and use EXIT only for errors. They also use indenting and commenting for
readability and understandability.
Greg Shirey
Ben E.
Ah, but I prefer to have a WRITE at the bottom of the routine to show what
was assigned every time the routine is executed, and EXIT statements prevent
you from having that.
On Thu, Aug 4, 2011 at 3:27 PM, Darth Keller darth.kel...@assurant.comwrote:
I would like to add the following
I just woke up in the morning, and found so many replies on this issue I
raised.
This is a wonderful forum list, I learn a lot from here, considered just
joined days ago.
Thank you to all the guys here. Much obliged.
Regards Lim ML
On 05/08/11 5:20 AM, Scott Rowe wrote:
Ah, but I prefer to
Hi Dave,
You hit the jackpot on this.
I got it resolved.
Thank you so much.
Regards Lim ML
On 05/08/11 12:59 AM, Gibney, Dave wrote:
Starting with:
WHEN (HLQ =ZFS_HLQ) /* MANAGE MULTI VOLUME ZFS DATA SETS
It's all comment until the */ on the last line.
Dave Gibney
Information Technology
11 matches
Mail list logo