Routine: PXEDILUD

Information

PXEDILUD ;ISL/PKR - Establish the details for looking up PCE device interface errors. ;6/7/96

Name	Comments	DBIA/ICR reference
DT(BDATE,EDATE,TYPE)	;Date and time range.
BDATE	;Select the beginning date.
EDATE	;Select the ending date.
BDHELP	;Write the beginning date help.
EDHELP	;Write the ending date help.
EN(BEN,EEN)	;Error number range.
BENUM	;Beginning error number.
EENUM	;Ending error number.
BENHELP	;Write the beginning error number help.
EENHELP	;Write the ending error number help.
PAT	;Patient
NPAT
DPAT	;

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: BDATE+6
Function Call: WRITE	Prompt: $C(7)," ?? Enter exact date" Line Location: BDATE+11
Function Call: WRITE	Prompt: ! Line Location: EDATE+7
Function Call: WRITE	Prompt: $C(7)," ?? Enter exact date" Line Location: EDATE+13
Function Call: WRITE	Prompt: !!,"This is the beginning date and time for "_TYPE_"S that should be scanned" Line Location: BDHELP+1
Function Call: WRITE	Prompt: !,"for errors." Line Location: BDHELP+2
Function Call: WRITE	Prompt: !!,"This is the ending date and time for "_TYPE_"S that should be scanned" Line Location: EDHELP+1
Function Call: WRITE	Prompt: !,"for errors." Line Location: EDHELP+2
Function Call: WRITE	Prompt: ! Line Location: BENUM+14
Function Call: WRITE	Prompt: ! Line Location: EENUM+5
Function Call: WRITE	Prompt: !!,"This is the beginning error number." Line Location: BENHELP+1
Function Call: WRITE	Prompt: !!,"This is the ending error number. If it is equal to the beginning error" Line Location: EENHELP+1
Function Call: WRITE	Prompt: !,"number then only one error number will be used. Otherwise all error numbers" Line Location: EENHELP+2
Function Call: WRITE	Prompt: !,"in the range specified by the beginning and ending error numbers will be used." Line Location: EENHELP+3