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

Package: Outpatient Pharmacy

Routine: PSOOTMRX


Information

PSOOTMRX ;BIR/MFR - Titration/Maintenance Dose Prescription ;10/17/96

Source Information

Source file <PSOOTMRX.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Outpatient Pharmacy 7 RXACT^PSOBPSU2  $$RXRLDT^PSOBPSUT  COPY^PSOORCPY  ACT^PSOORNE2  $$CSDS^PSOSIGDS  $$CSRX^PSOSPMUT  ($$LTHEN,$$TITRX)^PSOUTL  
VA FileMan 2 $$GET1^DIQ  ^DIR  
List Manager 1 FULL^VALM1  
Order Entry Results Reporting 1 ULK^ORX2  
Pharmacy Data Management 1 UL^PSSLOCK  

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

Package Total Caller Graph
Outpatient Pharmacy 5 PSO LM BACKDOOR MARK AS TITRATION  PSO LM BACKDOOR TITRATION RX REFILL  PSONEW  PSOORNE1  PSOORNEW  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
TIMTRX ; Titration/Maintenance Dose Rx Hidden Action Entry Point
MARKTIT ; Mark Rx as 'Titration' Hidden Action Entry Point
END ;
MARK(PSORXIEN,REFRESH) ; Mark a non-refillable Rx as Titration
UNLK ; Unlocks the Patient/Rx
CHECK(PSORXIEN) ; Checks if Rx is eligible to be Marked as Titration/Maintenance
TITHLP ; Help Text for Mark Rx as Titration/Maintenance prompt
NDF(PSORXIEN) ;PATCH PSO*7*505 - 1:YES 0:NO checks the cs federal schedule field of the va product file

External References

Name Field # of Occurrence
$$GET1^DIQ TIMTRX+10, TIMTRX+14, TIMTRX+22, TIMTRX+34, CHECK+13, NDF+2
^DIR MARK+9
ULK^ORX2 UNLK+1
RXACT^PSOBPSU2 MARK+18
$$RXRLDT^PSOBPSUT TIMTRX+26
COPY^PSOORCPY TIMTRX+46
ACT^PSOORNE2 MARK+22
$$CSDS^PSOSIGDS NDF+3
$$CSRX^PSOSPMUT TIMTRX+42
$$LTHEN^PSOUTL TIMTRX+18, CHECK+8
$$TITRX^PSOUTL TIMTRX+5, MARK+7, MARK+8, CHECK+4
UL^PSSLOCK UNLK+2
FULL^VALM1 MARK+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: TIMTRX+6
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: TIMTRX+11
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: TIMTRX+15
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: TIMTRX+19
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: TIMTRX+23
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: TIMTRX+27
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: TIMTRX+31
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: TIMTRX+35
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: TIMTRX+39
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: TIMTRX+43
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: MARKTIT+5
Function Call: WRITE
  • Prompt: !
  • Line Location: MARK+6
Function Call: WRITE
  • Prompt: !!,"Updating..."
  • Line Location: MARK+11
Function Call: WRITE
  • Prompt: "OK"
  • Line Location: MARK+19
Function Call: WRITE
  • Prompt: !?5,"Answer YES if this is a Titration to Maintenance prescription."
  • Line Location: TITHLP+1
Function Call: WRITE
  • Prompt: !?5,"Actions such as Renewal (including from CPRS), Refill, and Copy"
  • Line Location: TITHLP+2
Function Call: WRITE
  • Prompt: !?5,"are not allowed on prescriptions marked as Titration."
  • Line Location: TITHLP+3
Function Call: WRITE
  • Prompt: !?5,"However, you will be able to create a Maintenance Rx from this Rx"
  • Line Location: TITHLP+4
Function Call: WRITE
  • Prompt: !?5,"upon refill request via the TR (Convert Titration Rx) hidden action."
  • Line Location: TITHLP+5
Routine Call
  • DIR
  • Line Location:
    • MARK+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSRX - [#52] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSRX - [#52] TIMTRX+9, TIMTRX+10, TIMTRX+30, TIMTRX+38, MARK+12, MARK+13*, MARK+15*, MARK+16, MARK+17!

Label References

Name Line Occurrences
$$CHECK MARKTIT+3, MARK+3
$$NDF TIMTRX+42
MARK MARKTIT+7
UNLK MARK+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BEFLST TIMTRX+1~
CHECK MARKTIT+1~, MARKTIT+3*, MARKTIT+4, MARKTIT+5, MARK+1~
COMM MARK+1~, MARK+13*, MARK+15*, MARK+18
DEA TIMTRX+1~
DFN MARK+1~
DIR MARK+1~
DIR("?" MARK+8*
DIR("??" MARK+8*
DIR("A" MARK+7*
DIR(0 MARK+9*
DOSEINFO TIMTRX+1~
DRGIEN NDF+1~, NDF+2*, NDF+3
LAB TIMTRX+1~
LASTDOSE TIMTRX+1~
MSG CHECK+1~, CHECK+2*, CHECK+4, CHECK+5*, CHECK+8, CHECK+9*, CHECK+13, CHECK+14*
>> ORN TIMTRX+2, MARKTIT+2
>> PSODFN UNLK+1, UNLK+2
>> PSOLST( TIMTRX+2, MARKTIT+2
PSOMTFLG TIMTRX+1~, TIMTRX+45*, TIMTRX+46!
PSORXED MARK+22~*
PSORXIEN TIMTRX+1~, TIMTRX+2*, TIMTRX+5, TIMTRX+9, TIMTRX+10, TIMTRX+14, TIMTRX+18, TIMTRX+22, TIMTRX+26, TIMTRX+30
TIMTRX+34, TIMTRX+38, TIMTRX+42, TIMTRX+45, MARKTIT+1~, MARKTIT+2*, MARKTIT+3, MARKTIT+7, MARK~, MARK+3
, MARK+7, MARK+8, MARK+12, MARK+13, MARK+15, MARK+16, MARK+17, MARK+18, CHECK~, CHECK+4
, CHECK+8, CHECK+13, NDF~, NDF+2
PSOTITRX TIMTRX+1~, TIMTRX+45*, TIMTRX+46!
PTLOCK MARK+1~
REFRESH MARK~, MARK+22
>> VALMBCK TIMTRX+6*, TIMTRX+11*, TIMTRX+15*, TIMTRX+19*, TIMTRX+23*, TIMTRX+27*, TIMTRX+31*, TIMTRX+35*, TIMTRX+39*, TIMTRX+43*
MARKTIT+5*, MARK+9*, MARK+22*
>> VALMSG TIMTRX+6*, TIMTRX+10*, TIMTRX+15*, TIMTRX+19*, TIMTRX+23*, TIMTRX+27*, TIMTRX+31*, TIMTRX+35*, TIMTRX+39*, TIMTRX+43*
MARKTIT+5*
X MARK+1~, UNLK+1*
Y MARK+1~, MARK+9
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 |  Local Variables  | All