Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: GMRGRUT0

Package: General Medical Record - Generator

Routine: GMRGRUT0


Information

GMRGRUT0 ;CISC/RM-ROUTINE UTILITIES ;10/25/88

Source Information

Source file <GMRGRUT0.m>

Caller Graph

Caller Graph Total: 13

Package Total Caller Graph
General Medical Record - Generator 12 GMRGED2  GMRGED6  GMRGED9  GMRGPNB0  GMRGPNB1  GMRGPNB2  GMRGRUT2  GMRGTGI0  
GMRGUT0  GMRGUT1  GMRGUT3  GMRGUTL  
Nursing Service 1 NURCEVE4  

Entry Points

Name Comments DBIA/ICR reference
PARST ;
STAT ; ENTRY TO GIVE THE TYPE AND DATE OF THE LAST MODIFICATION ON THE
; SELECTION DEFINED BY GMRGST, AND GMR TEXT ENTRY GMRGST(1),
; AND GMRGST(2) IF PASSED WILL BE THE DATE/TIME THAT YOU
; WANT THE INFORMATION FOR THIS TERM.
; RETURNED IS GMRGSTAT=IEN OF AUDIT TRAIL^D/T^MOD
STLST ; GIVEN THAT GMRGND=ENTRY IN 124.3, AND GMRGND(0)=TERM THAT HAS BEEN
; ADDED TO PLAN, UPDATE THE LIST XREF FOR GMRGND(0)'S PARENT
PRMCHK ;
DL0 ;
ST0
ST1
ST2
ALIST(IEN,PAR,CHIL) ; GIVEN THE 124.3 IEN (IEN), PARENT (PAR), AND CHILD
; (CHIL), THIS FUNCTION WILL RETURN TRUE(1)/FALSE(0) IF THIS CHILD IS
; PART OF "ALIST" XREF FOR THIS PARENT.
DLLST ; GIVEN THAT GMRGND=ENTRY IN 124.3, AND GMRGND(0)=TERM THAT HAS BEEN
; DELETED FROM PLAN, UPDATE THE LIST XREF FOR GMRGND(0)'S PARENT(S)
PARDL ;
FNDPRM ; FIND PRIME DOCUMENT(S) FOR THE TERM IN NODE GMRGND RETURNED IS
; IS GMRGPRM(IEN) WITH ALL PRIME DOCUMENTS FOR THIS TERM

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^GMR(124.3 - [#124.3] STAT+7, STLST+2, PARST+3, PARST+5*, ST1*, PARDL+2, DL0+2*, ALIST+5
^GMRD(124.2 - [#124.2] FNDPRM+3, PRMCHK+1, STLST+2, DLLST+2, ALIST+4
^GMRD(124.25 - [#124.25] PRMCHK+1

Label References

Name Line Occurrences
DL0 PARDL+2
FNDPRM PRMCHK+3
PARDL DLLST+2
PARST STLST+2
PRMCHK FNDPRM+3
ST0 PARST+4
ST1 ST2+1
ST2 ST0

Naked Globals

Name Field # of Occurrence
^( STAT+7, STLST+2*
^(0 PRMCHK+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CHIL ALIST~, ALIST+5
FXN ALIST+3~*, ALIST+4*, ALIST+5*, ALIST+6
>> GMRG(0 STLST+2
>> GMRGCYC FNDPRM+3*
>> GMRGCYC( FNDPRM+3, FNDPRM+4!, PRMCHK+3*
>> GMRGCYC(0 FNDPRM+3
GMRGND FNDPRM+3, FNDPRM+4!, PRMCHK+3~*, STLST+2, STLST+3!, PARST+3, PARST+5, ST1, DLLST+3!, PARDL+2
, DL0+2
GMRGND("C" PRMCHK+1*
GMRGND("CI" PRMCHK+1*, PRMCHK+2
GMRGND("L" PARST+1!, PARST+2*, PARST+3*, PARST+5, ST0, ST2*, ST2+1, ST1, PARDL+2*, DL0+1*
, DL0+2
GMRGND("O" PARST+2*, PARST+3*, PARST+4, PARST+5, ST1*, PARDL+1*
GMRGND(0 STLST+2, PARST+3, PARST+5, ST2+1, ST1, DLLST+2, PARDL+2, DL0+1
GMRGND(1 FNDPRM+2*, FNDPRM+3*, STLST+2*, PARST+3, PARST+5, ST1, DLLST+2*, PARDL+2, DL0+2
GMRGND(2 FNDPRM+3*, PRMCHK+1, PRMCHK+2, PRMCHK+3, PARST+3*, ST0*, ST2, ST2+1, ST1, PARDL+2*
, DL0+2
>> GMRGPRM( PRMCHK+2*
>> GMRGRT STLST+2
GMRGST STAT+5, STAT+7, STAT+9!
GMRGST("DT" STAT+7*, STAT+8
GMRGST("MOD" STAT+7*, STAT+8
GMRGST(0 STAT+7*, STAT+8
GMRGST(1 STAT+7
GMRGST(2 STAT+5*, STAT+6*, STAT+7
>> GMRGSTAT STAT+8*
GMRGTMP FNDPRM+4!, PRMCHK+3*
IEN ALIST~, ALIST+5
PAR ALIST~, ALIST+4, ALIST+5
U ST2+1, ST1
X ALIST+3~, ALIST+5*
>> Y ALIST+4*
Info |  Source |  Caller Graph |  Entry Points |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All