Routine: PSBSVHL7

Package	Total	Call Graph
Health Level Seven	3	($$HLDATE,$$HLNAME)^HLFNC INIT^HLFNC2 GENERATE^HLMA
Barcode Medication Administration	1	PSJ1^PSBVT
Registration	1	DEM^VADPT
VA FileMan	1	$$GET1^DIQ

Package	Total	Caller Graph
Barcode Medication Administration	1	PSBML

Name	Comments	DBIA/ICR reference
EN(PSBIEN,PSBHL7X)	; This is the entry point for all HL7 processing
1	; set up environment for message
2	; Add appropriate message txt to HLA array
MEDSTAT	;MEDPASS and UPDATE trigger events
COMMENT	;ADD COMNMENT trigger event
PRNEFFE	;PRN EFFECTIVENESS trigger event
PID	; PID segment -- use segment generator
PV1	; PV1 segment
ORC	; ORC segment
RXO	; RXO segment
NTE	; NTE segment(s) - notes and comments
RXR	; RXR segment
RXC	; RXC segment ; loop through .5,.6,and .7 send segments for each "component"
RXA	; RXA segment
ESC(PSBINF)	; Escape message data
TRANS	; CALL HL7 TO Transmit Message

Name	Field # of Occurrence
$$GET1^DIQ	PV1+10, ORC+19, ORC+24, RXO+5, NTE+8, NTE+18
$$HLDATE^HLFNC	PID+5, ORC+10, ORC+16, ORC+21, NTE+9, NTE+19, RXA+6, RXA+14
$$HLNAME^HLFNC	PID+4, PV1+10, ORC+19, ORC+24, NTE+8, NTE+18
INIT^HLFNC2	1+2
GENERATE^HLMA	TRANS+2
PSJ1^PSBVT	ORC+6
DEM^VADPT	PID+1

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"PSB(BCMA) HL7 MESSAGE HAS FAILED TRANSMISSION - could not generate" Line Location: TRANS+3

