STANDARD DATA DICTIONARY #786 -- EEO COMPLAINT ISSUE CODES FILE 6/27/25 PAGE 1 STORED IN ^EEO(786, (25 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- This area contains the 25 valid issue codes for initiating an EEO Complaint. DD ACCESS: @ RD ACCESS: @ WR ACCESS: @ DEL ACCESS: @ LAYGO ACCESS: @ AUDIT ACCESS: @ POINTED TO BY: ISSUE CODES field (#.01) of the ISSUE CODES sub-field (#785.02) of the EEO COMPLAINTS File (#785) ISSUE CODES field (#.01) of the ISSUE CODES sub-field (#785.52) of the EEO INFORMAL COMPLAINTS File (#785.5) CROSS REFERENCED BY: NAME(B) 786,.01 NAME 0;1 FREE TEXT (Required) INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X S STANO=$G(STANO) K:$$SITE^EEOEEXMT=STANO!(STANO="") X K:'$D(XMZ) !('$D(EEO("ROOT"))) X LAST EDITED: MAR 21, 1994 HELP-PROMPT: ONLY VA CENTRAL OFFICE AND REGION USERS MAY MODIFY ENTRIES WITHIN THIS FILE. ADDITIONAL ENTRIES MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION. DESCRIPTION: This field contains the Issue Codes from which the complainant may choose. DELETE TEST: 1,0)= I 1 DELETE AUTHORITY: "@" NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 786^B 1)= S ^EEO(786,"B",$E(X,1,30),DA)="" 2)= K ^EEO(786,"B",$E(X,1,30),DA) 786,99 LAST XMIT UPDATE XMT;1 DATE INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X LAST EDITED: MAR 09, 1994 786,99.1 TRANSMIT FLAG XMT;2 FREE TEXT INPUT TRANSFORM: K:$L(X)>1!($L(X)<1)!'(X?1"X") X LAST EDITED: MAR 10, 1994 HELP-PROMPT: Answer must be 1 character in length. INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):