Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: EEO211

Package: EEO Complaint Tracking

Routine: EEO211


Information

EEO211 ;HISC/JWR - GATHERS INFORMATION FOR FORM 0210 (COUNS. INTAKE FORM) ;Apr 20, 1995

Source Information

Source file <EEO211.m>

Entry Points

Name Comments DBIA/ICR reference
GATHER ;Gathers complaint information for the Complaint Intake Form (0210)
MULT ;Makes an array of the information in the multiple field
WP
BOX ;Fills boxes for Issue Codes on Form 0210
DT
BOXB ;Fills basis boxes on Form 0210
BOXC ;
BOXC1 ;Fills boxes for Corrective actions on Form 0210
WPB ;Checks legnth of word processing fields
WPB2 ;Enter here if WP field requires more than one page
LEND ;If information for Form 0210 is more than one page this makes second page
EX1
TEST ;Test legnth of word processing fields
WPB3 ;If more than one page is required for Form 0210
FILL ;Fills in blank lines
TERMIOF ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,OE,BOX,CN,$J(OE,80-$L(CN)-58),EOE2,$J(" ||",15-$L(EOE2))
  • Line Location: BOX+4
Function Call: WRITE
  • Prompt: BOX,CN,$J(OE,22-$L(CN)),EOE2,$J(OE,14-$L(EOE2))
  • Line Location: BOX+5
Function Call: WRITE
  • Prompt: $J(OE,25),$J(OE,14)
  • Line Location: BOX+7
Function Call: WRITE
  • Prompt: !,OE,$J(OE,25),$J("||",15),$J(OE,25),$J(OE,14)
  • Line Location: BOX+8
Function Call: WRITE
  • Prompt: !,OE,BOX," ",CN,$J(OE,36-$L(CN))
  • Line Location: BOXB+3
Function Call: WRITE
  • Prompt: BOX," ",CN,$J(OE,35-$L(CN))
  • Line Location: BOXB+4
Function Call: WRITE
  • Prompt: $J(OE,39)
  • Line Location: BOXB+6
Function Call: WRITE
  • Prompt: !,OE,$J(OE,40),$J(OE,39)
  • Line Location: BOXB+7
Function Call: WRITE
  • Prompt: !,OE," ",EOE,$J(OE,78-$L(EOE))
  • Line Location: BOXC1+3
Function Call: WRITE
  • Prompt: !,OE,$J(OE,79),!,OE,$J(OE,79)
  • Line Location: BOXC1+4
Function Call: WRITE
  • Prompt: !,OE,$J(OE,79)
  • Line Location: WPB+2
Function Call: WRITE
  • Prompt: " 17. Case number",$J(OE,29),!,OE," ",EEONA,$J(OE,40-$L(EEONA)-11)," ",EEOCAS,$J(OE,45-$L(EEOCAS)-5),!,OE,EO,OE
  • Line Location: LEND+3
Function Call: WRITE
  • Prompt: !,OE,"10.Recommended Information Gathering (list names, documents, and records) |",!,OE,$J(OE,79)
  • Line Location: LEND+4
Function Call: WRITE
  • Prompt: !,OE,$J(OE,79),!,OE,$J(OE,79),!,OE,$J("(Recommended Info. Gathering Displayed on Following Page)",67),$J(OE,12)
  • Line Location: WPB3+2
Function Call: WRITE
  • Prompt: !,OE,$J(OE,79)
  • Line Location: FILL+1
Info |  Source |  Entry Points |  Interaction Calls