Routine: BOPCAP

Information

BOPCAP ;IHS/ILC/ALG/CIA/PLS - ILC ADT Event & Segments ;20-Nov-2006 09:22;SM

Source Information

Source file <BOPCAP.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
VA Fileman	3	FILE^DICN IX1^DIK $$GET1^DIQ
Kernel	2	$$NOW^XLFDT $$VERSION^XPDUTL
IHS Omnicell Pyxis Interface	1	(AL1,DG1,OBXH,OBXW,ORC,PID,PV1,RXE)^BOPCP
Registration	1	IN5^VADPT

Caller Graph

Caller Graph Total: 12

Package	Total	Caller Graph
IHS Omnicell Pyxis Interface	7	BOPBAT BOPCP BOPCP2 BOPOBS BOPRNEW1 BOPTD BOPTSD
Inpatient Medications	4	PSGOER PSGOERS PSGOETO PSGOEV
IHS Changes To Pharmacy	1	APSPFUNC

Entry Points

Name	Comments	DBIA/ICR reference
DT()	; EP - SET DATE
ADT	; PEP - Capture ADT Events ; Check for ADT active
INIT	;EP - Init variables
END	; EP - KILL VARIABLES
DIV()	; EP - get Medical Center Division
STAT1	;
VER(PREFIX)	; EP - Return current version of Prefix
MSH1
STAT	;Called from Xref on STATUS field of UNIT DOSE field of File 55
ORC	;Get ORC Segment Data
RENEW	;PEP - Renewal ; use PSGP instead of DA(1) and PSGOORD instead of DA for DA issue
MSH	;EP - Get MSH and EVN Segment Data
NEW	;PEP - New Order
FLAG	;EP - SET READY FLAG
ORDDT	;entry for change in stop dt
ORDER	; EP - SET UP ORDER INFO

External References

Name	Field # of Occurrence
AL1^BOPCP	ADT+9
DG1^BOPCP	ADT+10
OBXH^BOPCP	ADT+10
OBXW^BOPCP	ADT+10
ORC^BOPCP	ORC+1
PID^BOPCP	ADT+9, ORDER+2
PV1^BOPCP	ADT+9, ORDER+2
RXE^BOPCP	ORDER+2
FILE^DICN	MSH+12
IX1^DIK	FLAG+4
$$GET1^DIQ	DIV+5
IN5^VADPT	ADT+12, DIV+3
$$NOW^XLFDT	DT+1
$$VERSION^XPDUTL	VER+1

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"...updating "_$S(BOPWHO="O":"Omnicell",1:"Pyxis")_" data base..." Line Location: ADT+8
Function Call: WRITE	Prompt: !,"done." Line Location: ADT+32

