Global: ^VA(407.6

FileMan FileNo	FileMan Filename	Package
407.6	LETTER TYPE	Scheduling

Directly Accessed By Routines, Total: 6

Package	Total	Routines
Scheduling	6	SDESAPPTLETTERS SDESGETLETTERS SDLTE TEAM POSITIONS ^VA(407.5 ^VA(407.6

Package	Total	Routines
Scheduling	2	SDESAPPTLETTERS SDESGETLETTERS

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	CODE	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>3!($L(X)<1)!'(X'?1P.E) X I $D(X),$D(^VA(407.6,"B",X)) W !,"NO DUPLICATE CODES ALLOWED!" K X` HELP-PROMPT: `Answer must be 1-3 characters in length.` DESCRIPTION: `The code is the alpha character assigned to a particular type of letter, i.e. 'P' = PRE-APPOINTMENT.` `UNEDITABLE` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `407.6^B` `1)= S ^VA(407.6,"B",$E(X,1,30),DA)=""` `2)= K ^VA(407.6,"B",$E(X,1,30),DA)`
1	CODE NAME	0;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>60!($L(X)<3) X` HELP-PROMPT: `Answer must be 3-60 characters in length.` DESCRIPTION: `Code name is the name of the type of letter. For example, PRE- APPOINTMENT letter is a letter generated from the scheduling module of the MAS DHCP software for veterans who have future appointments and these letters are` `'reminder' letters sent to the veterans for their future appointments.` CROSS-REFERENCE: `407.6^C` `1)= S ^VA(407.6,"C",$E(X,1,30),DA)=""` `2)= K ^VA(407.6,"C",$E(X,1,30),DA)`
2	INACTIVE DATE	0;3	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` DESCRIPTION: `The inactive date is the date/time entered by a user denoting that any particular letter type has been inactivated and no longer in use.`

CODE

0;1

FREE TEXT

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

INPUT TRANSFORM: K:$L(X)>3!($L(X)<1)!'(X'?1P.E) X I $D(X),$D(^VA(407.6,"B",X)) W !,"NO DUPLICATE CODES ALLOWED!" K X
HELP-PROMPT: Answer must be 1-3 characters in length.
DESCRIPTION:
The code is the alpha character assigned to a particular type of letter, i.e. 'P' = PRE-APPOINTMENT.
UNEDITABLE
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 407.6^B
1)= S ^VA(407.6,"B",$E(X,1,30),DA)=""
2)= K ^VA(407.6,"B",$E(X,1,30),DA)

CODE NAME

0;2

FREE TEXT

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

INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>60!($L(X)<3) X
HELP-PROMPT: Answer must be 3-60 characters in length.
DESCRIPTION: Code name is the name of the type of letter. For example, PRE- APPOINTMENT letter is a letter generated from the scheduling module of the MAS DHCP software for veterans who have future appointments and these letters are
'reminder' letters sent to the veterans for their future appointments.
CROSS-REFERENCE: 407.6^C
1)= S ^VA(407.6,"C",$E(X,1,30),DA)=""
2)= K ^VA(407.6,"C",$E(X,1,30),DA)

INACTIVE DATE

0;3

DATE

INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X
DESCRIPTION:
The inactive date is the date/time entered by a user denoting that any particular letter type has been inactivated and no longer in use.

Name	Field # of Occurrence
^%DT	2+1

Name	Line Occurrences (* Changed, ! Killed)
^VA(407.6 - [#407.6]	.01+1, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K)

Name	Field # of Occurrence
^(0	ID1+1