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

Package: General Medical Record - Generator

Routine: GMRGUTL


Information

GMRGUTL ;HIRMFO/RM-UTILITIES ROUTINE FOR GMRG FILES ;5/2/96

Source Information

Source file <GMRGUTL.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
General Medical Record - Generator 2 STAT^GMRGRUT0  EN1^GMRGUT0  
Kernel 1 $$FMADD^XLFDT  
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: 6

Package Total Caller Graph
General Medical Record - Generator 6 GMRGED5  GMRGED6  GMRGED7  GMRGED9  GMRGEDB  GMRGUT0  

Entry Points

Name Comments DBIA/ICR reference
EN1 ; ENTRY FROM AUD1 OR AUD2 XREFS TO SET AUDIT TRAIL ENTRY. IF GMRGY=1
; THE ENTRY WILL BE A CREATE, IF GMRGY=2 THE ENTRY WILL BE AN EDIT.
; I GMRGY=0 THEN THE ENTRY WILL BE A DELETE. THE VARIABLE GMRGY WILL BE
; KILLED, AND THE VARIABLES DA(1),DA, AND X WILL ALSO BE SET AND RESET.
A0
A1
Q1
PAST ; ENTRY TO HANDLE DATE/TIME ENTRIES THAT ARE EARLIER THAN OR EQUAL
; TO, THE LAST DATE/TIME ENTERED
TEXT ; UPDATE SELECTION:AUDIT TRAIL:MODIFIED TEXT FIELD
ADTX ;
EN2 ; ENTRY FROM SCREEN ON SET OF CODES FOR MODIFICATION FIELD (#1) OF
; THE AUDIT TRAIL SUBFIELD (#3) OF THE SELECTION MULTIPLE (#1) OF
; THE GMR TEXT (#124.3) FILE.
Q2
EN3 ; ENTRY FROM SCREEN ON CHILD SUBFILED (#.01) OF CHILDREN (#1) FIELD
; OF THE GMR AGGREGATE TERM (#124.2) FILE
EN4 ; ENTRY FROM SCREEN ON SELECTION SUBFIELD (#.01) OF SELECTION FIELD
; (#1) OF THE GMR TEXT FILE (#124.3)
S4

External References

Name Field # of Occurrence
NOW^%DTC EN1+6
STAT^GMRGRUT0 EN1+6, S4
EN1^GMRGUT0 A1+3
$$FMADD^XLFDT PAST+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(124.313 A1+2, TEXT+1, ADTX+1
^GMR(124.3 - [#124.3] EN1+8, A0, A1, A1+1*, TEXT+1*, ADTX+1*, EN2+3, EN2+4, EN4+2, EN4+3
^GMRD(124.2 - [#124.2] EN3+2, EN4+2, EN4+3

Label References

Name Line Occurrences
A0 EN1+7, EN1+9
A1 A1
ADTX EN1+8
EN1 EN1+9
PAST EN1+6
Q1 EN1+7
Q2 EN2+5, EN2+6
TEXT EN1+8

Naked Globals

Name Field # of Occurrence
^( EN2+4
^("ADD" EN1+8
^(0 EN1+8, A0*, EN4+2
^(1 A1+2, TEXT+1, ADTX+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN1+6, PAST+2*
>> D0 EN3+2, EN4+2, EN4+3, S4
DA EN1+4, EN1+6*, EN1+8, A0*, A1*, A1+1, Q1!*, TEXT+1, ADTX+1, EN2+3
DA( EN1+4, Q1*
DA(1 EN1+5*, EN1+6, EN1+8, A0, A1, A1+1, TEXT+1, ADTX+1, EN2+3, EN2+4
DA(2 EN1+5*, EN1+6, EN1+8, A0, A1, A1+1, TEXT+1, ADTX+1, EN2+3, EN2+4
DUZ A1+1, A1+2
GMRG EN4+2*, EN4+3*, EN4+5!
GMRG("OK" EN4+2*, EN4+3*, EN4+4, S4*
GMRG(0 S4
>> GMRGAT EN1+8
GMRGDA EN1+4*, EN1+5, Q1, Q1+1!
GMRGDA( EN1+4*, Q1
GMRGDA(1 EN1+5
GMRGDT EN1+6*, A1+1, A1+2, Q1+1!
GMRGLDT EN1+6*, Q1+1!, PAST+2
>> GMRGRT EN1+4
>> GMRGST EN1+6*, S4*
>> GMRGST(1 EN1+6*, S4*
GMRGSTAT EN1+6, EN1+7, EN1+9, Q1+1!, EN4+5!, S4
GMRGX EN1+4*, EN1+8, Q1, Q1+1!
GMRGXX TEXT+1*, TEXT+2!, ADTX+1*, ADTX+2!
GMRGY EN1+7, EN1+9*, A1+1, A1+2, A1+3, Q1+1!
GMRGY(0 EN1+4*, A1+2*, Q1*
GMRGY(1 A1+2*
GMRGZ EN1+8, EN2+4*, EN2+5, EN2+6, EN2+7, Q2!
GMRGZ(0 EN2+3*, EN2+4
U EN1+8, TEXT+1, EN3+2, EN4+2, S4
X EN1+4, EN1+8*, A1+2*, Q1!*, TEXT+1, ADTX+1
>> Y EN2+5, EN2+6, EN2+7, EN3+2, EN4+2, EN4+3, S4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All