Sub-Field: 441.05

Parent File	Name	Number	Package
ITEM MASTER(#441)	SYNONYM	441.05	IFCAP

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	SYNONYM	0;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>36!($L(X)<3)!'(X?1AN.E) X I $D(X) S LO="abcdefghijklmnopqrstuvwxyz",HI="ABCDEFGHIJKLMNOPQRSTUVWXYZ",X=$TR(X,LO,HI) K LO,HI` LAST EDITED: `JAN 23, 1998` HELP-PROMPT: `Answer must be 3-36 characters in length and begin with an alpha-numeric character. All lowercase alpha characters will be automatically converted to uppercase.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `441.05^B` `1)= S ^PRC(441,DA(1),5,"B",$E(X,1,36),DA)=""` `2)= K ^PRC(441,DA(1),5,"B",$E(X,1,36),DA)` CROSS-REFERENCE: `441^E` `1)= S ^PRC(441,"E",$E(X,1,36),DA(1),DA)=""` `2)= K ^PRC(441,"E",$E(X,1,36),DA(1),DA)` `3)= Do not delete`

SYNONYM

0;1

FREE TEXT

INPUT TRANSFORM: K:$L(X)>36!($L(X)<3)!'(X?1AN.E) X I $D(X) S LO="abcdefghijklmnopqrstuvwxyz",HI="ABCDEFGHIJKLMNOPQRSTUVWXYZ",X=$TR(X,LO,HI) K LO,HI
LAST EDITED: JAN 23, 1998
HELP-PROMPT: Answer must be 3-36 characters in length and begin with an alpha-numeric character. All lowercase alpha characters will be automatically converted to uppercase.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 441.05^B
1)= S ^PRC(441,DA(1),5,"B",$E(X,1,36),DA)=""
2)= K ^PRC(441,DA(1),5,"B",$E(X,1,36),DA)
CROSS-REFERENCE: 441^E
1)= S ^PRC(441,"E",$E(X,1,36),DA(1),DA)=""
2)= K ^PRC(441,"E",$E(X,1,36),DA(1),DA)
3)= Do not delete