Routine: ALPBGEN1

Package	Total	Call Graph
VA Fileman	3	(,IX)^DIC ^DIE IX1^DIK
Health Level Seven	1	INIT^HLFNC2
Kernel	1	($$HL7TFM,$$NOW)^XLFDT

Entry Points

Name	Comments	DBIA/ICR reference
PARSIT	;PARSE MESSAGE ON RECEIVING SIDE
UNESC(ST,PR)	;Unescape string from message
PSTF	;Process STF segment
FILE	;Store File 200 data on backup system
PERR	;PROCESSING ERRORS

External References

Name	Field # of Occurrence
^DIC	FILE+8
IX^DIC	FILE+5
^DIE	FILE+18
IX1^DIK	FILE+18
INIT^HLFNC2	UNESC+5
$$HL7TFM^XLFDT	PSTF+13
$$NOW^XLFDT	PERR+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"NO SEPARATOR" Line Location: PARSIT+2
Routine Call	DIE Line Location: FILE+18
Routine Call	DIC Line Location: FILE+8
Routine Call	DIC Line Location: FILE+5

Used in HL7 Interface

HL7 Protocol Name	Call Tags
PSB BCBU PMU_B01 RECV	PARSIT
PSB BCBU PMU_B02 RECV	PARSIT

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VA(200 - [#200]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(19 - [#19]	FILE+9
^TMP("BCBU"	PERR+1*

Label References

Name	Line Occurrences
$$UNESC	PSTF+7, PSTF+9
PERR	PSTF+11
PSTF	PARSIT+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACLPVC	PARSIT+13~, FILE+19!
ALBPJ	PARSIT+13~, FILE+19!
ALERR	PSTF+11, FILE+19!, PERR+1, PERR+2!
ALERR("ACCESS"	PSTF+4*
ALERR("NAME"	PSTF+10*
ALERR("VERIFY"	PSTF+5*
ALPBAC	PARSIT+13~, PSTF+2, PSTF+4, PSTF+7, FILE+19!
ALPBDA	FILE+9*, FILE+18, FILE+19!
ALPBDIS	PSTF+12*, FILE+13, FILE+19!
ALPBERR	PARSIT+13~
ALPBI	PARSIT+13~, FILE+19!
ALPBID	PARSIT+1~, PSTF+2*
ALPBKY	PARSIT+1~, PSTF+1*
ALPBMENU	PARSIT+1~, FILE+9*, FILE+16
ALPBMT	PARSIT+1~, PARSIT+15*
ALPBNAM	PARSIT+13~, PSTF+10*, FILE+2, FILE+8, FILE+19!
ALPBSSN	PARSIT+13~, PSTF+2, PSTF+3, FILE+3, FILE+5, FILE+14, FILE+19!, PERR+1
ALPBTRM	PARSIT+13~, PSTF+13*, FILE+17, FILE+19!
ALPBVC	PARSIT+1~, PSTF+2, PSTF+5, PSTF+9, FILE+15
ALPBX	PARSIT+13~, FILE+19!
CS	PARSIT+1~, PARSIT+4, PSTF+1, PSTF+10, UNESC+11, UNESC+29
>> D	FILE+5*
DA	FILE+1~, FILE+8!, FILE+9, FILE+18!
DATE	PARSIT+1~, PERR+1*
DIC	FILE+1~, FILE+5, FILE+8!, FILE+18!
DIC(0	FILE+5, FILE+8
DIE	FILE+1~, FILE+10*, FILE+18
DIK	PARSIT+1~, FILE+18*
DLAYGO	PARSIT+1~, FILE+8*
DR	FILE+1~, FILE+8!, FILE+10, FILE+12, FILE+13, FILE+14, FILE+15, FILE+16, FILE+17*, FILE+18!
DUZ	FILE+9*
EC	PARSIT+1~, PARSIT+3, PARSIT+4, PARSIT+5, PARSIT+6, PARSIT+7, UNESC+10, UNESC+11, UNESC+12, UNESC+13 , UNESC+14
ECS	PARSIT+1~, PARSIT+10, UNESC+17, UNESC+28, UNESC+29
EEC	PARSIT+1~, PARSIT+8, UNESC+15, UNESC+20, UNESC+21
EFS	PARSIT+1~, PARSIT+9, UNESC+16, UNESC+24, UNESC+25
ERS	PARSIT+1~, PARSIT+11, UNESC+18, UNESC+32, UNESC+33
ESC	PARSIT+1~, PARSIT+6, PARSIT+8, PARSIT+9, PARSIT+10, PARSIT+11, PARSIT+12, UNESC+13, UNESC+15, UNESC+16 , UNESC+17, UNESC+18, UNESC+19, UNESC+21
ESS	PARSIT+1~, PARSIT+12, UNESC+19, UNESC+36, UNESC+37
FS	PARSIT+1~, PARSIT+2, PSTF+1, PSTF+2, PSTF+10, PSTF+12, PSTF+13, UNESC+9, UNESC+25
HL	FILE+19!, UNESC+5, UNESC+6
HL("ECH"	PARSIT+3, UNESC+8*, UNESC+10
HL("FS"	PARSIT+2, UNESC+7*, UNESC+9
>> HLNEXT	PARSIT+14
>> HLNODE	PARSIT+15, PARSIT+16
>> HLQUIT	PARSIT+14
I	UNESC+20!, UNESC+21, UNESC+24!, UNESC+25, UNESC+28!, UNESC+29, UNESC+32!, UNESC+33, UNESC+36!, UNESC+37 , UNESC+39!
J	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!
PR	UNESC~, UNESC+5*
RS	PARSIT+1~, PARSIT+5, PSTF+2, UNESC+12, UNESC+33
SS	PARSIT+1~, PARSIT+7, UNESC+14, UNESC+37
ST	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	PARSIT+1~, PARSIT+16*, PSTF+1, PSTF+2, PSTF+10, PSTF+12, PSTF+13
X	FILE+5, FILE+8, UNESC+20!, UNESC+24!, UNESC+28!, UNESC+32!, UNESC+36!*, UNESC+39!
Y	FILE+1~, FILE+5!, FILE+8, FILE+9

Customize PDF page

Package: Barcode Medication Administration

Routine: ALPBGEN1

Information

Source Information

Call Graph

Call Graph Total: 5

Entry Points

External References

Interaction Calls

Used in HL7 Interface

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: