STANDARD DATA DICTIONARY #785 -- EEO COMPLAINTS FILE 6/27/25 PAGE 1
STORED IN ^EEO(785, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This records information for initial EEO Complaints and subsequent updates of information.
DD ACCESS: @
RD ACCESS: @
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
AUDIT ACCESS: @
IDENTIFIED BY:
"Q": W:$D(^(5)) " ",$P(^(5),U,6)
"QUIT": W:$D(^(1)) " ",$E($P(^(1),U,3),4,5)_"-"_$E($P(^(1),U,3),6,7)_"-"_$E($P(^(1),U,3),2,3)
CROSS
REFERENCED BY: COMPLAINANT(ANODE), COMPLAINANT(B), STATION(C), CASE NO.(D), OEO NUMBER(E)
785,.01 COMPLAINANT 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<3) X I $D(X) S X=$$UP^XLFSTR(X) K:(X'?1U.UP1","1U.U
P) X I $D(X) S STANO=$S($D(EEOYSTN):EEOYSTN,$D(STANO):STANO,1:"") D NODE^EEOEOSE
OUTPUT TRANSFORM: D TEST^EEOEOSE
LAST EDITED: OCT 20, 1995
HELP-PROMPT: Answer must be 3-30 characters in length, all uppercase letters, with no space after the comma.
DESCRIPTION: Enter the name of the person making the complaint, (Complainant). Enter the name in 'Last,First
Middle' format [3-30 Characters. Do not use numerics or lowercase alphabetic characters. With the
exception of the comma, period, space, hyphen, dash and apostrophe punctuation characters should be
avoided.
TECHNICAL DESCR:
The ^EEO(785,"ANODE", includes the station number with the complaint case no.
DELETE TEST: 1,0)= I $$DEL^EEOEOSE
DELETE AUTHORITY: "@"
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 785^B
1)= S ^EEO(785,"B",$E(X,1,30),DA)=""
2)= K ^EEO(785,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 785^ANODE^MUMPS
1)= S ^EEO(785,"ANODE",DA)=""
2)= K ^EEO(785,"ANODE",DA)
This cross-reference is used solely to assign internal entry numbers to new EEO Complaints. The
global root for this cross-reference is ^EEO(785,"ANODE", and the subscript is the internal entry
number of the referenced complaint in file #785.
785,.05 STREET ADDRESS 5;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>30!($L(X)<1)!(X[";")!(X[":")!(X["^") X
LAST EDITED: MAR 28, 1994
HELP-PROMPT: Answer must be 1-30 characters in length and does not contain a ";" or ":".
DESCRIPTION:
Enter the street address of the complainant's residence.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,.08 CITY 5;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>25!($L(X)<1)!(X[":")!(X[";")!(X["^") X
LAST EDITED: JUN 15, 1994
HELP-PROMPT: Answer must be 1-25 characters in length and may not include a ";" or a ":"
DESCRIPTION:
The city in which the complainant resides.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,.09 STATE 5;4 POINTER TO STATE FILE (#5)
LAST EDITED: MAR 28, 1994
HELP-PROMPT: The State in which the complainant resides.
DESCRIPTION:
The state in which the complainant resides, points to the State file (#5).
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,.091 ZIP CODE 5;5 FREE TEXT
INPUT TRANSFORM: K:$L(X)>10!($L(X)<5)!'(X?5N!(X?5N1"-"4N)) X S:$D(X) EEOXX=1
LAST EDITED: MAR 10, 1994
HELP-PROMPT: Answer must be 5-10 characters in length.
DESCRIPTION: The Zip Code portion of the Complainants address, must be either 5 numbers or 5 numbers followed by
a "-" and 4 more numbers.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,1.1 CASE ; COMPUTED
MUMPS CODE: X ^DD(785,1.1,9.2) S X=$P(Y(785,1.1,2),Y(785,1.1,3),X),Y(785,1.1,4)=X S X="OEO",X=$P(Y(785,1.1,4),X
)
9.2 = S Y(785,1.1,1)=$S($D(^EEO(785,D0,5)):^(5),1:""),Y=$P(Y(785,1.1,1),U,6) X:$D(^DD(785,1.3,2)) ^
(2) S X=Y,Y(785,1.1,2)=X S X="-",Y(785,1.1,3)=X S X=3
ALGORITHM: $P($P((CASE NO.),"-",3),"OEO")
LAST EDITED: FEB 22, 1994
DESCRIPTION:
Extracts case from full Case Number format.
785,1.2 OEO NUMBER 0;2 FREE TEXT
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>7!($L(X)<3)!(X[":")!(X[";")!(X["^") X
LAST EDITED: SEP 06, 1994
HELP-PROMPT: Answer must be 3-7 characters in length and not contain either a semicolon or colon.
DESCRIPTION: The format for OEO# consists of two numbers followed by a dash and up to four more numbers, for
example... 93-1109.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 785^E
1)= S ^EEO(785,"E",$E(X,1,30),DA)=""
2)= K ^EEO(785,"E",$E(X,1,30),DA)
785,1.3 CASE NO. 5;6 FREE TEXT
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>15!($L(X)<7)!(X[":")!(X[";")!(X["^") X
OUTPUT TRANSFORM: S EEO2=$P($G(^EEO(785,D0,0)),U,2) S:EEO2'="" Y=Y_" OEO# "_EEO2
LAST EDITED: JUN 15, 1994
HELP-PROMPT: Answer must be 7-15 characters in length and not contain either a semicolon or colon.
DESCRIPTION: The number assigned to the EEO Complaint case by this software at initial, and subsequent
entry/edit sessions.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 785^D
1)= S ^EEO(785,"D",$E(X,1,30),DA)=""
2)= K ^EEO(785,"D",$E(X,1,30),DA)
Regular cross-reference for the case number.
785,2 STATION 0;3 POINTER TO INSTITUTION FILE (#4)
LAST EDITED: DEC 02, 1993
HELP-PROMPT: System generated no user input needed.
DESCRIPTION:
The Complainants station name, (The station to which s/he is assigned).
SOURCE OF DATA: 'H
CROSS-REFERENCE: 785^C
1)= S ^EEO(785,"C",$E(X,1,30),DA)=""
2)= K ^EEO(785,"C",$E(X,1,30),DA)
785,5 SERVICE 0;4 POINTER TO NATIONAL SERVICE FILE (#730)
LAST EDITED: MAR 28, 1994
DESCRIPTION: The service department to which the complainant belongs. This points to file #730, the National
Service file.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,6 POSITION/GRADE 0;5 FREE TEXT
GRADE
INPUT TRANSFORM: K:$L(X)>18!($L(X)<10)!(X[":")!(X[";")!(X["^") X
LAST EDITED: JUN 15, 1994
HELP-PROMPT: Answer must be 10-18 characters in length. The following format would normally be used:
GS-0334-11.
DESCRIPTION:
The pay grade of the complainants position, (pay plan-series-grade).
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,6.5 JOB TITLE 5;19 FREE TEXT
INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!(X[":")!(X[";")!(X["^") X
LAST EDITED: JUN 15, 1994
HELP-PROMPT: Answer must be 3-30 characters in length and cannot contain a colon or semicolon.
DESCRIPTION:
The job title of the complainant.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,8 REP'S NAME 0;7 FREE TEXT
REP-NAME
INPUT TRANSFORM: K:$L(X)>30!($L(X)<1)!(X[";")!(X[":")!(X["^") X
LAST EDITED: JUN 15, 1994
HELP-PROMPT: Answer must be 1-30 characters in length and does not contain a ";" or ":".
DESCRIPTION: The name of the person representing the complainant.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,9 REP'S PHONE NO. 0;8 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<1)!(X[";")!(X[":")!(X["^") X
LAST EDITED: MAR 28, 1994
HELP-PROMPT: Answer must be 1-20 characters in length and does not contain a ";" or ":".
DESCRIPTION:
Enter the phone number of the complainant's representative.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,10 REP'S STREET ADDR. 0;9 FREE TEXT
INPUT TRANSFORM: K:$L(X)>25!($L(X)<1)!(X[";")!(X[":")!(X["^") X
LAST EDITED: MAR 28, 1994
HELP-PROMPT: Answer must be 1-25 characters in length and does not contain a ";" or ":".
DESCRIPTION:
Enter the street address of the complainant's representative.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,11 REP'S CITY ADDR. 0;10 FREE TEXT
INPUT TRANSFORM: K:$L(X)>25!($L(X)<1)!(X[";")!(X[":")!(X["^") X
LAST EDITED: MAR 28, 1994
HELP-PROMPT: Answer must be 1-25 characters in length and does not contain a ";" or ":".
DESCRIPTION:
The city in which the complainant's representative resides.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,12 REP'S STATE ADDR. 0;11 POINTER TO STATE FILE (#5)
LAST EDITED: MAR 28, 1994
HELP-PROMPT: The state portion of the representative's mailing address.
DESCRIPTION:
The state in which the complainant's representative resides.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,13 REP'S ZIP CODE 0;12 FREE TEXT
INPUT TRANSFORM: K:$L(X)>10!($L(X)<5)!'(X?5N!(X?5N1"-"4.5N)) X
LAST EDITED: MAR 28, 1994
HELP-PROMPT: Answer must be 5-10 characters in length.
DESCRIPTION: Enter the zip code of the complainant's representative in either 5 or 9 digit format (5 numbers or
5 numbers followed by a "-" and four more numbers).
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,14 COUNSELOR'S NAME 1;1 POINTER TO NEW PERSON FILE (#200)
CON-NAME
LAST EDITED: DEC 07, 1994
HELP-PROMPT: The counselor must exist in the New Person file (#200).
DESCRIPTION:
The name of the counselor assigned to the complainant.
785,14.1 TOTAL COUNSELOR DAYS ; COMPUTED
TOT COUN DAYS (30)
MUMPS CODE: S EN1=$S($P($G(^EEO(785,D0,1)),U,2)>0:"1;2",$P($G(^EEO(785,D0,6)),U,3)>0:"6;3",1:"1;3"),EN2="1;12"
D INPUT^EEOEOSE
ALGORITHM: S EN1="1;2",EN2="1;12" D INPUT^EEOEOSE
LAST EDITED: JAN 12, 1995
DESCRIPTION: From the date an EEO counselor is contacted until the Notice of Final Interview is issued to the
Complainant (30 calander days allowed unless an extension is granted).
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,14.5 DATE OF INCIDENT 1;11 DATE (audited)
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(DTDT) X I $D(X) S EEOS=14.7,EEOSEQ="15^16^15.5^23.5^46.5" D ^EEOEINP
K:$G(E3)=1 X,E3
LAST EDITED: JAN 19, 1995
HELP-PROMPT: Cannot be a future date.
DESCRIPTION: The date the complainant initially contacted the EEO office, cannot be after the date of the Final
Interview.
AUDIT: EDITED OR DELETED
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,15 DATE NOTICE OF FINAL INTERVIEW 1;2 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X I $D(X) S EEOS=15,EEOSEQ="14.5^14.7^16" D ^EEOEINP K:$G(E3)=1
X,E3
LAST EDITED: MAR 14, 1994
HELP-PROMPT: The date the complainant is given notice of when the final interview will take place, cannot be a
future date.
DESCRIPTION: Date notice of final interview is issued to the complainant, cannot be prior to the date of initial
contact.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,15.3 DATE REQUEST FOR ADD'L INFO 5;13 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X
LAST EDITED: MAR 14, 1994
HELP-PROMPT: Date Complainant is requested to provide additional information to the EEO Officer.
DESCRIPTION: The date the Complainant is given a request for additional information that is necessary to
continue processing the complaint.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,15.4 DATE ADDITIONAL INFO. RECEIVED 6;4 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X
LAST EDITED: JUN 14, 1994
HELP-PROMPT: Date the additional information requested from the complainant is received.
DESCRIPTION:
The date that requested additional information is received from the complainant.
785,15.5 DATE OF INFORMAL RESOLUTION 6;3 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X
LAST EDITED: DEC 14, 1994
HELP-PROMPT: If the complaint is resolved before becoming formal enter that date of the resolution.
DESCRIPTION: Date that the complaint is resolved, if the complaint is resolved at the informal stage (informal
stage is before 'Date Formal Complaint Filed').
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,15.7 DATE EXTENSION REQUESTED 6;5 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X
LAST EDITED: JUN 14, 1994
HELP-PROMPT: The date an extension to counseling is requested.
DESCRIPTION: Date that the Complainant and Agency requested an extension (must be within 30 days of Date of
Initial Contact)
785,15.9 LENGTH OF EXTENSION GRANTED 6;6 NUMBER
LGTH OF EXTN
INPUT TRANSFORM: K:+X'=X!(X>60)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: DEC 09, 1994
HELP-PROMPT: Type a Number between 0 and 60, 0 Decimal Digits
DESCRIPTION: The length of the period for which an extension is granted during the counseling phase of a
complaint.
785,16 DATE FORMAL COMPLAINT FILED 1;3 DATE
C-D-FILED
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(DTDT) X
LAST EDITED: FEB 23, 1995
HELP-PROMPT: Cannot be a future date.
DESCRIPTION:
If a union grievance was also filed enter that date.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,16.07 DATE MSPB APPEAL FILED 6;2 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X
LAST EDITED: JUN 23, 1994
HELP-PROMPT: Date filed with MSPB.
DESCRIPTION:
If a complaint was also filed with MSPB, enter that date here.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,16.3 OFFICE COMPLAINT FILED WITH 5;14 SET
'OEO' FOR Office of Equal Opportunity;
'CO' FOR Central Office;
'STN' FOR Station;
'SEC' FOR Secretary of Veteran Affairs;
LAST EDITED: JUN 13, 1994
DESCRIPTION: An EEO complaint may be filed with a variety of offices, select the appropriate one for this
complaint.
785,16.5 DATE COUNS. INFORMED OF F.C. 5;7 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X I $D(X) S EEOS=16.5,EEOSEQ="16.7^16^14.5^46.5^16.75^24^" D ^E
EOEINP K:$G(E3)=1 X,E3
LAST EDITED: JAN 19, 1995
HELP-PROMPT: Cannot be a future date.
DESCRIPTION: The date the counselor is informed of the formal complaint, cannot be after the date the counselor
files his report.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,16.7 DATE COUNSELOR FILED REPORT 5;8 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X I $D(X) S EEOS=16.7,EEOSEQ="16.5^16^24^" D ^EEOEINP K:$G(E3)=
1 X,E3
LAST EDITED: JUN 23, 1994
HELP-PROMPT: Cannot be a future date.
DESCRIPTION: The date the counselor files his report to the EEO Officer, cannot be prior to the date the
counselor was informed of the formal complaint.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,16.75 DATE COMP REC'D BY EEO OFF. 5;9 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X I $D(X) S EEOS=16.75,EEOSEQ="16^21^14.5^24^22^22.3^23.5^26" D
^EEOEINP K:$G(E3)=1 X,E3
LAST EDITED: JAN 19, 1995
HELP-PROMPT: Cannot be a future date.
DESCRIPTION: The date that the EEO Officer actually receives the formal complaint from whatever source.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,17.5 ISSUE CODES 10;0 POINTER Multiple #785.02
DESCRIPTION: Enter here as many issue codes as are necessary for this complaint, this field points to EEO
Complaint Issue Codes file (786).
785.02,.01 ISSUE CODES 0;1 POINTER TO EEO COMPLAINT ISSUE CODES FILE (#786) (Multiply asked)
LAST EDITED: DEC 15, 1994
DESCRIPTION:
Enter the code(s) that best describe the reasons for this complaint.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 785.02^B
1)= S ^EEO(785,DA(1),10,"B",$E(X,1,30),DA)=""
2)= K ^EEO(785,DA(1),10,"B",$E(X,1,30),DA)
785.02,1 DATE OCCURRED 0;2 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X S:$D(X) EEOXX=1
LAST EDITED: FEB 23, 1995
HELP-PROMPT: The date an example of this issue took place for this complaint.
DESCRIPTION:
The date actions took place to inspire the selection of this Issue Code.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,18.5 BASIS 9;0 POINTER Multiple #785.01
DESCRIPTION: Enter all 'BASIS' that are involved in this complaint, this field points to the EEO Complaint Basis
file (#785.1).
785.01,.01 BASIS 0;1 POINTER TO EEO COMPLAINT BASIS FILE (#785.1) (Multiply asked)
LAST EDITED: DEC 15, 1994
DESCRIPTION:
The Basis(s) this complaint is filed on.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 785.01^B
1)= S ^EEO(785,DA(1),9,"B",$E(X,1,30),DA)=""
2)= K ^EEO(785,DA(1),9,"B",$E(X,1,30),DA)
785,19 ISSUE CODE COMMENTS 1;6 FREE TEXT
INPUT TRANSFORM: K:$L(X)>120!($L(X)<1)!(X["^")!(X[";")!(X[":") X
LAST EDITED: MAR 14, 1994
HELP-PROMPT: Answer must be 1-120 characters in length.
DESCRIPTION: Enter a brief description of any topic related to this complaint. This must not exceed 120
characters.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,20 DATE OF LETTER OF ACKNOW. 2;1 DATE
D-ACKNOW.
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X
LAST EDITED: MAR 14, 1994
HELP-PROMPT: Cannot be a future date.
DESCRIPTION: Date of letter from the station to the complainant acknowledging receipt of the complaint. Use the
date this letter is signed (Date shown on letter).
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,21 DATE TO OGC FOR ACC/REJ 2;2 DATE
D-GC
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X I $D(X) S EEOS=21,EEOSEQ="22.3^16^16.75^22^23.5" D ^EEOEINP K
:$G(E3)=1 X,E3
LAST EDITED: JAN 19, 1995
HELP-PROMPT: Cannot be a future date.
DESCRIPTION: The date that the formal complaint is sent by the station to the Office of General Counsel for
acceptance or rejection.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,22 DATE ACCEPTED BY OGC 2;3 DATE
D-A-GC
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X I $D(X) S EEOS=22,EEOSEQ="21^16^" D ^EEOEINP K:$G(E3)=1 X,E3
LAST EDITED: MAR 14, 1994
HELP-PROMPT: Cannot be a future date.
DESCRIPTION: Date that the Office of General Counsel accepts the report, the date at the top of the OGC letter.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,22.3 DATE DISMISSED BY OGC 12;1 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X I $D(X) S EEOS=22.3,EEOSEQ="21^16^" D ^EEOEINP K:$G(E3) X,E3
LAST EDITED: JUL 21, 1994
HELP-PROMPT: Cannot be a future date.
DESCRIPTION: Date that the Office of General Counsel dismisses the complaint. The date at the top of the OGC
letter.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,23 TOTAL DAYS OGC ACC/REJ ; COMPUTED
DAYS OGC ACC/ REJ (45)
MUMPS CODE: S EN1=$S($P($G(^EEO(785,D0,12)),U)>0:"12;1",1:"2;3"),EN2="2;2" D INPUT^EEOEOSE
ALGORITHM: #22-#21
LAST EDITED: JUL 15, 1994
DESCRIPTION: From the date the OGC receives a request to dismiss a complaint to the date the complaint is
dismissed or accepted in whole or in part (45 days).
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,23.5 DATE TO OGC FOR FINAL DECISION 2;13 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X I $D(X) S EEOS=23.5,EEOSEQ="16^14.5^46.5^" D ^EEOEINP K:$G(E3
)=1 X,E3
LAST EDITED: MAR 14, 1994
HELP-PROMPT: Cannot be a future date.
DESCRIPTION:
Date the complaint was sent to the Office of General Counsel for their final decision.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,23.6 TOTAL DAYS/OGC FINAL DECISION ; COMPUTED
DAYS FOR OGC F.D.
MUMPS CODE: S EN1="5;12",EN2="2;13" D INPUT^EEOEOSE
ALGORITHM: S EN1="5;12",EN2="2;13" D INPUT^EEOEOSE
LAST EDITED: AUG 11, 1993
DESCRIPTION:
Number of days between complaint being sent to OGC and their issuance of the final decision.
785,24 DATE COMPLAINT ACCEPTED BY STN 2;4 DATE
D-ACCEPT-STN
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X I $D(X) S EEOS=24,EEOSEQ="14.5^16^16.75^" D ^EEOEINP K:$G(E3)
=1 X,E3
LAST EDITED: MAR 14, 1994
HELP-PROMPT: Cannot be a future date
DESCRIPTION:
Date that the complaint was accepted by the station.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,25 TOTAL DAYS ACCEPTANCE ; COMPUTED
DAYS ACC. BY STN (45)
MUMPS CODE: D ACCEPT^EEOUTIL1
ALGORITHM: S EN1="2;4",EN2="5;9" D INPUT^EEOEOSE
LAST EDITED: NOV 14, 1994
DESCRIPTION: From the date the complaint is filed with or received by the EEO Officer, to the date the complaint
is accepted by the EEO Officer and referred to the Office of Equal Opportunity for investigation or
referred to the OGC for possible dismissal.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,26 DATE INVESTIGATOR REQUESTED 2;5 DATE
D-INV-REQ
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(DT0 I $D(^(D,0))#2 S X
=$P(^(0),U,1) S:$D(^EEO(787.5,+X,0)) X=$P(^(0),U,1) X DICMX Q:'$D(D) S D=D1
9.3 = S Y(785.03,3,81)=$S($D(D1):D1,1:""),Y(785.03,3,80)=$S($D(D0):D0,1:"") X ^DD(785.03,3,9.2):D0>
0 S X="" K DIC S DIC="^DPT(",DIC(0)="NMF" D ^DIC S (D,D0)=+Y
ALGORITHM: 27.5:2
LAST EDITED: DEC 01, 1993
785.03,4 INV FINDING 0;5 SET
'F' FOR Findings of Discrimination;
'N' FOR No Findings of Discrimination;
INPUT TRANSFORM:S:$D(X) EEOXX=1 Q
LAST EDITED: MAR 10, 1994
DESCRIPTION:
Enter either "F" for findings of discrimination or "N" for no findings of discrimination.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785.03,5 INV REVIEW ASSIGNED TO 0;6 POINTER TO EEO CENTRAL INVESTIGATORS FILE (#787.5)
LAST EDITED: DEC 01, 1993
DESCRIPTION:
The person assigned to review the investigative report, he/she must also be an investigator.
785.03,6 INV REVIEW ASSIGNED DATE 0;7 DATE
INPUT TRANSFORM:S %DT="E" D ^%DT S X=Y K:Y<1 X
LAST EDITED: DEC 01, 1993
785.03,7 INV REPORT RELEASE DATE 0;8 DATE
INPUT TRANSFORM:S %DT="E" D ^%DT S X=Y K:Y<1 X
LAST EDITED: DEC 01, 1993
HELP-PROMPT: The date OEO releases the Investigator's report.
DESCRIPTION:
The date the Investigator's report is released to the station.
785.03,8 INV REPORT DUE DATE ; COMPUTED DATE
MUMPS CODE: S Y(785.03,8,1)=$S($D(^EEO(785,D0,11,D1,0)):^(0),1:"") S X=$P(Y(785.03,8,1),U,2),X1=X,X2=+45,X="" D
C^%DTC:X1
ALGORITHM: #1+45
785,29 INITIAL INV DATE ASSIGNED 3;3 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(DTDT) X I $D(X) S EEOS=32,EEOSEQ="29^40.5^41^46.5" D ^EEOEINP K:$G(E3
)=1 X,E3
LAST EDITED: JAN 19, 1995
HELP-PROMPT: Cannot be a future date, the date that the final investigator's approved report arrives at the
station.
DESCRIPTION: The date the final investigative report is received by the EEO Officer (if by mail use the postmark
date).
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,33 TOTAL INVESTIGATION DAYS ; COMPUTED
TOT INV. DAYS (45)
MUMPS CODE: S Y(785,33,1)=$S($D(^EEO(785,D0,3)):^(3),1:"") S X=$P(Y(785,33,1),U,6),X1=X,X2=$P(Y(785,33,1),U,3),
X="" D:X2 ^%DTC:X1
ALGORITHM: #32-#29
LAST EDITED: AUG 12, 1993
DESCRIPTION: From the date that the investigator is assigned to the date that the report of investigation is
delivered to the EEO Officer (45 days).
785,40.5 DATE COMP RECEIVED ADV/RIGHTS 5;11 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X I $D(X) S EEOS=40.5,EEOREV="23.5",EEOSEQ="14.5^16^40.6^32^44^
46.5" D ^EEOEINP K:$G(E3)=1 X,E3
LAST EDITED: JAN 19, 1995
HELP-PROMPT: Cannot be a future date.
DESCRIPTION: When the complainant actually receives his advisement of rights. If sent by mail the date on the
return receipt.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,40.6 DATE COMP MAKES ELECTION 5;10 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X I $D(X) S EEOS=40.6,EEOSEQ="14.5^16^44^40.5^",EEOREV=41 D ^EE
OEINP K:$G(E3)=1 X,E3
LAST EDITED: AUG 30, 1994
HELP-PROMPT: Cannot be a future date.
DESCRIPTION: The date the complainant makes his choice on which course of action he will take after being
advised of his rights and responsibilities. This date will be the date of the postmark if received
by mail, otherwise the date it was delivered.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,41 DATE COMP SENT ADV/RIGHTS 2;6 DATE
D-COMP ADV/ RGHTS
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X I $D(X) S EEOS=41,EEOSEQ="14.5^16^32^",EEOREV=40.6 D ^EEOEINP
K:$G(E3)=1 X,E3
LAST EDITED: AUG 31, 1994
HELP-PROMPT: Cannot be a future date.
DESCRIPTION: Date the complainant is sent the advisement of rights, this date should be prior to both the date
the complainant receives his advisement of rights, and the date he makes his election. Enter the
date the EEO Officer signs this letter.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,42 TOTAL DAYS ASSIGN INV. ; COMPUTED
DAYS TO ASS. INV. (30)
MUMPS CODE: S EN1="3;3",EN2="2;5" D INPUT^EEOEOSE
ALGORITHM: S EN1="3;3",EN2="2;5" D INPUT^EEOEOSE
LAST EDITED: AUG 12, 1993
DESCRIPTION: From the date the OEO receives a request for the assignment of an investigator to the date that an
investigator is assigned (30 days).
785,44 DATE EEOC HEARING REQUESTED 2;9 DATE
DC-REQ-H
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X I $D(X) S EEOS=44,EEOSEQ="45^40.6^14.5^16^46.5" D ^EEOEINP K:
$G(E3)=1 X,E3
LAST EDITED: JAN 19, 1995
HELP-PROMPT: Cannot be a future date.
DESCRIPTION:
The date that has been requested for the EEO hearing to take place.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,45 DATE EEOC HEARING CONDUCTED 2;10 DATE
D-HEAR
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(DTDT) X
LAST EDITED: MAR 14, 1994
HELP-PROMPT: Cannot be a future date.
DESCRIPTION: Enter the date of the Equal Employment Opportunities Commission appeal. This will be the date on
the letter from OGC stating that this complaint is being appealed.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,46.4 EEOC APPEAL #2 5;18 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X
LAST EDITED: MAR 14, 1994
HELP-PROMPT: Cannot be a future date.
DESCRIPTION: If the decision of the first EEOC appeal is appealed, enter the date of this second appeal here.
Use the date that appears on the letter received from OGC stating that the complaint is being
appealed.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,46.5 DATE FINAL AGENCY DEC. ISSUED 5;12 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(Y>DT) X I $D(X) S EEOS=46.5,EEOSEQ="14.5^16^23.5^48" D ^EEOEINP K:$G(
E3)=1 X,E3
LAST EDITED: MAR 14, 1994
HELP-PROMPT: Cannot be a future date.
DESCRIPTION:
The date that the Final Agency Decision was issued.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,47 DATE CIVIL ACTION FILED 2;11 DATE
D-CA-FILED
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1!(DTDT) X K:$G(E3)=1 X,E3
LAST EDITED: JUN 16, 1994
HELP-PROMPT: Cannot be a future date.
DESCRIPTION:
The date that the complaint has been closed using any of the 7 valid reasons found in field (#49).
TECHNICAL DESCR:
Entry of date will automatically send this status input to field (#43) STATUS.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,48.5 DELETED 12;2 SET
'D' FOR DELETED;
LAST EDITED: DEC 01, 1993
HELP-PROMPT: If this file is deleted it may no longer be accessed though the EEO software.
DESCRIPTION: This is a field that flags, but does not delete EEO Complaints that are no longer needed by the
users. The user can no longer access files flagged as deleted.
785,49 REASON CLOSED 4;2 SET
'1' FOR SETTLEMENT;
'2' FOR AGENCY DECISION;
'3' FOR REJECTION BY OGC;
'4' FOR CIVIL ACTION FILED;
'5' FOR WITHDRAWAL;
'6' FOR CANCELLATION;
'7' FOR FAILURE TO PROSECUTE;
'8' FOR OTHER;
LAST EDITED: JAN 14, 1994
DESCRIPTION: The reason that the case was closed, any one of the seven reasons listed when the user enters a "?"
may be selected.
785,50 TOTAL PROCESSING DAYS ; COMPUTED
TOT PROC DAYS
MUMPS CODE: S EN1="4;1",EN2="1;3" D INPUT^EEOEOSE
ALGORITHM: S EN1="4;1",EN2="1;3" D INPUT^EEOEOSE
LAST EDITED: AUG 04, 1993
DESCRIPTION: The total number of days it takes to process the EEO complaint, this is the difference between the
date the complaint is closed and the date that the complaint became formal.
785,51 TOTAL COUNSELOR REPORT DAYS ; COMPUTED
TOT COUN REPT DAYS (5)
MUMPS CODE: S EN2="5;7",EN1=$S($P($G(^EEO(785,D0,5)),U,8)>0:"5;8",1:"5;9") D INPUT^EEOEOSE
ALGORITHM: #16.7-#16.5
LAST EDITED: JAN 12, 1995
DESCRIPTION: The difference between when the counselor filed his report and the date he was informed of the
formal complaint.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,53 TOTAL DAYS FOR ADVISE/RIGHTS ; COMPUTED
DAYS ADV/ RIGH (15)
MUMPS CODE: S EN1="2;6",EN2="3;6" D INPUT^EEOEOSE
ALGORITHM: S EN1="2;6",EN2="3;6" D INPUT^EEOEOSE
LAST EDITED: JUN 15, 1994
DESCRIPTION: The difference between when the complainant was advised of his rights and the date the approved
investigators report was received.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,54 TOTAL DAYS TO REQ EEOC HEARING ; COMPUTED
DAYS TO REQU EEOC HEAR
MUMPS CODE: S Y(785,54,1)=$S($D(^EEO(785,D0,2)):^(2),1:""),Y(785,54,2)=$S($D(^(5)):^(5),1:"") S X=$P(Y(785,54,1
),U,9),X1=X,X2=$P(Y(785,54,2),U,10),X="" D:X2 ^%DTC:X1
ALGORITHM: #44-#40.6
LAST EDITED: JAN 18, 1995
DESCRIPTION: The difference between when the EEOC hearing was requested and the date the complainant makes his
election.
785,55 TOTAL DAYS TO MAKE ELECTION ; COMPUTED
DAYS TO MAKE ELEC (30)
MUMPS CODE: S EN1=$S($P($G(^EEO(785,D0,5)),U,10)>0:"5;10",$P($G(^EEO(785,D0,2)),U,9):"2;9",1:"2;13"),EN2="5;11"
D INPUT^EEOEOSE
ALGORITHM: S EN1="5;10",EN2="5;11" D INPUT^EEOEOSE
LAST EDITED: JAN 19, 1995
DESCRIPTION: The time between the date the complainant makes his response to the advisement of rights and when
the complaint file is transmitted to the EEOC for the hearing, or to OGC for a FAD.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
785,56 TOTAL DAYS FOR FAD DECISION ; COMPUTED
DAYS FOR FAD (60)
MUMPS CODE: S EN1="5;12",EN2="2;13" D INPUT^EEOEOSE
ALGORITHM: S EN1="5;12",EN2="2;13" D INPUT^EEOEOSE
LAST EDITED: AUG 04, 1993
DESCRIPTION: This calculates the time between when the complaint was sent to the OGC for the final decision and
when the Agency's final decision was issued.
785,57 180 DAYS ; COMPUTED
MUMPS CODE: S EN1="5;11",EN2="1;3" D INPUT^EEOEOSE
ALGORITHM: S EN1="5;11",EN2="1;3" D INPUT^EEOEOSE
DESCRIPTION: This shows the number of days the complaint is being processed within the Director's scope of
authority/responsibility. Not to exceed 180 days.
785,60 NARRATIVE INFORMATION 7;0 WORD-PROCESSING #785.04
LAST EDITED: FEB 10, 1995
DESCRIPTION: You may enter any information pertaining to this complaint, this field will be displayed on Form
0210 (Initial Complaint Intake Form)
LAST EDITED: FEB 10, 1995
HELP-PROMPT: Enter a list of names of people, documents, or records that the complainant wants you to
interview or inspect.
DESCRIPTION: You may enter any information pertaining to this complaint, this field will be displayed on Form
0210 (Initial Complaint Intake Form).
785,61 CORRECTIVE ACTION 8;0 POINTER Multiple #785.061
DESCRIPTION: The resolution the complainant is seeking, what actions the complainant feels would rectify the
situation. This field points to the Corrective Actions file (#785.2).
785.061,.01 CORRECTIVE ACTION 0;1 POINTER TO EEO CORRECTIVE ACTIONS FILE (#785.2) (Multiply asked)
LAST EDITED: DEC 15, 1994
HELP-PROMPT: Enter remedies being sought by the Complainant.
DESCRIPTION: The resolution the complainant is seeking. What actions the complainant feels would rectify the
situation. This field points to the Corrective Actions file (#785.2).
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 785.061^B
1)= S ^EEO(785,DA(1),8,"B",$E(X,1,30),DA)=""
2)= K ^EEO(785,DA(1),8,"B",$E(X,1,30),DA)
785,62 TRANSMIT FLAG XMT;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>1!($L(X)<1)!'(X?1"X") X
LAST EDITED: JAN 14, 1994
HELP-PROMPT: Answer must be 1 character in length.
DESCRIPTION: An "X" in this field marks records that have been changed and are to be later evaluated for
transmission by the EEO Tasked Bulletin option.
785,63 COMPLAINT STATUS ; COMPUTED
MUMPS CODE: D ^EEOUTIL1
ALGORITHM: D ^EEOUTIL1
DESCRIPTION: Auotmatically generated by EEO Complaint Tracking to identify the current processing phase for the
complaint.
785,64 180 DAYS OFF SITE PROCESSING ; COMPUTED
OFF SITE PRO- CESS
MUMPS CODE: X ^DD(785,64,9.2) S X=X+Y(785,64,3)
9.2 = X $P(^DD(785,23,0),U,5,99) S Y(785,64,1)=X X $P(^DD(785,33,0),U,5,99) S Y(785,64,2)=X X $P(^D
D(785,42,0),U,5,99) S Y(785,64,3)=X S X=Y(785,64,1)+Y(785,64,2)
ALGORITHM: #23+#33+#42
LAST EDITED: JUN 17, 1994
DESCRIPTION: The total of all days that may be counted in the 180 days field, but were out of the control of the
station EEO program. This includes the total days to assign and investigate the complaint and time
spent at OGC waiting for an acceptance or rejection.
785,71 EEOC APPEAL RESOLUTIONS 20;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>60!($L(X)<1) X
LAST EDITED: JUN 16, 1994
HELP-PROMPT: Answer must be 1-60 characters in length and may not contain a ";" or ":".
DESCRIPTION:
Enter any information pertaining to the EEOC Appeal filed involving this complaint
785,71.5 EEOC APPEAL RESOLUTIONS (#2) 20;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>60!($L(X)<1) X
LAST EDITED: JUN 16, 1994
HELP-PROMPT: Answer must be 1-60 characters in length and may not contain a ":" or ";".
DESCRIPTION:
Enter any information pertaining to a second EEOC Appeal filed involving this complaint.
785,72 CIVIL ACTION RESOLUTIONS 20;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>120!($L(X)<1) X
LAST EDITED: JUN 16, 1994
HELP-PROMPT: Answer must be 1-120 characters in length and not contain a ":" or ";".
DESCRIPTION:
Enter any information pertaining to the Civil Action filed involving this complaint.
785,98 COUNSELOR SECURITY SEC;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>18!($L(X)<1) X
OUTPUT TRANSFORM: Q:Y="" S:$D(^VA(200,Y)) Y=$P(^VA(200,Y,0),U)
LAST EDITED: MAR 24, 1995
HELP-PROMPT: Enter the user number for the person to be responsible for entry of the pre-formal complaint input.
DESCRIPTION: This is the user number for the EEO counselor, specialist, data input personnel, etc., who is
responsible for inputting pre-formal complaint data into this complaint.
FILES POINTED TO FIELDS
EEO CENTRAL INVESTIGATORS
(#787.5) INVESTIGATOR'S NAME:INVESTIGATOR'S NAME (#.01)
INV REVIEW ASSIGNED TO (#5)
EEO COMPLAINT BASIS (#785.1) BASIS:BASIS (#.01)
EEO COMPLAINT ISSUE CODES
(#786) ISSUE CODES:ISSUE CODES (#.01)
EEO CORRECTIVE ACTIONS (#785.2) CORRECTIVE ACTION:CORRECTIVE ACTION (#.01)
INSTITUTION (#4) STATION (#2)
NATIONAL SERVICE (#730) SERVICE (#5)
NEW PERSON (#200) COUNSELOR'S NAME (#14)
STATE (#5) STATE (#.09)
REP'S STATE ADDR. (#12)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):