STANDARD DATA DICTIONARY #1.61 -- APPLICATION ACTION FILE 9/29/25 PAGE 1
STORED IN ^DIAC(1.61, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 22.2)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains the actions that users may take on a record in a specific VistA file or sub-file; these should be the actions
provided by and supported in the application that owns the designated file.
When the policy evaluation API is invoked, the File# and API Name passed in will be used to find a match in this file; its
associated Policy will then be evaluated to return an access result of Permit or Deny.
DD ACCESS: @
WR ACCESS: #
DEL ACCESS: @
LAYGO ACCESS: #
IDENTIFIED BY:
"W1": W " ",$P(^(0),U,2)," ",$P(^(0),U,3)
POINTED TO BY: GET POLICY field (#19.1) of the ENTITY File (#1.5)
PUT POLICY field (#19.2) of the ENTITY File (#1.5)
DELETE POLICY field (#19.3) of the ENTITY File (#1.5)
POST POLICY field (#19.4) of the ENTITY File (#1.5)
CROSS
REFERENCED BY: NAME(B), POLICY(D)
INDEXED BY: FILE# & API NAME (C)
LAST MODIFIED: AUG 30,2017@14:48:40
1.61,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: D CHKNAME^DIACX(1.61) I $D(X) K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
MAXIMUM LENGTH: 30
LAST EDITED: DEC 23, 2016
HELP-PROMPT: Enter a unique name, 3-30 characters, beginning with the package namespace.
DESCRIPTION: The formal unique name of the action, prefaced with the package namespace specified in the PACKAGE
file, or the letter Z or A.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 1.61^B
1)= S ^DIAC(1.61,"B",$E(X,1,30),DA)=""
2)= K ^DIAC(1.61,"B",$E(X,1,30),DA)
1.61,.02 FILE# 0;2 NUMBER (Required)
INPUT TRANSFORM: K:+X'=X!(X>9999999.9999999)!(X<0)!(X?.E1"."8N.N)!'$$VFILE^DILFD(X) X
LAST EDITED: OCT 20, 2016
HELP-PROMPT: Enter a valid VistA file or sub-file number, up to 9999999.9999999.
DESCRIPTION:
This is a number that represents a valid VistA file or sub-file.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
RECORD INDEXES: C (#974)
1.61,.03 API NAME 0;3 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
MAXIMUM LENGTH: 30
LAST EDITED: FEB 09, 2017
HELP-PROMPT: Answer must be 1-30 characters in length.
DESCRIPTION: This is the name of an action that the VistA application supports on the sub/file. This string may
be used as the ACTION parameter of the Policy Evaluation API. Some examples include read or view,
create, edit, sign, cancel, etc.
RECORD INDEXES: C (#974)
1.61,.04 TYPE 0;4 SET
'C' FOR CREATE;
'R' FOR READ;
'U' FOR UPDATE;
'D' FOR DELETE;
LAST EDITED: FEB 21, 2017
HELP-PROMPT: Select the kind of action this item represents.
DESCRIPTION:
This is the basic category the action belongs to.
1.61,.05 POLICY 0;5 POINTER ***** TO AN UNDEFINED FILE (#1.6), STORED IN ^DIAC(1.6) *******
INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,2)'=""R""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: FEB 17, 2017
HELP-PROMPT: Select the policy or set that should be evaluated when this action occurs.
DESCRIPTION: When the policy evaluation API is invoked, the file# and action passed in will be used to find a
match in this file; the Policy pointed to by this field will then be evaluated for an access
result.
SCREEN: S DIC("S")="I $P(^(0),U,2)'=""R"""
EXPLANATION: Only policies or sets (no rules) may be selected.
CROSS-REFERENCE: 1.61^D
1)= S ^DIAC(1.61,"D",$E(X,1,30),DA)=""
2)= K ^DIAC(1.61,"D",$E(X,1,30),DA)
Find File# & Action actions by associated Policy ien.
1.61,1 SHORT DESCRIPTION 1;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>80!($L(X)<1) X
MAXIMUM LENGTH: 80
LAST EDITED: JUL 22, 2016
HELP-PROMPT: Answer must be 1-80 characters in length.
DESCRIPTION:
This field contains a brief description of the action.
1.61,5 AVAILABLE FIELDS 5;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>245!($L(X)<1) X
MAXIMUM LENGTH: 245
LAST EDITED: OCT 19, 2016
HELP-PROMPT: Enter a valid DR string, up to 245 characters.
DESCRIPTION: This is a string of field numbers, delimited by semi-colons, that can be used as the DR variable
for FileMan api's; see the VA FileMan Programmer Manual for further details.
This string will be returned to the client if a permit result is found, to identify the fields that
are allowed to be viewed or acted on. The value saved here will be the default string for this
action; it may be overridden by a string saved at a finer level within the default policy.
1.61,5.1 ADDITIONAL FIELDS 5.1;0 Multiple #1.615 (Add New Entry without Asking)
DESCRIPTION: This multiple holds additional DR strings as needed, such as the fields that may be accessed in a
sub-file. To save a continuation string for the top-level file, enter the primary file number for
this action.
1.615,.01 SUBFILE# 0;1 NUMBER (Multiply asked)
INPUT TRANSFORM: K:+X'=X!(X>9999999.9999999)!(X<0)!(X?.E1"."8N.N) X
LAST EDITED: DEC 23, 2016
HELP-PROMPT: Enter a valid VistA file or sub-file number, up to 9999999.9999999.
DESCRIPTION:
This is a number that represents a valid VistA file or sub-file.
CROSS-REFERENCE: 1.615^B
1)= S ^DIAC(1.61,DA(1),5.1,"B",$E(X,1,30),DA)=""
2)= K ^DIAC(1.61,DA(1),5.1,"B",$E(X,1,30),DA)
1.615,.02 LEVEL 0;2 NUMBER (Required)
INPUT TRANSFORM: K:+X'=X!(X>9)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: JAN 20, 2017
HELP-PROMPT: Type a number between 1 and 9, 0 decimal digits.
DESCRIPTION: This integer is the file level, relative to the FILE# of the action. Enter 1 if this is a
continuation string for FILE#, 2 if this is a DR string for a sub-file, etc.
1.615,.03 SEQUENCE 0;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: JAN 20, 2017
HELP-PROMPT: Type a number between 1 and 99, 0 decimal digits.
DESCRIPTION:
This is the sequence number for the DR array, if this is a continuation string.
1.615,.04 DR 0;4 FREE TEXT
INPUT TRANSFORM: K:$L(X)>400!($L(X)<1) X
MAXIMUM LENGTH: 400
LAST EDITED: JAN 20, 2017
HELP-PROMPT: Answer must be 1-400 characters in length.
DESCRIPTION: This is a string of field numbers, delimited by semi-colons, that can be used as the DR variable
for FileMan api's; see the VA FileMan Programmer Manual for further details. These strings are
intended to supplement the Available Fields value, as sub-file or continuation strings.
FILES POINTED TO FIELDS
}UNDEFINED FILE (#1.6) POLICY (#.05)
File #1.61
Record Indexes:
C (#974) RECORD REGULAR IR LOOKUP & SORTING
Short Descr: Find an action by File# and API Name
Description: Used in policy evaluation, to find the primary or default policy given the sub/file number and requested
action.
Set Logic: S ^DIAC(1.61,"C",X(1),$E(X(2),1,30),DA)=""
Kill Logic: K ^DIAC(1.61,"C",X(1),$E(X(2),1,30),DA)
Whole Kill: K ^DIAC(1.61,"C")
X(1): FILE# (1.61,.02) (Subscr 1) (forwards)
X(2): API NAME (1.61,.03) (Subscr 2) (Len 30) (forwards)
Transform (Storage): S X=$$UP^XLFSTR(X)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
DIAC ACTIONS FEB 07, 2017@13:24 USER #0 APPLICATION ACTION LIST
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):