Routine: BOPEXCP

Package	Total	Call Graph
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
VA Fileman	2	C^%DTC ^DIR

Entry Points

Name	Comments	DBIA/ICR reference
PRINT	;
HEADER	;
ASKPR	;
FIND	;find all the error exceptions and put in array
EOR	;BOPEXCP;Exception error report

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,"TYPE OF ERROR ^ DRUG NAME ^ DATE/TIME ^ PATIENT NAME ^ USER NAME",!! Line Location: HEADER+1
Function Call: WRITE	Prompt: !,BOPTMP(CNT) Line Location: PRINT+2
Routine Call	DIR Line Location: FIND+3 PRINT+5
Routine Call	%ZIS Line Location: ASKPR+1

Name	Line Occurrences (* Changed, ! Killed)
^BOP(90355.4 - [#90355.4]	FIND+7, FIND+8, FIND+9, FIND+10, FIND+12, FIND+13, FIND+14, FIND+15
^DPT - [#2]	FIND+11, FIND+14
^PSDRUG - [#50]	FIND+10

Name	Line Occurrences
ASKPR	FIND+17
HEADER	PRINT+1, PRINT+6

Name	Field # of Occurrence
>> %ZIS	ASKPR+1*
A	FIND+1~, FIND+8*, FIND+9, FIND+10, FIND+12, FIND+13, FIND+14, FIND+15
ANS	PRINT+1~
BOPDFN	FIND+1~, FIND+10, FIND+11, FIND+12, FIND+13, FIND+14, FIND+16
BOPDRGNM	FIND+1~, FIND+5, FIND+10, FIND+13, FIND+14, FIND+16
BOPDRUG	FIND+1~, FIND+5, FIND+9, FIND+10, FIND+16
BOPDT	FIND+1~, FIND+5*
BOPDTTM	FIND+1~, FIND+6, FIND+7, FIND+8, FIND+16
BOPERR	FIND+1~, FIND+5, FIND+10, FIND+13, FIND+14, FIND+16
BOPNAME	FIND+1~, FIND+5, FIND+11, FIND+16
>> BOPTMP(	FIND+16*, PRINT+2
BOPUSER	FIND+1~, FIND+5, FIND+15, FIND+16
CNT	FIND+1~, FIND+5, FIND+16, PRINT+1~, PRINT+2*, PRINT+4
DIR	FIND+1~, PRINT+5!
DIR("A"	FIND+2, PRINT+4
DIR("B"	FIND+3*
DIR(0	FIND+3, PRINT+4
>> DIRUT	PRINT+5
IO("Q"	ASKPR+2, ASKPR+4!
IOF	HEADER+1
IOST	PRINT+3
POP	ASKPR+1!
STOP	PRINT+1~, PRINT+2, PRINT+4, PRINT+5
U	FIND+9, FIND+10, FIND+11, FIND+12, FIND+13, FIND+14, FIND+15
X	FIND+1~, FIND+6
X1	FIND+1~, FIND+6*
X2	FIND+1~, FIND+6*
Y	FIND+1~, FIND+4, FIND+6
ZTDESC	ASKPR+1!, ASKPR+3*
ZTRTN	ASKPR+1!, ASKPR+3*
ZTSK	ASKPR+4!