Routine: EEOIPCON

Information

EEOIPCON ;HISC/JWR - POST INIT FIELD 14 FILE 785 CONVERSION ;02/08/93 11:15

Name	Comments	DBIA/ICR reference
EN	;
REPORT
START
SET
NAME
HEAD
LINE
EXIT
CLNODE	;Finishes cleaning data from fields that are to be deleted for V. 2.0.

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"The Counselor's Name Field (#14, File 785) has been changed from free text",!,"to a pointer to File 200, enter a device to print the names of counselor's",!,"who could not be converted.",!! Line Location: REPORT+0
Function Call: WRITE	Prompt: !," EEO COUNSELOR'S NAMES CONVERSION:" Line Location: START+1
Function Call: WRITE	Prompt: !!,"Cases with counselors that are yet to be converted to point to New Person file",!," COUNSELOR'S NAME (FLD #14 FILE #785)",!! Line Location: START+2
Function Call: WRITE	Prompt: !!,"This list contains the names of counselors who must be converted manually to",!,"reflect their New Person file entry. The IRM may do this by editing",!,"field # 14 (Counselor's Name) of file 785 (EEO Complaints) through VA File",! Line Location: START+4
Function Call: WRITE	Prompt: "Man and changing the above listed name to the correct New Person name (in File ",!,"200), or the EEO Specialist may edit this through the Enter/Edit Formal",!,"Complaint Info option." Line Location: START+5
Function Call: WRITE	Prompt: !!," CASE NUMBER COUNSELOR'S NAME",! Line Location: HEAD+0
Function Call: WRITE	Prompt: EO Line Location: HEAD+0
Function Call: WRITE	Prompt: !,EZE_"."_$J(" ",5-$L(EZE)),CASE,$J(" ",28-$L(CASE)),N1,$J(" ",35-$L(N1)) Line Location: LINE+1