Routine: RMPRFPRT

Information

RMPRFPRT ;VMP/RB - FIX FIELD LENGTH PROBLEMS FOR FILES #660/664 ;01/13/06

Name	Comments	DBIA/ICR reference
PRINT	;print compile field length errors for specified fields in files 664/660
PRINT1	;
HDR	;
WAIT	;

Name	Line Occurrences
Function Call: WRITE	Prompt: "DATA: " Condition for execution: I=1 Line Location: PRINT1+16
Function Call: WRITE	Prompt: ?8,XD Line Location: PRINT1+16
Function Call: WRITE	Prompt: @IOF Line Location: PRINT1+17
Function Call: WRITE	Prompt: @IOF Line Location: HDR+1
Function Call: WRITE	Prompt: @IOF Line Location: HDR+2
Function Call: WRITE	Prompt: !!,?23,"File 664/660 Field Length Errors",?70,"Page ",PG,! Line Location: HDR+4
Function Call: WRITE	Prompt: !,"Originator=>> ",ORGN,! Line Location: HDR+5
Function Call: WRITE	Prompt: !,?2,"IEN",?20,"Patient Name",?50,"IFCAP ORDER",! Line Location: HDR+6
Function Call: WRITE	Prompt: !,?2,IEN,?20,$P(ERR,U,4),?50,$P(ERR,U,6),! Line Location: HDR+7
Function Call: WRITE	Prompt: ! Line Location: WAIT+3
Function Call: WRITE	Prompt: ! Line Location: WAIT+3