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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ALPBGEN

Package: Barcode Medication Administration

Routine: ALPBGEN


Information

ALPBGEN ;SFVAMC/JC - Build HL7 PMU messages ;03/11/2004 15:54

Source Information

Source file <ALPBGEN.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Health Level Seven 3 $$M10^HLFNC  INIT^HLFNC2  GENERATE^HLMA  
Barcode Medication Administration 2 $$ISBCMA^ALPBGEN2  GET^ALPBPARM  
Kernel 2 ($$FMTHL7,$$NOW)^XLFDT  SETUP^XQALERT  
Toolkit 1 $$GET^XPAR  
VA Fileman 1 IX^DIC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Barcode Medication Administration 1 PSB BCBU PMU MESSAGE BUILDER  

Entry Points

Name Comments DBIA/ICR reference
ESC(ST,PR) ;Translate reserved characters to escape sequences in Access/Verify
SERR ;SEND ERRORS
EVN ;EVN segment
HL7(XUIEN,XUFLG,XUSR) ;GENERATE MESSAGE - For Subscriber to XUSER DATA REQUEST (BCBU PMU MESSAGE BUILDER)
SEND
GSTF ;Generate Staff Detail Segment
UNESC(ST,PR) ;Unescape string from message
GSTNM ;Staff Name

External References

Name Field # of Occurrence
$$ISBCMA^ALPBGEN2 HL7+11
GET^ALPBPARM SEND+7, SEND+16
IX^DIC SEND+3
$$M10^HLFNC GSTF+7
INIT^HLFNC2 HL7+16, ESC+5, UNESC+5
GENERATE^HLMA SEND+19
$$FMTHL7^XLFDT EVN+2, GSTNM+11
$$NOW^XLFDT EVN+2
$$GET^XPAR HL7+6
SETUP^XQALERT SERR+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,HL
  • Line Location: HL7+17
