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

Package: General Medical Record - Generator

Routine: GMRGED9


Information

GMRGED9 ;CISC/JH/RM-PATIENT DATA EDIT (cont.) ;4/5/90

Source Information

Source file <GMRGED9.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
General Medical Record - Generator 7 SETSEL^GMRGED4  SAT^GMRGED5  INTERNAL^GMRGED6  (ADSEL,HDR)^GMRGEDB  EN1^GMRGPNBL  STAT^GMRGRUT0  EN1^GMRGUTL  
VA FileMan 1 NOW^%DTC  

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

Package Total Caller Graph
General Medical Record - Generator 4 GMRGED2  GMRGED4  GMRGED6  GMRGEDB  

Entry Points

Name Comments DBIA/ICR reference
EN1 ; PRINT TEXT ON TOP
DISP
INQ
EN2 ; SET TEXT ON TOP ARRAY, GMRGTOP(0)=TERM TO BEGIN BUILDING TEXT FROM
JSTCK ; MANIPULATE GMRGLVL STACK FOR JUMPING AND SCRIPING
PSTCK ;
SCRPT ; PROCESS SCRIPT FOR A TERM

External References

Name Field # of Occurrence
NOW^%DTC EN2+1
SETSEL^GMRGED4 SCRPT+1
SAT^GMRGED5 SCRPT+13
INTERNAL^GMRGED6 SCRPT+14
ADSEL^GMRGEDB PSTCK+10, SCRPT+6
HDR^GMRGEDB SCRPT+17
EN1^GMRGPNBL EN2+1
STAT^GMRGRUT0 PSTCK+8, SCRPT+4
EN1^GMRGUTL SCRPT+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,^TMP($J,"GMRGNAR","TOP",I,L)
  • Line Location: DISP+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: INQ+0
Function Call: WRITE
  • Prompt: !!,"Press return to continue, or ^ to stop narrative listing. "
  • Line Location: INQ+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: INQ+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMR(124.3 - [#124.3] PSTCK+3, PSTCK+5, SCRPT+2, SCRPT+3, SCRPT+15, SCRPT+16*
^GMRD(124.2 - [#124.2] PSTCK+5, SCRPT+1, SCRPT+17
^GMRD(124.4 SCRPT+7, SCRPT+8, SCRPT+15
^TMP($J EN1+1, EN1+2, DISPEN2+1!, JSTCK+1*, JSTCK+3*, PSTCK+6*

Label References

Name Line Occurrences
DISP EN1+2
EN2 EN1+1
INQ DISP
PSTCK JSTCK+2

Naked Globals

Name Field # of Occurrence
^( EN1+2, PSTCK+6*
^("ADD" SCRPT+15
^(0 PSTCK+5, SCRPT+1, SCRPT+8
^(7 SCRPT+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EN2+1, EN2+2!
>> DA SCRPT+16*
>> DA(1 SCRPT+16*
DTIME INQ
>> GMRG0 JSTCK+1, JSTCK+2, JSTCK+3, PSTCK+3, PSTCK+4, PSTCK+7
>> GMRG0(0 JSTCK+2*, PSTCK+3, PSTCK+4
>> GMRG0(1 JSTCK+1*, PSTCK+1*
>> GMRG2 JSTCK+1
>> GMRGAT SCRPT+16*
>> GMRGKU PSTCK+3*, PSTCK+5, PSTCK+7, PSTCK+8, SCRPT+3*, SCRPT+4, SCRPT+8*, SCRPT+15
>> GMRGLIN EN1+2*, DISP*, INQ*
>> GMRGLVL JSTCK+1, JSTCK+3*, PSTCK+1*, PSTCK+2, PSTCK+6
>> GMRGLVL( JSTCK+1*, JSTCK+3, PSTCK+1*, PSTCK+2*
>> GMRGOUT EN1+2, INQ*, SCRPT+14, SCRPT+17
GMRGPAR EN2+1*, EN2+2!
GMRGPAR(0 EN2+1*
>> GMRGPDA PSTCK+3, PSTCK+5, PSTCK+8, SCRPT+2, SCRPT+3, SCRPT+4, SCRPT+15, SCRPT+16
GMRGPDT EN2+1*, EN2+2!
>> GMRGPRC PSTCK+4*, PSTCK+6, PSTCK+7, SCRPT+1, SCRPT+2*, SCRPT+12*, SCRPT+14
>> GMRGPRC(0 PSTCK+5*, PSTCK+6, SCRPT+1, SCRPT+2, SCRPT+8, SCRPT+15, SCRPT+16
>> GMRGRT PSTCK+9, SCRPT+5
>> GMRGSEL( SCRPT+7
>> GMRGSLVL JSTCK+1*, JSTCK+3, PSTCK+1*, PSTCK+6
>> GMRGST PSTCK+8*, SCRPT+4*
>> GMRGST(1 PSTCK+8*, SCRPT+4*
>> GMRGSTAT PSTCK+7*, PSTCK+9*, PSTCK+10, SCRPT+3*, SCRPT+5*, SCRPT+6
>> GMRGTERM PSTCK+9, SCRPT+1*, SCRPT+3, SCRPT+5, SCRPT+8, SCRPT+17
>> GMRGTERM(0 SCRPT+1*
>> GMRGTLVL JSTCK+1, JSTCK+3*, PSTCK+1*, PSTCK+2*, PSTCK+6
>> GMRGTOP(0 EN2+1
>> GMRGTPLT SCRPT+7, SCRPT+8, SCRPT+15
>> GMRGTX SCRPT+8*, SCRPT+11, SCRPT+12*, SCRPT+13, SCRPT+14, SCRPT+15*, SCRPT+16
>> GMRGTX("OL" SCRPT+8*, SCRPT+9, SCRPT+10*, SCRPT+13, SCRPT+15*, SCRPT+16
GMRGUSL SCRPT+1!
GMRGUSL( JSTCK+2, PSTCK+3, PSTCK+4, SCRPT+7*
GMRGUSL("A" SCRPT+16*
>> GMRGY SCRPT+16*
>> GMRGZ SCRPT+16*
GMRLINS EN1+2*, EN1+3!, DISP
I EN1+2*, EN1+3!, DISP
IOF EN1+2, INQ
IOSL DISP
J EN1+2*, EN1+3!
L EN1+2*, EN1+3!, DISP
X EN1+2*, EN1+3!, INQ*, SCRPT+16*
>> Y PSTCK+3*, PSTCK+4, PSTCK+5, SCRPT+7*, SCRPT+9*, SCRPT+10, SCRPT+11*, SCRPT+12
>> Z SCRPT+7*, SCRPT+9*, SCRPT+11*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All