CA IDMS IUA EIUA

Expand all | Collapse all

a dilemma (my lack of ADS exposed again)

  • 1.  a dilemma (my lack of ADS exposed again)

    Posted 07-25-2008 08:33 AM
    our developers have asked us to create a clone database (a collection of
    10
    segments) within the same development CV as the original (this will
    never
    be done in prod).

    the caveat - they want to be able to execute all programs against either
    database with no program changes. For batch - no problem - sysidms to
    the
    rescue - but CICS is a problem

    from a CICS menu - the app jumps into the CV and executes a ADS/A user
    menu. We can determine from what CICS the jump came from - we could move
    something to DB-NAME in the premap and response of the user menu dialog
    -
    however - since the user menu does no DML - no bind takes place and no
    dbname is set

    does an execute next function extend a run unit - or at least preserve
    the
    dbname (of it did - i would put SOME dml in the user menu to force a
    bind)?
    is there any other way to preserve the dbname across sibling dialogs
    within
    an ADS/A structure? or is an exit the way to go?

    any thoughts would be greatly appreciated





    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.
    "
    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: a dilemma (my lack of ADS exposed again)
    "Chris

    Why can't you set the dbname in ads by issuing the DCUF command by
    calling the program, the dbname is stay set until something changes it
    just like the dictname does when you set it by doing a DCUF SET DICTNAME


    Dennis Robock
    Alberta Department of Energy
    Canada


  • 2.  Re:a dilemma (my lack of ADS exposed again)

    Posted 07-25-2008 08:33 AM
    our developers have asked us to create a clone database (a collection of
    10
    segments) within the same development CV as the original (this will
    never
    be done in prod).

    the caveat - they want to be able to execute all programs against either
    database with no program changes. For batch - no problem - sysidms to
    the
    rescue - but CICS is a problem

    from a CICS menu - the app jumps into the CV and executes a ADS/A user
    menu. We can determine from what CICS the jump came from - we could move
    something to DB-NAME in the premap and response of the user menu dialog
    -
    however - since the user menu does no DML - no bind takes place and no
    dbname is set

    does an execute next function extend a run unit - or at least preserve
    the
    dbname (of it did - i would put SOME dml in the user menu to force a
    bind)?
    is there any other way to preserve the dbname across sibling dialogs
    within
    an ADS/A structure? or is an exit the way to go?

    any thoughts would be greatly appreciated





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








    Normal

    Normal
    Re: a dilemma (my lack of ADS exposed again)
    "There are a number of possibilities here - some of which have some
    subtleties that you need to watch out for.

    1) The DCUF solution works if you do the DCUF in a ""front-end"" mainline
    dialog that then does a ""LEAVE ADS NEXT TASK 'task-code'"" - where the
    task-code is the correct task code for the desired application. The
    reason for this is that when ADSORUN1 fires up it picks up the current
    DBNAME for the User Profile as it currently sits either after signon and
    User Profile setting takes place, or as the result of user session
    tailoring (for example using DCUF). Whichever way the DBNAME in the User
    Attribute Block has been set - it is preserved in the ADS system
    variable DB-NAME - so a DCUF once in the application is of little value.

    2) Since your menu function does no DML and so no bind run unit /
    currency save processing takes place - you can do a ""MOVE desired-dbname
    TO DB-NAME."" ADS statement to set the ADS system variable DB-NAME that
    will be used when you do eventually bind the first run unit in the
    application thread.

    3) If the Users who will be running against the particular physical
    instance should only ever use that physical instance (that is for this
    current period of development/testing they should only be using one copy
    or another) then in the User Profile for these users you can code
    ""DBNAME = 'desired-dbname' OVERRIDE NO"" - this will force the online
    users to only use the desired copy of the database - this would be my
    preferred solution if it's the case that some users should only use one
    instance and other users a 2nd (or 3rd, etc) instance of the database.
    We have some Exit 14 code to enforce this restriction when SYSIDMS is
    used to specify DBNAME=desired-dbname so that whether in batch or online
    the users are effectively ""fenced"" into one physical instance of a
    database or another.

    HTH - cheers - Gary


    Gary Cherlet
    Justice Technology Services
    Department of Justice, SA Government
    Telephone +61 (0)8 8226 5199
    Facsimile +61 (0)8 8226 5311
    Mobile +61 (0)41 333 1613
    MailTo:cherlet.gary@saugov.sa.gov.au

    This e-mail message and any attachments are qualified as follows:
    Addressing: If you have received this e-mail in error, please advise by
    reply e-mail to the sender. Please also destroy the original
    transmission and its contents. Confidentiality: This e-mail may contain
    confidential information which also may be legally privileged. Only the
    intended recipient(s) may access, use, distribute or copy this e-mail.
    Individual Views: Unless otherwise indicated, the views expressed are
    those of the sender, not Justice Technology Services. Computer Viruses:
    It is the recipient's responsibility to check the e-mail and any
    attached files for viruses.


  • 3.  Re:a dilemma (my lack of ADS exposed again)

    Posted 07-25-2008 08:33 AM
    our developers have asked us to create a clone database (a collection of
    10
    segments) within the same development CV as the original (this will
    never
    be done in prod).

    the caveat - they want to be able to execute all programs against either
    database with no program changes. For batch - no problem - sysidms to
    the
    rescue - but CICS is a problem

    from a CICS menu - the app jumps into the CV and executes a ADS/A user
    menu. We can determine from what CICS the jump came from - we could move
    something to DB-NAME in the premap and response of the user menu dialog
    -
    however - since the user menu does no DML - no bind takes place and no
    dbname is set

    does an execute next function extend a run unit - or at least preserve
    the
    dbname (of it did - i would put SOME dml in the user menu to force a
    bind)?
    is there any other way to preserve the dbname across sibling dialogs
    within
    an ADS/A structure? or is an exit the way to go?

    any thoughts would be greatly appreciated





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








    Normal

    Normal
    Re: a dilemma (my lack of ADS exposed again)
    "--0__=0ABBFE02DFFB31318f9e8a93df938690918c0ABBFE02DFFB3131
    Content-type: text/plain; charset=US-ASCII
    Content-transfer-encoding: quoted-printable


    I will give that a try!


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





    =20
    Dennis Robock =20
    <Dennis.Robock@GO =20
    V.AB.CA> T=
    o
    Sent by: IDMS IDMSVENDOR-L@LISTSERV.IUASSN.COM
    3rd-party c=
    c
    providers forum =20
    <IDMSVENDOR-L@LIS Subjec=
    t
    TSERV.IUASSN.COM> Re: [IDMSVENDOR-L] a dilemma (my
    lack of ADS exposed again) =20
    =20
    07/25/2008 02:58 =20
    PM =20
    =20
    =20
    Please respond to =20
    IDMS Public =20
    Discussion Forum =20
    <IDMS-L@LISTSERV. =20
    IUASSN.COM> =20
    =20
    =20




    Chris=3D20

    Why can't you set the dbname in ads by issuing the DCUF command by
    calling the program, the dbname is stay set until something changes it
    just like the dictname does when you set it by doing a DCUF SET DICTNAME


    Dennis Robock
    Alberta Department of Energy
    Canada


  • 4.  Re:a dilemma (my lack of ADS exposed again)

    Posted 07-25-2008 08:33 AM
    our developers have asked us to create a clone database (a collection of
    10
    segments) within the same development CV as the original (this will
    never be done in prod).

    the caveat - they want to be able to execute all programs against either
    database with no program changes. For batch - no problem - sysidms to
    the rescue - but CICS is a problem

    from a CICS menu - the app jumps into the CV and executes a ADS/A user
    menu. We can determine from what CICS the jump came from - we could move
    something to DB-NAME in the premap and response of the user menu dialog
    -
    however - since the user menu does no DML - no bind takes place and no
    dbname is set

    does an execute next function extend a run unit - or at least preserve
    the dbname (of it did - i would put SOME dml in the user menu to force a
    bind)?
    is there any other way to preserve the dbname across sibling dialogs
    within an ADS/A structure? or is an exit the way to go?

    any thoughts would be greatly appreciated





    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.
    "
    IDMS 3rd-party providers forum
    IDMSVENDOR-L@LISTSERV.IUASSN.COM
    SMTP
    IDMSVENDOR-L@LISTSERV.IUASSN.COM
    IDMSVENDOR-L@LISTSERV.IUASSN.COM
    SMTP








    Normal

    Normal
    ADSO Materials
    "Hello.

    It would be a great help if some one can send me in this list can some ADSO materials for learning



    Thanks,

    Rajeev V
    "
    IDMS Public Discussion Forum
    IDMS-L@LISTSERV.IUASSN.COM
    SMTP
    IDMS-L@LISTSERV.IUASSN.COM
    IDMS-L@LISTSERV.IUASSN.COM
    SMTP








    Normal

    Normal
    ADSO Materials
    "Hello.

    It would be a great help if some one can send me in this list can some =
    ADSO materials for learning

    =20

    Thanks,

    Rajeev V
    "
    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: ADSO Materials
    "Rajeev,

    Training materials for ADS are generally written by companies who sell
    education services. These materials are protected from copying and
    distributing by copyright laws and cannot be sent without written permission
    from the author. Just like any published material. CA supplies to its
    customers User Guides and Reference material for ADS and those can be used
    to learn ADS. Additionally, the IUA has past copies of Connections on the
    website and they contain some material about ADS.

    Linda J. Casey, PMP
    Managing Member
    Run Right, LLC


  • 5.  Re:a dilemma (my lack of ADS exposed again)

    Posted 07-25-2008 08:33 AM
    our developers have asked us to create a clone database (a collection of
    10
    segments) within the same development CV as the original (this will
    never be done in prod).

    the caveat - they want to be able to execute all programs against either
    database with no program changes. For batch - no problem - sysidms to
    the rescue - but CICS is a problem

    from a CICS menu - the app jumps into the CV and executes a ADS/A user
    menu. We can determine from what CICS the jump came from - we could move
    something to DB-NAME in the premap and response of the user menu dialog
    -
    however - since the user menu does no DML - no bind takes place and no
    dbname is set

    does an execute next function extend a run unit - or at least preserve
    the dbname (of it did - i would put SOME dml in the user menu to force a
    bind)?
    is there any other way to preserve the dbname across sibling dialogs
    within an ADS/A structure? or is an exit the way to go?

    any thoughts would be greatly appreciated





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








    Normal

    Normal
    Re: a dilemma (my lack of ADS exposed again)
    "There are a number of possibilities here - some of which have some
    subtleties that you need to watch out for.

    1) The DCUF solution works if you do the DCUF in a ""front-end"" mainline
    dialog that then does a ""LEAVE ADS NEXT TASK 'task-code'"" - where the
    task-code is the correct task code for the desired application. The
    reason for this is that when ADSORUN1 fires up it picks up the current
    DBNAME for the User Profile as it currently sits either after signon and
    User Profile setting takes place, or as the result of user session
    tailoring (for example using DCUF). Whichever way the DBNAME in the User
    Attribute Block has been set - it is preserved in the ADS system
    variable DB-NAME - so a DCUF once in the application is of little value.

    2) Since your menu function does no DML and so no bind run unit /
    currency save processing takes place - you can do a ""MOVE desired-dbname
    TO DB-NAME."" ADS statement to set the ADS system variable DB-NAME that
    will be used when you do eventually bind the first run unit in the
    application thread.

    3) If the Users who will be running against the particular physical
    instance should only ever use that physical instance (that is for this
    current period of development/testing they should only be using one copy
    or another) then in the User Profile for these users you can code
    ""DBNAME =3D 'desired-dbname' OVERRIDE NO"" - this will force the online
    users to only use the desired copy of the database - this would be my
    preferred solution if it's the case that some users should only use one
    instance and other users a 2nd (or 3rd, etc) instance of the database.
    We have some Exit 14 code to enforce this restriction when SYSIDMS is
    used to specify DBNAME=3Ddesired-dbname so that whether in batch or =
    online
    the users are effectively ""fenced"" into one physical instance of a
    database or another.

    HTH - cheers - Gary=20


    Gary Cherlet
    Justice Technology Services
    Department of Justice, SA Government
    Telephone +61 (0)8 8226 5199
    Facsimile +61 (0)8 8226 5311
    Mobile +61 (0)41 333 1613
    MailTo:cherlet.gary@saugov.sa.gov.au

    This e-mail message and any attachments are qualified as follows:
    Addressing: If you have received this e-mail in error, please advise by
    reply e-mail to the sender. Please also destroy the original
    transmission and its contents. Confidentiality: This e-mail may contain
    confidential information which also may be legally privileged. Only the
    intended recipient(s) may access, use, distribute or copy this e-mail.
    Individual Views: Unless otherwise indicated, the views expressed are
    those of the sender, not Justice Technology Services. Computer Viruses:
    It is the recipient's responsibility to check the e-mail and any
    attached files for viruses.


  • 6.  Re:a dilemma (my lack of ADS exposed again)

    Posted 07-25-2008 08:33 AM
    our developers have asked us to create a clone database (a collection of
    10
    segments) within the same development CV as the original (this will
    never
    be done in prod).

    the caveat - they want to be able to execute all programs against either
    database with no program changes. For batch - no problem - sysidms to
    the
    rescue - but CICS is a problem

    from a CICS menu - the app jumps into the CV and executes a ADS/A user
    menu. We can determine from what CICS the jump came from - we could move
    something to DB-NAME in the premap and response of the user menu dialog
    -
    however - since the user menu does no DML - no bind takes place and no
    dbname is set

    does an execute next function extend a run unit - or at least preserve
    the
    dbname (of it did - i would put SOME dml in the user menu to force a
    bind)?
    is there any other way to preserve the dbname across sibling dialogs
    within
    an ADS/A structure? or is an exit the way to go?

    any thoughts would be greatly appreciated





    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 rece=
    ive this material/information in error, please contact the sender and del=
    ete or destroy the material/information.


    --0__=0ABBFE02DFFB31318f9e8a93df938690918c0ABBFE02DFFB3131
    Content-type: image/gif;
    name=""graycol.gif""
    Content-Disposition: inline; filename=""graycol.gif""
    Content-ID: <10__=0ABBFE02DFFB31318f9e8a93df938@humana.com>
    Content-transfer-encoding: base64

    R0lGODlhEAAQAKECAMzMzAAAAP///wAAACH5BAEAAAIALAAAAAAQABAAAAIXlI+py+0PopwxUbpu
    ZRfKZ2zgSJbmSRYAIf4fT3B0aW1pemVkIGJ5IFVsZWFkIFNtYXJ0U2F2ZXIhAAA7

    --0__=0ABBFE02DFFB31318f9e8a93df938690918c0ABBFE02DFFB3131
    Content-type: image/gif;
    name=""pic20253.gif""
    Content-Disposition: inline; filename=""pic20253.gif""
    Content-ID: <20__=0ABBFE02DFFB31318f9e8a93df938@humana.com>
    Content-transfer-encoding: base64

    R0lGODlhWABDALP/AAAAAK04Qf79/o+Gm7WuwlNObwoJFCsoSMDAwGFsmIuezf///wAAAAAAAAAA
    AAAAACH5BAEAAAgALAAAAABYAEMAQAT/EMlJq704682770RiFMRinqggEUNSHIchG0BCfHhOjAuh
    EDeUqTASLCbBhQrhG7xis2j0lssNDopE4jfIJhDaggI8YB1sZeZgLVA9YVCpnGagVjV171aRVrYR
    RghXcAGFhoUETwYxcXNyADJ3GlcSKGAwLwllVC1vjIUHBWsFilKQdI8GA5IcpApeJQt8L09lmgkH
    LZikoU5wjqcyAMMFrJIDPAKvCFletKSev1HBw8KrxtjZ2tvc3d5VyKtCKW3jfz4uMKmq3xu4N0nK
    BVoJQmx2LGVOmrqNjjJf2hHAQo/eDwJGTKhQMcgQEEAnEjFS98+RnW3smGkZU6ncCWav/4wYOnAI
    TihRL/4FEwbp28BXMMcoscQCVxlepL4IGDSCyJyVQOu0o7CjmLN50OZlqWmyFy5/6yBBuji0AxFR
    M00oQAqNIstqI6qKHUsWRAEAvagsmfUEAImyxgbmUpJk3IklNUtJOUAVLoUr1+wqDGTE4zk+T6FG
    uQb3SizBCwatiiUgCBN8vrz+zFjVyQ8FWkOlg4NQiZMB5QS8QO3mpOaKnL0Z2EKvNMSILEThKhCg
    zMKPVxYJh23qm9KNW7pArPynMqZDiErsTMqI+LRi3QAgkFUbXpuFKhSYZALd0O5RKa2z9EYKBbpb
    qxIKsjUPRgD7I2XYV6wyrOw92ykExP8NW4URhknC5dKGE4v4NENQj2jXjmfNgOZDaXb5glRmXQ33
    YEWQYNcZFnrYcIQLNzyTFDQNkXIff0ExVlY4srziQk43inZgL4rwxxINMvpFFAz1KOODHiu+4aEw
    NEjFl5B3JIKWKF3k6I9bfUGp5ZZcdunll5IA4cuHvQQJ5gcsoCWOOUwgltIwAKRxJgbIkJAQZEq0
    2YliZnpZZ4BH3CnYOXldOUOfQoYDqF1LFHbXCrO8xmRsfoXDXJ6ChjCAH3QlhJcT6VWE6FCkfCco
    CgrMFsROrIEX3o2whVjWDjoJccN3LdggSGXLCdLEgHr1lyU3O3QxhgohNKXJCWv8JQr/PDdaqd6w
    2rj1inLiGeiCJoDspAoQlYE6QWLSECehcWIYxIQES6zhbn1iImTHEQyqJ4eIxJJoUBc+3CbBuwZE
    V5cJPPkIjFDdeEabQbd6WgICTxiiz0f5dBKquXF6k4senwEhYGnKEFJeGrxUZy8dB8gmAXI/sPvH
    ESfCwVt5hTgYiqQqtdRNHQIU1PJ33ZqmzgE90OwLaoJcnMop1WiMmgkPHQRIrwgFuNV90A3doNKT
    mrKIN07AnGcI9BQjhCBN4RfA1qIZnMqorJCogKfGQnxSCDilTVIA0yl5ciTovgLuBDKFUDE9aQcw
    9SA+rjSNf9/M1gxrj6VwDTS0IUSElMzBfsj0NFXR2kwsV1A5IF1grLgLL/r1R40BZEnuBWgmQEyb
    jqRwSAt6bqMCOFkvKFN2GPPkUzIm/SCF8z8pVzpbjVnMsy0vOr1hw3SaSRUhpY09v0z0J1FnwzPl
    fmh+xl4WtR0zGu24I4KbMQm3lnVu2oNWxI9W/lcyzA+mCKF4DBikxb/+UWtOGRiFP8qEwAayIgIA
    Ow==

    --0__=0ABBFE02DFFB31318f9e8a93df938690918c0ABBFE02DFFB3131
    Content-type: image/gif;
    name=""ecblank.gif""
    Content-Disposition: inline; filename=""ecblank.gif""
    Content-ID: :love:0__=0ABBFE02DFFB31318f9e8a93df938@humana.com>
    Content-transfer-encoding: base64

    R0lGODlhEAABAIAAAAAAAP///yH5BAEAAAEALAAAAAAQAAEAAAIEjI8ZBQA7

    --0__=0ABBFE02DFFB31318f9e8a93df938690918c0ABBFE02DFFB3131--
    "
    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] a dilemma (my lack of ADS exposed again)
    "
    I will give that a try!


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






    Dennis Robock
    <Dennis.Robock@GO
    V.AB.CA> To
    Sent by: IDMS IDMSVENDOR-L@LISTSERV.IUASSN.COM
    3rd-party cc
    providers forum
    <IDMSVENDOR-L@LIS Subject
    TSERV.IUASSN.COM> Re: [IDMSVENDOR-L] a dilemma (my
    lack of ADS exposed again)

    07/25/2008 02:58
    PM


    Please respond to
    IDMS Public
    Discussion Forum
    <IDMS-L@LISTSERV.
    IUASSN.COM>






    Chris=20

    Why can't you set the dbname in ads by issuing the DCUF command by
    calling the program, the dbname is stay set until something changes it
    just like the dictname does when you set it by doing a DCUF SET DICTNAME


    Dennis Robock
    Alberta Department of Energy
    Canada


  • 7.  Re: a dilemma (my lack of ADS exposed again)

    Posted 07-26-2008 12:29 AM
    Chris

    Why can't you set the dbname in ads by issuing the DCUF command by
    calling the program, the dbname is stay set until something changes it
    just like the dictname does when you set it by doing a DCUF SET DICTNAME


    Dennis Robock
    Alberta Department of Energy
    Canada


  • 8.  Re:Re: a dilemma (my lack of ADS exposed again)

    Posted 07-26-2008 12:29 AM
    Chris=20

    Why can't you set the dbname in ads by issuing the DCUF command by
    calling the program, the dbname is stay set until something changes it
    just like the dictname does when you set it by doing a DCUF SET DICTNAME


    Dennis Robock
    Alberta Department of Energy
    Canada