ca.portal.admin

Re:DBNAME

Discussion created by ca.portal.admin on Nov 3, 2006
Does anyone have a code example of getting the DBNAME from the system? I
was thinking there was on option on the ACCEPT statement, but I can't
find it in the manuals.

I have an application that needs to know what DBNAME it is bound to. So
once again I am heading out to IDMS-L before I start writing from
scratch.

Thanks in advance.

Dan Hall
GE
Capital Solutions
Danbury, CT

T 513.217.5060
E dan.hall@ge.com
http://www.ge.com/capitalsolutions/
Notice of Confidentiality:
**This E-mail and any of its attachments may contain
Lincoln National Corporation proprietary information, which is privileged,
confidential, or subject to copyright belonging to the
Lincoln National Corporation family of companies. This E-mail is intended
solely for the use of the individual or entity to which it is addressed.
If you are not the intended recipient of this E-mail, you are hereby
notified that any dissemination, distribution, copying, or action taken
in relation to the contents of and attachments to this E-mail is strictly
prohibited and may be unlawful. If you have received this E-mail in error,
please notify the sender immediately and permanently delete the original
and any copy of this E-mail and any printout. Thank You.**
"
IDMS Public Discussion Forum
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP








Normal

Normal
Re: DBNAME
"We get the dbname this way in ADS, the task code and dbname are the
same;
MODULE SOURCE FOLLOWS
IF AGR-APPLICATION-NAME = 'testdbna'
DO.
MOVE 'testdbna' TO APPLIC-NAME.
MOVE 'testdbna' TO DB-NAME.
MOVE ' MAIN MENU UNCLASSIFED SYSTEM '
TO APPLIC-NAME1.
END.


MOVE 'INFORMATION MANAGEMENT SYSTEM'
TO APPLIC-NAME2.
DISPLAY.

MSEND.

Steve Harmeson

Outcomes