Routine: GMPL

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

Package

Total

Call Graph

(ADD,DELETE,NEWNOTE,STATUS,VERIFY)^GMPL1 $$SUREDEL^GMPLEDT2 (BUILD,HDR)^GMPLMGR ($$CODESTS,$$LOCKED,$$MSG,$$PROBTEXT,$$SEL,$$SEL1,KILL)^GMPLX ($$CKDEAD,$$CLINIC)^GMPLX1

Registration

EN^VALM FULL^VALM1

Package	Total	Caller Graph
Problem List	2	GMPL CLINICAL USER GMPL DATA ENTRY

Package

Total

Caller Graph

Problem List

GMPL CLINICAL USER GMPL DATA ENTRY

Entry Points

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

External References

Name	Field # of Occurrence
ADD^GMPL1	ADD+9
DELETE^GMPL1	DELETE+8
NEWNOTE^GMPL1	NOTES+8
STATUS^GMPL1	STATUS+10
VERIFY^GMPL1	VERIFY+7
$$SUREDEL^GMPLEDT2	DELETE+3
BUILD^GMPLMGR	ADD1+3, STATUS+13, NOTES+10, EDIT+9, DELETE+10, VERIFY+8
HDR^GMPLMGR	ADD1+3, STATUS+13, EDIT+9, DELETE+10
$$CODESTS^GMPLX	NOTES+6
$$LOCKED^GMPLX	STATUS+9, NOTES+7, EDIT+7, DELETE+7
$$MSG^GMPLX	ADDQ, STQ, NTQ, EDQ, DELQ, VERQ, EXPQ
$$PROBTEXT^GMPLX	STATUS+7, STATUS+8, NOTES+4, NOTES+6, 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

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: !!,$$PROBTEXT^GMPLX(GMPIFN),!,"has an inactive ICD9 code. Edit the problem before adding comments.",! Line Location: NOTES+6
Function Call: WRITE	Prompt: $C(7),!!,$$LOCKED^GMPLX,! Line Location: NOTES+7
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+7, NOTES+11, EDIT+6, EDIT+7, EDIT+10 , DELETE+6, DELETE+7, DELETE+8
^GMPL(125 - [#125]	ADD+5, ADD+7
^TMP("GMPLIDX"	STATUS+6, NOTES+3, EDIT+3, DELETE+5, VERIFY+6
^VA(200 - [#200]	ADD+4

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+6, NOTES+7
STQ	STATUS+1, STATUS+2, STATUS+3
VERQ	VERIFY+3

Name	Field # of Occurrence
^(	ADD+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DT	NOTES+6
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+6, NOTES+7, NOTES+11 , 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+10, 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+9, EDIT+9, DELETE+10*
GMPSAVED	ADD+9!, STATUS+11, NOTES+8, EDIT+9, DELETE+9, VERIFY+8
IOF	ADD+9
U	ADD+2, ADD+4, 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+9, 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: 7