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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: GMRADSP5

Package: Adverse Reaction Tracking

Routine: GMRADSP5


Information

GMRADSP5 ;HIRMFO/YMP,RM,WAA-LISTING OF ALLERGIES TO SIGNED OFF ALLERGIES ;8/16/92

Source Information

Source file <GMRADSP5.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Adverse Reaction Tracking 3 (EOP,HDR)^GMRADSP3  (CLOSE,DEV)^GMRAUTL  $$PRDTST^GMRAUTL1  
Kernel 3 ^%ZTLOAD  ($$FMTE,$$NOW)^XLFDT  KILL^XUSCLEAN  
Registration 2 KVA^VADPT  PID^VADPT6  
VA FileMan 1 D^DIQ  

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 GMRA PRINT-NOT SIGNED OFF  

Entry Points

Name Comments DBIA/ICR reference
EN1 ; Entry to PATIENT ALLERGIES NOT SIGNED OFF option
EN2
EN2A
DISP
EXIT ;Quit and kill
EN3
TASK ;

External References

Name Field # of Occurrence
^%ZTLOAD TASK+1
D^DIQ EN3+1
EOP^GMRADSP3 EN3+2
HDR^GMRADSP3 DISP
CLOSE^GMRAUTL EXIT+1
DEV^GMRAUTL EN1+5
$$PRDTST^GMRAUTL1 EN2A+2
KVA^VADPT EN2A+3
PID^VADPT6 EN2A+3
$$FMTE^XLFDT EN1+3
$$NOW^XLFDT EN1+3
KILL^XUSCLEAN EXIT+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$E(GMRAORG,1,15),?17,$P(GMRALL,U,2),?42,$E($P(GMRALL,U),1,16),?59,Y
  • Line Location: EN3+1
Function Call: WRITE
  • Prompt: !!,$S($D(ZTSK):"Request queued...",1:"Request NOT queued please try later...")
  • Line Location: TASK+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] EN2A+4
^GMR(120.8 - [#120.8] EN2+1, EN2A
^TMP($J EN2A+4*, DISP, DISP+1, DISP+2, DISP+3, DISP+4, EXIT+2!, EN3
^VA(200 - [#200] EN2A+4
^XUSEC("GMRA-ALLERGY VERIFY" EN2A+1

Label References

Name Line Occurrences
DISP EN2+2
EN2A EN2+1
EN3 DISP+4
EXIT EN1+5, EN1+6
TASK EN1+6

Naked Globals

Name Field # of Occurrence
^( EN3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN EN2A+3*
DUZ EN2A+1
>> GMRADFN DISP+4*, EN3
>> GMRADT EN2*, DISP+3*, DISP+4, EN3, EN3+1
>> GMRAHEAD( EN1+4*
>> GMRAHEAD(1 EN1+2*
>> GMRAHEAD(3 EN1+2*
>> GMRAHEAD(4 EN1+2*
>> GMRAHEAD(5 EN1+2*
>> GMRAHEAD(6 EN1+2*
>> GMRAIEN DISP+2*, DISP+3, DISP+4, EN3
>> GMRALL EN3*, EN3+1
>> GMRANOW EN1+3*, EN1+4
>> GMRAORG EN2*, DISP+1*, DISP+2, DISP+3, DISP+4, EN3, EN3+1
>> GMRAOUT EN1+1*, EN1+5*, DISP+1, DISP+2, DISP+3, DISP+4, EN3, EN3+2
>> GMRAPAT EN3*
>> GMRAPG DISP*
>> GMRAREC EN2+1*, EN2A, EN2A+4
>> GMRASSN EN2A+3*, EN2A+4
>> GMRATEMP EN2A*, EN2A+1, EN2A+2, EN2A+3, EN2A+4
GMRAZIS EN1+5!
IO("Q" EN1+6
ION TASK+1
IOSL EN3+2
>> POP EN1+5
U EN2A+1, EN2A+2, EN2A+3, EN2A+4, EN3+1
>> VA("BID" EN2A+3
X EXIT+2!
Y EXIT+2!, EN3+1*
Z EXIT+2!
>> ZTDESC TASK+1*
ZTDH TASK+3!
ZTDTH TASK+1*, TASK+3!
>> ZTIO TASK+1*
ZTRTN TASK+1*, TASK+3!
ZTSAVE TASK+3!
ZTSAVE("DFN" TASK+1*
ZTSAVE("GMRA*" TASK+1*
ZTSK TASK+2, TASK+3!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All