FileNo	Call Tags
^VA(200 - [#200]	GET1^DIQ
^PS(50.7 - [#50.7]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^PSB(53.79 - [#53.79]	MEDSTAT+2, PID+1, PV1+5, PV1+6, PV1+9, ORC+5, ORC+8, ORC+10, ORC+16, ORC+18 , ORC+21, ORC+23, RXO+4, RXO+7, RXO+8, RXO+9, NTE+5, NTE+6, NTE+7, NTE+9 , NTE+11, NTE+14, NTE+15, NTE+16, NTE+17, NTE+19, RXR+4, RXC+2, RXC+5, RXC+9 , RXC+10, RXC+11, RXC+13, RXC+14, RXC+15, RXA+6, RXA+12, RXA+13, RXA+14, RXA+16 , RXA+19, RXA+21

Name	Line Occurrences
$$ESC	PV1+5, PV1+6, ORC+9, ORC+11, RXO+7, RXO+8, RXO+9, NTE+6, NTE+16
COMMENT	2+5
MEDSTAT	2+4
NTE	MEDSTAT+2, COMMENT+1, PRNEFFE+1
ORC	MEDSTAT+1, COMMENT+1, PRNEFFE+1
PID	MEDSTAT+1, COMMENT+1, PRNEFFE+1
PRNEFFE	2+6
PV1	MEDSTAT+1
RXA	MEDSTAT+3
RXC	MEDSTAT+3
RXO	MEDSTAT+1
RXR	MEDSTAT+3
TRANS	MEDSTAT+3, COMMENT+1, PRNEFFE+1

Name	Field # of Occurrence
>> DFN	PID+1*
>> HL	1+2, 1+3
>> HL("ECH"	1+5, 1+6, PID+4, PV1+10, ORC+19, ORC+24, NTE+8, NTE+18, ESC+2, ESC+4
>> HL("FS"	1+4
HLA	2+1!
HLA("HLS"	PID+8, PV1+2, PV1+12, ORC+2, ORC+26, RXO+2, RXO+11, NTE+2, NTE+22, RXR+2 , RXR+5, RXC+6, RXC+16, RXA+3, RXA+22*, TRANS+2
HLEVN	2+1!
>> PSBCHR	ESC+2*, ESC+3, ESC+4, ESC+5
>> PSBCNT	2+3, PID+2, PID+8, PV1+2, PV1+12, ORC+2, ORC+26, RXO+2, RXO+11, NTE+2 , NTE+22, RXR+2, RXR+5, RXR+6, RXC+6, RXC+16, RXA+3, RXA+22
>> PSBCNT1	ESC+7, ESC+8
PSBDFN	2+2~, PID+1*, PID+2, ORC+6
PSBESC	ESC+1!
PSBESC(	ESC+4*, ESC+7, ESC+8
>> PSBESCX	ESC+1, ESC+2, ESC+4, ESC+7, ESC+8
>> PSBESCXX	ESC+3, ESC+7, ESC+8*
PSBFILE	RXC+3!*, RXC+10
PSBFILE1	RXC+10*, RXC+11!
PSBHL7FD	PV1+1!, PV1+5, PV1+6, PV1+7!, PV1+9, PV1+10, PV1+11!, ORC+1!, ORC+8, ORC+9 , ORC+10, ORC+11, ORC+12!, ORC+14, ORC+15!, ORC+18, ORC+19, ORC+20!, ORC+23, ORC+24* , ORC+25!, RXO+1!, RXO+4, RXO+5, RXO+6!, RXO+9, RXO+10, NTE+1!, NTE+7, NTE+8* , NTE+9, NTE+10, NTE+11, NTE+12, NTE+13!, NTE+17, NTE+18, NTE+19, NTE+20, NTE+21! , RXR+1!, RXC+6!, RXC+9, RXC+11, RXC+12!, RXA+1!, RXA+16, RXA+17!, RXA+19, RXA+20! , TRANS+1!
PSBHL7MS	2+2~, PID+2, PID+3, PID+4, PID+5, PID+6, PID+7, PID+8, PV1+1!, PV1+3* , PV1+7, PV1+11, PV1+12, ORC+1!, ORC+3, ORC+4, ORC+5, ORC+6, ORC+12, ORC+15* , ORC+16, ORC+20, ORC+21, ORC+25, ORC+26, RXO+1!, RXO+6, RXO+7, RXO+8, RXO+10 , RXO+11, NTE+1!, NTE+3, NTE+6, NTE+13, NTE+16, NTE+21, NTE+22, RXR+1!, RXR+3 , RXR+4, RXR+5, RXR+6, RXC+6!, RXC+7, RXC+12, RXC+13, RXC+14, RXC+15, RXC+16 , RXA+1!, RXA+4, RXA+5, RXA+6, RXA+7, RXA+9, RXA+10, RXA+11, RXA+14, RXA+17 , RXA+20, RXA+21, RXA+22, TRANS+1!
>> PSBHL7OP	TRANS+2
>> PSBHL7T	TRANS+2, TRANS+3
PSBHL7X	EN~, 2+4, 2+5, 2+6, NTE+5, NTE+14
PSBHLCS	1+1~, 1+5*, PID+3, PV1+5, PV1+6, PV1+9, PV1+10, ORC+4, ORC+8, ORC+9 , ORC+10, ORC+11, ORC+14, ORC+18, ORC+19, ORC+23, ORC+24, RXO+4, RXO+5, RXO+9 , NTE+7, NTE+8, NTE+9, NTE+10, NTE+11, NTE+12, NTE+16, NTE+17, NTE+18, NTE+19 , NTE+20, RXC+9, RXC+11, RXA+14, RXA+16, RXA+19
PSBHLFS	1+1~, 1+4*, PID+2, PID+3, PID+4, PID+5, PID+6, PID+7, PID+8, PV1+2 , PV1+3, PV1+7, PV1+11, ORC+2, ORC+3, ORC+4, ORC+5, ORC+6, ORC+12, ORC+15 , ORC+16, ORC+20, ORC+21, ORC+25, RXO+2, RXO+6, RXO+7, RXO+8, RXO+10, NTE+2 , NTE+3, NTE+6, NTE+13, NTE+16, NTE+21, RXR+2, RXR+3, RXR+4, RXR+6, RXC+6 , RXC+7, RXC+12, RXC+13, RXC+14, RXC+15, RXA+3, RXA+4, RXA+5, RXA+6, RXA+7 , RXA+9, RXA+10, RXA+11, RXA+14, RXA+17, RXA+20, RXA+21
>> PSBHLSCS	1+6*
PSBIEN	EN~, MEDSTAT+2, PID+1, PV1+5, PV1+6, PV1+9, ORC+4, ORC+5, ORC+8, ORC+10 , ORC+16, ORC+18, ORC+21, ORC+23, RXO+4, RXO+7, RXO+8, RXO+9, NTE+5, NTE+6 , NTE+7, NTE+9, NTE+11, NTE+14, NTE+15, NTE+16, NTE+17, NTE+19, RXR+4, RXC+2 , RXC+5, RXC+9, RXC+10, RXC+11, RXC+13, RXC+14, RXC+15, RXA+6, RXA+12, RXA+13 , RXA+14, RXA+16, RXA+19, RXA+21
>> PSBINDX	NTE+15, NTE+16, NTE+17, NTE+19, RXA+13, RXA+14
PSBINF	ESC~, ESC+1
>> PSBINFO	ESC+1, ESC+3, ESC+6, ESC+8*, ESC+9
PSBINFO1	ESC+1!, ESC+3, ESC+4, ESC+5, ESC+6
>> PSBMRAB	RXR+3
>> PSBPONX	ORC+14
PSBRX	RXA+2*, RXA+5, RXA+23!
PSBRXA	RXA+23!
PSBRXA(	RXC+12, RXC+15, RXA+2, RXA+10, RXA+11
PSBRXAX	RXC+12, RXC+15, RXA+1, RXA+2*, RXA+9, RXA+10, RXA+11, RXA+23!
PSBRXTYP	RXC+4!*, RXC+7
>> PSBSCH	ORC+9
>> PSBSCHT	ORC+11, NTE+5, RXA+16
PSBSUBFD	RXC+2!*, RXC+3, RXC+4, RXC+5, RXC+9, RXC+10, RXC+11, RXC+13, RXC+14, RXC+15
>> PSBSUBX	RXC+5*, RXC+9, RXC+10, RXC+11, RXC+13, RXC+14, RXC+15
U	PID+1, PV1+5, PV1+6, PV1+9, ORC+5, ORC+8, ORC+10, ORC+16, ORC+18, ORC+21 , ORC+23, RXO+4, RXO+7, RXO+8, RXO+9, NTE+6, NTE+7, NTE+9, NTE+11, NTE+16 , NTE+17, NTE+19, RXR+4, RXC+9, RXC+10, RXC+11, RXC+13, RXC+14, RXC+15, RXA+6 , RXA+10, RXA+11, RXA+14, RXA+16, RXA+19, RXA+21, ESC+5, TRANS+3
>> VA("PID"	PID+6
>> VADM(1	PID+4
>> VADM(3	PID+5
>> VADM(4	PID+3*
>> VADM(5	PID+7

Name

Field # of Occurrence

>> DFN

PID+1*

>> HL

1+2, 1+3

>> HL("ECH"

1+5, 1+6, PID+4, PV1+10, ORC+19, ORC+24, NTE+8, NTE+18, ESC+2, ESC+4

>> HL("FS"

1+4

HLA

2+1!

HLA("HLS"

PID+8*, PV1+2*, PV1+12*, ORC+2*, ORC+26*, RXO+2*, RXO+11*, NTE+2*, NTE+22*, RXR+2*
, RXR+5*, RXC+6*, RXC+16*, RXA+3*, RXA+22*, TRANS+2

HLEVN

2+1!

>> PSBCHR

ESC+2*, ESC+3, ESC+4, ESC+5

>> PSBCNT

2+3*, PID+2*, PID+8, PV1+2*, PV1+12, ORC+2*, ORC+26, RXO+2*, RXO+11, NTE+2*
, NTE+22, RXR+2*, RXR+5, RXR+6*, RXC+6*, RXC+16, RXA+3*, RXA+22

>> PSBCNT1

ESC+7*, ESC+8*

PSBDFN

2+2~, PID+1*, PID+2, ORC+6

PSBESC

ESC+1!

PSBESC(

ESC+4*, ESC+7, ESC+8

>> PSBESCX

ESC+1*, ESC+2, ESC+4, ESC+7*, ESC+8

>> PSBESCXX

ESC+3*, ESC+7*, ESC+8*

PSBFILE

RXC+3!*, RXC+10

PSBFILE1

RXC+10*, RXC+11!

PSBHL7FD

PV1+1!, PV1+5*, PV1+6*, PV1+7!, PV1+9*, PV1+10*, PV1+11!, ORC+1!, ORC+8*, ORC+9*
, ORC+10*, ORC+11*, ORC+12!, ORC+14*, ORC+15!, ORC+18*, ORC+19*, ORC+20!, ORC+23*, ORC+24*
, ORC+25!, RXO+1!, RXO+4*, RXO+5*, RXO+6!, RXO+9*, RXO+10, NTE+1!, NTE+7*, NTE+8*
, NTE+9*, NTE+10*, NTE+11*, NTE+12*, NTE+13!, NTE+17*, NTE+18*, NTE+19*, NTE+20*, NTE+21!
, RXR+1!, RXC+6!, RXC+9*, RXC+11*, RXC+12!, RXA+1!, RXA+16*, RXA+17!, RXA+19*, RXA+20!
, TRANS+1!

PSBHL7MS

2+2~, PID+2*, PID+3*, PID+4*, PID+5*, PID+6*, PID+7*, PID+8, PV1+1!, PV1+3*
, PV1+7*, PV1+11*, PV1+12, ORC+1!, ORC+3*, ORC+4*, ORC+5*, ORC+6, ORC+12*, ORC+15*
, ORC+16*, ORC+20*, ORC+21*, ORC+25*, ORC+26, RXO+1!, RXO+6*, RXO+7*, RXO+8*, RXO+10*
, RXO+11, NTE+1!, NTE+3*, NTE+6*, NTE+13*, NTE+16*, NTE+21*, NTE+22, RXR+1!, RXR+3*
, RXR+4*, RXR+5, RXR+6, RXC+6!, RXC+7*, RXC+12*, RXC+13*, RXC+14*, RXC+15, RXC+16
, RXA+1!, RXA+4*, RXA+5*, RXA+6*, RXA+7*, RXA+9*, RXA+10*, RXA+11*, RXA+14*, RXA+17*
, RXA+20*, RXA+21*, RXA+22, TRANS+1!

>> PSBHL7OP

TRANS+2

>> PSBHL7T

TRANS+2, TRANS+3

PSBHL7X

EN~, 2+4, 2+5, 2+6, NTE+5, NTE+14

PSBHLCS

1+1~, 1+5*, PID+3, PV1+5, PV1+6, PV1+9, PV1+10, ORC+4, ORC+8, ORC+9
, ORC+10, ORC+11, ORC+14, ORC+18, ORC+19, ORC+23, ORC+24, RXO+4, RXO+5, RXO+9
, NTE+7, NTE+8, NTE+9, NTE+10, NTE+11, NTE+12, NTE+16, NTE+17, NTE+18, NTE+19
, NTE+20, RXC+9, RXC+11, RXA+14, RXA+16, RXA+19

PSBHLFS

1+1~, 1+4*, PID+2, PID+3, PID+4, PID+5, PID+6, PID+7, PID+8, PV1+2
, PV1+3, PV1+7, PV1+11, ORC+2, ORC+3, ORC+4, ORC+5, ORC+6, ORC+12, ORC+15
, ORC+16, ORC+20, ORC+21, ORC+25, RXO+2, RXO+6, RXO+7, RXO+8, RXO+10, NTE+2
, NTE+3, NTE+6, NTE+13, NTE+16, NTE+21, RXR+2, RXR+3, RXR+4, RXR+6, RXC+6
, RXC+7, RXC+12, RXC+13, RXC+14, RXC+15, RXA+3, RXA+4, RXA+5, RXA+6, RXA+7
, RXA+9, RXA+10, RXA+11, RXA+14, RXA+17, RXA+20, RXA+21

>> PSBHLSCS

1+6*

PSBIEN

EN~, MEDSTAT+2, PID+1, PV1+5, PV1+6, PV1+9, ORC+4, ORC+5, ORC+8, ORC+10
, ORC+16, ORC+18, ORC+21, ORC+23, RXO+4, RXO+7, RXO+8, RXO+9, NTE+5, NTE+6
, NTE+7, NTE+9, NTE+11, NTE+14, NTE+15, NTE+16, NTE+17, NTE+19, RXR+4, RXC+2
, RXC+5, RXC+9, RXC+10, RXC+11, RXC+13, RXC+14, RXC+15, RXA+6, RXA+12, RXA+13
, RXA+14, RXA+16, RXA+19, RXA+21

>> PSBINDX

NTE+15*, NTE+16, NTE+17, NTE+19, RXA+13*, RXA+14

PSBINF

ESC~, ESC+1

>> PSBINFO

ESC+1*, ESC+3, ESC+6*, ESC+8*, ESC+9

PSBINFO1

ESC+1!, ESC+3*, ESC+4, ESC+5*, ESC+6

>> PSBMRAB

RXR+3

>> PSBPONX

ORC+14

PSBRX

RXA+2*, RXA+5, RXA+23!

PSBRXA

RXA+23!

PSBRXA(

RXC+12*, RXC+15*, RXA+2, RXA+10, RXA+11

PSBRXAX

RXC+12*, RXC+15, RXA+1*, RXA+2*, RXA+9, RXA+10, RXA+11, RXA+23!

PSBRXTYP

RXC+4!*, RXC+7

>> PSBSCH

ORC+9

>> PSBSCHT

ORC+11, NTE+5, RXA+16

PSBSUBFD

RXC+2!*, RXC+3, RXC+4, RXC+5, RXC+9, RXC+10, RXC+11, RXC+13, RXC+14, RXC+15

>> PSBSUBX

RXC+5*, RXC+9, RXC+10, RXC+11, RXC+13, RXC+14, RXC+15

U

PID+1, PV1+5, PV1+6, PV1+9, ORC+5, ORC+8, ORC+10, ORC+16, ORC+18, ORC+21
, ORC+23, RXO+4, RXO+7, RXO+8, RXO+9, NTE+6, NTE+7, NTE+9, NTE+11, NTE+16
, NTE+17, NTE+19, RXR+4, RXC+9, RXC+10, RXC+11, RXC+13, RXC+14, RXC+15, RXA+6
, RXA+10, RXA+11, RXA+14, RXA+16, RXA+19, RXA+21, ESC+5, TRANS+3

>> VA("PID"

PID+6

>> VADM(1

PID+4

>> VADM(3

PID+5

>> VADM(4

PID+3*

>> VADM(5

PID+7