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 |  All
Print Page as PDF
Routine: PSOHLDIS

Package: Outpatient Pharmacy

Routine: PSOHLDIS


Information

PSOHLDIS ;BIR/PWC,SAB - Automated Dispense Completion HL7 v.2.4 ;8/28/07 5:00pm

Source Information

Source file <PSOHLDIS.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Outpatient Pharmacy 6 ($$STATUS,AUTOREL)^PSOBPSUT  CP^PSOCP  CHKADDR^PSODISPS  (BINGREL,DRGACCT,MAIL)^PSOHLDI1  EN^PSOHLSN1  SAVNDC^PSONDCUT  
VA FileMan 4 NOW^%DTC  ^DIC  ^DIE  $$GET1^DIQ  
Health Level Seven 1 $$FMDATE^HLFNC  
Kernel 1 ($$FMTE,$$FMTHL7)^XLFDT  
Pharmacy Data Management 1 $$NDCFMT^PSSNDCUT  
Registration 1 DEM^VADPT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Outpatient Pharmacy 1 PSOHLDS  

Entry Points

Name Comments DBIA/ICR reference
EN ;main entry and process
GETHL7 ;get HL7 segments from msg
GETPID ;get PID segment data
GETORC ;get ORC segment data
GETRXD ;get RXD segment data
FILL ;Orig fill
REFILL ;refill
PARTIAL ;partial fill dispensed
ACTLOG ;activity log entry
ALCOM ;activity log entry - tracking information
ERROR ;sends the error message back to the sending station
END

External References

Name Field # of Occurrence
NOW^%DTC ACTLOG+5, ALCOM+5, ERROR+4
^DIC GETORC+6, GETORC+10, GETRXD+16
^DIE FILL+5, REFILL+6, PARTIAL+6
$$GET1^DIQ ACTLOG+18
$$FMDATE^HLFNC GETRXD+3, GETRXD+10, GETRXD+23
$$STATUS^PSOBPSUT FILL+10, REFILL+12
AUTOREL^PSOBPSUT FILL+8, REFILL+10
CP^PSOCP FILL+7, REFILL+9
CHKADDR^PSODISPS EN+15
BINGREL^PSOHLDI1 EN+13
DRGACCT^PSOHLDI1 EN+14
MAIL^PSOHLDI1 ACTLOG+15, ACTLOG+20
EN^PSOHLSN1 FILL+8, REFILL+10
SAVNDC^PSONDCUT FILL+10, REFILL+12
$$NDCFMT^PSSNDCUT FILL+10, REFILL+12
DEM^VADPT GETORC+2
$$FMTE^XLFDT ALCOM+7
$$FMTHL7^XLFDT ERROR+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls
^PSRX - [#52] Classic Fileman Calls,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(52.51 - [#52.51] GETRXD+28
^PS(59 - [#59] GETRXD+29, GETRXD+30, FILL+4, FILL+6, REFILL+4, REFILL+7, PARTIAL+4, PARTIAL+7
^PS(59.7 - [#59.7] GETRXD+30
^PSDRUG - [#50] FILL+2*, REFILL+3*, PARTIAL+3*
^PSRX - [#52] EN+21, EN+22*, EN+23*, GETORC+2, GETRXD+31, FILL+1*, FILL+6, FILL+7, REFILL+1, REFILL+2*
, REFILL+3, REFILL+7, REFILL+9, PARTIAL+1, PARTIAL+2*, PARTIAL+3, PARTIAL+7, ACTLOG+4, ACTLOG+5*, ACTLOG+16
, ACTLOG+21*, ACTLOG+25*, ACTLOG+26*, ACTLOG+27*, ALCOM+2, ALCOM+4, ALCOM+6*, ALCOM+7*
^TMP("PSO2" ERROR+7*

Label References

Name Line Occurrences
ACTLOG EN+11, EN+17
ALCOM EN+6
END EN+5, EN+25
FILL EN+8
GETHL7 EN+2
GETORC EN+2
GETPID EN+2
GETRXD EN+2
PARTIAL EN+10
REFILL EN+9

Naked Globals

Name Field # of Occurrence
^("OR1" FILL+1*
^(0 GETRXD+31, REFILL+2*, PARTIAL+2*
^(1 REFILL+2*, PARTIAL+2*
^(2 FILL+1*, FILL+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ACTLOG+5, ALCOM+5, ERROR+6, ERROR+10!
ACKDATE ERROR+6*, ERROR+7, ERROR+10!
ACL ACTLOG+4*, ACTLOG+5*, ACTLOG+21, ACTLOG+25, ACTLOG+26, ACTLOG+27, ALCOM+2*, ALCOM+3, ALCOM+4, ALCOM+6
, ALCOM+7, END!
ACTN ACTLOG+1~, ACTLOG+14*, ACTLOG+19*
ADA END+1!
ATXT ACTLOG+1~, ACTLOG+6*, ACTLOG+10*, ACTLOG+12*, ACTLOG+13*, ACTLOG+17*, ACTLOG+18*, ACTLOG+21
BDA END+1!
BDIV EN+13, FILL+6*, REFILL+7*, PARTIAL+7*, END+1!
BGRP EN+13, FILL+6*, REFILL+7*, PARTIAL+7*, END+2!
BNAM EN+13, FILL+6*, REFILL+7*, PARTIAL+7*, END+2!
BNAME END+1!
BNGRXP END+1!
BNGSUS END+1!
BRT FILL+6*, REFILL+7*, PARTIAL+7*, END+2!
BRX END+1!
CMOP END+3!
CNT1 END+1!
CPHARM GETORC+8*, GETORC+9, GETORC+10*, GETORC+11*, FILL+1, REFILL+2, PARTIAL+2, END+5!
CPHARMN GETORC+10*, GETORC+11*, ACTLOG+27, END+5!
CT END+1!
DA FILL+5*!, REFILL+5*, REFILL+6!, PARTIAL+5*, PARTIAL+6!, END+1!
DA(1 REFILL+5*, PARTIAL+5*
DCNT ALCOM+1~, ALCOM+4*, ALCOM+5*, ALCOM+6, ALCOM+7
DD END+1!
>> DFN GETORC+2*
DIC GETORC+5!*, GETORC+9!*, GETRXD+15!*, END+1!
DIC(0 GETORC+5*, GETORC+9*, GETRXD+15*
DIE FILL+5*!, REFILL+5*, REFILL+6!, PARTIAL+5*, PARTIAL+6!, END+1!
DIK END+1!
DIR END+1!
>> DISPDT GETRXD+3*
>> DIV GETRXD+29*, FILL+4, REFILL+4, PARTIAL+4
DO END+1!
>> DOB GETORC+3*
DR FILL+5*!, REFILL+6*!, PARTIAL+6*!, END+1!
>> DRG GETRXD+31*, FILL+2, REFILL+3, PARTIAL+3
DTOUT END+1!
DUOUT END+1!
>> EIN GETRXD+28
>> EXPDT GETRXD+23*, FILL+1, REFILL+2
>> EXRX GETRXD+28*, GETRXD+29
F GETRXD+6!, GETRXD+7*, GETRXD+8*, GETRXD+9, GETRXD+19!, GETRXD+20*, GETRXD+21*, GETRXD+22, GETRXD+25!, GETRXD+26*
, GETRXD+27
>> FILL GETRXD+1*
>> FLL EN+8, EN+9, EN+10, EN+23, GETRXD+29*, ACTLOG+2, ACTLOG+3, ACTLOG+13
>> FLLN EN+8, EN+9, EN+23, GETRXD+29*, FILL+8, FILL+10, REFILL+1, REFILL+2, REFILL+3, REFILL+5
, REFILL+7, REFILL+8, REFILL+10, REFILL+12, PARTIAL+1, PARTIAL+2, PARTIAL+3, PARTIAL+5, PARTIAL+7, ACTLOG+2
FPER GETORC+4*, GETORC+5, GETORC+6*, GETORC+7*, FILL+1, REFILL+2, PARTIAL+2, END+5!
FPERN GETORC+6*, GETORC+7*, ACTLOG+26, END+5!
>> GIVECOD GETRXD+2*
GRP END+1!
GRTP END+1!
>> HLRPT EN+23
>> HLUSER EN+23
I GETHL7+2*, GETHL7+3, GETHL7+4, GETHL7+5, GETHL7+6, GETHL7+7, ACTLOG+4*, ALCOM+1~, ALCOM+2*, ALCOM+4*
, END!
>> IRX GETRXD+29*, GETRXD+31, FILL+1, FILL+5, FILL+6, FILL+7, FILL+8, FILL+10, REFILL+1, REFILL+2
, REFILL+3, REFILL+5, REFILL+7, REFILL+9, REFILL+10, REFILL+12, PARTIAL+1, PARTIAL+2, PARTIAL+3, PARTIAL+5
, PARTIAL+7
JOES END+1!
L GETRXD+6!, GETRXD+8*, GETRXD+19!, GETRXD+21*, GETRXD+25!, GETRXD+26*
LB EN+21*, END!
LBI EN+21*, EN+22*, EN+23, END!
>> LOT GETRXD+18*, GETRXD+19, GETRXD+21, GETRXD+22*, FILL+1, REFILL+2, PARTIAL+2
>> MDUP EN+5
MEDDISP EN+7, GETRXD+12*, ACTLOG+6, ACTLOG+9, ACTLOG+24, END!
>> MFG GETRXD+24*, GETRXD+25, GETRXD+26, GETRXD+27*, FILL+1, REFILL+2, PARTIAL+2
NAM END+2!
NAME GETORC+3*, END+3!
NDA END+2!
>> NDC GETRXD+5*, GETRXD+6, GETRXD+8, GETRXD+9*, FILL+8, FILL+10, REFILL+10, REFILL+12, PARTIAL+2
NFLAG END+2!
NME END+2!
NODE1 GETHL7+3*, END+4!
NODE2 GETHL7+4*, END+4!
NODE3 GETHL7+5*, GETPID+1, END+4!
NODE4 GETHL7+6*, GETORC+1, GETORC+4, GETORC+8, END+4!
NODE5 GETHL7+7*, GETRXD+1, GETRXD+2, GETRXD+3, GETRXD+4, GETRXD+5, GETRXD+10, GETRXD+11, GETRXD+12, GETRXD+13
, GETRXD+14, GETRXD+18, GETRXD+23, GETRXD+24, END+4!
NONODE EN+1~, EN+12, REFILL+1*, PARTIAL+1*, ACTLOG+11
NOW EN+23, ACTLOG+5*, ACTLOG+21, ALCOM+5*, ALCOM+7, END!
ODA END+2!
OK GETHL7+1!, ERROR+5, ERROR+10!, END+3!
PCLM GETPID+7*, END+4!
PICN GETPID+4*, END+4!
>> PID GETPID+1*, GETPID+2
PIDD GETPID+2*, GETPID+3, GETPID+4, GETPID+5, GETPID+6, GETPID+7, END+4!
PIDID GETPID+3*, GETPID+4, GETPID+5, GETPID+6, GETPID+7, END+4!
PPID GETPID+6*, END+4!
PRT EN+15, EN+20, GETRXD+11*, END!
>> PSOCPRX FILL+7*, REFILL+9*
>> PSOMSG( GETHL7+2, GETHL7+3, GETHL7+4, GETHL7+5, GETHL7+6, GETHL7+7
>> PSOPAR GETRXD+29*
>> PSOPAR7 GETRXD+30*
>> PSORX GETRXD+4*, ERROR+5
>> PSOSITE EN+14, GETRXD+29*, GETRXD+30
>> PSOSYS GETRXD+30*
PSSN GETPID+5*, END+4!
PSZ END+2!
>> QTY GETRXD+31*, FILL+2
RDOM END+3!
RDTM END+4!
REJ ERROR+5*, ERROR+10!
>> RELDT GETRXD+10*, FILL+4, FILL+5, FILL+8, REFILL+4, REFILL+6, REFILL+10, PARTIAL+4, PARTIAL+6
REQT END+3!
RPHARM GETRXD+14*, GETRXD+15, GETRXD+16*, GETRXD+17*, FILL+5, REFILL+6, PARTIAL+6, ACTLOG+21, END+5!
>> RPT GETRXD+29*
RTDTM END+3!
RXF ACTLOG+1~, ACTLOG+2*, ACTLOG+3*, ACTLOG+21
>> RXID EN+14, EN+15, EN+21, EN+22, EN+23, GETORC+1*, GETORC+2, ACTLOG+4, ACTLOG+5, ACTLOG+16
, ACTLOG+18, ACTLOG+21, ACTLOG+25, ACTLOG+26, ACTLOG+27, ALCOM+2, ALCOM+4, ALCOM+6, ALCOM+7
>> RXN GETRXD+31*
RXO END+2!
>> RXP FILL+7*, REFILL+9*
>> SEX GETORC+3*
SITEN END+3!
SITENUM END+3!
SSN END+2!
TDFN END+2!
TFLAG END+2!
TIC END+2!
TICK END+2!
TIEN END+2!
TM END+2!
TM1 END+2!
TRKLOC EN+6, GETRXD+13*, ACTLOG+28, ALCOM+7, END+5!
TSSN END+2!
USER ERROR+10!
VADM GETORC+3!
VADM(1 GETORC+3
VADM(3 GETORC+3
VADM(5 GETORC+3
X GETORC+5!*, GETORC+9!*, GETRXD+3*!, GETRXD+10*!, GETRXD+15!*, GETRXD+23*!, END+2!
XQADATA END+3!
XQAID END+4!
XQAMSG END+3!
XQAROU END+4!
XQMSG END+3!
XQSOP END+3!
XX GETPID+2*, END+2!
Y GETORC+5!, GETORC+6, GETORC+9!, GETORC+10, GETRXD+15!, GETRXD+16, ERROR+10!, END+2!, END+3!
YY REFILL+8~*
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 |  All