Routine: BOPROC

Information

BOPROC ; ILC/IHS/ALG - Process FT1 statments;14-Nov-2006 10:45;SM;

Source Information

Source file <BOPROC.m>

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
VA Fileman	4	FILE^DICN (FILE,UPDATE)^DIE IX1^DIK $$GET1^DIQ
IHS Omnicell Pyxis Interface	2	($$GETLINK,COMBINE,FINDITMS)^BOPSD ENTRY^BOPUVER
Health Level Seven	1	$$FMDATE^HLFNC
Kernel	1	$$NOW^XLFDT
Outpatient Pharmacy	1	ENQ^PSORXDL
Registration	1	INP^VADPT

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
IHS Omnicell Pyxis Interface	2	BOPRNEW1 BOPUVER

Entry Points

Name	Comments	DBIA/ICR reference
VENDTYP()	;EP
ADDXTRA	; EP
ADDRECDG(DRUG,PAT,VDATE,ORDNUM,QVEND,ORDBY,ORDTYP,DISNAM)	;
RUN	; first check if supply or drug
LOGEXN(BOPERR)	; EP
GDRGPRC(DIEN,AWPFLG)	; EP
SUPFILE	; Set item into IHS HL7 Supply Interface file ; supply file only - don't create unverified order
ORDNUM(BOPFT1)	;EP
CHK	; chk point ; basic check
ONE	;
DONE
DRGIEN(BOPFT1)	;EP
TRANTYP(BOPFT1)	;EP
L1	;
IHSHRN
DFT(BOPI)	;EP - This is the entry point to process the FT1/DFT messages ; BOPI = IEN for file 90355.1 (BOP QUEUE File)
ISINPT(DFN)	;EP
LOOP

External References

Name	Field # of Occurrence
$$GETLINK^BOPSD	IHSHRN+25
COMBINE^BOPSD	ADDRECDG+8
FINDITMS^BOPSD	ADDRECDG+5
ENTRY^BOPUVER	RUN+30
FILE^DICN	RUN+32, CHK+19
FILE^DIE	ADDXTRA+7
UPDATE^DIE	ADDRECDG+22, LOGEXN+16
IX1^DIK	RUN+37, CHK+37
$$GET1^DIQ	CHK+25, GDRGPRC+5, GDRGPRC+6, VENDTYP+1
$$FMDATE^HLFNC	CHK+7
ENQ^PSORXDL	RUN+28
INP^VADPT	ISINPT+2
$$NOW^XLFDT	RUN+31, LOGEXN+3

