Routine: GMRGEDA

Package	Total	Call Graph
VA Fileman	1	IX^DIC

Package

Total

Call Graph

IX^DIC

Name	Comments	DBIA/ICR reference
RECPAT	;
SELPAT	;
KEEP
JUMP	;
CHC	;
LPTH	;
PICK
PATH	; CALCULATE ALL PATHS
SETSLP	;

Name	Field # of Occurrence
IX^DIC	JUMP+1

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Variable: X Line Location: JUMP+2
Function Call: WRITE	Prompt: !!,"Because '",$P(Y(0),"^"),"' is not part of the",!,"patient data, it must be ""linked"" in via a pathway.",!,"The following list will be a list of pathways to choose from.",!,"To continue with this jump, you must pick a pathway." Line Location: JUMP+4
Function Call: READ	Timeout: DTIME Variable: X Line Location: JUMP+5
Function Call: WRITE	Prompt: !!,"...Excuse me while I perform some necessary calculations..." Line Location: JUMP+6
Function Call: READ	Timeout: DTIME Variable: X Line Location: JUMP+7
Function Call: WRITE	Prompt: !,$J(GMRGLIST,3),". ",$S($D(^GMRD(124.2,+GMRG0(1),0)):$P(^(0),"^"),1:"") Line Location: SELPAT+4
Function Call: WRITE	Prompt: !?(GMRG0(2)+2*2+1),$S($D(^GMRD(124.2,+$P(GMRG0(0),"^",GMRG0(2)),0)):$P(^(0),"^"),1:"") Line Location: SELPAT+4
Function Call: READ	Timeout: DTIME Variable: X Line Location: PICK+0
Function Call: WRITE	Prompt: @IOF Condition for execution: X="" Line Location: PICK+0
Function Call: WRITE	Prompt: !?4,$C(7),"ENTER A VALID NUMBER BETWEEN 1 AND ",GMRGLIST Line Location: PICK+2
Function Call: WRITE	Prompt: !!! Line Location: CHC+1
Function Call: WRITE	Prompt: ?15,$S($D(^GMRD(124.2,+Z,0)):$P(^(0),"^"),1:""),! Line Location: CHC+3
Function Call: WRITE	Prompt: !,"The term you wish to jump to can be reached from multiple paths.",!,"Please choose the number (1-"_GMRGLIST_") of the corresponding path you wish to use: " Line Location: CHC+5
Function Call: READ	Timeout: DTIME Variable: X Line Location: CHC+6
Function Call: WRITE	Prompt: !?3,$C(7),"PLEASE CHOOSE A NUMBER BETWEEN 1 AND ",GMRGLIST Line Location: CHC+6
Routine Call	DIC Line Location: JUMP+1

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

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("XY"	JUMP+1
^GMR(124.3 - [#124.3]	JUMP+3, RECPAT+1, SETSLP+2
^GMRD(124.2 - [#124.2]	PATH+1, SELPAT+4, SETSLP+2, CHC+2, CHC+3
^TMP($J	JUMP+8, JUMP+9, KEEP!, RECPAT+1, LPTH+1, SELPAT+1, SELPAT+3!, PICK+1

Name	Line Occurrences
CHC	SETSLP+4, CHC+6
KEEP	JUMP+3, JUMP+7
LPTH	JUMP+8
PATH	JUMP+6, RECPAT+3
PICK	JUMP+9, SELPAT+2, PICK+3
RECPAT	PATH+1
SELPAT	LPTH+1
SETSLP	JUMP+3

Name	Field # of Occurrence
^(	JUMP+9, PATH+1, SELPAT+1, SETSLP+2, CHC+3
^(0	SELPAT+4, CHC+2, CHC+3

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> D	JUMP+1*
DIC	JUMP+1*!
DIC("S"	JUMP+1*
DIC(0	JUMP+1*
DTIME	JUMP+2, JUMP+5, JUMP+7, PICK, CHC+6
>> DTOUT	JUMP+2
>> DUOUT	JUMP+2
>> DX	JUMP+1*
>> DY	JUMP+1*
>> GMRG0	JUMP+6, PATH+1, PATH+2, RECPAT+2, LPTH+1, SELPAT+1, SELPAT+3
>> GMRG0(	PATH+1, PATH+2, RECPAT+2*
>> GMRG0(0	JUMP+6, SELPAT+1, SELPAT+2, SELPAT+3, SELPAT+4
>> GMRG0(1	LPTH+1*, SELPAT+1, SELPAT+3, SELPAT+4
>> GMRG0(2	SELPAT+4*
>> GMRG1	JUMP+8, PATH+1, PATH+2*, RECPAT+1, RECPAT+2, LPTH+1, SELPAT+1, SELPAT+3
>> GMRG3	JUMP+9, PICK*
>> GMRGLIST	JUMP+8, SELPAT+3, SELPAT+4, PICK, PICK+2, SETSLP+2, SETSLP+3, SETSLP+4, SETSLP+5, SETSLP+6 , CHC+5, CHC+6, CHC+7
>> GMRGLIST(	SETSLP+2*, CHC+2, CHC+7
>> GMRGLIST(1	SETSLP+5
>> GMRGOUT	JUMP+2, JUMP+5, JUMP+7, JUMP+8, JUMP+9, KEEP, LPTH+1, SELPAT+2, PICK, SETSLP+4 , CHC+6
GMRGPATH	JUMP+6!, JUMP+7, RECPAT+1
GMRGPATH(0	JUMP+6, PATH+2, RECPAT+1, RECPAT+2*
>> GMRGPDA	JUMP+3, RECPAT+1, SETSLP+2
>> GMRGRT	RECPAT+1, SETSLP+1
>> GMRGS	JUMP+1
>> GMRGSELP	JUMP+6, JUMP+8, JUMP+9, KEEP, LPTH+1, SELPAT+2, PICK+1, SETSLP+1, SETSLP+3, SETSLP+4 , SETSLP+6*
>> GMRGUSL(	KEEP*
IOF	JUMP+8, PICK
IOM	JUMP+1
IOSL	SELPAT+2
>> X	JUMP+1, JUMP+2, JUMP+5, JUMP+7, PICK, PICK+1, SETSLP+2, CHC+2, CHC+6, CHC+7
>> Y	JUMP+2, JUMP+3, JUMP+6, KEEP, SETSLP+1, SETSLP+2, SETSLP+6
>> Y(0	JUMP+4
>> Z	CHC+2*, CHC+3

Customize PDF page

Package: General Medical Record - Generator

Routine: GMRGEDA

Information

Source Information

Call Graph

Call Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: