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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PSOORNE4

Package: Outpatient Pharmacy

Routine: PSOORNE4


Information

PSOORNE4 ;BIR/SAB-display renew RXs from backdoor ;Mar 30, 2022@14:37:15

Source Information

Source file <PSOORNE4.m>

Call Graph

Call Graph

Call Graph Total: 26

Package Total Call Graph
Outpatient Pharmacy 22 (1,11,12,13,2,4,5,9,INS2)^PSOBKDED  ^PSOBUILD  (DOSE,INS,SINS)^PSODIR  SETPEN^PSOERUT5  $$ERXIEN^PSOERXUT  EN^PSOFSIG  SIGONE^PSOHELP  ^PSOLMRN  
HLDHDR^PSOLMUTL  DAOC^PSONEW  (DIN,RV)^PSONFI  DOSE1^PSOORED5  (LMDISP,PRV)^PSOORFI5  SV^PSOORNE5  ACP1^PSOORNE6  ^PSOORUT2  
(ALERT,DCP,L1)^PSOPKIV1  (INST1,INST2)^PSORENW  STOP^PSORENW1  EN^PSORN52  RNPSOSD^PSOUTIL  KV^PSOVER1  
VA FileMan 2 NOW^%DTC  ^DIR  
List Manager 1 FULL^VALM1  
Order Entry Results Reporting 1 EN1^ORCFLAG  

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: 8

Package Total Caller Graph
Outpatient Pharmacy 7 PSO LM RENEW ACCEPT  PSO LM RENEW EDIT  PSOLMUTL  PSOORRNW  PSORENW0  PSORENW2  PSORENW4  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
EN(PSONEW)
EN1
RDD
EDT
EDTSEL
ACP ; Renewal Accept
PKI
VER1(PSONEW) ;
VER
DSPL
DSP
PAT
RMK
1
2
3
4
5
6
7
8
9
10
SV
PZ ;

External References

Name Field # of Occurrence
NOW^%DTC RMK+3
^DIR EDT+1, ACP+11, ACP+18, VER+12, PZ+1
EN1^ORCFLAG ACP+6
1^PSOBKDED 1
11^PSOBKDED 7
12^PSOBKDED 4
13^PSOBKDED 8
2^PSOBKDED 2
4^PSOBKDED 6+2
5^PSOBKDED 5
9^PSOBKDED 3+2
INS2^PSOBKDED PAT
^PSOBUILD PKI+10
DOSE^PSODIR VER+6
INS^PSODIR VER+10, 10
SINS^PSODIR VER+10, 10
SETPEN^PSOERUT5 RMK+10
$$ERXIEN^PSOERXUT EDTSEL+1, RMK+7
EN^PSOFSIG VER+6, VER+10
SIGONE^PSOHELP VER+5, PAT+9
^PSOLMRN RDD
HLDHDR^PSOLMUTL EDTSEL+2
DAOC^PSONEW PKI+7
DIN^PSONFI DSP+3
RV^PSONFI RMK+11
DOSE1^PSOORED5 9
LMDISP^PSOORFI5 DSP+1
PRV^PSOORFI5 PAT+21
SV^PSOORNE5 SV
ACP1^PSOORNE6 PKI+10
^PSOORUT2 DSP
ALERT^PSOPKIV1 PKI+2
DCP^PSOPKIV1 RDD
L1^PSOPKIV1 DSP+2
INST1^PSORENW PAT+1
INST2^PSORENW ACP+21
STOP^PSORENW1 VER+14
EN^PSORN52 PKI+2
RNPSOSD^PSOUTIL PKI+10
KV^PSOVER1 EDT, EDT+1, VER+12
FULL^VALM1 EDTSEL+4, ACP+7, ACP+13, VER+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ACP+2
Function Call: WRITE
  • Prompt: !!,"Rx "_$P($G(^PSRX(+$G(PSONEW("OIRXN")),0)),"^")_" is marked as 'Titration' and cannot be renewed.",$C(7)
  • Line Location: ACP+4
Function Call: WRITE
  • Prompt: !,$C(7)
  • Line Location: ACP+11
