CA IDMS IUA EIUA

Expand all | Collapse all

Looking for SUBSCHEMA-RECNAMES

  • 1.  Looking for SUBSCHEMA-RECNAMES

    Posted 10-02-2009 07:37 AM
    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 (203) 546 4370
    =20
    =20
    "
    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: 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.


  • 2.  Re:Looking for SUBSCHEMA-RECNAMES

    Posted 10-02-2009 07:37 AM
    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 (203) 546 4370
    "
    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: 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 dan.l.miley@lmco.com.

    Dan Miley
    Lockheed Martin


  • 3.  Re:Looking for SUBSCHEMA-RECNAMES

    Posted 10-02-2009 07:37 AM
    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 (203) 546 4370


    "
    IDMS Public Discussion Forum
    IDMS-L@LISTSERV.IUASSN.COM
    SMTP
    IDMS-L@LISTSERV.IUASSN.COM
    IDMS-L@LISTSERV.IUASSN.COM
    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
    choelscher@humana.com

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






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



    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 (203) 546 4370
    =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
    IDMS-L@LISTSERV.IUASSN.COM
    SMTP
    IDMS-L@LISTSERV.IUASSN.COM
    IDMS-L@LISTSERV.IUASSN.COM
    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 dan.l.miley@lmco.com.

    Dan Miley
    Lockheed Martin