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

Package: General Medical Record - Generator

Routine: GMRGTGIF


Information

GMRGTGIF ;HIRMFO/DDA,RM-TEXT GENERATOR PRIME DOCUMENT EDIT ;1/23/96

Source Information

Source file <GMRGTGIF.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
General Medical Record - Generator 3 INFOSET^GMRGTGI0  DISP^GMRGTGI1  EN1^GMRGTGI2  
Kernel 2 ^%ZIS  EN^XQH  
VA Fileman 1 ^DIC  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
General Medical Record - Generator 1 GMRGTGI2  
Nursing Service 1 NURCCPE  

Entry Points

Name Comments DBIA/ICR reference
A
Q3
CHADE ; CHOOSE DELETE/ADD/EDIT A SELECTION, OR EDIT THE ENTRY
Q
EN1 ; ENTRY TO ADD DATA TO AGGREGATE TERM FILE IF PACKAGE IS UNKNOWN
EN2 ; ENTRY TO MODIFY A PRIME DOCUMENT GMRGRT=PRIME DOC. (PTR TO 124.2),
; GMRGINFO AND GMRGINFO( WHICH CONTAINS THE FOLLOWING ELEMEMTS:
; GMRGINFO = AGGY ENTRY WHICH FOLLOWING INFO PERTAINS (PTR FILE 124.2)
; GMRGINFO("PACK")=PACKAGE (PTR TO FILE 9.4).
; GMRGINFO("TYPE")=$S(1:"DOCUMENT",2:"FRAME",3:"TERM"),
; GMRGINFO("LEAD"),GMRGINFO("TRAIL")= LEAD OR TRAIL TEXT 1-200 CHARS.
; GMRGINFO("TEXT")= TEXT OF TERM ^ NODE IDENTIFIER
; GMRGINFO("FORM")=$S("B":"BRIEF TABULAR","T":"TABULAR",S:"SENTENCE")
; GMRGINFO("CLAS")=CLASSIFICATION (PTR TO FILE 124.25) ^ CLASS. TEXT
; GMRGINFO("MAX"),GMRGINFO("MIN")= MIN OR MAX # OF SELECTABLE ITEMS
; GMRGINFO("ACTS"),GMRGINFO("ACTF") = SELECTION OR FILING ACTION
; GMRGINFO("SEL") = # OF CHILDREN FOR THIS ENTRY
; GMRGINFO("SEL",SELECTION #) = SELCTION IEN (ENTRY IN CHILD MULT) ^
; SELECTION PTR (PTR TO 124.2) ^ SELECTION TEXT
EN3 ; SELECT PACKAGE FOR WHICH ADDING TERMS
EN4 ; ENTRY TO ADD DATA IF PACKAGE AND PRIME DOCUMENT ARE BOTH KNOWN
; GMRGPK=PACKAGE REFERENCE GMRGRT=PRIME DOCUMENT IN AGG. TERM FILE
LP ;

External References

Name Field # of Occurrence
^%ZIS EN4+2
^DIC EN1+5
INFOSET^GMRGTGI0 EN4+2
DISP^GMRGTGI1 EN2+14
EN1^GMRGTGI2 CHADE+2
EN^XQH CHADE+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: EN1+2
Function Call: WRITE
  • Prompt: !!,"Enter appropriate action, or type a '?' to see what you can do: "
  • Line Location: CHADE+1
Function Call: WRITE
  • Prompt: !?3,$C(7),"Incorrect response, enter a '?' for more help."
  • Line Location: CHADE+3
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: EN3+1
Function Call: WRITE
  • Prompt: !?5,$C(7),"This is a reference for which to identify which package an aggregate",!?5,"term entry belongs. Answer must be 2-5 characters in length.",!!?5,"References already used include: "
  • Line Location: EN3+2
Function Call: WRITE
  • Prompt: !?18,X
  • Line Location: LP+1
Routine Call
  • DIC
  • Line Location:
    • EN1+5
Routine Call
  • %ZIS
  • Line Location:
    • EN4+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMRD(124.2 - [#124.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("XY" EN1+2
^GMRD(124.2 - [#124.2] EN4+2, Q, LP+1
^TMP($J Q!

Label References

Name Line Occurrences
A A
CHADE CHADE+5
EN1 EN1+7, EN3+3
EN2 A
EN3 EN3+2
EN4 EN1+6
LP EN3+2
Q EN1+6, A
Q3 EN3+1

Naked Globals

Name Field # of Occurrence
^(0 EN4+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% Q!
D0 Q!
DA Q!
DIC EN1+3*, EN1+5!, Q!
DIC("A" EN1+3*
DIC("DR" EN1+4*
DIC("S" EN1+3*
DIC(0 EN1+3*
DIE Q!
DIK Q!
DINUM Q!
DLAYGO EN1+3*, EN1+5!
DR Q!
DTIME CHADE+1, EN3+1
DTOUT Q!
>> DX EN1+2*
>> DY EN1+2*
GMRGANW Q!
GMRGDOL Q!
GMRGDUP Q!
GMRGINFO EN4+2*, Q!
GMRGL Q!
GMRGLEVL EN4+2*, Q!
GMRGLP Q3!, LP+1*
GMRGNOL Q!
GMRGNUP Q!
GMRGOK Q!
GMRGOUT EN1+6!, EN4+2*, A, EN2+14, CHADE+2*
GMRGPK EN1+1, EN4+2, EN3+3*, Q3!
GMRGR Q!
GMRGRT EN1+6*!, EN4+2
GMRGRT(0 EN4+2*
GMRGS Q!
GMRGSEL Q!
GMRGT Q!
GMRGU Q!
GMRGUP EN4+2*, A, Q!, CHADE+2*
GMRGW Q!
GMRGX Q!
GMRGXVER EN2+14!
GMRGY Q!
GMRGZ Q!
I Q!
>> IOP EN4+2*
>> X EN3+1*, EN3+2, EN3+3, LP+1*
XQH CHADE+4*!
>> Y EN1+6, CHADE+1*, CHADE+2, CHADE+3, CHADE+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All