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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: GMRGED7

Package: General Medical Record - Generator

Routine: GMRGED7


Information

GMRGED7 ;HIRMFO/RM-PATIENT DATA EDIT (cont.) ;1/9/96

Source Information

Source file <GMRGED7.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
General Medical Record - Generator 2 ADS^GMRGED6  EN1^GMRGUTL  
VA Fileman 1 ^DIK  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
General Medical Record - Generator 2 GMRGED0  GMRGED2  

Entry Points

Name Comments DBIA/ICR reference
CHMIN ; CALL NMIN RECURSIVELY FOR THE CHILDREN ACTIVE IN THE PLAN
DELMIN ; DELETE THIS ENTRY FROM THE PLAN
OTHPAR(IEN,CHIL,PAR) ; Given the IEN of 124.3 entry (IEN) and Aggregate
; Term file pointers for the Child (CHIL) and Parent (PARN), this
; function will return True (1) if CHIL has another parent'=PARN
; that it is active for in IEN, else the function returns False (0).
BEGADD ; IF THE RECORD WHICH IS ABOUT TO BE EDITED HAS ANY ADDED FLAGS
; WHICH INDICATED NO THEN THESE FLAGS WILL BE FLIPPED TO INDICATE YES
DMIN ;
APM ;
ADM ;
NMIN ; LOOP THROUGH CHILDREN (TO DELETE IF NECESSARY) AND DELETE THE
; TERM ID'D BY GMRGDLT("P") IF NECESSARY.
NOTMIN ; IF THE MINIMUM NUMBER OF SELECTIONS IS NOT MADE FOR A FRAME
; THEN THAT FRAME AND ALL SELECTED CHILDREN WILL BE DELETED.

External References

Name Field # of Occurrence
^DIK DELMIN+3, DMIN+6
ADS^GMRGED6 BEGADD+2
EN1^GMRGUTL DELMIN+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMR(124.3 - [#124.3] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(124.31 ADM+1, ADM+2, APM+1, APM+2
^GMR(124.3 - [#124.3] NMIN+9, CHMIN+2, DELMIN+1, DELMIN+2, DMIN+1, DMIN+2, DMIN+4, DMIN+5, ADM+1, ADM+2
, APM+1, APM+2, BEGADD+2, OTHPAR+5
^GMRD(124.2 - [#124.2] NMIN+9, BEGADD+2, OTHPAR+5

Label References

Name Line Occurrences
$$OTHPAR NMIN+9, NMIN+10
ADM DMIN+4
APM DMIN+5
CHMIN NMIN+9
DELMIN NMIN+10
DMIN DELMIN+2
NMIN CHMIN+3

Naked Globals

Name Field # of Occurrence
^("ADD" DMIN+4, ADM+1
^(0 DMIN+2, DMIN+5, APM+1, BEGADD+2
^(1 ADM+2, APM+2
^(2 ADM+1, APM+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CHIL OTHPAR~, OTHPAR+5
>> DA DELMIN+3*, DELMIN+4*, DMIN+1*, DMIN+2, DMIN+4, DMIN+5, ADM+1*, ADM+2, ADM+3*, APM+1*
, APM+2, APM+3*, BEGADD+2*
>> DA(1 DELMIN+3*, DELMIN+4*, DMIN+3*, DMIN+4, DMIN+5, ADM+1*, ADM+2, ADM+3*, APM+1*, APM+2
, APM+3*, BEGADD+2*
>> DA(2 DMIN+3*, DMIN+4, DMIN+5, ADM+1!, ADM+3*, APM+1!, APM+3*
>> DIK DELMIN+3*, DMIN+6*
FXN OTHPAR+4~*, OTHPAR+5*, OTHPAR+6
>> GMRG1 DELMIN+2*, DMIN+1, ADM+1*, ADM+2, ADM+3, APM+1*, APM+2, APM+3
>> GMRG1(0 DMIN+1*, DMIN+2*, DMIN+3
>> GMRG1(1 DELMIN+2, DMIN+3*
>> GMRG2 ADM+1*, ADM+2*, APM+1*, APM+2*
GMRGDLT CHMIN+1~
GMRGDLT("C" NMIN+9*, CHMIN+1
GMRGDLT("G" NOTMIN+2*, NMIN+10, CHMIN+1*
GMRGDLT("P" NOTMIN+2*, NMIN+9, NMIN+10, CHMIN+1*, CHMIN+2
GMRGDLT("T" NOTMIN+2*, NMIN+10, CHMIN+2*, DELMIN+1, DELMIN+2, DELMIN+3, DELMIN+4, DMIN+1, DMIN+2, DMIN+3
GMRGDLT(0 DELMIN+1*, DELMIN+2, DELMIN+3, DELMIN+4
>> GMRGPDA NMIN+9, NMIN+10, CHMIN+2, DELMIN+1, DELMIN+2, DELMIN+3, DELMIN+4, DMIN+1, DMIN+2, DMIN+3
, BEGADD+2
>> GMRGRT NMIN+10
>> GMRGTDL CHMIN+1*, DELMIN+1*, DELMIN+2*, DELMIN+3
>> GMRGTDL(0 CHMIN+1*
>> GMRGTERM NOTMIN+2, BEGADD+2*
>> GMRGTERM(0 BEGADD+2*
>> GMRGY DELMIN+4*
IEN OTHPAR~, OTHPAR+5
PAR OTHPAR~, OTHPAR+5
X DELMIN+4*, ADM+1*, ADM+2*, APM+1*, APM+2*, OTHPAR+4~, OTHPAR+5*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All