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

Package: Outpatient Pharmacy

Routine: PSORMRX


Information

PSORMRX ;BIRM/JAM - REMOTE DATA INTEROPERABILITY UTILITY ; 10/29/08

Source Information

Source file <PSORMRX.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA Fileman 3 ^%DT  $$GET1^DIQ  ^DIR  
Registration 2 EN^VALM  FULL^VALM1  
Kernel 1 ($$FMDIFF,$$FMTE)^XLFDT  
Order Entry Results Reporting 1 ($$GET,$$HAVEHDR)^ORRDI1  
Outpatient Pharmacy 1 EN^PSORMRXD  

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Outpatient Pharmacy 5 PSOPRF  PSOPRFSS  PSORMRXD  PSORMRXP  PSORX1  

Entry Points

Name Comments DBIA/ICR reference
RDI(DFN) ; This call gets patient prescription data from other hospitals and
; stores them in ^TMP($J,"PSORDI"
RDICHK(PSODFN) ;Check for remote prescriptions
SETTMP ;Sets the ^TMP("PSORDI",$J global
REMOTE ; Listman display of remote prescriptions
HDR ; Patient Header for remote site
BOTH ; Listman display of remote and local prescriptions
EN(PSODFN) ;- ListManager entry point
STACHK(ST,EXPDT) ;Status Check
FMTSIG ;Format SIG from remote site and return in the FSIG array
PARSE
BLDSIT ; - Build prescription details for remote site sites
INIT ; - Populates the body of ListMan
HELP ;
GETRDI(DFN) ; call to get remote data
EXIT ;
RDIOUT
GETSIG ;Get SIG for remote sites from ^TMP($J,"PSORDI",
BLDRDI ;Builds Medication Profile (remote) for display

External References

Name Field # of Occurrence
^%DT STACHK+7
$$GET1^DIQ HDR+3, HDR+4, HDR+7
^DIR RDICHK+7
$$GET^ORRDI1 GETRDI+2
$$HAVEHDR^ORRDI1 RDI+10
EN^PSORMRXD REMOTE+2, BOTH+1
EN^VALM EN+3
FULL^VALM1 EN+4
$$FMDIFF^XLFDT STACHK+6
$$FMTE^XLFDT HDR+7, BLDRDI+18, BLDRDI+19

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"REMOTE PRESCRIPTIONS AVAILABLE!"
  • Line Location: RDICHK+5
Routine Call
  • VALM
  • Line Location:
    • EN+3
Routine Call
  • DIR
  • Line Location:
    • RDICHK+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("PSORDI" BLDRDI+3!, BLDRDI+30*, SETTMP+1*, REMOTE+1, EXIT+1!
^TMP("PSORDIS" BLDSIT+4, BLDRDI+3!, BLDRDI+21*, EXIT+2!
^TMP("PSOREMOTE" RDI+7!, PARSE+10*, PARSE+11*, PARSE+12, PARSE+15, PARSE+16, PARSE+17, PARSE+18, PARSE+19, PARSE+20!
^TMP("PSORSITE" BLDSIT+2!, BLDSIT+5*, BLDSIT+7, BLDSIT+9*, EXIT+1!
^TMP($J BLDSIT+7, BLDSIT+8, BLDSIT+9, BLDRDI+6, BLDRDI+7, BLDRDI+23, GETSIG+2, RDI+7!, RDI+9*, RDI+11*
, RDI+13*, RDI+16*, RDI+18*, PARSE+13*, PARSE+18*, PARSE+19*, EXIT+1!
^XTMP("ORRDI" RDI+12, RDI+17, PARSE+1, PARSE+2, PARSE+3, PARSE+4, PARSE+5, PARSE+6, PARSE+7, PARSE+11

Label References

Name Line Occurrences
$$GETRDI RDI+14
$$RDI BLDRDI+4, RDICHK+4
$$STACHK BLDRDI+9
BLDRDI INIT+2, REMOTE+1
BLDSIT INIT+2
EN RDICHK+8
EXIT EN+5
GETSIG BLDRDI+24
SETTMP BLDRDI+12, BLDRDI+13, BLDRDI+20, BLDRDI+28, BLDRDI+29

Naked Globals

Name Field # of Occurrence
^( GETSIG+2, PARSE+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT STACHK+7~*
CNT BLDSIT+1~, BLDSIT+3*, BLDSIT+5*, BLDSIT+9*, BLDSIT+10, FMTSIG+1~, FMTSIG+4*, FMTSIG+5, RDI+6~, PARSE+14*
, PARSE+18*, PARSE+19
DATA BLDRDI+1~, BLDRDI+7*, BLDRDI+8, BLDRDI+11, BLDRDI+14, BLDRDI+16, BLDRDI+17, BLDRDI+29
DATA1 BLDRDI+1~
DFN RDI~, RDI+8, RDI+14, RDI+17, PARSE+1, PARSE+2, PARSE+3, PARSE+4, PARSE+5, PARSE+6
, PARSE+7, PARSE+10, PARSE+11, PARSE+12, PARSE+15, PARSE+16, PARSE+17, PARSE+18, PARSE+19, GETRDI~
, GETRDI+2
DIR RDICHK+3~
DIR("A" RDICHK+6*
DIR("B" RDICHK+6*
DIR(0 RDICHK+6*
DRG RDI+6~, PARSE+7*, PARSE+9*, PARSE+10, PARSE+11, PARSE+15*, PARSE+16*, PARSE+17, PARSE+18, PARSE+19
DT STACHK+6
EXPDT BLDRDI+2~, BLDRDI+8*, BLDRDI+9, STACHK~, STACHK+7
FAC RDI+6~, PARSE+6*, PARSE+8*, PARSE+10, PARSE+11, PARSE+14*, PARSE+15*, PARSE+16, PARSE+17, PARSE+18
, PARSE+19
FFF FMTSIG+1~, FMTSIG+4*, FMTSIG+5
FLIM FMTSIG+1~, FMTSIG+4, FMTSIG+5*
FSIG BLDRDI+1~, BLDRDI+24!, FMTSIG+3!
FSIG( BLDRDI+26, BLDRDI+27, FMTSIG+4*, FMTSIG+7*
FSIG(1 FMTSIG+8*
FSIG(2 FMTSIG+8!
FVAR FMTSIG+1~, FMTSIG+2*, FMTSIG+4*, FMTSIG+5, FMTSIG+6*, FMTSIG+7
FVAR1 FMTSIG+1~, FMTSIG+2*, FMTSIG+4, FMTSIG+5*, FMTSIG+6
I GETSIG+1~, GETSIG+2*
II FMTSIG+1~, FMTSIG+2*, FMTSIG+4*, FMTSIG+7
ISDT BLDRDI+1~, BLDRDI+17*, BLDRDI+18
LC BLDSIT+1~, BLDSIT+3*, BLDSIT+4*, BLDSIT+5, BLDSIT+7*, BLDSIT+8*, BLDSIT+9, BLDRDI+1~, BLDRDI+5*, BLDRDI+6*
, BLDRDI+7, BLDRDI+23, GETSIG+2
LFDT BLDRDI+1~, BLDRDI+17*, BLDRDI+19
LINE HDR+1~, HDR+3*, HDR+6*, HDR+7*, HDR+8, BLDRDI+1~, BLDRDI+12*, BLDRDI+13*, BLDRDI+14*, BLDRDI+15*
, BLDRDI+16*, BLDRDI+18*, BLDRDI+19*, BLDRDI+25*, BLDRDI+27*, BLDRDI+28*, BLDRDI+29*, SETTMP+1
LN RDI+6~, PARSE*, PARSE+10*, PARSE+11, PARSE+16*, PARSE+17*, PARSE+18, PARSE+19
NNN FMTSIG+1~, FMTSIG+4*
PSODFN EN~, HDR+3, HDR+4, HDR+7, BLDRDI+4, BLDRDI+6, BLDRDI+7, BLDRDI+23, GETSIG+2, RDICHK~
, RDICHK+4, RDICHK+8
PSOMED RDI+6~, PARSE*, PARSE+1*, PARSE+2, PARSE+3, PARSE+4, PARSE+5, PARSE+6, PARSE+7, PARSE+11
PSORDI BLDRDI+1~, BLDRDI+4*
PSORET RDI+6~, RDI+14*, RDI+15
PSORFLG EN+2*, EXIT+2!
PSOSIG RDI+6~, PARSE+10*, PARSE+11*
PSOSTAT RDI+6~, PARSE+2*
PSOSTR RDI+6~, PARSE+3*, PARSE+4*, PARSE+5*, PARSE+10
QTY BLDRDI+1~, BLDRDI+16*
RDI GETRDI+1~, GETRDI+2*, GETRDI+3
RSIG GETSIG+1~
RSIG( GETSIG+2*, FMTSIG+4, FMTSIG+5
SEQ BLDRDI+1~, BLDRDI+5*, BLDRDI+30, SETTMP+1*
SIG BLDRDI+1~, BLDRDI+25*, BLDRDI+26*, BLDRDI+27
SITE BLDRDI+1~, BLDRDI+11*, BLDRDI+13, BLDRDI+21, BLDRDI+22
SITEO BLDRDI+1~, BLDRDI+4*, BLDRDI+11, BLDRDI+12, BLDRDI+22*
SSN HDR+1~, HDR+4*, HDR+5*, HDR+6
ST STACHK~, STACHK+4, STACHK+5, STACHK+6, STACHK+8*, STACHK+9
STA BLDRDI+2~, BLDRDI+8*, BLDRDI+9*, BLDRDI+10*, BLDRDI+15
>> VALM("TITLE" HDR+9*
>> VALMCNT INIT+1*, BLDSIT+10*
VALMHDR HDR+2!
VALMHDR(1 HDR+8*
VALMHDR(2 HDR+8*
>> VALMSG INIT+3*
X BLDRDI+31!, STACHK+7*, RDICHK+3~
Y BLDRDI+31!, STACHK+6, RDICHK+3~, RDICHK+7
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 |  Naked Globals |  Local Variables |  All