Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: GMRAFX2

Package: Adverse Reaction Tracking

Routine: GMRAFX2


Information

GMRAFX2 ;SLC/DAN - Select reactant for update ;1/7/08 09:36

Source Information

Source file <GMRAFX2.m>

Entry Points

Name Comments DBIA/ICR reference
EN1 ; Select new reactant
NPA
NDF ;find partial matches and select from NDF
ING
CLASS
YNOTH
DIC ; VALIDATE LOOKUP FOR A/AR
MATCHES ; -- List matches for NDF
MORE()
HELP ;Display help for selection of causative agent

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Checking GMR ALLERGIES (#120.82) file for matches...",!
  • Line Location: NPA+1
Function Call: WRITE
  • Prompt: !!,"Now checking the National Drug File - Generic Names (#50.6)",!
  • Line Location: NDF+2
Function Call: WRITE
  • Prompt: !!,"Now checking the National Drug File - Trade Names (#50.67)",!
  • Line Location: NDF+5
Function Call: WRITE
  • Prompt: !!,"Now checking INGREDIENT (#50.416) file for matches...",!
  • Line Location: ING+0
Function Call: WRITE
  • Prompt: !!,"Now checking VA DRUG CLASS (#50.605) file for matches...",!
  • Line Location: CLASS+0
Function Call: WRITE
  • Prompt: !!,"Could not find ",GMRALAR," in any files.",!,"Please try again (check spelling, etc).",!,"If you need to add a new reactant, use the AE option."
  • Line Location: YNOTH+0
Function Call: WRITE
  • Prompt: !!,"You selected ",ENTRY
  • Line Location: DIC+4
Function Call: WRITE
  • Prompt: !!,"Choose from the following "_+$G(CNT)_" matches:"
  • Line Location: MATCHES+2
Function Call: WRITE
  • Prompt: !,J," ",$P(LST(I),"^",2)
  • Line Location: MATCHES+5
Function Call: WRITE
  • Prompt: !,"Enter new causative agent to be assigned to the selected entries."
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !,"Enter between 3 and 30 characters. The entered text will then be"
  • Line Location: HELP+2
Function Call: WRITE
  • Prompt: !,"searched for in a number of different files. Select the appropriate"
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !,"entry from the appropriate file to update the selected patient."
  • Line Location: HELP+4
Function Call: WRITE
  • Prompt: !!,"Enter ^ to skip the current patient or ^^ to exit the entire process."
  • Line Location: HELP+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMRD(120.82 - [#120.82] Classic Fileman Calls
^PS(50.416 - [#50.416] Classic Fileman Calls
^PS(50.605 - [#50.605] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call