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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: GMRPNOR1

Package: Text Integration Utility

Routine: GMRPNOR1


Information

GMRPNOR1 ;SLC/MKB/DJP Progress Note- OE/RR interface;; 2-14-97 ; 7-DEC-1999 12:10:24

Source Information

Source file <GMRPNOR1.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Text Integration Utility 4 DISPL^GMRPN2  ALLERGY^GMRPNCW  SCREEN^GMRPNOR  DATES^GMRPNP  
VA FileMan 2 ^DIC  ^DIR  
Kernel 1 EN^XQOR  
Registration 1 OERR^VADPT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Text Integration Utility 2 TIULX  TIUROR  
Order Entry Results Reporting 1 ORUHDR  

Entry Points

Name Comments DBIA/ICR reference
QUIT ;quits out of review screen
PREV ;Display previous screen -- needs GMRPPG & calls SCREEN
PAT ;set up patient info for use - expects ORVP or DFN
AUTHOR ;selects author - Returns GMRPDUZ=#^NAME or GMRPQT
UNSIGN ;entry point for follow-up action on unsigned pn's
NEXT ;Display next screen -- needs GMRPPG & calls SCREEN
COSIGN ;entry point for follow-up action on uncosigned pn's
INV()
CURR ;Redisplay current screen -- needs GMRPPG & calls SCREEN
CWAD(GMRPDFN) ;;check if any clinical warnings exist for patient
SELPT ;select new patient using IN^OR to update ORVP, etc. GMRP*2.5*50
; IN^OR doesn't exist, code no longer used
SEL ;selects single note from screen -- assumes GMRPN(GMRPNN) array
SETERM ;sets up GMRPTRML variable to hi-lite <CWAD> flag on review screen
CTXT ;Select new context for viewing/acting on notes

External References

Name Field # of Occurrence
^DIC PAT+3, AUTHOR+2
^DIR SEL+3, CTXT+8
DISPL^GMRPN2 SEL+9
ALLERGY^GMRPNCW CWAD+13
SCREEN^GMRPNOR CURR+2, NEXT+3, PREV+3
DATES^GMRPNP CTXT+10
OERR^VADPT PAT+6
EN^XQOR UNSIGN+3, COSIGN+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: CTXT+8
Function Call: WRITE
  • Prompt: @X
  • Line Location: INV+1
Routine Call
  • DIC
  • Line Location:
    • PAT+3
    • AUTHOR+2
Routine Call
  • DIR
  • Line Location:
    • SEL+3
    • CTXT+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls
^VA(200 - [#200] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS(2 - [#3.2] SETERM+3, SETERM+5
^%ZOSF("XY" INV+1
^DIC(42 - [#42] PAT+9
^GMR(121 SEL+6
^ORD(101 - [#101] UNSIGN+3, COSIGN+3
^SC - [#44] PAT+10
^TIU(8925 - [#8925] CWAD+9, CWAD+10, CWAD+11
^VA(200 - [#200] AUTHOR+2

Label References

Name Line Occurrences
$$CWAD PAT+11
AUTHOR CTXT+10

Naked Globals

Name Field # of Occurrence
^( SETERM+5
^(7 SETERM+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CWA CWAD+16!
DFN PAT+1, PAT+6~*, CWAD+13*
DIC PAT+3*!, AUTHOR+1*, AUTHOR+2!
DIC("A" AUTHOR+1*
DIC("B" AUTHOR+2*
DIC(0 PAT+3*, AUTHOR+1*
DIR SEL+3!, CTXT+8!
DIR("?" SEL+2*, CTXT+6*, CTXT+7*
DIR("??" SEL+3*
DIR("A" SEL+1*, CTXT+3*, CTXT+4*, CTXT+5*
DIR("B" CTXT+7*
DIR(0 SEL+1*, CTXT+2*
>> DIROUT SEL+4, SEL+9, CTXT+8, CTXT+9, AUTHOR+3
>> DIRUT SEL+4
>> DTOUT SEL+4, SEL+9, CTXT+9
DUOUT SEL+9!, CTXT+9
DUZ AUTHOR+2
DX INV+1~*
DY INV+1~*
>> GMRPADDM SEL+6
>> GMRPAGE PAT+8*
GMRPALG CWAD+13, CWAD+16!
GMRPBLD CTXT+11!
>> GMRPCTXT CTXT+11*, UNSIGN+2*, COSIGN+2*
GMRPCWA1 CWAD+4~, CWAD+7*, CWAD+9*, CWAD+10*, CWAD+11*, CWAD+13*, CWAD+15
GMRPCWAD PAT+11!*, CWAD+6*, CWAD+15*, CWAD+17
GMRPDFN PAT+1*, PAT+2, PAT+5*, PAT+6, PAT+7*, PAT+11, CWAD~, CWAD+5, CWAD+9, CWAD+10
, CWAD+11, CWAD+13
>> GMRPDOB PAT+8*
>> GMRPDUZ AUTHOR+4*
>> GMRPEND QUIT+1*, CTXT+8*, AUTHOR+3*
GMRPI CWAD+4~, CWAD+8*, CWAD+9, CWAD+10, CWAD+11, CWAD+14*, CWAD+15, SETERM+7*, SETERM+8!
GMRPIFN SEL+5*, SEL+6, SEL+8!
>> GMRPLOC PAT+8*, PAT+9*, PAT+10*
>> GMRPN( SEL+5
>> GMRPN("PG" NEXT+2
>> GMRPNN SEL+1
>> GMRPPG CURR+1*, NEXT+1*, NEXT+2*, PREV+1*, PREV+2*
GMRPQT PAT+2, PAT+4*, SEL+4*, SEL+8*, SEL+9!, CTXT+10, AUTHOR+3*, AUTHOR+4!
>> GMRPRB PAT+8*
GMRPSAV CTXT+10*, CTXT+11!
>> GMRPSSN PAT+7*
>> GMRPTRML SETERM+2*, SETERM+5*, SETERM+6*, SETERM+7*
IOST SETERM+2, SETERM+3
ORVP PAT+1, UNSIGN+1~, UNSIGN+2*, COSIGN+1~, COSIGN+2*
TIUST CWAD+16!
U PAT+7, PAT+8, PAT+9, PAT+10, SEL+6, AUTHOR+2, SETERM+5, SETERM+6, SETERM+7
>> VA("PID" PAT+7
VADM PAT+11!
VADM(1 PAT+7
VADM(3 PAT+8
VADM(4 PAT+8
VAIN PAT+11!
VAIN(4 PAT+8
VAIN(5 PAT+8
>> X SETERM+3*, SETERM+5, INV, INV+1, UNSIGN+3*, COSIGN+3*
>> XQAID UNSIGN+2, COSIGN+2
>> XQAKILL UNSIGN+1*, COSIGN+1*
>> Y PAT+4, PAT+5, SEL+5, CTXT+10, AUTHOR+3, AUTHOR+4
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 |  Naked Globals |  Local Variables |  All