FileNo	Call Tags
^DIC(42 - [#42]	GET1^DIQ
^BOP(90355.1 - [#90355.1]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BOP(90355 - [#90355]	ADT+2, ADT+4, ADT+23, ADT+24, ADT+26, STAT+1, NEW+1, RENEW+6, INIT+1, INIT+2 , INIT+4, DIV+6
^BOP(90355.1 - [#90355.1]	STAT1+16, NEW+16, ORDER+8, ORDER+9, ORDER+10, ORDER+11, ORDER+12, MSH+8, MSH1+1, MSH1+2* , MSH1+3, MSH1+4, MSH1+6, MSH1+7, MSH1+9!, MSH1+10, MSH1+11, MSH1+12, FLAG+1, FLAG+2* , FLAG+3*
^PS(51.2 - [#51.2]	STAT1+12, NEW+12
^PS(55 - [#55]	STAT1+1, STAT1+4, STAT1+14, NEW+4, NEW+6, RENEW+5, RENEW+7
^SC - [#44]	ADT+26

Label References

Name	Line Occurrences
$$DIV	ADT+20, STAT1+2, NEW+5
$$DT	ADT+18, MSH+6
END	ADT+6, ADT+7, ADT+13, ADT+14, ADT+21, ADT+31, ADT+33, STAT+3, STAT1+2, STAT1+18 , NEW+2, NEW+3, NEW+4, NEW+5, NEW+18, RENEW+9
FLAG	ADT+31, STAT1+17, NEW+17
INIT	ADT+7, STAT1+5, NEW+7
MSH	ADT+31, ORDER+7
MSH1	MSH+7
ORC	ORDER+1
ORDER	STAT1+10, NEW+10
STAT1	RENEW+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	ADT+24~*, ADT+25, ADT+26
B	ADT+24~, ADT+26*
BOP	END+1!
BOP(	ADT+15, ADT+16, ADT+17, ADT+18, ADT+19, STAT1+6, STAT1+7, STAT1+8, STAT1+9, STAT1+12* , STAT1+13, STAT1+14, STAT1+15, NEW+8, NEW+9, NEW+12, NEW+13, NEW+14, NEW+15, ORDER+4 , ORDER+5, ORDER+6, MSH+2, MSH1+3, MSH1+5, FLAG+3
BOP0	MSH+2, MSH+3, MSH1*, MSH1+1, END+1!
BOP1	MSH1+4, END+1!
BOP10	ADT+16, ADT+23, ADT+25, ADT+27, ADT+28, MSH1+5, MSH1+6, END+1!
BOP11	MSH1+10, END+4!
BOP11(0	MSH1+8
BOP12	MSH1+11, END+4!
>> BOP14	MSH1+12
BOP2	ORDER+8, END+1!
BOP3	ORDER+9, END+1!
BOP4	ORDER+10, END+1!
BOP5	ORDER+11, END+1!
BOP6	ORDER+12, END+1!
BOP8	STAT1+15, STAT1+16, NEW+15, NEW+16, END+1!
BOP9	MSH1+7, END+4!
BOPBAT	INIT+3*, END+1!
BOPDA	STAT1+16, NEW+16, ORDER+8, ORDER+9, ORDER+10, ORDER+11, ORDER+12, MSH+8, MSH+14*, MSH1+1 , MSH1+2, MSH1+3, MSH1+4, MSH1+6, MSH1+7, MSH1+9, MSH1+10, MSH1+11, MSH1+12, FLAG+1 , FLAG+2, FLAG+3, FLAG+4, END+2!
BOPDC	STAT+2, STAT1+1, STAT1+6, STAT1+7, RENEW+7, RENEW+9, RENEW+13, END+3!
BOPDDN	END+4!
BOPDFN	ADT+6, STAT+4, STAT1+1, STAT1+3, STAT1+4, STAT1+14, NEW+2, NEW+4, NEW+6, RENEW+8 , END+2!
BOPDIV	ADT+20, ADT+21, STAT1+2, NEW+5, MSH1+2, END+3!, DIV+5, DIV+6
BOPI	STAT1+4, NEW+6, END+3!
BOPIT	INIT+2*, END+4!
BOPMPRX	END+2!
>> BOPNONU	MSH+7
BOPORDN	STAT+4, STAT1+1, STAT1+4, STAT1+14, NEW+3, NEW+4, NEW+6, RENEW+8*, END+3!
BOPPID	MSH+3, INIT+3*, END+2!
BOPPREX	END+2!
BOPQ	ADT+7, ADT+31!, STAT1+5, STAT1+10, NEW+7, NEW+10, ORDER+7!, MSH+13, INIT+1!, END+2!
BOPRAP	MSH+3, INIT+2*, END+2!
BOPRST	END+2!
BOPT	END+2!
BOPVA	END+3!
BOPVA(1	ADT+14
BOPVA(2	ADT+13
BOPVA(3	ADT+17, MSH1+5
BOPVER	MSH+3, INIT+3*, END+3!
BOPWHO	ADT+8, STAT1+7, INIT+4, INIT+5, END+4!
BOPWID	END+4!
BOPX0	STAT1+11, NEW+11, END+3!
BOPX2	END+3!
BOPY	MSH+6*, MSH+12, MSH1, END+3!
C	ADT+24~, ADT+26*, ADT+27, ADT+28
DA	STAT+3, STAT+4, ORDDT+1, FLAG+4~*!
DA(1	STAT+3, STAT+4, ORDDT+1
>> DC	STAT+2
DD	MSH+12!
DFN	ADT+6, STAT1+3~*
>> DGPMVI(1	ADT+14
DIC	MSH+12~*
DIC(0	MSH+12*
DIK	FLAG+4~*!
DO	MSH+12!
I	MSH+10~, MSH+11*
PREFIX	VER~, VER+1
PSGOORD	ORDDT+1~*, RENEW+2, RENEW+5, RENEW+7, RENEW+8
>> PSGORD	NEW+3
PSGP	NEW+2, ORDDT+1~*, RENEW+2, RENEW+5, RENEW+7, RENEW+8
U	ADT+2, ADT+4, ADT+13, ADT+16, ADT+17, ADT+23, ADT+24, ADT+25, ADT+26, ADT+27 , ADT+28, STAT+1, STAT1+1, STAT1+11, STAT1+13, STAT1+14, STAT1+15, NEW+1, NEW+4, NEW+11 , NEW+13, NEW+15, RENEW+6, RENEW+7, MSH+2, MSH+3, MSH+8, MSH+11, MSH+13, MSH1 , MSH1+1, MSH1+2, MSH1+3, MSH1+5, INIT+2*, INIT+3, INIT+4, FLAG+1, DIV+6
VAIP	ADT+11~, DIV+1~
VAIP("D"	ADT+11, ADT+12!, DIV+2
VAIP(5	DIV+5
VAROOT	ADT+11~*, ADT+12!
X	ADT+13~, ADT+14, ADT+15, STAT1+11~, STAT1+12, NEW+11~, NEW+12, MSH+12, INIT+1~, INIT+2* , INIT+3
>> Y	MSH+8*, MSH+11, MSH+13, MSH+14, MSH1

Customize PDF page

Package: IHS Omnicell Pyxis Interface

Routine: BOPCAP

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 12

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: