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

Package: Outpatient Pharmacy

Routine: PSOVEXR1


Information

PSOVEXR1 ;BIRM/KML - PHARMACY TELEPHONE REFILLS - CONTINUED ; 06/07/18 08:47am

Source Information

Source file <PSOVEXR1.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 3 (FILE,UPDATE)^DIE  ^DIK  ($$GET1,GETS)^DIQ  
MailMan 1 ^XMD  

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 PURGE PROCESSED 52.444  PSOVEXRX  

Entry Points

Name Comments DBIA/ICR reference
PSOBLD ; This will transfer entries from the vendor daily telephone refill requests global when the pharmacy audio refills option is accessed.
CLEAN ;delete completed records from the new file 52.444.
SETVEN ;adds fill date, status and processing result to vendor global to facilitate completion in their process.
TILDECHK(PSORXIEN,PSORXEN) ;check for the tilde character (~) in the free text dosage field of the medications instructions
; PSORXIEN = input - ien of RX in PRESCRIPTION file (#52)
; PSORXEN = input - ien of RX in PHARMACY TELEPHONE REFILLS file (#52.444)
; RSLT = return as output
CSDRUG(IEN) ;Controlled Substance drug?
; Input: IEN - DRUG file (#50) pointer

External References

Name Field # of Occurrence
FILE^DIE TILDECHK+13
UPDATE^DIE PSOBLD+39
^DIK CLEAN+9
$$GET1^DIQ SETVEN+2
GETS^DIQ SETVEN+9, TILDECHK+6
^XMD CLEAN+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Process Telephone Refills is not available. Please try again later."
  • Line Location: PSOBLD+19
Function Call: WRITE
  • Prompt: !,"RX #: "_$P(PSORX(52,IENS,".01"),U,1)_" RX IEN: "_IENS_" was marked processed in the ^VEXHRX Global. "
  • Line Location: SETVEN+14
Routine Call
  • DIE
  • Line Location:
    • TILDECHK+13
Routine Call
  • DIE
  • Line Location:
    • PSOBLD+39

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] GET1^DIQ
^PSRX - [#52] GETS^DIQ
^PS(52.444 - [#52.444] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PS(52.444 - [#52.444] PSOBLD+26, CLEAN+7, CLEAN+8, SETVEN+3, SETVEN+4, SETVEN+5
^PSDRUG - [#50] CSDRUG+5
^PSRX - [#52] PSOBLD+25, TILDECHK+7
^VEXHRX(19080 PSOBLD+20, CLEAN+5, SETVEN+19*
^XMB(1 - [#4.3] SETVEN+2
^XTMP("PSOVEXRX" PSOBLD+18!, PSOBLD+19, PSOBLD+20*, PSOBLD+21, PSOBLD+22, PSOBLD+27, CLEAN+3!, CLEAN+4, CLEAN+5*, SETVEN+12
, SETVEN+13, SETVEN+15*, SETVEN+16*, SETVEN+17*, SETVEN+19, SETVEN+20!, SETVEN+21

Label References

Name Line Occurrences
$$CSDRUG TILDECHK+8
SETVEN CLEAN+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CS TILDECHK+4~, TILDECHK+8*, TILDECHK+14
DA CLEAN+9*!
DEA CSDRUG+3~, CSDRUG+5*, CSDRUG+6
DIK CLEAN+9*!
DRGIEN TILDECHK+4~, TILDECHK+7*, TILDECHK+8
DT TILDECHK+13
DUZ CLEAN+11
FDA PSOBLD+16!
FDA( TILDECHK+13*
FDA(1 PSOBLD+31*, PSOBLD+32*, PSOBLD+33*, PSOBLD+34*, PSOBLD+35*, PSOBLD+36*, PSOBLD+37*, PSOBLD+38*
I TILDECHK+4~, TILDECHK+10*
IEN CSDRUG~, CSDRUG+4, CSDRUG+5
IENS SETVEN+8*, SETVEN+9, SETVEN+14, TILDECHK+4~, TILDECHK+5*, TILDECHK+6, TILDECHK+12*, TILDECHK+13
J TILDECHK+4~, TILDECHK+10*
>> PRINT SETVEN+14
>> PSOCNT SETVEN+3*, SETVEN+18*
PSODATA SETVEN+1~, SETVEN+11*, SETVEN+12, SETVEN+13, SETVEN+15, SETVEN+16, SETVEN+17
PSODFN PSOBLD+15~, PSOBLD+23*, PSOBLD+33, SETVEN+1~, SETVEN+10*, SETVEN+11
PSODFNRX PSOBLD+15~, PSOBLD+22*, PSOBLD+23, PSOBLD+24, PSOBLD+27
PSOERR PSOBLD+16!, PSOBLD+40
PSOGET PSOBLD+15~, PSOBLD+27*, PSOBLD+28
PSOORF PSOBLD+15~, PSOBLD+17*, PSOBLD+28*, PSOBLD+35
PSOPRF PSOBLD+15~, PSOBLD+17*, PSOBLD+28*, PSOBLD+38
PSORDT PSOBLD+15~, PSOBLD+17*, PSOBLD+28*, CLEAN+2~, CLEAN+7*, CLEAN+8, SETVEN+1~, SETVEN+3*, SETVEN+4, SETVEN+15
PSORGET SETVEN+1~, SETVEN+5*, SETVEN+6, SETVEN+7, SETVEN+10
PSORSLT PSOBLD+15~, PSOBLD+17*, PSOBLD+28*, PSOBLD+36, SETVEN+1~, SETVEN+7*, SETVEN+17
PSORX SETVEN+1~
PSORX(52 SETVEN+14
PSORXEN CLEAN+2~, CLEAN+8*, CLEAN+9, SETVEN+1~, SETVEN+4*, SETVEN+5, TILDECHK~, TILDECHK+12
PSORXIEN PSOBLD+24*, PSOBLD+25, PSOBLD+26, PSOBLD+31, PSOBLD+40, SETVEN+1~, SETVEN+6*, SETVEN+8, SETVEN+11, TILDECHK~
, TILDECHK+5, TILDECHK+7
PSOSITE PSOBLD+15~, PSOBLD+21*, PSOBLD+22, PSOBLD+27, SETVEN+1~, SETVEN+2*, SETVEN+12, SETVEN+13, SETVEN+15, SETVEN+16
, SETVEN+17
PSOSITID PSOBLD+15~, PSOBLD+25*, PSOBLD+32
PSOSTAT PSOBLD+17*, PSOBLD+28*, PSOBLD+34, SETVEN+1~, SETVEN+7*, SETVEN+16
PSOUSER PSOBLD+15~, PSOBLD+17*, PSOBLD+28*, PSOBLD+37
PSOXCNT PSOBLD+15~
PSOXPTRN PSOBLD+15~
>> QUIT PSOBLD+19*
RSLT TILDECHK+4~, TILDECHK+9*, TILDECHK+10*, TILDECHK+11, TILDECHK+14*, TILDECHK+15
TILDECHK TILDECHK+4~
TILDECHK( TILDECHK+10
U PSOBLD+25, PSOBLD+28, SETVEN+6, SETVEN+7, SETVEN+10, SETVEN+14, TILDECHK+7, CSDRUG+5
XMDUZ CLEAN+10~, CLEAN+11*
XMSUB CLEAN+10~, CLEAN+11*
XMT CLEAN+10~
XMT(1 CLEAN+12*
XMT(2 CLEAN+13*
XMTEXT CLEAN+10~, CLEAN+14*
XMY CLEAN+10!
XMY( CLEAN+11*
XMY("G.AUTORENEWAL" CLEAN+11*
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