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

Package: Outpatient Pharmacy

Routine: PSOFDAMG


Information

PSOFDAMG ;BHAM ISC/MR - FDA Medication Guide ;11/10/09 3:44pm

Source Information

Source file <PSOFDAMG.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Toolkit 2 $$GETURL^XTHC10  $$ENCODE^XTHCURL  
List Manager 1 (FULL,WAIT)^VALM1  
National Drug File 1 EN^PSNFDAMG  
Outpatient Pharmacy 1 ($$FDAMGDOC,$$MGONFILE,$$SELPRT)^PSOFDAUT  
VA FileMan 1 $$GET1^DIQ  

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

Package Total Caller Graph
Outpatient Pharmacy 7 PSO LM DISPLAY FDA MED GUIDE  PSO LM REPRINT FDA MED GUIDE  PSOLBL1  PSOLBL2  PSOLBLN  PSOLBLN1  PSOLLLI  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
DISPLAY ; Display the FDA Medication Guide
; Note: RX0 is a global variable (assumed as such by most hidden actions)
PRINTMG(RXIEN,PRINTER) ; This API is used to automatically print FDA Med Guides along with Rx labels.
; Input: (r) RXIEN - Pointer to the DRUG file (#50)
; (r) PRINTER - Windows Printer Network Name (e.g., '\\vhaistfpc4\IST-HP4525-1')
REPRTMG ; Entry point for Reprint FDA Medication Guide
; Note: The PSOSITE variable is assumed to be set with the Pharmacy Division IEN

External References

Name Field # of Occurrence
$$GET1^DIQ DISPLAY+6, PRINTMG+12, PRINTMG+16, PRINTMG+17, PRINTMG+18, PRINTMG+20, REPRTMG+9, REPRTMG+11, REPRTMG+27, REPRTMG+28
, REPRTMG+29, REPRTMG+31
EN^PSNFDAMG DISPLAY+8
$$FDAMGDOC^PSOFDAUT REPRTMG+24
$$MGONFILE^PSOFDAUT PRINTMG+10, PRINTMG+15, REPRTMG+10
$$SELPRT^PSOFDAUT REPRTMG+17
FULL^VALM1 DISPLAY+8, REPRTMG+13
WAIT^VALM1 DISPLAY+4, DISPLAY+6, REPRTMG+7, REPRTMG+9, REPRTMG+10, REPRTMG+11, REPRTMG+19, REPRTMG+24, REPRTMG+38
$$GETURL^XTHC10 PRINTMG+23, REPRTMG+34
$$ENCODE^XTHCURL PRINTMG+18, REPRTMG+29

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!,"Invalid Drug"
  • Line Location: DISPLAY+4
Function Call: WRITE
  • Prompt: $C(7),!!,$$GET1^DIQ(50,DRGIEN,.01)_" not matched to the National Drug File (NDF)"
  • Line Location: DISPLAY+6
Function Call: WRITE
  • Prompt: $C(7),!!,"Invalid Drug"
  • Line Location: REPRTMG+7
Function Call: WRITE
  • Prompt: $C(7),!!,$$GET1^DIQ(50,DRGIEN,.01)_" not matched to the National Drug File (NDF)"
  • Line Location: REPRTMG+9
Function Call: WRITE
  • Prompt: $C(7),!!,"No FDA Medication Guide on file for this Rx."
  • Line Location: REPRTMG+10
Function Call: WRITE
  • Prompt: $C(7),!!,"FDA Med Guide automatic printing functionality is turned OFF for this site."
  • Line Location: REPRTMG+11
Function Call: WRITE
  • Prompt: $C(7),!,"You must select a valid FDA Medication Guide printer."
  • Line Location: REPRTMG+18
Function Call: WRITE
  • Prompt: !,"Select FDA Medication Guide to reprint:",!
  • Line Location: REPRTMG+23
Function Call: WRITE
  • Prompt: !!,"FDA Medication Guide sent to printer."
  • Line Location: REPRTMG+36
Function Call: WRITE
  • Prompt: !!,"Unable to reprint FDA Medication Guide (",$P(STATUS,"^",2),")."
  • Line Location: REPRTMG+37
Function Call: WRITE
  • Prompt: !
  • Line Location: REPRTMG+38

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSDRUG - [#50] DISPLAY+4, DISPLAY+5, REPRTMG+7, REPRTMG+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR REPRTMG+38~
DRGIEN DISPLAY+2~, DISPLAY+3*, DISPLAY+4, DISPLAY+5, DISPLAY+6, REPRTMG+3~, REPRTMG+6*, REPRTMG+7, REPRTMG+8, REPRTMG+9
FDAMGFN PRINTMG+8~, PRINTMG+15*, PRINTMG+18, REPRTMG+3~, REPRTMG+24*, REPRTMG+29
FDAMGURL PRINTMG+8~, PRINTMG+18*, PRINTMG+23, REPRTMG+3~, REPRTMG+29*, REPRTMG+34
>> ORN REPRTMG+5
PATNAM PRINTMG+8~, PRINTMG+17*, PRINTMG+18, REPRTMG+28*, REPRTMG+29
PRINTER PRINTMG~, PRINTMG+11, PRINTMG+18, REPRTMG+3~, REPRTMG+16, REPRTMG+17*, REPRTMG+18, REPRTMG+19, REPRTMG+21
PRTSVURL PRINTMG+8~, PRINTMG+20*, PRINTMG+23, REPRTMG+3~, REPRTMG+31*, REPRTMG+34
>> PSOFDAPT REPRTMG+17, REPRTMG+21*, REPRTMG+29
>> PSOLST( REPRTMG+5
>> PSOSITE PRINTMG+12, PRINTMG+20, REPRTMG+11, REPRTMG+31
>> RX0 DISPLAY+3, REPRTMG+6
RXIEN PRINTMG~, PRINTMG+10, PRINTMG+15, PRINTMG+16, PRINTMG+17, REPRTMG+3~, REPRTMG+5*, REPRTMG+10, REPRTMG+24, REPRTMG+27
, REPRTMG+28
RXNUM PRINTMG+8~, PRINTMG+16*, PRINTMG+18, REPRTMG+27*, REPRTMG+29
STATUS PRINTMG+8~, PRINTMG+23*, PRINTMG+24, REPRTMG+3~, REPRTMG+34*, REPRTMG+35, REPRTMG+37
VAPRDIEN DISPLAY+2~, DISPLAY+5*, DISPLAY+6, DISPLAY+8, REPRTMG+3~, REPRTMG+8*, REPRTMG+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables |  All