Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ALPBINP

Package: Barcode Medication Administration

Routine: ALPBINP


Information

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

Source Information

Source file <ALPBINP.m>

Call Graph

Call Graph Total: 15

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  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Barcode Medication Administration 2 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

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

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

Label References

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!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All