Sub-Field: 757.335

Parent File	Name	Number	Package
CHARACTER POSITIONS(#757.033)	INCLUDES	757.335	Lexicon Utility

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	INCLUDES EFFECTIVE DATE	0;1	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:3101001>X X` LAST EDITED: `MAR 28, 2012` HELP-PROMPT: `Enter a date, not earlier than Oct 1, 2010.` DESCRIPTION: `This is the date the synonym(s) to be included became effective.` CROSS-REFERENCE: `757.335^B` `1)= S ^LEX(757.033,DA(1),5,"B",$E(X,1,30),DA)=""` `2)= K ^LEX(757.033,DA(1),5,"B",$E(X,1,30),DA)` `^LEX(757.033,IEN1,5,"B",DATE,IEN2) - Where IEN1 is the file level internal entry number, DATE is the effective date of the included synonyms, and IEN2 is the INCLUDES sub-file internal entry number where the included` `synonym is stored.`
.02	INCLUDE	1;0	Multiple #757.345	757.345 LAST EDITED: `MAR 20, 2012` DESCRIPTION: `This is a list of synonyms to include.` INDEXED BY: `SYNONYM (B)`

INCLUDES EFFECTIVE DATE

0;1

DATE

INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:3101001>X X
LAST EDITED: MAR 28, 2012
HELP-PROMPT: Enter a date, not earlier than Oct 1, 2010.
DESCRIPTION:
This is the date the synonym(s) to be included became effective.
CROSS-REFERENCE: 757.335^B
1)= S ^LEX(757.033,DA(1),5,"B",$E(X,1,30),DA)=""
2)= K ^LEX(757.033,DA(1),5,"B",$E(X,1,30),DA)
^LEX(757.033,IEN1,5,"B",DATE,IEN2) - Where IEN1 is the file level internal entry number, DATE is the effective date of the included synonyms, and IEN2 is the INCLUDES sub-file internal entry number where the included
synonym is stored.

INCLUDE

1;0

Multiple #757.345