PSORMRX ;BIRM/JAM - REMOTE DATA INTEROPERABILITY UTILITY ; 10/29/08
Source file <PSORMRX.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Outpatient Pharmacy | 9 | PSO RDI BOTH PSO RDI REMOTE PSO RDI VISITS PSO RDI VISITS MENU PSOPRF PSOPRFSS PSORMRXD PSORMRXP PSORX1 |
Kernel | 1 | ^ORD(101 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(PSODFN) | ;- ListManager entry point
|
|
HDR | ; Patient Header for remote site
|
|
INIT | ; - Populates the body of ListMan
|
|
BLDSIT | ; - Build prescription details for remote site sites
|
|
BLDRDI | ;Builds Medication Profile (remote) for display
|
|
STACHK(ST,EXPDT) | ;Status Check
|
|
SETTMP | ;Sets the ^TMP("PSORDI",$J global
|
|
GETSIG | ;Get SIG for remote sites from ^TMP($J,"PSORDI",
|
|
FMTSIG | ;Format SIG from remote site and return in the FSIG array
|
|
RDI(DFN) | ; This call gets patient prescription data from other hospitals and
; stores them in ^TMP($J,"PSORDI" |
|
PARSE | ||
RDIOUT | ||
GETRDI(DFN) | ; call to get remote data
|
|
RDICHK(PSODFN) | ;Check for remote prescriptions
|
|
REMOTE | ; Listman display of remote prescriptions
|
|
BOTH | ; Listman display of remote and local prescriptions
|
|
HELP | ;
|
|
EXIT | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
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 |
>> | 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 |