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 |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: PSOVDF1

Package: Outpatient Pharmacy

Routine: PSOVDF1


Information

PSOVDF1 ;BPOIFO/EL-OUTPATIENT PHARMACY (PRES, PREF, PPAR) HL7 MESSAGE ;10/04/04

Source Information

Source file <PSOVDF1.m>

Call Graph

Call Graph Total: 11

Package Total Call Graph
Outpatient Pharmacy 3 ($$NDC,NDC)^PSOHDR  (OUT,OUT20,PROCESS)^PSOVDF2  (FT1R,PREM,RREM,RXE31,RXE31A)^PSOVDF3  
Health Level Seven 2 $$PARAM^HLCS2  $$HLDATE^HLFNC  
Registration 2 BLDPID^VAFCQRY  $$SITE^VASITE  
Uncategorized 2 $$XCN200^VDEFEL  ERR^VDEFREQ  
VA Fileman 2 $$ROOT^DILFD  $$GET1^DIQ  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Outpatient Pharmacy 2 PSOVDF2  PSOVDF3  

Entry Points

Name Comments DBIA/ICR reference
NTE3 ; PAR
NTE2 ; RF
ORC2Q ; Q
RXE3Q ; Q
VALID ;;VDEF HL7 MESSAGE BUILDER
MSH ; MSH
RXE3 ; PAR
RXE2 ; RF
ORC2A
RXE3B
FT13 ; patch 261
FT12 ; RF
; patch 261 - FT1
MSHPID ;
OUT20
PID ; PID
INIT ;
NTE2Q ; Q
OUT
FT12Q ; Q
RXE2Q ; Q
ORC2 ; RF
ORC3 ; PAR
EN(EVIEN,KEY,VFLAG,OUT,MSHP) ;
; This routine creates one of three Outpatient Pharmacy HL7 messages:
; RDE^O11^PRES, RDS^O13^PREF, or RDS^O13^PPAR
REPL(L) ; REPLACE HL7 DELIMITER CHAR
RXE2A
ORC3Q ; Q
ORC3A
QUIT
NTE3Q ; Q
PUT(P) ; Put in MSG

External References

