ca.portal.admin

Re: Securing IDMS dictionaries

Discussion created by ca.portal.admin on Apr 7, 2005
Well, to talk about a secure dictionary I guess we'll have to refer to
IDD security. This has always been above and beyond. A secure
dictionary to me means that all entities and functions have their access
secured to specific users or groups or public. For example, records can
only be modified by dba user id's, but can be viewed by the public, or
applications development or production support id's. The secby=internal
does NOT apply to dictionary security, only optionally the idd task
access or the dictionary database access, not access to dictionary
entities.

Lutz Petzold


-----------------------------------------
This e-mail may contain confidential or privileged information. If you
think you have received this e-mail in error, please advise the sender
by reply e-mail and then delete this e-mail immediately. Thank you.
Aetna

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








Normal

Normal
Problem in cobol converting dbkey
"Hi everyone:

We have an Ads prog that work with this example:

COMPUTE DBKEY-1 = (1047614 * 256) + 1.
OBTAIN TELEFONO DB-KEY IS DBKEY-1.

The decimal value of the dbkey is 268189185. The DBKEY-1 field is s9(8) comp
sync.

If we try to do the same thing in cobol, we have the problem that we can
never fit the decimal value in the s9(8) comp sync, all the time its trunc
the 2 in the left in the decimal field. The only way that we can store this
decimal number in a comp field in cobol its defining it s9(9) comp sync, but
we can´t use it like a dbkey.

Any ideas that how we can proceed in cobol to do that???

TIA.

Javier S.

_________________________________________________________________
Don’t just search. Find. Check out the new MSN Search!
http://search.msn.click-url.com/go/onm00200636ave/direct/01/

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








Normal

Normal
Re: Problem in cobol converting dbkey
"Hi Javier,

The safest way (for any possible page number) is this, but not the
only way.

01 DBKEY-STUFF.
05 WDBKEY-1.
10 FILLER PIC X(01).
10 WDBKEY-1-3 PIC X(03).
05 PAGE-NUMBER REDEFINES WDBKEY-1 PIC S9(8) COMP.
05 DBKEY-1 PIC S9(8) COMP SYNC.
05 FILLER REDEFINES DBKEY-1.
10 DBKEY-1-PAGE PIC X(03).
10 FILLER PIC X(01).



MOVE +1 TO DBKEY-1.
MOVE 1047614 TO PAGE-NUMBER.
MOVE WDBKEY-1-3 TO DBKEY-1-PAGE.
OBTAIN TELEFONO DB-KEY IS DBKEY-1.

Art W.

Outcomes