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

Package: Outpatient Pharmacy

Routine: PSOPATLK


Information

PSOPATLK ;BIR/JAM - Patient Lookup utility ;7/21/08

Source Information

Source file <PSOPATLK.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 3 ^DIC  $$GET1^DIQ  ^DIR  
Registration 1 $$SITE^VASITE  

Caller Graph

Caller Graph Total: 11

Package Total Caller Graph
Outpatient Pharmacy 11 PSOADDR  PSOBAIRP  PSOBINGO  PSOLLL7  PSONVARP  PSOP  PSOPAT  PSOPOLY  
PSORX1  PSOSD1  PSOTALK2  

Entry Points

Name Comments DBIA/ICR reference
INST() ;get institution number
EN ;Entry point - Prompts for Patient, Prescription Number or Barcode
;
; Input - DIC(0) & DIC("A") [Optional]
; Used by DIR if defined by the calling routine.
RXLK ;Prescription Lookup
PATVAL() ;Validate user input
PATHLP ;Help text for patient prompt

External References

Name Field # of Occurrence
^DIC PATHLP+8, PATVAL+8, RXLK+10
$$GET1^DIQ INST+3
^DIR EN+12
$$SITE^VASITE INST+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7),"No prescription number entered."
  • Line Location: RXLK+3
Routine Call
  • DIC
  • Line Location:
    • PATHLP+8
    • PATVAL+8
    • RXLK+10
Routine Call
  • DIR
  • Line Location:
    • EN+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^DIC(4 - [#4] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSRX - [#52] RXLK+6
^PSRX("B" RXLK+6

Label References

Name Line Occurrences
$$INST RXLK+4
RXLK PATVAL+4, PATVAL+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA INST+1~, INST+2*, INST+3
DFN RXLK+1~, RXLK+9*, RXLK+10
DIC PATHLP+1~, PATHLP+8*, PATVAL+8*, RXLK+1~, RXLK+10~*
DIC("A" EN+9, EN+10
DIC(0 PATHLP+8*, PATVAL+8*, RXLK+10*
DIQ INST+1~
DIR EN+7~
DIR("?" EN+11*
DIR("??" EN+11*
DIR("A" EN+10*
DIR(0 EN+9*
DIROUT EN+14!
DIRUT EN+14!
DTOUT EN+14!
DUOUT EN+14!
OUT PATVAL+1~, PATVAL+2*, PATVAL+4, PATVAL+6, PATVAL+9*, PATVAL+10, RXLK+3*, RXLK+4*, RXLK+7*
PSOINST INST+1~, INST+3*, INST+4
PSOPTLK EN+8!, EN+13*
RX RXLK+1~, RXLK+2*, RXLK+3, RXLK+6
RXNUM RXLK+1~, RXLK+2*, RXLK+4, RXLK+6, RXLK+8
X PATHLP+2, PATHLP+3, PATVAL+4, PATVAL+6, RXLK+2, RXLK+10~*
Y EN+13, PATVAL+9, RXLK+6*, RXLK+7, RXLK+9!
Z RXLK+1~, RXLK+6*, RXLK+7
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