Name Field # of Occurrence
$$ROOT^DILFD INIT+17
$$GET1^DIQ RXE2+20, RXE3+20
$$PARAM^HLCS2 MSH+2
$$HLDATE^HLFNC ORC2A+6, ORC2A+9, ORC2A+13, RXE2+4, RXE2A, ORC3A+6, ORC3A+9, RXE3+4, RXE3B
$$NDC^PSOHDR RXE2+8, RXE3+8
NDC^PSOHDR RXE2+7, RXE3+7
OUT^PSOVDF2 OUT
OUT20^PSOVDF2 OUT20
PROCESS^PSOVDF2 EN+30
FT1R^PSOVDF3 FT12+2, FT13+1
PREM^PSOVDF3 NTE3+6
RREM^PSOVDF3 NTE2+6
RXE31^PSOVDF3 RXE3B+2
RXE31A^PSOVDF3 RXE2A+3
BLDPID^VAFCQRY PID+3
$$SITE^VASITE INIT+23
$$XCN200^VDEFEL ORC2A+15, RXE2+25, ORC3A+11, RXE3+25
ERR^VDEFREQ EN+27, EN+29

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
52.1 GET1^DIQ
52.2 GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] INIT+21
^PS(59 - [#59] ORC2A+20, ORC3A+16
^PSDRUG - [#50] RXE2+10, RXE3+10
^PSRX - [#52] ORC2A+17, ORC3A+13

Label References

Name Line Occurrences
$$REPL INIT+22, INIT+23, MSH+3, ORC2A+3, ORC2A+6, ORC2A+9, ORC2A+13, ORC2A+21, ORC2A+22, ORC2A+24
, RXE2+4, RXE2+12, RXE2+20, RXE2+22, RXE2A, RXE2A+2, NTE2+5, ORC3A+3, ORC3A+6, ORC3A+9
, ORC3A+17, ORC3A+18, ORC3A+20, RXE3+4, RXE3+12, RXE3+20, RXE3+22, RXE3B, RXE3B+1, NTE3+5
INIT EN+26
MSHPID EN+28
NTE2Q NTE2+3
NTE3Q NTE3+3
ORC2 EN+31
ORC2A ORC2A+2, FT12Q+1
ORC2Q ORC2A+29
ORC3 ORC2+1, ORC2A
ORC3A ORC3A+2, FT13+2
ORC3Q ORC3A+24
OUT ORC2A+31, RXE2A+6, NTE2+7, ORC3A+26, RXE3B+6, NTE3+7
OUT20 PID+6
PUT ORC2A+3, ORC2A+10, ORC2A+11, ORC2A+13, ORC2A+15, ORC2A+16, ORC2A+18, ORC2A+26, ORC2A+27, ORC2A+28
, RXE2+4, RXE2+13, RXE2+14, RXE2+15, RXE2+17, RXE2+20, RXE2+22, RXE2+25, RXE2A, RXE2A+2
, RXE2A+4, NTE2+4, NTE2+6, ORC3A+3, ORC3A+6, ORC3A+7, ORC3A+9, ORC3A+11, ORC3A+12, ORC3A+14
, ORC3A+22, ORC3A+23, RXE3+4, RXE3+13, RXE3+14, RXE3+15, RXE3+17, RXE3+20, RXE3+22, RXE3+25
, RXE3B, RXE3B+1, RXE3B+3, NTE3+4, NTE3+6
QUIT EN+27, EN+29
RXE2A RXE2+24
RXE2Q RXE2A+5
RXE3B RXE3+24
RXE3Q RXE3B+5

Naked Globals

Name Field # of Occurrence
^("SAND" ORC2A+20, ORC3A+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CTR EN+21~
DFN EN+21~, INIT+2*, INIT+19*, INIT+20, INIT+21, PID+3, PID+4
DRCODE EN+21~, INIT+2*
ERR EN+21~, EN+25*, EN+27, EN+29, INIT+20*, INIT+21*, PID+3, PID+4*
EVIEN EN~
FIELD EN+21~
FILE EN+21~, INIT+2*, INIT+7*, INIT+17, MSH+3
GIVECODE EN+21~, INIT+2*, RXE2+13, RXE2+14, RXE3+13, RXE3+14
GL EN+21~, INIT+1!, INIT+18*
GL("P" ORC3+1, ORC3+2
GL(0 INIT+19
GL(1 ORC2+1, ORC2+2
GLOB EN+21~, INIT+2*, INIT+17*, INIT+18
GLOBAL EN+21~
>> HL PID+3
>> HL("ECH" INIT+9*, INIT+16
>> HL("FS" INIT+14*, INIT+16
HL7DEL EN+23~, INIT+3*, INIT+16*, REPL+2
HLINST EN+21~, MSH+1*, MSH+3*, ORC2A+23, ORC3A+19
I EN+22~, REPL+7*, REPL+8*, REPL+9*, REPL+10*, REPL+11*
KEY EN~, INIT+5
L EN+22~, REPL~, REPL+1, REPL+2, REPL+4, REPL+5
MSG EN+22~, PUT+2*, MSH+1*, MSH+4, PID+2*, ORC2A+1*, ORC2A+29, ORC2A+30*, ORC2A+31*, RXE2+1*
, RXE2A+5, RXE2A+6*, NTE2+1*, NTE2+7*, ORC3A+1*, ORC3A+24, ORC3A+25*, ORC3A+26*, RXE3+1*, RXE3B+5
, RXE3B+6*, NTE3+1*, NTE3+7*
MSHP EN~, INIT+8
NTE EN+22~
OUT EN~, INIT+1!
OUT("HLS" INIT+4*
P EN+22~, PUT~, PUT+2
PSONCPR ORC3A+15~, ORC3A+17*, ORC3A+20
PSONCPRP ORC3A+15~, ORC3A+16*, ORC3A+20*
PSONCRF ORC2A+19~, ORC2A+21*, ORC2A+24
PSONCRFP ORC2A+19~, ORC2A+20*, ORC2A+24*
PSOSPNUM ORC3A+15~, ORC3A+18*, ORC3A+19
PSOSTNUM ORC2A+19~, ORC2A+22*, ORC2A+23
PSOVD59 EN+21~, ORC2A+18*, ORC2A+25, ORC3A+14*, ORC3A+21
PSOVDDIV EN+21~
PSOVDDIV( ORC2A+18, ORC2A+25*, ORC3A+14, ORC3A+21*
PSOVDFD0 EN+21~, INIT+2*, INIT+5*, INIT+17, INIT+20, INIT+21, INIT+22, PID+4, ORC2A+17, RXE2+8
, RXE2+20, ORC3A+13, RXE3+8, RXE3+20
PSOVDFD1 EN+21~, ORC2+3*, ORC2A*, ORC2A+2, ORC2A+3, ORC2A+28, RXE2+8, RXE2+9, RXE2+20, NTE2+4
, ORC3+3*, ORC3A*, ORC3A+2, ORC3A+3, RXE3+8, RXE3+9, RXE3+20, NTE3+4
PSOVDFES EN+22~, INIT+2*, INIT+22*, ORC2A+11, ORC3A+7
PSOVDFIN EN+22~, INIT+23*, ORC2A+27, ORC3A+23
PSOVDRUG EN+21~, INIT+2*, RXE2+10, RXE3+10
PSOVERR EN+21~, RXE2+20!, RXE3+20!
PSOVESC EN+22~, ORC2A+3*, ORC3A+3*
REPSEPC EN+23~, INIT+3*, INIT+11*, REPL+8
REPSEPE EN+23~, INIT+3*, INIT+10*, REPL+6, REPL+7
REPSEPF EN+23~, INIT+3*, INIT+15*, REPL+11
REPSEPR EN+23~, INIT+3*, INIT+12*, REPL+9
REPSEPS EN+23~, INIT+3*, INIT+13*, REPL+10
RES EN+22~, REPL+3~, REPL+4*, REPL+5, REPL+6*, REPL+7*, REPL+8*, REPL+9*, REPL+10*, REPL+11*
, REPL+12
SEPC EN+22~, INIT+2*, INIT+11*, REPL+8, ORC2A+6, ORC2A+9, ORC2A+11, ORC2A+18, ORC2A+23, ORC2A+24
, ORC2A+28, RXE2+4, RXE2+13, RXE2+20, ORC3A+6, ORC3A+7, ORC3A+14, ORC3A+19, ORC3A+20, RXE3+4
, RXE3+13, RXE3+20
SEPE EN+22~, INIT+2*, INIT+10*, INIT+11, INIT+12, INIT+13, INIT+15, REPL+5, REPL+6, REPL+7
SEPF EN+22~, INIT+2*, INIT+15*, PUT+2, REPL+11, MSH+4, ORC2A+31, RXE2A+6, NTE2+7, ORC3A+26
, RXE3B+6, NTE3+7
SEPR EN+22~, INIT+2*, INIT+12*, REPL+9
SEPS EN+22~, INIT+2*, INIT+13*, REPL+10
>> SITEPARM MSH+2*, MSH+3
SRC EN+22~, INIT+2*, MSH+1*, MSH+3*
SUBTYPE EN+22~, INIT+2*, INIT+8*
TARGET EN+22~, EN+25*, QUIT, MSH+4*
TEMP EN+23~, INIT+1!, ORC2+2!*, ORC3+2!*
TEMP( ORC2A, ORC2A+2, RXE2+9, ORC3A, ORC3A+2, RXE3+9
TP EN+23~, INIT+1!, ORC2A+2*, ORC2A+5, ORC2A+8, ORC2A+13, ORC2A+15, ORC2A+17, RXE2+3, RXE2+22
, RXE2+24, RXE2A, RXE2A+2, NTE2+3, ORC3A+2*, ORC3A+5, ORC3A+9, ORC3A+11, ORC3A+13, RXE3+3
, RXE3+22, RXE3+24, RXE3B, RXE3B+1, NTE3+3
U INIT+6*, INIT+19, MSH+3, PID+5, ORC2A+5, ORC2A+8, ORC2A+13, ORC2A+15, ORC2A+17, ORC2A+21
, ORC2A+22, ORC2A+30, RXE2+3, RXE2+9, RXE2+22, RXE2+24, RXE2A, RXE2A+2, NTE2+3, ORC3A+5
, ORC3A+9, ORC3A+11, ORC3A+13, ORC3A+17, ORC3A+18, ORC3A+25, RXE3+3, RXE3+9, RXE3+22, RXE3+24
, RXE3B, RXE3B+1, NTE3+3
UNIT EN+23~, INIT+2*, RXE2+17, RXE3+17
VAL EN+23~, INIT+2*, INIT+9*, INIT+10, INIT+11, INIT+12, INIT+13, INIT+14*, INIT+15, PUT+1
, PUT+2, ORC2A+3*, ORC2A+5*, ORC2A+6*, ORC2A+9*, ORC2A+11*, ORC2A+13*, ORC2A+15*, ORC2A+16*, ORC2A+17*
, ORC2A+18*, ORC2A+20, ORC2A+21*, ORC2A+23*, ORC2A+24*, ORC2A+25, ORC2A+27*, ORC2A+28*, RXE2+3*, RXE2+4*
, RXE2+6*, RXE2+8*, RXE2+9*, RXE2+10*, RXE2+11, RXE2+12*, RXE2+13*, RXE2+14*, RXE2+15*, RXE2+17*
, RXE2+19*, RXE2+20*, RXE2+22*, RXE2+24*, RXE2+25*, RXE2A*, RXE2A+2*, NTE2+4*, NTE2+5*, ORC3A+3*
, ORC3A+6*, ORC3A+7*, ORC3A+9*, ORC3A+11*, ORC3A+12*, ORC3A+13*, ORC3A+14*, ORC3A+16, ORC3A+17*, ORC3A+19*
, ORC3A+20*, ORC3A+21, ORC3A+23*, RXE3+4*, RXE3+6*, RXE3+8*, RXE3+9*, RXE3+10*, RXE3+11, RXE3+12*
, RXE3+13*, RXE3+14*, RXE3+15*, RXE3+17*, RXE3+19*, RXE3+20*, RXE3+22*, RXE3+24*, RXE3+25*, RXE3B*
, RXE3B+1*, NTE3+4*, NTE3+5*
VCMP EN+23~
VCMP( ORC2A+28
VFLAG EN~
VFT7 EN+23~
WR EN+23~, PID+1!, PID+3, PID+7!, ORC2A+5*, ORC2A+6*, ORC2A+8*, ORC2A+9*, RXE2+3*, RXE2+4*
, RXE2+19*, RXE2+20*, NTE2+3*, NTE2+5, ORC3A+5*, ORC3A+6*, RXE3+3*, RXE3+4*, RXE3+19*, RXE3+20*
, NTE3+3*, NTE3+5
WR(1 PID+4, PID+5*
X EN+23~, REPL+3~, REPL+5*, REPL+6*, REPL+7*, ORC2A+20*, ORC2A+21, ORC2A+22, RXE2+13*, ORC3A+16*
, ORC3A+17, ORC3A+18, RXE3+13*
Y EN+23~, REPL+3~, REPL+6*, REPL+7*, REPL+8*, REPL+9*, REPL+10*, REPL+11*
Z EN+23~, REPL+3~, REPL+6*, REPL+7*
>> ZTSTOP EN+27*, EN+29*

Marked Items

Name Field # of Occurrence
$T(NDC^PSOHDR RXE2+7, RXE3+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All