Routine: GMPL

Package	Total	Call Graph
Problem List	5	(ADD,DELETE,NEWNOTE,STATUS,VERIFY)^GMPL1 $$SUREDEL^GMPLEDT2 (BUILD,HDR)^GMPLMGR ($$LOCKED,$$MSG,$$PROBTEXT,$$SEL,$$SEL1,KILL)^GMPLX ($$CKDEAD,$$CLINIC)^GMPLX1
List Manager	2	EN^VALM FULL^VALM1
Toolkit	1	$$GET^XPAR

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 12

Package	Total	Caller Graph
Problem List	11	GMPL ANNOTATE GMPL CLINICAL USER GMPL DATA ENTRY GMPL DELETE GMPL DETAILED DISPLAY GMPL EDIT PROBLEM GMPL INACTIVATE GMPL NEW PROBLEM GMPL OE DATA ENTRY GMPL OE PROBLEM LIST GMPL VERIFY
Kernel	1	^ORD(101

Entry Points

Name	Comments	DBIA/ICR reference
EN	; -- main entry point for GMPL PROBLEM LIST
DE	; -- main entry point for GMPL DATA ENTRY
ADD	; -- add a new problem
ADD1
ADDQ
STATUS	; -- inactivate a problem
STQ
NOTES	; -- annotate a problem
NTQ
EDIT	; -- edit allowable fields of a problem
EDQ
DELETE	; -- delete a problem
DELQ
VERIFY	; -- verify a problem
VERQ
EXPAND	; -- detailed display of a problem
EXPQ

External References

Name	Field # of Occurrence
ADD^GMPL1	ADD+9
DELETE^GMPL1	DELETE+8
NEWNOTE^GMPL1	NOTES+6
STATUS^GMPL1	STATUS+10
VERIFY^GMPL1	VERIFY+7
$$SUREDEL^GMPLEDT2	DELETE+3
BUILD^GMPLMGR	ADD1+3, STATUS+13, NOTES+8, EDIT+9, DELETE+10, VERIFY+8
HDR^GMPLMGR	ADD1+3, STATUS+13, EDIT+9, DELETE+10
$$LOCKED^GMPLX	STATUS+9, NOTES+5, EDIT+7, DELETE+7
$$MSG^GMPLX	ADDQ, STQ, NTQ, EDQ, DELQ, VERQ, EXPQ
$$PROBTEXT^GMPLX	STATUS+7, STATUS+8, NOTES+4, EDIT+6, DELETE+6
$$SEL^GMPLX	STATUS+3, DELETE+2, VERIFY+3, EXPAND+2
$$SEL1^GMPLX	NOTES+2, EDIT+2
KILL^GMPLX	ADDQ, STQ, NTQ, EDQ, DELQ, VERQ, EXPQ
$$CKDEAD^GMPLX1	ADD+2
$$CLINIC^GMPLX1	ADD+3
EN^VALM	EN+2, DE+2, ADD+8, EDIT+8, EXPAND+4
FULL^VALM1	ADD+9
$$GET^XPAR	ADD+4, ADD+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: ADD+9
Function Call: WRITE	Prompt: !!!,">>> Please enter another problem, or press <return> to exit." Line Location: ADD+9
Function Call: WRITE	Prompt: $C(7),!!,"Currently displayed problems are already inactive!",! Line Location: STATUS+2
Function Call: WRITE	Prompt: !!,$$PROBTEXT^GMPLX(GMPIFN),!,"is already inactive!",! Line Location: STATUS+7
Function Call: WRITE	Prompt: !!,$$PROBTEXT^GMPLX(GMPIFN),!,"has been removed from this patient's problem list!",! Line Location: STATUS+8
Function Call: WRITE	Prompt: $C(7),!!,$$LOCKED^GMPLX,! Line Location: STATUS+9
Function Call: WRITE	Prompt: !!,$$PROBTEXT^GMPLX(GMPIFN),!,"has been removed from this patient's problem list!",! Line Location: NOTES+4
Function Call: WRITE	Prompt: $C(7),!!,$$LOCKED^GMPLX,! Line Location: NOTES+5
Function Call: WRITE	Prompt: !!,$$PROBTEXT^GMPLX(GMPIFN),!,"has an inactive ICD code.",! Line Location: EDIT+5
Function Call: WRITE	Prompt: !!,$$PROBTEXT^GMPLX(GMPIFN),!,"has been removed from this patient's problem list!",! Line Location: EDIT+6
Function Call: WRITE	Prompt: $C(7),!!,$$LOCKED^GMPLX,! Line Location: EDIT+7
Function Call: WRITE	Prompt: !!,$$PROBTEXT^GMPLX(GMPIFN),!,"has already been removed from this patient's problem list!",! Line Location: DELETE+6
Function Call: WRITE	Prompt: $C(7),!!,$$LOCKED^GMPLX,! Line Location: DELETE+7
Function Call: WRITE	Prompt: !!,"Select the problem(s) you wish to verify as correct." Line Location: VERIFY+2
Routine Call	VALM Line Location: EN+2 DE+2 ADD+8 EDIT+8 EXPAND+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPROB - [#9000011]	STATUS+7, STATUS+8, STATUS+9, STATUS+10, NOTES+4, NOTES+5, NOTES+9, EDIT+6, EDIT+7, EDIT+10 , DELETE+6, DELETE+7, DELETE+8
^GMPL(125 - [#125]	ADD+7
^TMP("GMPLIDX"	STATUS+6, NOTES+3, EDIT+3, DELETE+5, VERIFY+6

Label References

Name	Line Occurrences
ADD1	ADD+6
ADDQ	ADD+2, ADD+3
DELQ	DELETE+1, DELETE+2, DELETE+3
EDQ	EDIT+1, EDIT+2, EDIT+3, EDIT+6, EDIT+7
EXPQ	EXPAND+2
NTQ	NOTES+1, NOTES+2, NOTES+3, NOTES+4, NOTES+5
STQ	STATUS+1, STATUS+2, STATUS+3
VERQ	VERIFY+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DTOUT	ADD+9!
DUOUT	ADD+9!
DUZ	ADD+4
>> GMPARAM("REV"	ADD1+2
>> GMPCLIN	ADD+1, ADD+3, ADD+5
>> GMPCOUNT	STATUS+1, NOTES+1, EDIT+1, DELETE+1, VERIFY+1, EXPAND+1
>> GMPDFN	ADD+2
>> GMPI	STATUS+5, DELETE+4, VERIFY+5, EXPAND+3
>> GMPIFN	STATUS+6, STATUS+7, STATUS+8, STATUS+9, STATUS+10, NOTES+3, NOTES+4, NOTES+5, NOTES+9, EDIT+3* , EDIT+6, EDIT+7, EDIT+10, DELETE+5, DELETE+6, DELETE+7, DELETE+8, VERIFY+6, VERIFY+7
>> GMPLIST	ADD1+3, STATUS+13, NOTES+8, EDIT+9, DELETE+10, VERIFY+8
>> GMPLNO	STATUS+4, STATUS+5, DELETE+3, DELETE+4, VERIFY+4, VERIFY+5, EXPAND+3
>> GMPLNUM	STATUS+5, STATUS+6, NOTES+2, NOTES+3, EDIT+2, EDIT+3, DELETE+4, DELETE+5, VERIFY+5*, VERIFY+6
>> GMPLSEL	STATUS+3, STATUS+4, STATUS+5, DELETE+2, DELETE+3, DELETE+4, VERIFY+3, VERIFY+4, VERIFY+5, EXPAND+2 , EXPAND+3
>> GMPLSLST	ADD+4, ADD+5, ADD+6, ADD+7*
GMPLUSER	EN+1*, DE+1!
>> GMPLVIEW("ACT"	STATUS+2
>> GMPLVIEW("VIEW"	ADD+3
>> GMPQUIT	ADD+9, STATUS+5, DELETE+4
GMPREBLD	ADD+1!, ADD+9*, ADD1
>> GMPRINT	ADD1+1, STATUS+12, NOTES+7, EDIT+9, DELETE+10*
GMPSAVED	ADD+9!, STATUS+11, NOTES+6, EDIT+9, DELETE+9, VERIFY+8
IOF	ADD+9
U	ADD+2, ADD+7, STATUS+6, STATUS+7, STATUS+8, NOTES+3, NOTES+4, EDIT+3, EDIT+6, DELETE+5 , DELETE+6, VERIFY+6
>> VALMBCK	ADD+1, ADD+10, ADD1+1, ADDQ, STATUS+1, STATUS+12, STQ, NOTES+1, NOTES+7, NTQ , EDIT+1, EDIT+10, EDQ, DELETE+1, DELETE+10, DELQ, VERIFY+1, VERIFY+8, VERQ, EXPAND+1 , EXPAND+5, EXPQ
>> VALMBG	ADD1+2*
>> VALMCC	ADDQ, STQ, NTQ, EDQ, DELQ, VERQ, EXPQ
>> VALMCNT	ADD1+2
>> VALMSG	ADDQ, STQ, NTQ, EDQ, DELQ, VERQ, EXPQ*

Customize PDF page

Package: Problem List

Routine: GMPL

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 12

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: