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; May 22, 2026@11:20

Source Information

Source file <PSOVEXR1.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 3 (FILE,UPDATE)^DIE  ^DIK  ($$GET1,GETS)^DIQ  
Kernel 2 ($$FMADD,$$FMTE,$$NOW)^XLFDT  $$NAME^XUSER  
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+57
^DIK CLEAN+14
$$GET1^DIQ SETVEN+2
GETS^DIQ SETVEN+9, TILDECHK+6
$$FMADD^XLFDT PSOBLD+37, CLEAN+9
$$FMTE^XLFDT PSOBLD+30
$$NOW^XLFDT PSOBLD+35, CLEAN+7
^XMD CLEAN+20
$$NAME^XUSER PSOBLD+28

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Unknown process has the lock. Audit has not been set."
  • Line Location: PSOBLD+26
Function Call: WRITE
  • Prompt: !,"Please try again later."
  • Line Location: PSOBLD+27
Function Call: WRITE
  • Prompt: !,$P($$FMTE^XLFDT($P(PSOSTR,U,2)),":",1,2)," with job number: ",$P(PSOSTR,U,3),"."
  • Line Location: PSOBLD+30
Function Call: WRITE
  • Prompt: !,"Please try again later or contact end user to exit the option."
  • Line Location: PSOBLD+31
Function Call: WRITE
  • Prompt: !,"Please try again later."
  • Line Location: PSOBLD+33
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+57

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+44, CLEAN+12, CLEAN+13, SETVEN+3, SETVEN+4, SETVEN+5
^PSDRUG - [#50] CSDRUG+5
^PSRX - [#52] PSOBLD+43, TILDECHK+7
^VEXHRX(19080 PSOBLD+38, CLEAN+10, SETVEN+19*
^XMB(1 - [#4.3] SETVEN+2
^XTMP("PSOVEXRX" PSOBLD+18!, PSOBLD+19, PSOBLD+24, PSOBLD+35*, PSOBLD+37*, PSOBLD+38*, PSOBLD+39, PSOBLD+40, PSOBLD+45, CLEAN+3!
, CLEAN+6, CLEAN+7*, CLEAN+9*, CLEAN+10*, SETVEN+12, SETVEN+13, SETVEN+15*, SETVEN+16*, SETVEN+17*, SETVEN+19
, SETVEN+20!, SETVEN+21, SETVEN+25*, SETVEN+26*

Label References

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CS TILDECHK+4~, TILDECHK+8*, TILDECHK+14
DA CLEAN+14*!
DEA CSDRUG+3~, CSDRUG+5*, CSDRUG+6
DIK CLEAN+14*!
DRGIEN TILDECHK+4~, TILDECHK+7*, TILDECHK+8
DT PSOBLD+37, CLEAN+9, TILDECHK+13
DUZ PSOBLD+35, CLEAN+16
FDA PSOBLD+16!
FDA( TILDECHK+13*
FDA(1 PSOBLD+49*, PSOBLD+50*, PSOBLD+51*, PSOBLD+52*, PSOBLD+53*, PSOBLD+54*, PSOBLD+55*, PSOBLD+56*
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+41*, PSOBLD+51, SETVEN+1~, SETVEN+10*, SETVEN+11
PSODFNRX PSOBLD+15~, PSOBLD+40*, PSOBLD+41, PSOBLD+42, PSOBLD+45
PSOERR PSOBLD+16!, PSOBLD+58
PSOGET PSOBLD+15~, PSOBLD+45*, PSOBLD+46
PSOORF PSOBLD+15~, PSOBLD+17*, PSOBLD+46*, PSOBLD+53
PSOPRF PSOBLD+15~, PSOBLD+17*, PSOBLD+46*, PSOBLD+56
PSORDT PSOBLD+15~, PSOBLD+17*, PSOBLD+46*, CLEAN+2~, CLEAN+12*, CLEAN+13, 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+46*, PSOBLD+54, SETVEN+1~, SETVEN+7*, SETVEN+17
PSORX SETVEN+1~
PSORX(52 SETVEN+14
PSORXEN CLEAN+2~, CLEAN+13*, CLEAN+14, SETVEN+1~, SETVEN+4*, SETVEN+5, TILDECHK~, TILDECHK+12
PSORXIEN PSOBLD+42*, PSOBLD+43, PSOBLD+44, PSOBLD+49, PSOBLD+58, SETVEN+1~, SETVEN+6*, SETVEN+8, SETVEN+11, TILDECHK~
, TILDECHK+5, TILDECHK+7
PSOSITE PSOBLD+15~, PSOBLD+39*, PSOBLD+40, PSOBLD+45, SETVEN+1~, SETVEN+2*, SETVEN+12, SETVEN+13, SETVEN+15, SETVEN+16
, SETVEN+17
PSOSITID PSOBLD+15~, PSOBLD+43*, PSOBLD+50
PSOSTAT PSOBLD+17*, PSOBLD+46*, PSOBLD+52, SETVEN+1~, SETVEN+7*, SETVEN+16
PSOSTR PSOBLD+24~*, PSOBLD+25, PSOBLD+28, PSOBLD+29, PSOBLD+30
PSOUSER PSOBLD+15~, PSOBLD+17*, PSOBLD+46*, PSOBLD+55
PSOWHO PSOBLD+28~*, PSOBLD+29, PSOBLD+31
PSOXCNT PSOBLD+15~
PSOXPTRN PSOBLD+15~
>> QUIT PSOBLD+21*
RSLT TILDECHK+4~, TILDECHK+9*, TILDECHK+10*, TILDECHK+11, TILDECHK+14*, TILDECHK+15
TILDECHK TILDECHK+4~
TILDECHK( TILDECHK+10
U PSOBLD+30, PSOBLD+43, PSOBLD+46, SETVEN+6, SETVEN+7, SETVEN+10, SETVEN+14, TILDECHK+7, CSDRUG+5
XMDUZ CLEAN+15~, CLEAN+16*
XMSUB CLEAN+15~, CLEAN+16*
XMT CLEAN+15~
XMT(1 CLEAN+17*
XMT(2 CLEAN+18*
XMTEXT CLEAN+15~, CLEAN+19*
XMY CLEAN+15!
XMY( CLEAN+16*
XMY("G.AUTORENEWAL" CLEAN+16*
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