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
Print Page as PDF
Routine: GMRAPEL0

Package: Adverse Reaction Tracking

Routine: GMRAPEL0


Information

GMRAPEL0 ;HIRMFO/YMP,WAA-EDIT LIKELIHOOD ; 8/25/92

Source Information

Source file <GMRAPEL0.m>

Entry Points

Name Comments DBIA/ICR reference
EN1 ;ENTRY FROM MAIN TO EDIT THE LIKELIHOOD OF REACTION FIELD USING THE FDA
YNED
QUEST1
QUEST2
QUEST3
QUEST4
QUEST5
LAST
SETTING ;
HELP ;
EXIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"DETERMINATION OF LIKELIHOOD OF ALLERGY/ADVERSE REACTION:"
  • Line Location: EN1+4
Function Call: WRITE
  • Prompt: !?2,"The likelihood of this reaction was previously determined as ",$S(GMRAPA("LIKE")=1:"REMOTE",GMRAPA("LIKE")=2:"POSSIBLE",GMRAPA("LIKE")=3:"PROBABLE",GMRAPA("LIKE")=4:"HIGHLY PROBABLE",1:""),"."
  • Line Location: EN1+6
Function Call: WRITE
  • Prompt: !,?2,"Would you like to enter/edit Likelihood"
  • Line Location: YNED+0
Function Call: WRITE
  • Prompt: !?5,$C(7),"ANSWER YES IF YOU WISH TO CHANGE THIS LIKELIHOOD, ELSE ANSWER NO."
  • Line Location: YNED+1
Function Call: WRITE
  • Prompt: !?2,"Does the event have a reasonable temporal association with use of drug"
  • Line Location: QUEST1+1
Function Call: WRITE
  • Prompt: !?2,"Was there a dechallenge from the drug"
  • Line Location: QUEST2+0
Function Call: WRITE
  • Prompt: !?2,"Did the observed event abate upon dechallenge"
  • Line Location: QUEST3+0
Function Call: WRITE
  • Prompt: !?2,"Was there a rechallenge"
  • Line Location: QUEST4+0
Function Call: WRITE
  • Prompt: !?2,"Did the reaction or event reappear upon rechallenge"
  • Line Location: QUEST5+0
Function Call: WRITE
  • Prompt: !?2,"Could the event be due to an existing clinical condition"
  • Line Location: LAST+0
Function Call: WRITE
  • Prompt: !,"THE LIKELIHOOD IS DETERMINED AS ",$S(GMRAFDA=1:"REMOTE",GMRAFDA=2:"POSSIBLE",GMRAFDA=3:"PROBABLE",GMRAFDA=4:"HIGHLY PROBABLE",1:""),":"
  • Line Location: SETTING+1
Function Call: WRITE
  • Prompt: !,"IS THAT OK"
  • Line Location: SETTING+2
Function Call: WRITE
  • Prompt: !?4,$C(7),"Answer Yes if this is correct, else answer No."
  • Line Location: SETTING+3
Function Call: WRITE
  • Prompt: !?5,$C(7),"ENTER YES IF THIS QUESTION IS TRUE, ELSE ANSWER NO."
  • Line Location: HELP+1
Info |  Source |  Entry Points |  Interaction Calls