ca.portal.admin

Pop-up Window in ADS

Discussion created by ca.portal.admin on Jan 18, 2008
Latest reply on Jan 18, 2008 by ca.portal.admin
Hey Listers:

Anybody know how to create a small pop-up window in ADS - like the
function
search facility in ADSA? I'm trying to create a customized ""help""
window that will display specific information about the map field value,
rather than the normal map field help.

Thanks,

Tim Gortner
"
IDMS Public Discussion Forum
IDMS-L@LISTSERV.IUASSN.COM
SMTP
IDMS-L@LISTSERV.IUASSN.COM
IDMS-L@LISTSERV.IUASSN.COM
SMTP








Normal

Normal
Re: Pop-up Window in ADS
"Attached is a stripped down version of a program that does signon and
password changes in the middle of a user's ADS session (don't ask - it's
a long story). GUT0047O uses two maps - GUT0047M which is a pop up for
User Id and Password - and GUT0047N - a pop up for confirming old and
new password if a password change is required - same as the 1st map
except two rows up and two columns to the right. I've left the ""mapping""
logic in GUT0047O and an example of its use from the mainline.

HTH - cheers - Gary

BTW - I've downloaded as ASCII - so on upload you'll need to convert to
EBCDIC - here's the map work record - nothing fancy 8-)

DIS REC SYN GUT0047-MAP WITH ELE.
*+   MOD
*+   RECORD NAME IS GUT0047-MAP VERSION 1
*+       RECORD NAME SYNONYM IS GUT0047-MAP VERSION 1
*+       .
*+       03 GUT0047-USERID
*+           PICTURE IS  X(8)
*+           .
*+       03 GUT0047-PASSWORD
*+           PICTURE IS  X(8)
*+           .
*+       03 GUT0047-PASSWORD-NEW
*+           PICTURE IS  X(8)
*+           .
*+       03 GUT0047-PASSWORD-NEW-VERIFY
*+           PICTURE IS  X(8)
*+           .

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.

Outcomes