Sub-Field: 21.02

Parent File	Name	Number	Package
PERIOD OF SERVICE(#21)	SYNONYM	21.02	Registration

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	SYNONYM	0;1	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<2)!'(X?1A.E) X` LAST EDITED: `NOV 25, 1986` HELP-PROMPT: `ANSWER MUST BE 2-30 CHARACTERS IN LENGTH` DESCRIPTION: `This field contains an alternate name by which this period of service can be selected. Wherever the period of service is prompted, this synonym may be entered instead of the name of the period of service.` CROSS-REFERENCE: `21.02^B` `1)= S ^DIC(21,DA(1),"S","B",$E(X,1,30),DA)=""` `2)= K ^DIC(21,DA(1),"S","B",$E(X,1,30),DA)` CROSS-REFERENCE: `21^SYN` `1)= S ^DIC(21,"SYN",$E(X,1,30),DA(1),DA)=""` `2)= K ^DIC(21,"SYN",$E(X,1,30),DA(1),DA)`

SYNONYM

0;1

FREE TEXT

INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<2)!'(X?1A.E) X
LAST EDITED: NOV 25, 1986
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH
DESCRIPTION:
This field contains an alternate name by which this period of service can be selected. Wherever the period of service is prompted, this synonym may be entered instead of the name of the period of service.
CROSS-REFERENCE: 21.02^B
1)= S ^DIC(21,DA(1),"S","B",$E(X,1,30),DA)=""
2)= K ^DIC(21,DA(1),"S","B",$E(X,1,30),DA)
CROSS-REFERENCE: 21^SYN
1)= S ^DIC(21,"SYN",$E(X,1,30),DA(1),DA)=""
2)= K ^DIC(21,"SYN",$E(X,1,30),DA(1),DA)