Routine Call
  • DIC
  • Line Location:
    • SEND+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DG(40.8 - [#40.8] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J ESC+20*, ESC+21*, ESC+22*, ESC+23*, ESC+24*, ESC+25*, ESC+26, ESC+27!

Label References

Name Line Occurrences
$$ESC GSTF+8
SERR SEND+20

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ALERR HL7+13~, SEND+20*, SERR+3
ALPBDIV HL7+13~, SEND*, SEND+2
>> ALPBDIV1 SEND+5*, SEND+7
ALPBEVN HL7+13~, HL7+14*, HL7+16, SEND+19
ALPBRCV HL7+13~, HL7+15*, SEND+9, SEND+16
ALPBSSN GSTF+1~, GSTF+7*, GSTF+8
ALPHLL SEND+6!, SEND+7, SEND+8, SEND+11!
ALPHLL("LINKS" SEND+8, SEND+9*, SEND+10
CS HL7+13~, HL7+22*, GSTF+2, GSTF+8, GSTNM+3, GSTNM+6, ESC+11*, ESC+23, UNESC+11*, UNESC+29
D SEND+1!, SEND+2*, SEND+6!
DIC SEND+1!, SEND+2*, SEND+6!
DIC(0 SEND+2*
EC HL7+13~, HL7+21*, HL7+22, HL7+23, HL7+24, HL7+25, GSTF+7, ESC+10*, ESC+11, ESC+12
, ESC+13, ESC+14, UNESC+10*, UNESC+11, UNESC+12, UNESC+13, UNESC+14
ECS HL7+13~, HL7+28*, ESC+17*, ESC+23, UNESC+17*, UNESC+28, UNESC+29
EEC HL7+13~, HL7+26*, ESC+15*, ESC+21, UNESC+15*, UNESC+20, UNESC+21
EFS HL7+13~, HL7+27*, ESC+16*, ESC+22, UNESC+16*, UNESC+24, UNESC+25
ERS HL7+13~, HL7+29*, ESC+18*, ESC+24, UNESC+18*, UNESC+32, UNESC+33
ESC HL7+13~, HL7+24*, HL7+26, HL7+27, HL7+28, HL7+29, HL7+30, ESC+13*, ESC+15, ESC+16
, ESC+17, ESC+18, ESC+19, ESC+21, UNESC+13*, UNESC+15, UNESC+16, UNESC+17, UNESC+18, UNESC+19
, UNESC+21
ESS HL7+13~, HL7+30*, ESC+19*, ESC+25, UNESC+19*, UNESC+36, UNESC+37
FS HL7+13~, HL7+20*, EVN+2, GSTF+2, GSTF+8, GSTNM+7, GSTNM+9, GSTNM+11, ESC+9*, ESC+22
, UNESC+9*, UNESC+25
HL HL7+16!, HL7+17, ESC+5, ESC+6, UNESC+5, UNESC+6
HL("ECH" HL7+21, ESC+8*, ESC+10, UNESC+8*, UNESC+10
HL("FS" HL7+20, ESC+7*, ESC+9, UNESC+7*, UNESC+9
HL("MID" SERR+3
HLA HL7+13~, GSTNM+15
HLA("HLS" EVN+2*, GSTNM+13*
HLL SEND!, SEND+16, SEND+18
HLL("LINKS" SEND+10*
HLMTIENS HL7+13~, SERR+3
HLNEXT HL7+13~
HLNODE HL7+13~
HLQUIT HL7+13~
I SEND+8*, SEND+9, SEND+10, ESC+20*, ESC+21, ESC+22, ESC+23, ESC+24, ESC+25, ESC+26*
, UNESC+20!*, UNESC+21*, UNESC+24!*, UNESC+25*, UNESC+28!*, UNESC+29*, UNESC+32!*, UNESC+33*, UNESC+36!*, UNESC+37*
, UNESC+39!
J ESC+20*, ESC+21, ESC+22, ESC+23, ESC+24, ESC+25, UNESC+20!, UNESC+24!, UNESC+28!, UNESC+32!
, UNESC+36!, UNESC+39!
K UNESC+20!, UNESC+24!, UNESC+28!, UNESC+32!, UNESC+36!, UNESC+39!
K( UNESC+20*, UNESC+21*, UNESC+24*, UNESC+25*, UNESC+28*, UNESC+29*, UNESC+32*, UNESC+33*, UNESC+36*, UNESC+37*
L UNESC+20!, UNESC+21*, UNESC+22, UNESC+24!, UNESC+25*, UNESC+26, UNESC+28!, UNESC+29*, UNESC+30, UNESC+32!
, UNESC+33*, UNESC+34, UNESC+36!, UNESC+37*, UNESC+38, UNESC+39!
MT HL7+13~, HL7+19*, EVN+2
MYRESULT SEND+17!, SEND+18*, SEND+19, SEND+20
N HL7+13~, HL7+18*, EVN+1*, EVN+2, GSTNM+13*
PR ESC~, ESC+5*, UNESC~, UNESC+5*
RS HL7+13~, HL7+23*, GSTF+8, ESC+12*, ESC+24, UNESC+12*, UNESC+33
SN GSTNM+1~*, GSTNM+4*, GSTNM+6*, GSTNM+7
SS HL7+13~, HL7+25*, ESC+14*, ESC+25, UNESC+14*, UNESC+37
ST ESC~, ESC+4, ESC+20, ESC+26*, ESC+28, UNESC~, UNESC+4, UNESC+20*, UNESC+22*, UNESC+24*
, UNESC+26*, UNESC+28*, UNESC+30*, UNESC+32*, UNESC+34*, UNESC+36*, UNESC+38*, UNESC+40
STF GSTF+1~*, GSTF+2*, GSTF+8*, GSTNM+7*, GSTNM+9*, GSTNM+11*, GSTNM+13
U SEND+20
X SEND+1!, SEND+2*, SEND+6!, UNESC+20!*, UNESC+24!*, UNESC+28!*, UNESC+32!*, UNESC+36!*, UNESC+39!
XQA SERR+1!
XQA("G.PSB BC BU ERRORS" , SERR+2*
XQADATA SERR+1!
XQAFLAG SERR+1!
XQAID SERR+1!
XQAMSG SERR+1!, SERR+3*
XQAOPT SERR+1!
XQAROU SERR+1!
XUFLG HL7~, HL7+14, HL7+15, HL7+19
XUIEN HL7~, HL7+8, HL7+11, GSTF+2
XUSR HL7~, HL7+7
XUSR("ACCESS CODE" , GSTF+8
XUSR("DISUSER" GSTNM+9
XUSR("DIV" SEND, SEND+16
XUSR("HL7NAME" GSTNM+2, GSTNM+3*, GSTNM+4, GSTNM+5
XUSR("NAME" GSTNM+5, GSTNM+6
XUSR("SSN" GSTF+7
XUSR("TERMINA TION DATE" , GSTNM+11
XUSR("VERIFY CODE" , GSTF+8
Y SEND+1!, SEND+4, SEND+5, SEND+6!
ZTDESC HL7+13~
ZTIO HL7+13~
ZTRTN HL7+13~
ZTSAVE HL7+13~
ZTSK HL7+13~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All