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

Package: Outpatient Pharmacy

Routine: PSORXRP2


Information

PSORXRP2 ;BIR/SAB-main menu entry reprint of a Rx label ;Feb 05, 2019@10:27:56

Source Information

Source file <PSORXRP2.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
Outpatient Pharmacy 8 $$LSTRFL^PSOBPSU1  ICN^PSODPT  $$MGONFILE^PSOFDAUT  EN^PSOHLSN1  ^PSOLSET  $$FIND^PSOREJUT  (CHK1,FSIG)^PSOUTLA  EN3^PSOUTLA1  
VA FileMan 4 NOW^%DTC  ^DIC  $$GET1^DIQ  ^DIR  
Pharmacy Data Management 1 (PSOL,PSOUL)^PSSLOCK  
Registration 1 (DEM,KVA)^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: 2

Package Total Caller Graph
Outpatient Pharmacy 2 PSO RXRPT  PSO SCRIPTALK REPRINT VISTA LB  

Entry Points

Name Comments DBIA/ICR reference
LRP
GOOD
ACT
ACT1
KILL
ULR ;

External References

Name Field # of Occurrence
NOW^%DTC ACT1+3
^DIC LRP+1
$$GET1^DIQ GOOD+17, GOOD+18, GOOD+23
^DIR GOOD+11, GOOD+14, GOOD+19, GOOD+25, ACT+1
$$LSTRFL^PSOBPSU1 LRP+4
ICN^PSODPT GOOD+8
$$MGONFILE^PSOFDAUT GOOD+23
EN^PSOHLSN1 LRP+13, LRP+16
^PSOLSET PSORXRP2+5
$$FIND^PSOREJUT LRP+5
CHK1^PSOUTLA GOOD+3
FSIG^PSOUTLA GOOD+33
EN3^PSOUTLA1 GOOD+34
PSOL^PSSLOCK LRP+6
PSOUL^PSSLOCK ULR+1
DEM^VADPT LRP+14
KVA^VADPT KILL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: LRP+1
Function Call: WRITE
  • Prompt: $C(7),!,"NOT ALLOWED! Rx has OPEN 3rd Party Payer Reject."
  • Line Location: LRP+5
Function Call: WRITE
  • Prompt: $C(7),!,"Cannot Reprint! Discontinued by Provider."
  • Line Location: LRP+7
Function Call: WRITE
  • Prompt: $C(7),!,"Cannot Reprint! Discontinued due to editing."
  • Line Location: LRP+8
Function Call: WRITE
  • Prompt: $C(7),!,"Cannot Reprint! Placed on HOLD by Provider."
  • Line Location: LRP+9
Function Call: WRITE
  • Prompt: $C(7),!!,"Cannot Reprint! Medication is currently PARKED."
  • Line Location: LRP+10
Function Call: WRITE
  • Prompt: !,$C(7),"Rx may NOT be printed using this option, use SUSPENSE FUNCTIONS Options."
  • Line Location: LRP+18
Function Call: WRITE
  • Prompt: !,"RX CAN NOT BE PRINTED using this option, use SUSPENSE FUNCTIONS Options."
  • Line Location: LRP+21
Function Call: WRITE
  • Prompt: !,"RX is being transmitted to the CMOP and can not be reprinted now."
  • Line Location: LRP+22
Function Call: WRITE
  • Prompt: !,"Prescription is Non-Verified",!!
  • Line Location: GOOD+1
Function Call: WRITE
  • Prompt: !,"Prescription is waiting for others to be verified",!!
  • Line Location: GOOD+2
Function Call: WRITE
  • Prompt: !?3,"Prescription is on Hold"
  • Line Location: GOOD+4
Function Call: WRITE
  • Prompt: !?3,"Prescription is Pending Due to Drug Interactions"
  • Line Location: GOOD+5
Function Call: WRITE
  • Prompt: !?3,"Prescription is Discontinued"
  • Line Location: GOOD+6
Function Call: WRITE
  • Prompt: !,"Patient is a ScripTalk patient. Use ScripTalk label for prescription bottle.",!
  • Line Location: GOOD+7
Function Call: WRITE
  • Prompt: !!,"Rx # "_P(1),?23,$E(P(13),4,5)_"/"_$E(P(13),6,7)_"/"_$E(P(13),2,3),!,$S($D(^DPT(+P(2),0)):$P(^(0),"^"),1:"Not on File"),?30,"#"_P(7),!
  • Line Location: GOOD+31
Function Call: WRITE
  • Prompt: !!,$S($G(^PSRX(DA,"TN"))]"":P(6),(P(6)=+P(6))&$D(^PSDRUG(P(6),0)):$P(^(0),"^"),1:P(6)),!
  • Line Location: GOOD+37
Function Call: WRITE
  • Prompt: PHYS
  • Line Location: GOOD+37
Function Call: WRITE
  • Prompt: ?25,$S($D(^VA(200,+P(16),0)):$P(^(0),"^"),1:"Unknown"),!,"# of Refills: "_$G(P(9))
  • Line Location: GOOD+38
Routine Call
  • DIC
  • Line Location:
    • LRP+1
Routine Call
  • DIR
  • Line Location:
    • GOOD+11
    • GOOD+14
    • GOOD+19
    • GOOD+25
    • ACT+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSDRUG - [#50] GET1^DIQ
^PSRX - [#52] Classic Fileman Calls
^PS(59 - [#59] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] LRP+15, GOOD+31
^PS(52.4 - [#52.4] GOOD+1, GOOD+2
^PS(52.5 - [#52.5] LRP+18, LRP+20
^PS(55 - [#55] GOOD+7
^PSDRUG - [#50] GOOD+37
^PSRX - [#52] LRP+2, LRP+7, LRP+8, LRP+9, LRP+10, LRP+11, LRP+12*, LRP+13, LRP+16*, GOOD+2
GOOD+3, GOOD+30, GOOD+32, GOOD+37, GOOD+43, ACT1ACT1+1, ACT1+2*, ACT1+3*, ACT1+4*
^VA(200 - [#200] GOOD+37, GOOD+38

Label References

Name Line Occurrences
@( GOOD+44
ACT GOOD+27
ACT1 LRP+17
GOOD LRP+19, LRP+20
KILL PSORXRP2+5, LRP+1, LRP+5, LRP+7, LRP+8, LRP+9, LRP+10, LRP+11, LRP+17, LRP+18
LRP+21, LRP+22, GOOD+1, GOOD+2, GOOD+3, GOOD+4, GOOD+5, GOOD+6, GOOD+11, GOOD+14
GOOD+15, GOOD+20, GOOD+23, GOOD+27, GOOD+28, GOOD+44
LRP LRP+5, LRP+6, LRP+10, LRP+11, LRP+14, LRP+18, LRP+21, LRP+22, GOOD+1, GOOD+2
GOOD+3, GOOD+4, GOOD+5, GOOD+6, GOOD+11, GOOD+14, GOOD+20, GOOD+23, GOOD+27, GOOD+28
GOOD+44
ULR LRP+7, LRP+8, LRP+9, LRP+10, LRP+11, LRP+17, LRP+18, LRP+21, LRP+22, GOOD+1
GOOD+2, GOOD+3, GOOD+4, GOOD+5, GOOD+6, GOOD+11, GOOD+14, GOOD+15, GOOD+20, GOOD+23
GOOD+27, GOOD+28, GOOD+44

Naked Globals

Name Field # of Occurrence
^("TN" GOOD+30
^(0 GOOD+31, GOOD+37, GOOD+38
^(2 LRP+12, LRP+13, GOOD+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ACT1+3!, KILL!
%H ACT1+3!
%I ACT1+3!
BSIG GOOD+35!
BSIG( GOOD+34
C KILL!
COMM LRP+13*!
COPIES GOOD+9*, GOOD+10, GOOD+12*, GOOD+40, GOOD+44!, ACT1+3, KILL!
D GOOD+32*!, GOOD+33*, GOOD+34*, GOOD+35!
DA LRP+2*, LRP+10, LRP+12, LRP+13, LRP+18, GOOD+1, GOOD+2, GOOD+3, GOOD+23, GOOD+30
GOOD+32, GOOD+33, GOOD+34, GOOD+37, ACT1ACT1+1, ACT1+2, ACT1+3, ACT1+4, KILL!
DFN LRP+14*, GOOD+2*, GOOD+7, GOOD+8, KILL!
DIC LRP+1*, KILL!
DIC("A" LRP+1*!
DIC("S" LRP+1*
DIC(0 LRP+1*
DIR GOOD+10!, GOOD+11!, GOOD+13!, GOOD+14!, GOOD+19!, GOOD+24!, GOOD+25!, ACT!, ACT+1!, KILL!
DIR("?" GOOD+10*, GOOD+13*, GOOD+14*, ACT*
DIR("A" GOOD+10*, GOOD+13*, GOOD+19*, GOOD+24*, ACT*
DIR("B" GOOD+10*, GOOD+13*, GOOD+19*, GOOD+24*, ACT*
DIR(0 GOOD+10*, GOOD+13*, GOOD+19*, GOOD+24*, ACT*
DIROUT ACT+1, KILL!
DIRUT GOOD+11, GOOD+15, GOOD+19!, GOOD+20, GOOD+23, GOOD+24!, GOOD+25, GOOD+27, ACT+1, KILL!
DT LRP+2, LRP+11
DTOUT KILL!
DUOUT GOOD+14, KILL!
DUZ ACT+2, ACT1+3
FSIG GOOD+32!
FSIG( GOOD+33
I GOOD+29*, KILL!
IOP GOOD+44!
IR ACT1+1*, ACT1+2*, ACT1+3!
J ACT1*, ACT1+1*, KILL!
JJJ KILL!
K KILL!
P LRP+1!, KILL!
P( GOOD+29*
P(1 GOOD+31
P(13 GOOD+31
P(16 GOOD+38
P(2 GOOD+31
P(4 GOOD+37
P(6 GOOD+30*, GOOD+37
P(7 GOOD+31
P(9 GOOD+38
PC ACT1+3!
PCOM LRP+1!, LRP+16*, GOOD+28, GOOD+44!, ACT+1*, ACT1+3!
PCOMX LRP+1!, ACTACT+1*, ACT1+3*
PDA LRP+2*, LRP+14, LRP+15, GOOD+9, GOOD+18, GOOD+29, KILL!
PHYS GOOD+37*!
PPL LRP+2*, GOOD+44!, KILL!
PS ACT1+3!
PSL GOOD+44!
PSNP GOOD+44!
>> PSOCLC ACT+2*
PSODISP LRP~, GOOD+19*, GOOD+42
>> PSODIV GOOD+3
PSOFILL LRP~, LRP+4*, LRP+5
PSOMGREP LRP~, GOOD+25*, GOOD+41
PSOMSG LRP+6!, KILL!
>> PSOPAR PSORXRP2+5, GOOD+17, GOOD+18, GOOD+44
PSORPRX LRP+2*, LRP+4, LRP+5, LRP+6, KILL!, ULR+1
>> PSOSITE GOOD+3, GOOD+17, GOOD+23
PSPOP GOOD+3*, GOOD+44!
PSPRXN GOOD+3*, KILL!
PSXSTAT KILL!
REPRINT LRP+1!, LRP+2*, GOOD+44!, KILL!
RX LRP+2*, LRP+7, LRP+8, LRP+9, LRP+10, LRP+11, LRP+12, LRP+13, LRP+16, GOOD+39
GOOD+40, GOOD+41, GOOD+42, GOOD+43, GOOD+44, KILL!
RXF LRP+2*, ACT1*, ACT1+3!, KILL!
>> RXFL( GOOD+43*, GOOD+44!
>> RXRP( GOOD+40*, GOOD+41*, GOOD+42*
SIDE GOOD+16*, GOOD+40, GOOD+44!, KILL!
>> ST LRP+16*, ACT1+3, ACT1+4
>> STA LRP+2*, GOOD+4, GOOD+5, GOOD+6
U LRP+20
>> VADM(6 LRP+14, LRP+15, LRP+16
X LRP+1, LRP+18*!, LRP+19, LRP+20, LRP+21!, LRP+22!, GOOD!, ACT+1, KILL!
XX LRP+20*, LRP+21!, LRP+22!, ACT1+3!
Y LRP+1, LRP+2, GOOD+12, GOOD+16, GOOD+19, GOOD+25, KILL!
Y(0 LRP+2
Z KILL!
ZD KILL!
ZD( LRP+2*
ZZZ GOOD+43*, GOOD+44!
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