Routine: ALPBINP

Information

ALPBINP ;OIFO-DALLAS/SED/KC/MW BCMA - BCBU INPT TO HL7 ;5/2/2002

Package	Total	Call Graph
Barcode Medication Administration	3	^ALPBHL2 GET^ALPBPARM ($$CNV,$$DIV,$$STAT)^ALPBUTL1
Health Level Seven	2	$$HLDATE^HLFNC INIT^HLFNC2
Inpatient Medications	2	EN^PSJBCBU EN^PSJBCMA1
Kernel	2	^%ZTLOAD $$NOW^XLFDT
Registration	2	$$EN^VAFHAPV1 $$EN^VAFHLPID
VA Fileman	2	NOW^%DTC $$EXTERNAL^DILFD
Adverse Reaction Tracking	1	EN1^GMRADPT
Toolkit	1	$$GET^XPAR

Package

Total

Call Graph

Barcode Medication Administration

^ALPBHL2 GET^ALPBPARM ($$CNV,$$DIV,$$STAT)^ALPBUTL1

Health Level Seven

$$HLDATE^HLFNC INIT^HLFNC2

Inpatient Medications

EN^PSJBCBU EN^PSJBCMA1

Kernel

^%ZTLOAD $$NOW^XLFDT

Registration

$$EN^VAFHAPV1 $$EN^VAFHLPID

VA Fileman

NOW^%DTC $$EXTERNAL^DILFD

Adverse Reaction Tracking

EN1^GMRADPT

Toolkit

$$GET^XPAR

Package	Total	Caller Graph
Barcode Medication Administration	2	ALPBCBU ALPBIND

Package

Total

Caller Graph

Barcode Medication Administration

ALPBCBU ALPBIND

Entry Points

Name	Comments	DBIA/ICR reference
RXE	;
INIT	;CALL HL7 TO INITIALIZE MESSAGE VARIABLES
SEND	;CALL HL7 TO TRANSMIT SINGLE MESSAGE
PDIV	;PATIENT DIVISION
INI()	;INTIAL SET UP ENTRY
SEED	;Entry point for ^ALPBIND
EXIT	;EXIT and kill
MEDL(ALPML)	;Use this entry to send MedLog messages
AL1	;ALLERGY SEGMENT BUILD
PMOV(ALPDFN,ALPTYP,ALPTT,ALPBMDT)	;Entry Point to send patient movement
ADMQ	;Need to que a single patient init for admissions
IPH(MSG)	;CAPTURE MESSAGE ARRAY FROM PHARMACY

External References

Name	Field # of Occurrence
NOW^%DTC	SEED+25
^%ZTLOAD	ADMQ+6
^ALPBHL2	SEND+2
GET^ALPBPARM	PDIV+8, PMOV+22
$$CNV^ALPBUTL1	SEED+5, SEED+9
$$DIV^ALPBUTL1	PDIV+3
$$STAT^ALPBUTL1	SEED+29
$$EXTERNAL^DILFD	MEDL+19
EN1^GMRADPT	AL1+8
$$HLDATE^HLFNC	MEDL+30
INIT^HLFNC2	INIT+4
EN^PSJBCBU	IPH+31
EN^PSJBCMA1	RXE+5
$$EN^VAFHAPV1	SEED+26, MEDL+23, PMOV+11, PMOV+24
$$EN^VAFHLPID	SEED+17, MEDL+21, PMOV+10, PMOV+23
$$NOW^XLFDT	ADMQ+2
$$GET^XPAR	SEED+22, PDIV+5, MEDL+12, PMOV+8

