STANDARD DATA DICTIONARY #420.1999 -- PRCD SD STATUS FILE 3/24/25 PAGE 1
STORED IN ^PRCD(420.1999, (3 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.1)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This is used to indicate the status of an entry in file.
IDENTIFIED BY: DESCRIPTION (#1)[R]
POINTED TO BY: STATUS field (#2) of the PRCD SD PROGRAM File (#420.13)
STATUS field (#2) of the PRCD SD FCP/PRJ File (#420.131)
STATUS field (#2) of the PRCD SD OBJECT CLASS File (#420.132)
STATUS field (#2) of the PRCD SD JOB File (#420.133)
STATUS field (#2) of the PRCD SD REPORTING CATEGORY File (#420.134)
STATUS field (#2) of the PRCD SD REVENUE SOURCE File (#420.135)
STATUS field (#2) of the PRCD SD SUB-REV SOURCE File (#420.136)
STATUS field (#2) of the PRCD SD SUB-OBJ File (#420.137)
STATUS field (#2) of the PRCD SD FMS SECURITY File (#420.138)
STATUS field (#5) of the PRCD FUND File (#420.14)
STATUS field (#2) of the PRCD SD ADMINISTRATIVE OFFICE File (#420.15)
STATUS field (#2) of the PRCD SD DOCUMENT TYPE File (#420.16)
STATUS field (#2) of the PRCD SD DOCUMENT DATA ELEMENT File (#420.17)
STATUS field (#2) of the PRCD STANDARD DICTIONARY File (#420.19)
STATUS field (#2) of the PRCD SD STATUS File (#420.1999)
STATUS field (#2) of the PRCD SD STANDARD FOR COPYING File (#420.9999)
CROSS
REFERENCED BY: FIX VALUE(AC), CODE(B), DESCRIPTION(C)
420.1999,.01 CODE 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>15!($L(X)<1)!'(X'?1P.E) X I $G(X)]"" S %=$O(^PRCD(420.1999,"B",X,"")) K:%-$G(DA)&% X
LAST EDITED: NOV 19, 1993
HELP-PROMPT: Answer must be 1-15 characters in length and code must be unique in file.
DESCRIPTION:
This field is the code of document data elemant.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 420.1999^B
1)= S ^PRCD(420.1999,"B",$E(X,1,30),DA)=""
2)= K ^PRCD(420.1999,"B",$E(X,1,30),DA)
420.1999,1 DESCRIPTION 0;2 FREE TEXT (Required)
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>45!($L(X)<1)!'(X'?1." ".E) X
LAST EDITED: NOV 24, 1993
HELP-PROMPT: Answer must be 1-45 characters in length.
DESCRIPTION:
This field is the desription of the code.
CROSS-REFERENCE: 420.1999^C
1)= S ^PRCD(420.1999,"C",$E(X,1,30),DA)=""
2)= K ^PRCD(420.1999,"C",$E(X,1,30),DA)
This is used to look-up entries by description.
420.1999,2 STATUS 0;3 POINTER TO PRCD SD STATUS FILE (#420.1999) (Required)
LAST EDITED: NOV 26, 1993
DESCRIPTION:
This field is the status of the entry in file.
420.1999,3 FIX VALUE 0;4 FREE TEXT
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>15!($L(X)<1)!'(X'?1." ".E) X
LAST EDITED: DEC 10, 1993
HELP-PROMPT: Answer must be 1-15 characters in length.
DESCRIPTION:
This field's value is used by programer for hard coding in programs.
TECHNICAL DESCR: This field's value is used by programer for hard coding in programs. Always hardcode with fixed
values. If this value is edited all programs referring to this value need to edited.
CROSS-REFERENCE: 420.1999^AC
1)= S ^PRCD(420.1999,"AC",$E(X,1,30),DA)=""
2)= K ^PRCD(420.1999,"AC",$E(X,1,30),DA)
This is used to search entries in this file.
FILES POINTED TO FIELDS
PRCD SD STATUS (#420.1999) STATUS (#2)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
PRC SD PRINT JAN 12, 1994@14:54 USER #0 PRCD SD STATUS LIST
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):