FileNo	Call Tags
^PSDRUG - [#50]	GET1^DIQ
^AUPNSUP - [#9000021]	Classic Fileman Calls
^BOP(90355 - [#90355]	GET1^DIQ
^BOP(90355.44 - [#90355.44]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^ABMCM("D"	CHK+31
^ABMDFEE(1	CHK+32
^APSPCTRL - [#9009033]	RUN+18, RUN+19, RUN+20
^AUPNPAT - [#9000001]	IHSHRN+8
^AUPNSUP - [#9000021]	CHK+23, CHK+25, CHK+27, CHK+28, CHK+33, CHK+35
^AUPNVSIT - [#9000010]	CHK+11
^AUPNVSIT("AC"	CHK+10
^BOP(90355 - [#90355]	DFT+10
^BOP(90355.1 - [#90355.1]	DFT+9, RUN+38, CHK+42
^BOP(90355.2 - [#90355.2]	ADDRECDG+10
^BOP(90355.44 - [#90355.44]	RUN+21, RUN+33, RUN+35, RUN+36
^BOP(90355.5 - [#90355.5]	RUN+10
^DPT - [#2]	RUN+3, IHSHRN+9, CHK+5
^PS(55 - [#55]	CHK+15, ADDXTRA+3
^VA(200 - [#200]	IHSHRN+22

Label References

Name	Line Occurrences
$$DRGIEN	RUN+6, CHK+35
$$GDRGPRC	CHK+35
$$ISINPT	RUN+5
$$ORDNUM	IHSHRN+23
$$TRANTYP	RUN+13, IHSHRN+16
$$VENDTYP	IHSHRN+14, ORDNUM+2, DRGIEN+2, TRANTYP+2
ADDRECDG	CHK+48
ADDXTRA	CHK+45
DONE	ONE+1
L1	L1+3, L1+4, L1+5, RUN+2, RUN+3, RUN+7, RUN+15, RUN+39, CHK+4, CHK+5 , CHK+6, CHK+20, CHK+50
LOGEXN	RUN+2, RUN+3, RUN+7, CHK+4, CHK+5, CHK+6, CHK+20
LOOP	ONE+1, ONE+6
ONE	ONE+3, ONE+4, ONE+6
SUPFILE	RUN+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%APSITE	RUN+16~, RUN+18*
%APSITE2	RUN+16~, RUN+19*
%APSITE3	RUN+16~, RUN+20*
A	DFT+3~, LOOP, L1+1, L1+2, IHSHRN+2~, IHSHRN+3, IHSHRN+4, IHSHRN+6*, IHSHRN+7
APSDRTDA	RUN+16~
ARY	ADDRECDG+1~, ADDRECDG+5, ADDRECDG+8
ARY(0	ADDRECDG+6
AWPFLG	GDRGPRC~, GDRGPRC+2*, GDRGPRC+5
B	DFT+3~, LOOP, IHSHRN+2~, IHSHRN+3, IHSHRN+4, IHSHRN+6, CHK+11, CHK+12*, CHK+13
BOMS	DFT+3~, ONE+3, ONE+10, ONE+12, LOOP
>> BOP3PCM	CHK+2, CHK+31, CHK+32
>> BOP3PPRC	CHK+2, CHK+32, CHK+33
>> BOPAMID	DFT+7*
BOPARY	DFT+12!, ONE+7!, ONE+16, ONE+17*, L1+1!
BOPARY(	ONE+16, ONE+17, L1+1, L1+2
BOPARY(1	ONE+7*
BOPARY(2	ONE+1, ONE+6
BOPARY(4	ONE+12, ONE+18, L1+7
>> BOPATDOC	IHSHRN+13*
>> BOPAUDA	CHK+21*, CHK+23, CHK+25, CHK+27, CHK+28, CHK+33, CHK+35, CHK+37, CHK+42
>> BOPAUVST	CHK+9, CHK+13, CHK+14, CHK+42
>> BOPCRCH	RUN+13*, RUN+15
>> BOPDAS	RUN+30, RUN+33*, RUN+35, RUN+36, RUN+37, RUN+38
>> BOPDB	RUN+8*, RUN+30, RUN+34, CHK+24, CHK+30, CHK+34, CHK+44, CHK+47
>> BOPDESC	IHSHRN+14*, CHK+6, CHK+19, CHK+28
>> BOPDFN	DFT+7, RUN+2, RUN+3, RUN+5, RUN+21, IHSHRN, IHSHRN+11*, IHSHRN+25, CHK+4, CHK+5 , CHK+10, CHK+15, CHK+22, CHK+42, CHK+48, ADDXTRA+1, ADDXTRA+3, ADDXTRA+5, LOGEXN+4
>> BOPDREC	RUN+10*, RUN+12
BOPDRGI	DFT+3~, RUN+6*, RUN+7, RUN+10, RUN+21, RUN+38, IHSHRN+25, CHK+48, ADDXTRA+1, ADDXTRA+3 , LOGEXN+13
>> BOPDRUG	CHK+3*
BOPDT	DFT+3~, DFT+6, RUN+31, RUN+32, IHSHRN+15*, CHK+7
BOPDTA	DFT+3~, CHK+7*, CHK+13, CHK+14, CHK+22
BOPERR	LOGEXN~, LOGEXN+12
>> BOPEVN	L1+5, L1+7
>> BOPEXFN	SUPFILE+4*, IHSHRN+1, IHSHRN+4, IHSHRN+5
BOPFT1	L1+6*, RUN+6, RUN+8, RUN+13, RUN+36, IHSHRN+14, IHSHRN+15, IHSHRN+16, IHSHRN+17, IHSHRN+18 , IHSHRN+20, IHSHRN+21, IHSHRN+23, CHK+35, ORDNUM~, ORDNUM+4, ORDNUM+6, DRGIEN~, DRGIEN+7, TRANTYP~ , TRANTYP+3
BOPI	DFT~, DFT+9, RUN+34, RUN+38, CHK+42, ADDRECDG+19, LOGEXN+15
>> BOPIN(	ONE+1, ONE+2, ONE+8, ONE+12, ONE+14
>> BOPJ	DFT+12, ONE+1, ONE+2, ONE+3, ONE+6, ONE+8, ONE+9, ONE+14, CHK+42
>> BOPLOC	IHSHRN+12*
>> BOPMID	DFT+6*
>> BOPMSU	DFT+6, IHSHRN+20
>> BOPNAME	DFT+8, SUPFILE+2
>> BOPNU	DFT+7*
>> BOPOB	DFT+7, IHSHRN+21, IHSHRN+22*, CHK+48
>> BOPORDN	IHSHRN+23, IHSHRN+24, IHSHRN+25, CHK+14, CHK+15, CHK+44, CHK+48, ADDXTRA+1, ADDXTRA+3, ADDXTRA+5 , LOGEXN+6, LOGEXN+10
BOPORDT	DFT+3~, CHK+7, CHK+13, CHK+14, CHK+16*, CHK+22, CHK+28, LOGEXN+5
>> BOPPID	L1+3*, RUN+1, RUN+2, RUN+34, RUN+36, RUN+38, SUPFILE+2, SUPFILE+4, SUPFILE+5
>> BOPPRDN	DFT+6*
BOPPRICE	CHK+3, GDRGPRC+3~, GDRGPRC+4, GDRGPRC+5, GDRGPRC+6, GDRGPRC+7
BOPPSRX	RUN+16~, RUN+17, RUN+21, RUN+23, RUN+28
>> BOPPV1	L1+4*, RUN+36, IHSHRN+12, IHSHRN+13
>> BOPPYNM	DFT+8*
>> BOPSITE	DFT+6, DFT+9, DFT+10*, DFT+11, RUN+18, RUN+19, RUN+20
>> BOPSSN	SUPFILE+5*
>> BOPTC	DFT+6, IHSHRN+17, CHK+25, CHK+27, CHK+31
>> BOPTQ	DFT+7, IHSHRN+18, IHSHRN+19
>> BOPTQA	DFT+7, IHSHRN+19, CHK+28, CHK+48, ADDXTRA+6, LOGEXN+7
>> BOPTT	DFT+6, IHSHRN+16, IHSHRN+19
>> BOPTYP	DFT+7*
>> BOPUSER	RUN+1*
BOPVDT	DFT+3~, CHK+7*, CHK+48
C	DFT+3~, LOOP*
COM	RUN+24~
D	RUN+33, IHSHRN+2~, IHSHRN+3, IHSHRN+6, IHSHRN+10, IHSHRN+11
DA	RUN+24~, RUN+28, RUN+37~!, CHK+37~*!
DD	RUN+32!, CHK+19!
DFN	RUN+24~, ISINPT~
DIC	RUN+32~, CHK+19~
DIC(0	RUN+32, CHK+19
DIEN	ADDXTRA+2~, ADDXTRA+3*, ADDXTRA+4, ADDXTRA+5, GDRGPRC~, GDRGPRC+1, GDRGPRC+5, GDRGPRC+6
DIK	RUN+24~, RUN+37~!, CHK+37~!
DISNAM	ADDRECDG~, ADDRECDG+20
DO	RUN+32!, CHK+19!
DRUG	ADDRECDG~, ADDRECDG+5, ADDRECDG+11, ADDRECDG+12
E	RUN+34, RUN+35, IHSHRN+2~, IHSHRN+3, IHSHRN+7*, IHSHRN+8, IHSHRN+9, IHSHRN+10
F	ONE+16, ONE+17, IHSHRN+2~, IHSHRN+3, IHSHRN+7
FDA	ADDXTRA+2~, ADDRECDG+1~, LOGEXN+1~
FDA(	ADDXTRA+6, ADDRECDG+12, ADDRECDG+13, ADDRECDG+14, ADDRECDG+15, ADDRECDG+16, ADDRECDG+17, ADDRECDG+18, ADDRECDG+19, ADDRECDG+20 , ADDRECDG+21, LOGEXN+3, LOGEXN+4, LOGEXN+5, LOGEXN+6, LOGEXN+7, LOGEXN+10, LOGEXN+12, LOGEXN+13, LOGEXN+15
FN	LOGEXN+1~, LOGEXN+2*, LOGEXN+3, LOGEXN+4, LOGEXN+5, LOGEXN+6, LOGEXN+7, LOGEXN+10, LOGEXN+12, LOGEXN+13 , LOGEXN+15
G	IHSHRN+2~, IHSHRN+3, IHSHRN+8, IHSHRN+9, CHK+15, CHK+16
I	ONE+12~, ONE+13!, RUN+24~, RUN+36
IEN	ADDRECDG+1~, ADDRECDG+6*, ADDRECDG+7, ADDRECDG+8, ADDRECDG+9, ADDRECDG+10
IENS	ADDXTRA+5, ADDXTRA+6, ADDRECDG+2, ADDRECDG+9, ADDRECDG+12, ADDRECDG+13, ADDRECDG+14, ADDRECDG+15, ADDRECDG+16, ADDRECDG+17 , ADDRECDG+18, ADDRECDG+19, ADDRECDG+20, ADDRECDG+21, LOGEXN+1~, LOGEXN+2, LOGEXN+3, LOGEXN+4, LOGEXN+5, LOGEXN+6 , LOGEXN+7, LOGEXN+10, LOGEXN+12, LOGEXN+13, LOGEXN+15
INPAT	DFT+3~, RUN+5*, RUN+12, CHK+44, CHK+47
>> K	ONE+8*, ONE+12
MSG	ADDXTRA+2~, ADDRECDG+1~, LOGEXN+1~
>> OPMSUN	DFT+8*
ORDBY	ADDRECDG~, ADDRECDG+17
ORDNUM	ADDRECDG~, ADDRECDG+4, ADDRECDG+15, ADDRECDG+18, ADDRECDG+21
ORDTYP	ADDRECDG~, ADDRECDG+18
>> OUT	ONE+8, ONE+15, ONE+19, CHK+10, CHK+13*
PAT	ADDRECDG~, ADDRECDG+5, ADDRECDG+13
PSOABCDA	RUN+24~
PSOIB	RUN+24~
PSONOOR	RUN+16~, RUN+24~, RUN+25*
PSOZVER	RUN+24~, RUN+26*
QVEND	ADDRECDG~, ADDRECDG+10*, ADDRECDG+16
RES	ORDNUM+1~, ORDNUM+4, ORDNUM+6, ORDNUM+7, DRGIEN+1~, DRGIEN+7, DRGIEN+8, TRANTYP+1~, TRANTYP+3, TRANTYP+5* , TRANTYP+6
RX	RUN+24~
RXN	RUN+24~
STAT	RUN+24~
U	DFT+9, DFT+10, RUN+34, RUN+35, RUN+38, IHSHRN+12, IHSHRN+14, IHSHRN+17, IHSHRN+21, CHK+12 , CHK+15, CHK+20, CHK+22, CHK+23, CHK+28, CHK+32, CHK+33, CHK+35, DRGIEN+7, ADDRECDG+10
VAERR	ISINPT+1~
VAIN	ISINPT+1~
VAIN(1	ISINPT+3
VDATE	ADDRECDG~, ADDRECDG+14
VEND	ORDNUM+1~, ORDNUM+2, ORDNUM+3, ORDNUM+5, DRGIEN+1~, DRGIEN+2, TRANTYP+1~, TRANTYP+2*, TRANTYP+4
X	ONE+2, ONE+3, ONE+4, ONE+6, ONE+7, ONE+12~, ONE+13!, ONE+14, ONE+15, ONE+16 , ONE+17, ONE+18, L1+2, L1+3, L1+4, L1+5, L1+6, RUN+8, RUN+32, CHK+9* , CHK+10, CHK+11, CHK+13, CHK+19, CHK+22, CHK+23, CHK+42
>> Y	RUN+33, CHK+20, CHK+21

Customize PDF page

Package: IHS Omnicell Pyxis Interface

Routine: BOPROC

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 2

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: