Global: ^EEO(785.1

Information

FileMan FileNo	FileMan Filename	Package
785.1	EEO COMPLAINT BASIS	EEO Complaint Tracking

Package	Total	FileMan Files
EEO Complaint Tracking	2	EEO COMPLAINTS(#785)[#785.01(.01)] EEO INFORMAL COMPLAINTS(#785.5)[#785.51(.01)]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X S STANO=$G(STANO) K:$$SITE^EEOEEXMT=STANO!(STANO="") X` LAST EDITED: `JUN 17, 1994` HELP-PROMPT: `Answer must be 3-30 characters in length and may only be changed by Central Office.` DESCRIPTION: `This field contains the name of the 18 valid bases for filing EEO discrimination cases.` `DELETE AUTHORITY: "@"` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `785.1^B` `1)= S ^EEO(785.1,"B",$E(X,1,30),DA)=""` `2)= K ^EEO(785.1,"B",$E(X,1,30),DA)`

NAME

0;1

FREE TEXT

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

INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X S STANO=$G(STANO) K:$$SITE^EEOEEXMT=STANO!(STANO="") X
LAST EDITED: JUN 17, 1994
HELP-PROMPT: Answer must be 3-30 characters in length and may only be changed by Central Office.
DESCRIPTION:
This field contains the name of the 18 valid bases for filing EEO discrimination cases.
DELETE AUTHORITY: "@"
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 785.1^B
1)= S ^EEO(785.1,"B",$E(X,1,30),DA)=""
2)= K ^EEO(785.1,"B",$E(X,1,30),DA)