Looking for SUBSCHEMA-RECNAMES

[ca.portal.admin]

Hi all,
=20
We have a number of DC-COBOL programs that include in their Working
Storage section lines such as COPY IDMS SUBSCHEMA-RECNAMES or COPY IDMS
SUBSCHEMA-SSNAME
=20
The DMLC pre-compiler expands these quite happily, so obviously they
exist in some dictionary. However, I cannot find them using IDD or
IDMSDDDL DIS REC SUBSCHEMA-RECNAMES V HIGH. I have searched all of the
usual places: our default secondary dictionary, SYSDIRL, APPLDICT,
SYSTEM.
=20
Does anybody have any idea where these puppies are hiding?
=20
Thanks,
=20
Jim Ritterbusch
Database Administrator
GE Capital
83 Wooster Heights Rd
5th Floor South
Danbury, CT 06810
T [phone]
=20
=20
"
IDMS 3rd-party providers forum
[e-mail]
SMTP
[e-mail]
[e-mail]
SMTP








Normal

Normal
Re: Looking for SUBSCHEMA-RECNAMES
" There are no copy members stored in IDD. The spec is resolved at
pre-compile time. The pre-compiler scans the subschema and generates
the copy member for each record that is found in the subschema.

[ca.portal.admin]

Hi all,

We have a number of DC-COBOL programs that include in their Working Storage section lines such as COPY IDMS SUBSCHEMA-RECNAMES or COPY IDMS SUBSCHEMA-SSNAME

The DMLC pre-compiler expands these quite happily, so obviously they exist in some dictionary. However, I cannot find them using IDD or IDMSDDDL DIS REC SUBSCHEMA-RECNAMES V HIGH. I have searched all of the usual places: our default secondary dictionary, SYSDIRL, APPLDICT, SYSTEM.

Does anybody have any idea where these puppies are hiding?

Thanks,

Jim Ritterbusch
Database Administrator
GE Capital
83 Wooster Heights Rd
5th Floor South
Danbury, CT 06810
T [phone]
"
IDMS 3rd-party providers forum
[e-mail]
SMTP
[e-mail]
[e-mail]
SMTP








Normal

Normal
Re: Looking for SUBSCHEMA-RECNAMES
"Yes, not sure why this person wants the subschema recnames. But if they want it dynamically it can be done in assembler by loading the subschema load module into memory. Then simply get addressability to the IB50 control block and then walk all of the attached SR51 control blocks (the field FISRBN will be equal to the address of the IB50 when you are done). If they need help you can email privately at [e-mail].

Dan Miley
Lockheed Martin

[ca.portal.admin]

Hi all,

We have a number of DC-COBOL programs that include in their Working
Storage section lines such as COPY IDMS SUBSCHEMA-RECNAMES or COPY IDMS
SUBSCHEMA-SSNAME

The DMLC pre-compiler expands these quite happily, so obviously they
exist in some dictionary. However, I cannot find them using IDD or
IDMSDDDL DIS REC SUBSCHEMA-RECNAMES V HIGH. I have searched all of the
usual places: our default secondary dictionary, SYSDIRL, APPLDICT,
SYSTEM.

Does anybody have any idea where these puppies are hiding?

Thanks,

Jim Ritterbusch
Database Administrator
GE Capital
83 Wooster Heights Rd
5th Floor South
Danbury, CT 06810
T [phone]


"
IDMS Public Discussion Forum
[e-mail]
SMTP
[e-mail]
[e-mail]
SMTP








Normal

Normal
Re: [IDMSVENDOR-L] Looking for SUBSCHEMA-RECNAMES
"i think they are dynamically created at pre-compiler time based on the
subschema specified - since each subschema would have its own set of
record names - each subschema (i dont think) could physically have the
same named ""subschema-recnames""



Chris Hoelscher
Senior IDMS & DB2 Database Administrator
Humana Inc
502-476-2538
[e-mail]

you only need to test the programs that you want to work correctly






From:
""Ritterbusch, James (GE Capital)"" <[e-mail]>
To:
[e-mail]
Date:
10/02/2009 01:40 PM
Subject:
[IDMSVENDOR-L] Looking for SUBSCHEMA-RECNAMES
Sent by:
IDMS 3rd-party providers forum <[e-mail]>



Hi all,
=20
We have a number of DC-COBOL programs that include in their Working
Storage section lines such as
COPY IDMS SUBSCHEMA-RECNAMES
or
COPY IDMS SUBSCHEMA-SSNAME
=20
The DMLC pre-compiler expands these quite happily, so obviously they
exist in some dictionary. However, I cannot find them using IDD or
IDMSDDDL DIS REC SUBSCHEMA-RECNAMES V HIGH. I have searched all of the
usual places: our default secondary dictionary, SYSDIRL, APPLDICT,
SYSTEM.
=20
Does anybody have any idea where these puppies are hiding?
=20
Thanks,
=20
Jim Ritterbusch
Database Administrator
GE Capital
83 Wooster Heights Rd
5th Floor South
Danbury, CT 06810
T [phone]
=20
=20



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 Public Discussion Forum
[e-mail]
SMTP
[e-mail]
[e-mail]
SMTP








Normal

Normal
Re: Looking for SUBSCHEMA-RECNAMES
"Yes, not sure why this person wants the subschema recnames. But if they want it dynamically it can be done in assembler by loading the subschema load module into memory. Then simply get addressability to the IB50 control block and then walk all of the attached SR51 control blocks (the field FISRBN will be equal to the address of the IB50 when you are done). If they need help you can email privately at [e-mail].

Dan Miley
Lockheed Martin