Function Call: WRITE
  • Prompt: !!!,"...ORDER RENEWED.",!!!
  • Line Location: PKI+11
Function Call: WRITE
  • Prompt: !!,"Dosing Instruction Missing!!",!
  • Line Location: VER+1
Function Call: WRITE
  • Prompt: !,"Drug: "_PSODRUG("NAME")
  • Line Location: VER+2
Function Call: WRITE
  • Prompt: !,SIG(I)
  • Line Location: VER+4
Function Call: WRITE
  • Prompt: !,$E($G(INS1),2,250)
  • Line Location: VER+5
Function Call: WRITE
  • Prompt: !
  • Line Location: VER+6
Function Call: WRITE
  • Prompt: !!,"Digitally Signed Order - Refills cannot be changed",!
  • Line Location: 3+1
Function Call: WRITE
  • Prompt: !!,"Digitally Signed Order - Provider cannot be changed",!
  • Line Location: 6+1
Function Call: WRITE
  • Prompt: !!,"Drug: "_PSODRUG("NAME")
  • Line Location: 9+0
Function Call: WRITE
  • Prompt: !
  • Line Location: PZ+1
Routine Call
  • DIR
  • Line Location:
    • EDT+1
    • ACP+11
    • ACP+18
    • VER+12
    • PZ+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" VER+15, VER+16, DSP+12, DSP+13, RMK+3
