ca.portal.admin

Re:Re: [IDMSVENDOR-L] Retrieve lpar name from ADS dialog

Discussion created by ca.portal.admin on Jun 13, 2008
since i feel in a ""creative"" mood today - here is a solution that
requires NO assembler coding

1) create a new segment/area/schema/record/ssc called LPAR - one
area/one record type: LPAR/ 1 column:LPAR-NAME x(04)

2) include the segment in all IDMS environments (in read-only mode)

3) name the dataset something that conforms to your standards but has
the LPAR name as a standalone NODE (IDMS.PROD.LPAR1.NAME)

4) create clones of the dataset (1 for each additional LPAR) each with
the LPAR name in place of the 1st dataset(IDMS.PROD.LPAR2.NAME,
IDMS.PROD.LPAR3.NAME, etc)

4) then in the startup proc or jcl - hard code the DD for this file only
with &SYSNAME in place of the node that contains the LPAR name (LPARINFO
DD DSN=3DIDMS.PROD.&SYSNAME..NAME)

now - as a onetime seed - once in each LPAR - update the LPAR record
record type to populate the 1 record occurance with the correct LPAR
name (so each clone Dataset will have a different value within)


now --- write a a cobol (ADS?) startup task to read the database and put
the LPAR name in storage somewhere or in a perm queue


then - anytime you wish to determine the LPAR name - read the storage or
the queue


wow - now THAT was a waste of time .....


Chris Hoelscher
Senior IDMS & DB2 Database Administrator Humana Inc
502-476-2538
choelscher@humana.com



The information transmitted is intended only for the person or entity to
which it is addressed and may contain CONFIDENTIAL material. If you
receive this material/information in error, please contact the sender
and delete or destroy the material/information.


The information transmitted is intended only for the person or entity to
which it is addressed and may contain CONFIDENTIAL material. If you
receive this material/information in error, please contact the sender
and delete or destroy the material/information.
"
IDMS 3rd-party providers forum
IDMSVENDOR-L@LISTSERV.IUASSN.COM
SMTP
IDMSVENDOR-L@LISTSERV.IUASSN.COM
IDMSVENDOR-L@LISTSERV.IUASSN.COM
SMTP








Normal

Normal
Re: [IDMSVENDOR-L] Retrieve lpar name from ADS dialog
"Simply renumber the CVs.
HBCanon
Lockheed-Martin

Outcomes