Routine: BOPCP2

Package	Total	Call Graph
IHS Omnicell Pyxis Interface	3	($$DIV,$$DT,END,FLAG,INIT,MSH,ORDER)^BOPCAP (AL1,DG1,OBXH,OBXW,PID,PV1)^BOPCP $$INTFACE^BOPTU
DRG Grouper	1	$$ICDDX^ICDCODE
Kernel	1	$$VERSION^XPDUTL
Registration	1	IN5^VADPT

Package

Total

Call Graph

($$DIV,$$DT,END,FLAG,INIT,MSH,ORDER)^BOPCAP (AL1,DG1,OBXH,OBXW,PID,PV1)^BOPCP $$INTFACE^BOPTU

$$ICDDX^ICDCODE

$$VERSION^XPDUTL

IN5^VADPT

Package	Total	Caller Graph
Inpatient Medications	1	PSGOEE

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
END
EDIT	;PEP
HTWT(BOPHTWT)	; patient height and weight from GMRBOP2
ALLERGY	; patient allergy info change
GET(BOPDO)	; build the various A08 strings
DIAGTXT	; patient free text diag change
GETQ
TEST
ICD9	; get primary icd9 for patient

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"...updating "_$S(BOPWHO="O":"Omnicell",1:"Pyxis")_" data base..." Line Location: GET+4
Function Call: WRITE	Prompt: "done" Line Location: GET+19
Function Call: WRITE	Prompt: !," XXXX ",! Line Location: TEST+0

Name	Line Occurrences (* Changed, ! Killed)
^BOP(90355 - [#90355]	EDIT+1, DIAGTXT+1, DIAGTXT+2, ICD9+2, ICD9+4, ALLERGY+1, HTWT+1
^BOP(90355.1 - [#90355.1]	EDIT+16*
^DGPT - [#45]	ICD9+5
^ICD9 - [#80]	ICD9+10
^PS(51.2 - [#51.2]	EDIT+12
^PS(55 - [#55]	EDIT+5, EDIT+7, EDIT+14

Name	Field # of Occurrence
A	ICD9+1~, ICD9+3, ICD9+5, ICD9+7, ICD9+8, ICD9+10, ICD9+11
>> B	ICD9+3*
>> BOP(	EDIT+8, EDIT+9, EDIT+12, EDIT+13, EDIT+14, EDIT+15, GET+12, GET+13, GET+14
>> BOP12	GET+8
>> BOP14	ICD9+8, ICD9+11, ICD9+12*
>> BOP8	EDIT+15*, EDIT+16
>> BOPDA	EDIT+16
>> BOPDFN	EDIT+3, EDIT+5, EDIT+7, EDIT+14, GET+2
>> BOPDIV	EDIT+4, GET+16
BOPDO	GET~, GET+6, GET+7, GET+8, GET+9, GET+14
>> BOPDPTF	ICD9+5
>> BOPDPTI	ICD9+5
BOPHTWT	HTWT~, HTWT+2
>> BOPI	EDIT+5*, EDIT+7
>> BOPORDN	EDIT+3*, EDIT+5, EDIT+7, EDIT+14
BOPQ	EDIT+6, EDIT+10, GET+2, GET+18!
>> BOPVA(5	GET+15
>> BOPWHO	GET+3*, GET+4
>> BOPX0	EDIT+11
>> DFN	ICD9+3, GET+1, GET+2
>> DGPTF	ICD9+3
>> PSGORD	EDIT+2, EDIT+3
>> PSGP	EDIT+2, EDIT+3
>> PTF	ICD9+3
U	EDIT+1, EDIT+7, EDIT+11, EDIT+13, EDIT+14, EDIT+15, DIAGTXT+1, DIAGTXT+2, ICD9+2, ICD9+4 , ICD9+5, ICD9+8, ICD9+11, ICD9+12, ALLERGY+1, HTWT+1, GET+15
VAIP	GET+10~
VAIP("D"	GET+10*, GET+11!
VAROOT	GET+10~*, GET+11!
X	EDIT+7, EDIT+8, EDIT+11~, EDIT+12, GET+15*

Information