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

Package: Adverse Reaction Tracking

Routine: GMRALAB1


Information

GMRALAB1 ;HIRMFO/WAA-THIS PROGRAM WILL SELECT ALL LAB TEST FOR A PATIENT ;1/9/96 09:48

Source Information

Source file <GMRALAB1.m>

Entry Points

Name Comments DBIA/ICR reference
EDIT ;EDIT EXISTING DATA
EDITLST ; DISPLAY TO EDIT FIELD
EEDT
ADD ;This is to allow the user to select a LAB TEST
ADDED
ADD2 ;This is to allow the patient's lab test to be added.
DEL ;This entry point is to delete a lab entry from the Adverse Reaction file.
LDATE(X) ;This function takes X and will return Y
VALST(LST,SUB) ; GIVEN LST, THIS FUNCTION RETURNS 1 IF LIST VALID, ELSE 0

Interaction Calls

Name Line Occurrences
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: !,"Enter the number of the TX/Test 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 OF THE ENTRY YOU WANT OR ""N"" FOR A NEW TEST"
  • Line Location: ADDED+2
Function Call: WRITE
  • Prompt: !,$C(7),"INVALID SELECTION PLEASE SELECT ONE OF THE TEST/TX LISTED OR ""N"" FOR A NEW TEST"
  • Line Location: ADDED+7
Function Call: WRITE
  • Prompt: !,"Do You still want to add this one"
  • Line Location: ADDED+12
Function Call: WRITE
  • Prompt: !,"ENTER YES TO ADD THE TEST/TX OR NO TO SELECT ANOTHER"
  • Line Location: ADDED+12
Function Call: WRITE
  • Prompt: !,"THERE IS NO LAB DATA SELECTED FOR THIS PATIENT"
  • Line Location: DEL+1

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