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

Package: Adverse Reaction Tracking

Routine: GMRAPEO0


Information

GMRAPEO0 ;HIRMFO/WAA,RM-EDIT OBSERVED A/AR ;10/15/04 10:06

Source Information

Source file <GMRAPEO0.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Adverse Reaction Tracking 7 MECH^GMRAPED0  COMCHECK^GMRAPEH0  ENDING^GMRAPEM1  EN1^GMRAPER2  EN2^GMRAROBS  EN2^GMRAU85  UNLOCK^GMRAUTL  
VA FileMan 2 YN^DICN  IX1^DIK  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Adverse Reaction Tracking 1 GMRAPEM4  

Entry Points

Name Comments DBIA/ICR reference
EN1 ; Entry to edit Observed A/AR Data
OBS ;
EXIT ; Exit line
ORR ; Observed the reserved reaction reports
COMM ; Fill in the comments

External References

Name Field # of Occurrence
YN^DICN ORR+3
IX1^DIK OBS+11
MECH^GMRAPED0 OBS+15
COMCHECK^GMRAPEH0 COMM+3
ENDING^GMRAPEM1 COMM+1
EN1^GMRAPER2 OBS+4
EN2^GMRAROBS ORR+6
EN2^GMRAU85 OBS+1
UNLOCK^GMRAUTL OBS+1, EXIT+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?4,$C(7),"OBSERVATION DATE IS A REQUIRED ENTRY!!"
  • Line Location: OBS+2
Function Call: WRITE
  • Prompt: !?4,$C(7),"OBSERVATION DATE IS A REQUIRED ENTRY!!"
  • Line Location: OBS+3
Function Call: WRITE
  • Prompt: !,"Complete the observed reaction report"
  • Line Location: ORR+3
Function Call: WRITE
  • Prompt: !,"ENTER YES TO EDIT REACTION DATA OR NO TO SKIP REACTION DATA",$C(7)
  • Condition for execution: %=0
  • Line Location: ORR+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMR(120.85 - [#120.85] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMR(120.8 - [#120.8] OBS+5, OBS+8, OBS+9, OBS+10
^GMR(120.85 - [#120.85] EN1+5, EN1+6, OBS+2, OBS+4, OBS+7!, OBS+8*, OBS+10*
^XUSEC("GMRA-ALLERGY VERIFY" OBS+15

Label References

Name Line Occurrences
COMM OBS+17, COMM+4
EXIT OBS+1, OBS+14, OBS+16, OBS+17, OBS+18
OBS OBS+2, OBS+3
ORR OBS+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ORR+3*, ORR+4, ORR+5~, ORR+8
DA OBS+11*, EXIT+2!, COMM+6!, COMM+7!
DA(1 OBS+11*
>> DIC("B" EN1+6*
DIE COMM+6!, COMM+7!
DIK OBS+11*, EXIT+2!
DR EXIT+2!, COMM+6!, COMM+7!
DTOUT COMM+2, COMM+6!
DUOUT COMM+6!
DUZ OBS+10, OBS+15
GMRADATE EXIT+2!
GMRADT EXIT+2!
>> GMRALAGO OBS+1*
GMRAN85 EN1+4~, EN1+5*
>> GMRAOUT OBS+1, OBS+4, OBS+5, OBS+14, OBS+16, OBS+17, OBS+18, ORR+8*, COMM+1, COMM+2*
, COMM+3, COMM+4, COMM+5*
>> GMRAPA EN1+5, OBS+2, OBS+4, OBS+5, OBS+8, OBS+9, OBS+10
GMRAPA1 OBS+1, OBS+3, OBS+4, OBS+7, OBS+8, OBS+10, OBS+11, EXIT+1, EXIT+2!, ORR+1
GMRAR10 EXIT+2!
GMRARAD EXIT+2!
GMRARDL EXIT+2!
GMRAREC EXIT+2!
>> GMRAREQ COMM+4
GMRARODT EXIT+2!
GMRAROT EXIT+2!
GMRARPR EXIT+2!
>> GMRAUSER ORR+2
>> GMRAVCM COMM+1*
GMRAX EN1+5*, EN1+6, OBS+6~, OBS+8*, OBS+9, OBS+10, OBS+11, EXIT+2!
GMRAY EXIT+2!
GMRAZN EXIT+2!
U EN1+6, OBS+2, OBS+4, OBS+8, OBS+10
X EN1+5*, EN1+6!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All