Global: ^EEO(789.5

Information

FileMan FileNo	FileMan Filename	Package
789.5	EEO SERVER PARAMETERS	EEO Complaint Tracking

This search VA files for the proper domain and station to send the message. If the site is the Region, the message is not sent but placed in received file.

Package	Total	Routines
EEO Complaint Tracking	1	EEOIPOST

Package	Total	FileMan Files
Kernel	1	NEW PERSON(#200)[3]
MailMan	1	DOMAIN(#4.2)[1]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	SERVER STATION NUMBER	0;1	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X I $D(X) K:'$D(^DIC(4,"D",X)) X I $D(^EEO(789.5,"B")) W !!,"ONLY ONE ENTRY ALLOWED",!! K X` LAST EDITED: `DEC 09, 1992` HELP-PROMPT: `Type a Number between 0 and 9999999, 0 Decimal Digits` DESCRIPTION: `This is a required field that identifies the server station.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `789.5^B` `1)= S ^EEO(789.5,"B",$E(X,1,30),DA)=""` `2)= K ^EEO(789.5,"B",$E(X,1,30),DA)`
1	DOMAIN	0;2	POINTER TO DOMAIN FILE (#4.2)	**********************REQUIRED FIELD********************** DOMAIN(#4.2) LAST EDITED: `OCT 01, 1992` DESCRIPTION: `This is a required field that points to the server station in the Domain file.`
3	EEO OFFICER	1;1	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `FEB 16, 1995` HELP-PROMPT: `Enter the name of the EEO Officer that will be the default selection at EEO Officer prompts throughout the EEO package.`

SERVER STATION NUMBER

0;1

NUMBER

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

INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X I $D(X) K:'$D(^DIC(4,"D",X)) X I $D(^EEO(789.5,"B")) W !!,"ONLY ONE ENTRY ALLOWED",!! K X
LAST EDITED: DEC 09, 1992
HELP-PROMPT: Type a Number between 0 and 9999999, 0 Decimal Digits
DESCRIPTION:
This is a required field that identifies the server station.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 789.5^B
1)= S ^EEO(789.5,"B",$E(X,1,30),DA)=""
2)= K ^EEO(789.5,"B",$E(X,1,30),DA)

DOMAIN

0;2

POINTER TO DOMAIN FILE (#4.2)

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

LAST EDITED: OCT 01, 1992
DESCRIPTION:
This is a required field that points to the server station in the Domain file.

EEO OFFICER

1;1

POINTER TO NEW PERSON FILE (#200)

LAST EDITED: FEB 16, 1995
HELP-PROMPT: Enter the name of the EEO Officer that will be the default selection at EEO Officer prompts throughout the EEO package.