Global: ^DG(47.78

FileMan FileNo	FileMan Filename	Package
47.78	PRONOUN TYPES	Registration

Directly Accessed By Routines, Total: 5

Package	Total	Routines
Registration	5	DGRPD VADPT1 VAFCPDAT VAFCPTED ^DG(47.78

Package	Total	Routines
Registration	1	VAFCSB

Package	Total	FileMan Files
Registration	1	PATIENT(#2)[#2.2406(.01)]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	PRONOUN TYPE	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>25!($L(X)<3)!'(X'?1P.E) X` `MAXIMUM LENGTH: 25` LAST EDITED: `JUN 24, 2021` HELP-PROMPT: `Enter the Pronoun (3-25 characters) that a patient can be addressed as.` DESCRIPTION: `The PRONOUN TYPE field specifies the appropriate noun that a patient has requested to be addressed as.` CROSS-REFERENCE: `47.78^B` `1)= S ^DG(47.78,"B",$E(X,1,30),DA)=""` `2)= K ^DG(47.78,"B",$E(X,1,30),DA)`
1	TYPE CODE	0;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>5!($L(X)<1) X` `MAXIMUM LENGTH: 5` LAST EDITED: `JUN 23, 2021` HELP-PROMPT: `Enter the code (1-5 characters) associated with the PRONOUN TYPE.` DESCRIPTION: `This code uniquely identifies the PRONOUN TYPE record.` CROSS-REFERENCE: `47.78^C` `1)= S ^DG(47.78,"C",$E(X,1,30),DA)=""` `2)= K ^DG(47.78,"C",$E(X,1,30),DA)` `This cross-reference creates an index of all the TYPE CODEs so that they can be used as a lookup to retrieve the full name value of the PRONOUN TYPE field.`

PRONOUN TYPE

0;1

FREE TEXT

************************REQUIRED FIELD************************

INPUT TRANSFORM: K:$L(X)>25!($L(X)<3)!'(X'?1P.E) X
MAXIMUM LENGTH: 25
LAST EDITED: JUN 24, 2021
HELP-PROMPT: Enter the Pronoun (3-25 characters) that a patient can be addressed as.
DESCRIPTION:
The PRONOUN TYPE field specifies the appropriate noun that a patient has requested to be addressed as.
CROSS-REFERENCE: 47.78^B
1)= S ^DG(47.78,"B",$E(X,1,30),DA)=""
2)= K ^DG(47.78,"B",$E(X,1,30),DA)

TYPE CODE

0;2

FREE TEXT

************************REQUIRED FIELD************************

INPUT TRANSFORM: K:$L(X)>5!($L(X)<1) X
MAXIMUM LENGTH: 5
LAST EDITED: JUN 23, 2021
HELP-PROMPT: Enter the code (1-5 characters) associated with the PRONOUN TYPE.
DESCRIPTION:
This code uniquely identifies the PRONOUN TYPE record.
CROSS-REFERENCE: 47.78^C
1)= S ^DG(47.78,"C",$E(X,1,30),DA)=""
2)= K ^DG(47.78,"C",$E(X,1,30),DA)
This cross-reference creates an index of all the TYPE CODEs so that they can be used as a lookup to retrieve the full name value of the PRONOUN TYPE field.