^PS(50.606 - [#50.606] DSP+6
^PS(50.607 - [#50.607] DSP+18
^PS(50.7 - [#50.7] DSP+6
^PS(51.2 - [#51.2] DSP+25
^PS(52.41 - [#52.41] ACP+6, ACP+19
^PS(55 - [#55] VER+10, DSP+19
^PSDRUG - [#50] PAT+13, PAT+15
^PSDRUG("AQ" DSP+8, PAT+13
^PSRX - [#52] VER+5, DSPL+1, DSPL+6, PAT+9
^SC - [#44] PAT+19
^TMP("PSODAOC" PKI+5, PKI+6!, PKI+8
^TMP("PSOPO" DSP!, DSP+4*, DSP+6*, DSP+7, DSP+8*, DSP+9, DSP+10*, DSP+11*, DSP+12*, DSP+13*
, DSP+14*, DSP+16*, DSP+17*, DSP+18*, DSP+20*, DSP+22*, DSP+23*, DSP+24*, DSP+25*, DSP+26*
, DSP+27*, DSP+28*, PAT*, PAT+3*, PAT+6*, PAT+7*, PAT+10*, PAT+11*, PAT+12*, PAT+15*
, PAT+16*, PAT+17*, PAT+18*, PAT+19*, PAT+20*, PAT+22*, PAT+23*, RMK*, RMK+1*, RMK+2*
, RMK+4*, RMK+9!
^TMP("PSORXN" PKI+8
^VA(200 - [#200] PAT+22, RMK+1, RMK+2
^XUSEC("PSORPH" ACP+8, ACP+21

Label References

Name Line Occurrences
@( EDTSEL+3
DSP DSPL
DSPL RDD
EN1 PKI+1
PAT DSP+14
PZ 3+1, 6+1
RDD RDD+1
SV EN1, EN1+1, 9+2, 10
VER ACP+21, VER+13

Naked Globals

Name Field # of Occurrence
^(0 DSP+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% RMK+3!
DIR ACP+1~, PZ+1~
DIR("A" EDT*, ACP+9*, ACP+10*, ACP+11*, ACP+14*, ACP+15*, ACP+16*, ACP+17*, VER+12*, PZ+1*
DIR("B" ACP+17*
DIR(0 EDT*, ACP+11*, ACP+17*, VER+12*, PZ+1*
DIRUT ACP+1~, ACP+6, ACP+18, VER+6!, VER+9!
DOSE DSPL+1*, DSPL+2, DSPL+3, DSPL+4, DSPL+5, DSPL+7!
DTOUT EDT+1, ACP+1~
DUOUT EDT+1, ACP+1~
DUZ ACP+8, ACP+21, RMK+1
ERXIEN EN~, RMK+7*, RMK+8, RMK+10
FLD EN~, EDTSEL+3*
I VER+4~*, DSPL+1~*, DSPL+6, DSP+15~*, DSP+16, DSP+17, DSP+18, DSP+19, DSP+20, DSP+21
, DSP+22, DSP+23, DSP+24, DSP+25, DSP+26, DSP+27, DSP+28, PAT+3~, PAT+5*, PAT+6
, PAT+7
>> IEN DSP*, DSP+4*, DSP+6*, DSP+7, DSP+8*, DSP+9, DSP+10*, DSP+11*, DSP+12*, DSP+13*
, DSP+14*, DSP+16*, DSP+17*, DSP+18, DSP+20*, DSP+22*, DSP+23*, DSP+24*, DSP+25*, DSP+26*
, DSP+27*, DSP+28*, PAT*, PAT+3*, PAT+6*, PAT+7, PAT+10*, PAT+11*, PAT+12*, PAT+14*
, PAT+15, PAT+16*, PAT+17*, PAT+18*, PAT+19*, PAT+20*, PAT+22*, PAT+23*, RMK*, RMK+1*
, RMK+2, RMK+4, RMK+5, RMK+9*, RMK+10*
>> INS1 VER+5, PAT+9
>> LINE RMK+9*, RMK+10
LST EN~, EDTSEL+2*, EDTSEL+3
MIG PAT+4!
NEWDOSE PKI+1!, VER+7*
>> NFID DSP+8, DSP+9*
>> NFIO DSP+6, DSP+7*
>> OR0 RMK+2, RMK+3, RMK+12, RMK+15, 3, 6
>> ORD EDTSEL+1, ACP+6, ACP+19, RMK+7, RMK+10
PKI PKI+2, DSP+2!
>> PKI1 RDD, DSP+2
>> POERR("DFLG" PKI*, VER*
>> PSEXDT VER+14, VER+16
PSOCSP RMK+13!
PSOCSP("# OF REFILLS" , RMK+14*
PSOCSP("DAYS SUPPLY" , RMK+15*
PSOCSP("DOSE ORDERED" , RMK+13*
PSOCSP("DOSE" RMK+13*
PSOCSP("ISSUE DATE" , RMK+15*
PSOCSP("NAME" RMK+13*
PSOCSP("QTY" RMK+15*
>> PSODFN VER+10, DSP+19
>> PSODIR("DFLG" EDTSEL+2, EDTSEL+3, 9+1*
>> PSODIR("QFLG" EDTSEL+2, EDTSEL+3
>> PSODRUG RMK+10
>> PSODRUG("DEA" PAT+21
>> PSODRUG("IEN" DSP+3, DSP+8, PAT+13, PAT+15, PAT+21
>> PSODRUG("NAME" VER+2, DSP+8, RMK+13, 9
>> PSODRUG("OI" DSP+3, DSP+5, DSP+6
>> PSODRUG("UNIT" PAT+12
>> PSOEDT EDTSEL+2*
>> PSOFDR RMK+2, RMK+12
PSOFROM1 ACP+21*, ACP+22!, VER!
>> PSOID DSP+12*
>> PSOLM EDTSEL*
PSONEW EN~, PKI+2, VER1~, VER+6, VER+10, RMK+10, 9, 10
PSONEW("# OF REFILLS" , PAT+16, RMK+14
PSONEW("CLINIC" PAT+19
PSONEW("CONJUNCTION" EN1+3!, DSPL+4*, DSP+28
PSONEW("COPIES" PAT+23
PSONEW("COSIG NING PROVIDER" , PAT+22
PSONEW("DAYS SUPPLY" , PAT+11, RMK+15
PSONEW("DFLG" EDTSEL*, VER*, VER+6, VER+8, VER+11, VER+12, 9+1
PSONEW("DOSE ORDERED" , EN1+2!, DSPL+3*, DSP+16, DSP+17, DSP+19, DSP+21, DSP+23, RMK+13
PSONEW("DOSE" EN1+2!, DSPL+2*, DSP+17, RMK+13
PSONEW("DURATION" EN1+3!, DSPL+4*, DSP+27
PSONEW("ENT" EN1, PKI+1, VER, VER+7, VER+9, VER+13, DSPL, DSPL+1*, DSPL+2*, DSPL+3
, DSPL+4, DSPL+5, DSPL+6, DSP+14, DSP+15
PSONEW("FIELD" EDTSEL*
PSONEW("FILL DATE" , DSP+13
PSONEW("IRXN" VER+2*
PSONEW("ISSUE DATE" , DSP+12
PSONEW("LOGIN DATE" , RMK+3*
PSONEW("METHO D OF PICK-UP" , PAT+18
PSONEW("NOUN" EN1+3!, DSPL+5*, DSP+24
PSONEW("NRX # " , DSP+4
PSONEW("ODOSE" EN1+3!, DSPL+6*, DSP+20
PSONEW("OIRXN" VER+2, VER+5, DSPL+1, DSPL+6, PAT+1, PAT+9
PSONEW("PATIE NT STATUS" , DSP+11*
PSONEW("PENDI NG ORDER" , DSP+1
PSONEW("PROVI DER NAME" , PAT+20
PSONEW("PTST NODE" , DSP+11
PSONEW("QFLG" PKI, VER*
PSONEW("QTY" PAT+12, RMK+15
PSONEW("REMARKS" RMK
PSONEW("ROUTE" EN1+2!, DSPL+3*, DSP+25
PSONEW("SCHEDULE" EN1+3!, DSPL+4*, DSP+26
PSONEW("SIG" PAT+9
PSONEW("TN" DSP+10
PSONEW("UNITS" EN1+2!, DSPL+3*, DSP+18
PSONEW("VERB" EN1+3!, DSPL+5*, DSP+16, DSP+21, DSP+22
PSONEW2 PKI!
>> PSONEW3 EDTSEL*
PSOORRNW VER!, VER+1*, 9*
>> PSOPAR ACP+21, PAT+18
>> PSOPF RMK+5*, RMK+10*
PSOPRC EN1+3!
PSOQUIT EN1!, RDD+1
PSOREEDT EN1*, EN1+1*, RDD!, EDT, VER+1*, DSP+14, DSP+17, PAT
>> PSORENW("FILL DATE" , VER+15
>> PSORENW("IRXN" PKI+7
>> PSORENW("MAIL/WINDOW" PAT+17
>> PSORENW("POE" EN1
>> PSORENW("PROVIDER" PAT+21
>> PSORENW("QFLG" VER+14*
>> PSORNALL PKI+5, PKI+8
>> PSORNEDT PKI+8*
>> PSORX("DFLG" PKI+6
>> PSORX("FN" RDD, PKI+2*
>> PSORXIEN EDTSEL+1, RMK+7
PSOVLMBG EN~, EDTSEL+1*
RN PAT+14*, PAT+20*!, RMK+1*, RMK+2, RMK+4!
RXN PKI+7*, PAT+1*, PAT+3!
SG PAT+3~, PAT+4!, PAT+5*, PAT+6, PAT+7, PAT+10*
>> SIG PAT+9*, PAT+10, RMK+10
>> SIG( VER+4, PAT+5, PAT+6, PAT+7
>> SIG(0 VER+3, VER+7, PAT+4
>> SIGOK VER+7*, PAT+4
>> SPEED VER+8, VER+11, VER+12
>> VALMBCK RDD*, EDT+1*, EDTSEL+4*, ACP+12*, ACP+18*, PKI*, PKI+10*, 9+1*
>> VALMBG EDTSEL+1
VALMCNT EN~, RMK+5*, RMK+10*
VALMSG VER+2!, VER+8*, VER+11*, VER+15*, VER+16*
X VER+5*, VER+12!, PAT+9*, RMK+3!
Y EDTSEL+2, ACP+1~*, ACP+6, ACP+8*, ACP+18, VER+12!, VER+15*, VER+16*, DSP+12*, DSP+13*
, RMK+3*, RMK+4
ZFRENEW PKI+3*, PKI+9!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All