FileNo	Call Tags
^PSB(53.79 - [#53.79]	EXTERNAL^DILFD

Name	Line Occurrences (* Changed, ! Killed)
^DIC(42 - [#42]	PMOV+21
^PSB(53.79 - [#53.79]	MEDL+4, MEDL+8, MEDL+14, MEDL+15, MEDL+16, MEDL+17
^TMP("PSJ1"	RXE+2!, RXE+6, RXE+15!
^VA(200 - [#200]	MEDL+18

Name	Line Occurrences
ADMQ	PMOV+15
AL1	SEED+32
INIT	SEED+2, MEDL+6, PMOV+3, PMOV+18
PDIV	SEED+21, MEDL+11, PMOV+7
RXE	SEED+19
SEED	INI+1
SEND	SEED+34, MEDL+33, PMOV+13, PMOV+26

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	SEED+26
>> ALDFN	ADMQ+1*
ALP1	RXE+9, RXE+10, RXE+13, RXE+15!
ALP2	RXE+9, RXE+11, RXE+12, RXE+13, RXE+15!
>> ALPADR	AL1+12, AL1+13, AL1+15
ALPB	IPH+30!, IPH+31, EXIT+2!
ALPB(	SEED+3, SEED+5, SEED+8, SEED+9
>> ALPBDIV	PMOV+21*, PMOV+22
ALPBMDT	PDIV+2, PDIV+3, PMOV~, PMOV+5
ALPBY	EXIT+2!, MEDL+15*, MEDL+18, MEDL+30
ALPBYN	EXIT+2!, MEDL+18*, MEDL+30
ALPC	EXIT+2!, AL1+10, AL1+14, AL1+20
ALPDATA	EXIT+2!, AL1+14, AL1+15, AL1+19
ALPDFN	IPH+26, IPH+27, IPH+31, SEED+15, SEED+16, SEED+17, SEED+26, EXIT+2!, AL1+4, AL1+6 , RXE+5, PDIV+3, MEDL+8*, MEDL+9, MEDL+21, MEDL+23, ADMQ+1, PMOV~, PMOV+2, PMOV+9 , PMOV+10, PMOV+11, PMOV+23, PMOV+24
>> ALPDIV	SEED+22, SEED+23, PDIV+3*, PDIV+5, PDIV+8, MEDL+12, PMOV+8
ALPDT	EXIT+3!, MEDL+16*, MEDL+30
>> ALPHLL("LINKS"	PDIV+7
ALPI	EXIT+3!, AL1+10, AL1+11, AL1+13, AL1+14, AL1+15
ALPII	EXIT+3!
ALPIV	EXIT+3!
ALPLOC	EXIT+1!
ALPML	MEDL~, MEDL+3, MEDL+4, MEDL+8, MEDL+9, MEDL+13, MEDL+14, MEDL+15, MEDL+16, MEDL+17 , MEDL+20, MEDL+22, MEDL+24, MEDL+28
ALPMSG	IPH+1~, IPH+2*, IPH+3, IPH+5, IPH+7, IPH+8, IPH+9, IPH+10, IPH+12, IPH+15 , IPH+19, IPH+21, IPH+23, IPH+26, IPH+28
ALPOPTS	EXIT+3!, INIT+2!, SEND+1!
ALPOR	EXIT+3!, MEDL+17*, MEDL+20, MEDL+28
ALPORD	IPH+28*, IPH+29, IPH+31, EXIT+3!, RXE+5
ALPRSLT	EXIT+5, INIT+2!, SEND+1!, SEND+2, MEDL+34, PMOV+20
ALPST	SEED+29, SEED+30, SEED+31, EXIT+3!, MEDL+14, MEDL+19, MEDL+29
ALPSTN	EXIT+4!, MEDL+19*, MEDL+29
ALPSYM	EXIT+4!, AL1+10*
ALPTT	PMOV~, PMOV+5, PMOV+12, PMOV+14*, PMOV+15
ALPTYP	PMOV~, PMOV+12, PMOV+14, PMOV+17
>> ALPWRD	PMOV+19*, PMOV+20, PMOV+21
>> DATA	RXE+4, RXE+9, RXE+13, RXE+14
DFN	AL1+3~, AL1+6*
>> DGPMVI(5	PMOV+19
DT	MEDL+23, PMOV+11, PMOV+24
EVENT	EXIT+4!, INIT+3*, INIT+4
GMRA	EXIT+4!, AL1+7*
GMRAL	EXIT+4!, AL1+5!, AL1+9, AL1+21!
GMRAL(	AL1+11, AL1+13, AL1+14, AL1+15
HL	INIT+2!, INIT+4
HL("ECH"	INIT+5
HLA	EXIT+1!, INIT+2!
HLA("HLS"	SEED+5, SEED+9, SEED+10, SEED+11, SEED+12, SEED+13!, SEED+14, SEED+15, SEED+17, SEED+27 , SEED+29, SEED+31, AL1+19, RXE+3, RXE+4, RXE+14, MEDL+25, MEDL+26, MEDL+31, PMOV+10* , PMOV+11, PMOV+12, PMOV+23, PMOV+24, PMOV+25*
HLCS	SEED+15, SEED+31, EXIT+1!, INIT+5*, AL1+15, RXE+9, RXE+13, MEDL+28, MEDL+29, MEDL+30
HLCTR	SEED+5, SEED+9, EXIT+1!, INIT+5*
HLECH	INIT+2!
HLFS	SEED+15, SEED+29, SEED+31, EXIT+1!, INIT+5, AL1+14, AL1+15, RXE+9, RXE+13, MEDL+28 , MEDL+29, MEDL+30, PMOV+12, PMOV+25
>> HLL	PDIV+8, PMOV+22
>> HLL("LINKS"	SEED+23, PDIV+7*, PDIV+8, MEDL+13, PMOV+9
HLQ	INIT+2!
MSCH	IPH+9*, EXIT+1!
MSCS	IPH+8*, IPH+28, EXIT+1!
MSCTR	IPH+10*, SEED+5, SEED+9, EXIT+1!
>> MSFS	IPH+7*, IPH+12, IPH+21, IPH+26, IPH+28
MSG	IPH~, IPH+2
MSH	IPH+4, IPH+5, IPH+6, IPH+7, IPH+8, IPH+9, IPH+10, IPH+12, SEED+13, EXIT+2!
ORC	IPH+22, IPH+23, IPH+24, IPH+28, SEED+28, SEED+29, SEED+31, EXIT+2!, MEDL+28, MEDL+29 , MEDL+30*, MEDL+31
PID	IPH+14, IPH+15, IPH+16, IPH+26, SEED+11, SEED+14, SEED+15, SEED+17, EXIT+2!, MEDL+21 , MEDL+22, MEDL+25
PV1	IPH+18, IPH+19, IPH+20, IPH+21, SEED+12, SEED+27, EXIT+2!, MEDL+23, MEDL+24, MEDL+26
RXE	SEED+10*, EXIT+2!, RXE+1, RXE+3, RXE+4, RXE+14
RXR	EXIT+2!
STRING	SEED+26*, SEED+27, EXIT+1!
SUB	SEED+3*, SEED+5, SEED+8, SEED+9, SEED+10, SEED+11, SEED+12, EXIT+1!
SUB1	SEED+7, SEED+8, SEED+9, EXIT+1!
TYP	RXE+6*, RXE+7, RXE+8, RXE+10, RXE+11, RXE+12, RXE+15!
U	AL1+13, AL1+14, AL1+15, RXE+6, MEDL+8, MEDL+14, MEDL+15, MEDL+16, MEDL+17, MEDL+18 , PMOV+19, PMOV+21
VAIN	IPH+1~, SEED+1~, MEDL+1~, PMOV+1~
ZTDESC	ADMQ+4*, ADMQ+7!
>> ZTDTH	ADMQ+2*
ZTIO	ADMQ+5*, ADMQ+7!
ZTRTN	ADMQ+3*, ADMQ+7!
>> ZTSAVE("ALDFN"	ADMQ+5*
ZTSK	ADMQ+7!

Customize PDF page

Package: Barcode Medication Administration

Routine: ALPBINP

Information

Source Information

Call Graph

Call Graph Total: 15

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: