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

Package: General Medical Record - Generator

Routine: GMRGRUT1


Information

GMRGRUT1 ;CISC/RM-ROUTINE UTILITIES (cont.) ;2/21/89

Source Information

Source file <GMRGRUT1.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
General Medical Record - Generator 2 EN1^GMRGRUT2  NOB^GMRGRUT4  

Caller Graph

Caller Graph Total: 16

Package Total Caller Graph
Nursing Service 9 NURCAS1  NURCCPU1  NURCES1  NURCPP1  NURCPP2  NURCPP4  NURCPP7  NURCPP9  
NURCPPS2  
General Medical Record - Generator 7 GMRGED4  GMRGED8  GMRGPNB0  GMRGPNB2  GMRGRUT2  GMRGRUT4  GMRGTGI1  

Entry Points

Name Comments DBIA/ICR reference
FITLINE ; THIS UTILITY TAKES A LINE OF TEXT IN GMRGPLN AND A LENGTH IN
; GMRGLEN, AND SETS GMRGPLN(0)=THE FIRST N-WORDS OF GMRGPLN THAT
; WILL FIT IN LENGTH GMRGLEN, AND GMRGPLN(1)=REST OF GMRGPLN
; KILLS GMRGLEN AND RETURNS GMRGPLN,GMRGPLN(0),GMRGPLN(1).
STORETXT ; THIS UTILITY TAKES THE FOLLOWING ELEMENTS OF THE GMRGNAR ARRAY
; GMRGNAR=AGGY IEN^O/P FORM.^SPACES LT MARG.^CHILD?^SPACES RT. MARG.
; GMRGNAR(0) = TEXT OF AGGY TERM ^ PATIENT TEXT (IF EXISTS)
; GMRGNAR("LEAD") = LEAD TEXT FOR AGGY TERM
; GMRGNAR("TRAIL") = TRAIL TEXT FOR AGGY TERM
; AND STORES THE APPROPRIATE INFORMATION IN THE APPROPRIATE FORMAT
; INTO THE UTILITY($J,"GMRGNAR",AGGY CLASS,AGGY IEN,LINE) GLOBAL
QS

External References

Name Field # of Occurrence
EN1^GMRGRUT2 STORETXT+8
NOB^GMRGRUT4 STORETXT+11, STORETXT+15

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J STORETXT+7, STORETXT+10, STORETXT+14

Label References

Name Line Occurrences
QS STORETXT+11

Naked Globals

Name Field # of Occurrence
^( STORETXT+10
^(0 STORETXT+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
GMRG01 STORETXT+7*, STORETXT+10, STORETXT+13, STORETXT+14, QS!
GMRG02 STORETXT+7*, QS!
GMRG03 QS!
GMRG04 STORETXT+10*, STORETXT+15*, QS!
GMRG05 STORETXT+10*, STORETXT+13*, STORETXT+14*, QS!
GMRG06 STORETXT+10*, QS!
GMRG08 STORETXT+10*, STORETXT+13*, STORETXT+14*, QS!
GMRG10 STORETXT+9*, STORETXT+10, QS!
GMRG100 FITLINE+4*, FITLINE+5*, FITLINE+6, FITLINE+8!
GMRG101 FITLINE+5*, FITLINE+8!
GMRG102 FITLINE+5*, FITLINE+8!
GMRG11 STORETXT+8*, QS!
GMRG12 QS!
GMRG13 QS!
GMRG14 STORETXT+7*, STORETXT+9, QS!
GMRG15 STORETXT+7*, QS!
GMRG16 STORETXT+9*, QS!
GMRG17 STORETXT+9*, QS!
GMRG18 STORETXT+9*, STORETXT+11*, STORETXT+12*, STORETXT+14*, QS!
>> GMRGCLAS STORETXT+7, STORETXT+10, STORETXT+14
GMRGLEN FITLINE+5, FITLINE+6, FITLINE+7, FITLINE+8!
GMRGNAR STORETXT+7, STORETXT+9, STORETXT+10, STORETXT+12, STORETXT+13, STORETXT+14, QS!
GMRGNAR("LEAD" STORETXT+12*
GMRGNAR("TRAIL" STORETXT+12*
GMRGNAR(0 STORETXT+8
GMRGPLN FITLINE+4, FITLINE+5, FITLINE+6, FITLINE+7, STORETXT+10*, STORETXT+11*, STORETXT+13*, STORETXT+14*, QS!
GMRGPLN(0 FITLINE+4*, FITLINE+6*, FITLINE+7*
GMRGPLN(1 FITLINE+4*, FITLINE+6*, FITLINE+7*
>> GMRGSPC STORETXT+10, STORETXT+14
>> GMRGSSW STORETXT+13, STORETXT+14
GMRGXPRT STORETXT+8*!
GMRGXPRT(0 STORETXT+8*
GMRGXPRT(1 STORETXT+8*
IOM STORETXT+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All