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

Package: Adverse Reaction Tracking

Routine: GMRAPHR1


Information

GMRAPHR1 ;HIRMFO/WAA,FT-ADD/DELETE/EDIT CONCOMITANT DRUGS ;4/6/05 14:18

Source Information

Source file <GMRAPHR1.m>

Entry Points

Name Comments DBIA/ICR reference
EN1 ;
SELECT
EDIT ;EDIT A DRUG
EDITLST ; DISPLAY TO EDIT FIELD
EEDT
QE
ADD ;SELECT ON OF THE DRUG OR FREE TEXT
ADDED
ADD2 ;
DEL ;
DQ
LST
EXIT ;EXIT LINE

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: SELECT+0
Function Call: WRITE
  • Prompt: !
  • Line Location: SELECT+7
Function Call: WRITE
  • Prompt: !
  • Line Location: SELECT+8
Function Call: WRITE
  • Prompt: !
  • Line Location: SELECT+9
Function Call: WRITE
  • Prompt: !,?3,"YOU CANNOT EDIT WHEN THERE IS NO DATA ON FILE.",$C(7)
  • Line Location: EDIT+1
Function Call: WRITE
  • Prompt: !,"Select the DRUG RX you want to edit:",!
  • Line Location: EDITLST+1
Function Call: WRITE
  • Prompt: !,"Enter the number(s) of the DRUG to ADD or ""N"" for NEW: "
  • Line Location: ADDED+0
Function Call: READ
  • Variable: GMRAX
  • Timeout: DTIME
  • Line Location: ADDED+1
Function Call: WRITE
  • Prompt: !,"ENTER THE NUMBER(S) OF THE ENTRY YOU WANT OR ""N"" FOR A NEW DRUG"
  • Line Location: ADDED+2
Function Call: WRITE
  • Prompt: !,$C(7),"INVALID SELECTION PLEASE SELECT ONE OF THE DRUGS LISTED OR ""N"" FOR A NEW DRUG"
  • Line Location: ADDED+5
Function Call: WRITE
  • Prompt: !,"Do You still want to add this one"
  • Line Location: ADDED+10
Function Call: WRITE
  • Prompt: !,"ENTER YES TO ADD THE DRUG or NO TO SELECT ANOTHER"
  • Line Location: ADDED+10
Function Call: WRITE
  • Prompt: !,"THERE ARE NO DRUGS SELECTED FOR THIS PATIENT."
  • Line Location: DEL+1
Function Call: WRITE
  • Prompt: "DELETED.."
  • Line Location: DEL+6
Function Call: WRITE
  • Prompt: !,"THIS PATIENT HAS NO CONCOMITANT DRUGS ON FILE"
  • Line Location: LST+0
Function Call: WRITE
  • Prompt: !!,"This patient has the following Drugs selected: ",!
  • Line Location: LST+1
Function Call: WRITE
  • Prompt: !,?10,$P(^(GMRAX,0),U)
  • Line Location: LST+2
Function Call: WRITE
  • Prompt: !
  • Line Location: LST+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMR(120.85 - [#120.85] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call