Routine: IVMLERR2

Information

IVMLERR2 ;ALB/RMO,ERC - IVM Transmission Error Processing - Protocols; 15-SEP-1997 ; 5/29/07 9:29am

Name	Comments	DBIA/ICR reference
CL	;Entry point for IVMLE CHANGE LIST protocol ; Input -- IVMEPSTA Error processing statuses ; Output -- IVMEPSTA Error processing statuses ; VALMSG Custom message ; VALMBCK R =Refresh screen
CD	;Entry point for IVMLE CHANGE DATE RANGE protocol ; Input -- IVMBEG Begin date ; IVMEND End date ; Output -- IVMBEG Begin date ; IVMEND End date ; VALMSG Custom message ; VALMBCK R =Refresh screen
SL	;Entry point for IVMLE SORT LIST protocol ; Input -- IVMSRTBY Sort by criteria ; Output -- IVMSRTBY Sort by criteria ; VALMSG Custom message ; VALMBCK R =Refresh screen
CE	;Entry point for IVMLE CHECK ERROR OFF LIST protocol ; Input -- None ; Output -- VALMSG Custom message ; VALMBCK R =Refresh screen
CHKERR(IVMARY,IVMLINE,IVMTLIEN)	;Check error off list ; Input -- IVMARY Global array subscript ; IVMLINE Line number ; IVMTLIEN IVM transmission log IEN ; Output -- None
RP	;Entry point for IVMLE RETRANSMIT PATIENT protocol ; Input -- None ; Output -- VALMSG Custom message ; VALMBCK R =Refresh screen
SETPAT(IVMARY,IVMLINE,IVMTLOG)	;Set patient to retransmit ; Input -- IVMARY Global array subscript ; IVMLINE Line number ; IVMTLOG IVM transmission log entry array ; Output -- None
UPDPAT(IVMARY,IVMDFN)	;Update all IVM transmssion error log entries in the list

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Date Range was not changed." Line Location: CD+15
Function Call: WRITE	Prompt: !,^TMP(IVMARY,$J,IVMLINE,0) Line Location: CHKERR+10
Function Call: WRITE	Prompt: !,"...Unable to check error off list" Line Location: CHKERR+12
Function Call: WRITE	Prompt: !,^TMP(IVMARY,$J,IVMLINE,0) Line Location: SETPAT+12
Function Call: WRITE	Prompt: !,"...Unable to set transmit flag for patient" Line Location: SETPAT+14