Global: ^DG(408.43

FileMan FileNo	FileMan Filename	Package
408.43	PATIENT REGISTRATION ONLY REASON	Registration

Accessed By FileMan Db Calls, Total: 4

Package	Total	Routines
Registration	4	DGEN DGENUPL2 DGREG VAFHLZEN

Package	Total	FileMan Files
Registration	1	PATIENT ENROLLMENT(#27.11)[.15]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	REASON	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>50!($L(X)<3) X` `MAXIMUM LENGTH: 50` LAST EDITED: `OCT 08, 2020` HELP-PROMPT: `Answer must be 3-50 characters in length.` DESCRIPTION: `This field contains a patient's self-reported Registration reason.` CROSS-REFERENCE: `408.43^B` `1)= S ^DG(408.43,"B",$E(X,1,30),DA)=""` `2)= K ^DG(408.43,"B",$E(X,1,30),DA)`
.02	AVAILABILITY	0;2	SET	**********************REQUIRED FIELD********************** '1' FOR REGISTER A PATIENT; '2' FOR COLLATERAL OF PATIENT; '3' FOR RECORD CREATED BY HEC; '4' FOR VBA AUTO REGISTRATION; LAST EDITED: `MAR 19, 2025` HELP-PROMPT: `Select the availability type for this record.` DESCRIPTION: `This field contains values that determine which records can be selected for different processes.`
.03	CODE	0;3	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `OCT 09, 2020` HELP-PROMPT: `Type a number between 1 and 99, 0 decimal digits.` DESCRIPTION: `This field contains a code for Registration reason.` CROSS-REFERENCE: `408.43^C` `1)= S ^DG(408.43,"C",$E(X,1,30),DA)=""` `2)= K ^DG(408.43,"C",$E(X,1,30),DA)` `This cross-reference allows look-up by Code.`

REASON

0;1

FREE TEXT

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

INPUT TRANSFORM: K:$L(X)>50!($L(X)<3) X
MAXIMUM LENGTH: 50
LAST EDITED: OCT 08, 2020
HELP-PROMPT: Answer must be 3-50 characters in length.
DESCRIPTION:
This field contains a patient's self-reported Registration reason.
CROSS-REFERENCE: 408.43^B
1)= S ^DG(408.43,"B",$E(X,1,30),DA)=""
2)= K ^DG(408.43,"B",$E(X,1,30),DA)

AVAILABILITY

0;2

SET

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

LAST EDITED: MAR 19, 2025
HELP-PROMPT: Select the availability type for this record.
DESCRIPTION:
This field contains values that determine which records can be selected for different processes.

CODE

0;3

NUMBER

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

INPUT TRANSFORM: K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: OCT 09, 2020
HELP-PROMPT: Type a number between 1 and 99, 0 decimal digits.
DESCRIPTION:
This field contains a code for Registration reason.
CROSS-REFERENCE: 408.43^C
1)= S ^DG(408.43,"C",$E(X,1,30),DA)=""
2)= K ^DG(408.43,"C",$E(X,1,30),DA)
This cross-reference allows look-up by Code.

REASON: C&P DISABILITY BENEFITS EXAM	REASON: ACTIVE DUTY	REASON: SERVICE CONNECTED ONLY	REASON: EXPOSURE REGISTRY EXAM	REASON: RESEARCH	REASON: HUMANITARIAN/EMERGENCY	REASON: EMPLOYEE	REASON: BENEFICIARY
REASON: OTHER THAN HONORABLE (OTH)	REASON: MARRIAGE/FAMILY COUNSELING	REASON: COLLATERAL (OTHER)	REASON: ART/IVF	REASON: NEWBORN	REASON: LEGISLATIVE MANDATE	REASON: OTHER	REASON: NORTH CHICAGO ACTIVE DUTY
REASON: UNANSWERED	REASON: CAREGIVER	REASON: VHA TRANSPLANT PROGRAM	REASON: 4TH MISSION	REASON: CLINICAL EVALUATION	REASON: HUD-VASH	REASON: IMMUNIZATIONS	REASON: VBA - AUTO REGISTRATION