Print Page as PDF
TOOLKIT NEEDS TO ACCESS VARIABLE PTR DEF ICR (2375)

TOOLKIT NEEDS TO ACCESS VARIABLE PTR DEF    ICR (2375)

Name Value
NUMBER 2375
IA # 2375
GLOBAL ROOT DD(8989.5,.01,V
DATE CREATED 1998/04/29
CUSTODIAL PACKAGE VA FILEMAN
CUSTODIAL ISC San Francisco
USAGE Private
TYPE File
DBIC APPROVAL STATUS APPROVED
NAME TOOLKIT NEEDS TO ACCESS VARIABLE PTR DEF
GENERAL DESCRIPTION 
The Parameter Tools component of Toolkit allows setting
of parameters at various levels. This necessitates a file structure with a
variable pointer definition to point to the files which are allowed to be used
through the Parameter Tools component.

To ensure that no other files are pointed to, a check is done on the DD's "V"
multiple, "B" cross-reference, to deterine whether an entry is in the variable
pointer definitition.
GLOBAL REFERENCE
GLOBAL REFERENCE GLOBAL DESCRIPTION
DD(8989.5,.01,V,B 
File 8989.5 is the Parameters file and its .01 is a
variable pointer to multiple files.  This reference allows the Parameter Tools
component to ensure that only allowable files are being referenced.

A function within toolkit returns a 1 if the file exists in the variable
pointer definition or 0 otherwise.

The following is the code it uses (in XPARDD1):

ALLOW(FN) ; Screens allowable entities to variable ptrs in 8989.5,.01
; ** VPDD ** see which files 8989.5 can point to
Q:'FN 0
Q $D(^DD(8989.5,.01,"V","B",FN))>0
STATUS Active
DURATION Till Otherwise Agreed
ID DD(8989.5,.01,V
SUBSCRIBING PACKAGE
SUBSCRIBING PACKAGE ISC
TOOLKIT Oakland