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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: GMRAXENV

Package: Adverse Reaction Tracking

Routine: GMRAXENV


Information

GMRAXENV ;HIRMFO/RM-ENVIRONMENT CHECK ROUTINE ; 12/6/95

Source Information

Source file <GMRAXENV.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 3 FIND^DIC  ^DIE  ^DIK  
Adverse Reaction Tracking 1 GMRARAD1^GMRARAD1  
Kernel 1 $$VERSION^XPDUTL  
Uncategorized 1 PN^GMRPART  

Entry Points

Name Comments DBIA/ICR reference

External References

Name Field # of Occurrence
FIND^DIC GMRAXENV+40, GMRAXENV+64
^DIE GMRAXENV+56, GMRAXENV+60
^DIK GMRAXENV+71
GMRARAD1^GMRARAD1 GMRAXENV+31, GMRAXENV+36
PN^GMRPART GMRAXENV+11
$$VERSION^XPDUTL GMRAXENV+11, GMRAXENV+16, GMRAXENV+20, GMRAXENV+24

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?5,"DUZ and DUZ(0) must be defined as an active user to initialize"
  • Line Location: GMRAXENV+3
Function Call: WRITE
  • Prompt: !?5,"the ADVERSE REACTION TRACKING v",$P($T(+2),";",3)," software."
  • Line Location: GMRAXENV+4
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: GMRAXENV+5
Function Call: WRITE
  • Prompt: !?5,"You must have programmer access, i.e., DUZ(0)=@ to continue."
  • Line Location: GMRAXENV+8
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: GMRAXENV+9
Function Call: WRITE
  • Prompt: !?5,"You have the Progress Notes package installed, but you are"
  • Line Location: GMRAXENV+12
Function Call: WRITE
  • Prompt: !?5,"missing the GMRPART routine. Please make certain that"
  • Line Location: GMRAXENV+13
Function Call: WRITE
  • Prompt: !?5,"GMRP*2.5*32 is installed."
  • Line Location: GMRAXENV+14
Function Call: WRITE
  • Prompt: !?5,"You need MAS/PIMS v5.3 or greater to install ADVERSE REACTION"
  • Line Location: GMRAXENV+17
Function Call: WRITE
  • Prompt: !?5,"TRACKING v",$P($T(+2),";",3),$C(7)
  • Line Location: GMRAXENV+18
Function Call: WRITE
  • Prompt: !?5,"You need NATIONAL DRUG FILE v2.0 or greater to install ADVERSE"
  • Line Location: GMRAXENV+21
Function Call: WRITE
  • Prompt: !?5,"REACTION TRACKING v",$P($T(+2),";",3),$C(7)
  • Line Location: GMRAXENV+22
Function Call: WRITE
  • Prompt: !?5,"Bad entry in VERSION node of Package file, call your IRM"
  • Line Location: GMRAXENV+26
Function Call: WRITE
  • Prompt: !?5,"Field Office for assistance."
  • Line Location: GMRAXENV+27
Function Call: WRITE
  • Prompt: !?5,"You must have installed ALLERGY TRACKING SYSTEM v3.0 prior to"
  • Line Location: GMRAXENV+32
Function Call: WRITE
  • Prompt: !?5,"installing ADVERSE REACTION TRACKING v",$P($T(+2),";",3),$C(7)
  • Line Location: GMRAXENV+33
Function Call: WRITE
  • Prompt: !?5,"You must install patch GMRA*3*13 prior to installing"
  • Line Location: GMRAXENV+37
Function Call: WRITE
  • Prompt: !?5,"ADVERSE REACTION TRACKING v",$P($T(+2),";",3),$C(7)
  • Line Location: GMRAXENV+38
Function Call: WRITE
  • Prompt: !?5,"Error trying to find ADVERSE REACTION TRACKING Package file"
  • Line Location: GMRAXENV+42
Function Call: WRITE
  • Prompt: !?5,"entry, notify your IRM Field Office.",$C(7)
  • Line Location: GMRAXENV+43
Routine Call
  • DIE
  • Line Location:
    • GMRAXENV+56
    • GMRAXENV+60
Routine Call
  • DIC
  • Line Location:
    • GMRAXENV+40
    • GMRAXENV+64

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(9.4 - [#9.4] Classic Fileman Calls,  FIND^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMRD(120.84 - [#120.84] GMRAXENV+25

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA GMRAXENV+45*, GMRAXENV+47*, GMRAXENV+48*, GMRAXENV+49*, GMRAXENV+51, GMRAXENV+52, GMRAXENV+56!, GMRAXENV+58*, GMRAXENV+60!, GMRAXENV+66*
, GMRAXENV+70*, GMRAXENV+71, GMRAXENV+73!
DIE GMRAXENV+53*, GMRAXENV+56!, GMRAXENV+57*, GMRAXENV+60!
DIK GMRAXENV+71*, GMRAXENV+73!
DR GMRAXENV+54*, GMRAXENV+55*, GMRAXENV+56!, GMRAXENV+59*, GMRAXENV+60!
DUZ GMRAXENV+2
DUZ(0 GMRAXENV+2, GMRAXENV+7
GMRAERR GMRAXENV+62!, GMRAXENV+65!, GMRAXENV+73!
GMRAERR("DIERR" GMRAXENV+41, GMRAXENV+65
GMRAHLD GMRAXENV+52*, GMRAXENV+58, GMRAXENV+63, GMRAXENV+73!
GMRAIEN GMRAXENV+62!, GMRAXENV+65!, GMRAXENV+73!
GMRAIEN("DILIST" GMRAXENV+45, GMRAXENV+46, GMRAXENV+48, GMRAXENV+49, GMRAXENV+67, GMRAXENV+68, GMRAXENV+70
GMRAVER GMRAXENV+24~*, GMRAXENV+25, GMRAXENV+29, GMRAXENV+30
NAME GMRAXENV+46*, GMRAXENV+47, GMRAXENV+48, GMRAXENV+62!, GMRAXENV+68*, GMRAXENV+69, GMRAXENV+73!
SEQ GMRAXENV+45*, GMRAXENV+46, GMRAXENV+48, GMRAXENV+49, GMRAXENV+62!, GMRAXENV+66*, GMRAXENV+67*, GMRAXENV+68, GMRAXENV+70, GMRAXENV+73!
>> XPDQUIT GMRAXENV+2*, GMRAXENV+7*, GMRAXENV+16*, GMRAXENV+20*, GMRAXENV+25*, GMRAXENV+30, GMRAXENV+34*, GMRAXENV+36*, GMRAXENV+41*

Marked Items

Name Field # of Occurrence
$T( GMRAXENV+4, GMRAXENV+18, GMRAXENV+22, GMRAXENV+33, GMRAXENV+38
$T(GMRARAD1^GMRARAD1 GMRAXENV+31, GMRAXENV+36
$T(PN^GMRPART GMRAXENV+11
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Local Variables |  Marked Items |  All