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 | Interaction Calls | Label References | Local Variables | All

Print Page as PDF

Routine: GMRYDIR

Package: General Medical Record - IO

Routine: GMRYDIR

Information

GMRYDIR ;HIRNFO/YH-REPLACE...WITH ;12/14/95

Source Information

Source file <GMRYDIR.m>

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
General Medical Record - IO	2	GMRYUT10 GMRYUT12

Entry Points

Name	Comments	DBIA/ICR reference
A
Q
C
B
H
RW(STRING,LEN)	; Replace...With...
E2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,STRING,! Line Location: RW+1
Function Call: READ	Timeout: DTIME Variable: X Line Location: A+0
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: A+4
Function Call: READ	Timeout: DTIME Variable: X Line Location: H+0
Function Call: WRITE	Prompt: $C(7),$S($L(Y)-L'>LEN:" String too long by "_($L(Y)-L+$L(X)-LEN)_" character(s)",X'=U:" String too long! '^' to quit",1:" ??") Line Location: H+1
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: H+2
Function Call: WRITE	Prompt: !,"Entry must be lesser than "_LEN_" characters",! Line Location: C+0
Function Call: WRITE	Prompt: !?3 Line Location: B+0
Function Call: WRITE	Prompt: X Line Location: B+0

Label References

Name	Line Occurrences
A	A+2, A+3, A+4, E2, C
C	A+1
E2	A+1
H	A+2, A+3, H+1, H+2, E2
Q	A, A+1, A+2, A+3, E2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	RW+1~, A+2, A+3, H, H+1, E2
>> D	A+2, A+3
>> DH	A+3*
DTIME	RW+1*, A, H
>> GMROUT	A, A+2, A+3, H, E2, B, Q
L	RW+1~, A+2, A+3, H+1, E2*
LEN	RW~, H+1, C
STRING	RW~, RW+1, B
U	A+1, H+1
X	RW+1~, A, A+1, A+2, A+3, H, H+1, H+2, E2, B
Y	RW+1~, A+1, A+2, A+3, H+1, E2, B, Q

Info | Source | Caller Graph | Entry Points | Interaction Calls | Label References | Local Variables | All