Routine: GMPLMGR

Call Graph Total: 9

Package	Total	Call Graph
Problem List	4	GETPLIST^GMPLMGR1 BLDPROB^GMPLMGR2 ($$CODESTS,$$EXTDT,$$MSG,$$PROBTEXT,WRAP)^GMPLX ($$NAME,$$PAT,$$REQPROV,$$SERV,$$VIEW,VADPT)^GMPLX1
Registration	3	CHGCAP^VALM $$SETFLD^VALM1 (CLEAN,CNTRL)^VALM10
DRG Grouper	1	$$ICDDX^ICDCODE
Kernel	1	(T0,T1)^%ZOSV

Package	Total	Caller Graph
Problem List	4	GMPL GMPLCODE GMPLMGR1 GMPLMGR2

Package

Total

Caller Graph

Problem List

GMPL GMPLCODE GMPLMGR1 GMPLMGR2

Name	Comments	DBIA/ICR reference
HELP	; -- help code
BUILD(PLIST)	; -- build list array
BLDPROB(IFN)	; Add problem line
IN1
INIT	; -- init variables, list array
BLD2
BLD1
HDR	; -- header code

External References

Name	Field # of Occurrence
T0^%ZOSV	BUILD+2
T1^%ZOSV	BUILD+5
GETPLIST^GMPLMGR1	IN1+5
BLDPROB^GMPLMGR2	BUILD+3
$$CODESTS^GMPLX	BLD1+11
$$EXTDT^GMPLX	BLDPROB+5, BLDPROB+7, BLDPROB+8
$$MSG^GMPLX	IN1+7, HELP+12
$$PROBTEXT^GMPLX	BLDPROB+6
WRAP^GMPLX	BLDPROB+9
$$NAME^GMPLX1	BLDPROB+10
$$PAT^GMPLX1	INIT+1
$$REQPROV^GMPLX1	INIT+2
$$SERV^GMPLX1	BLDPROB+10
$$VIEW^GMPLX1	IN1+3
VADPT^GMPLX1	IN1+1
$$ICDDX^ICDCODE	BLDPROB+3
CHGCAP^VALM	IN1+6
$$SETFLD^VALM1	BLD1+1, BLD1+3, BLD1+4, BLD1+5, BLD1+6, BLD2+1
CLEAN^VALM10	BUILD+1
CNTRL^VALM10	BLD1+9, BLD1+11

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?4,"To update the problem list first select from Add, Remove, Edit," Line Location: HELP+2
Function Call: WRITE	Prompt: !?4 Line Location: HELP+3
Function Call: WRITE	Prompt: "Verify, " Condition for execution: GMPARAM("VER") Line Location: HELP+3
Function Call: WRITE	Prompt: "Inactivate, or Comment, then enter the problem number(s)." Line Location: HELP+4
Function Call: WRITE	Prompt: !?4,"If you need more information on a problem, select Detailed" Line Location: HELP+5
Function Call: WRITE	Prompt: !?4,"Display; to change whether all or only selected problems for this" Line Location: HELP+6
Function Call: WRITE	Prompt: !?4,"patient are listed, choose Select View. Enter ?? to see more" Line Location: HELP+7
Function Call: WRITE	Prompt: !?4,"actions for facilitating navigation of the list." Line Location: HELP+8
Function Call: WRITE	Prompt: !?4,"Problem statuses: *-Acute I-Inactive #-Inactive ICD Code" Line Location: HELP+9
Function Call: WRITE	Prompt: !!,"Press <return> to continue ... " Line Location: HELP+11
Routine Call	VALM Line Location: IN1+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPROB - [#9000011]	BLDPROB+2, BLD2+7, BLD2+8, BLD2+9
^GMPL(125.99 - [#125.99]	IN1+4
^SC - [#44]	BLDPROB+11
^TMP("GMPL"	BUILD+4, BUILD+6, BLD1+7, BLD1+9, BLD1+11, BLD2+2, BLD2+3, BLD2+10, BLD2+11*
^TMP("GMPLIDX"	BUILD+1!, BLD1+8*

Name	Line Occurrences
BLDPROB	BUILD+3
BUILD	IN1+5

Name	Field # of Occurrence
^(1	BLDPROB+2
^(800	BLDPROB+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACTIVE	BLDPROB+1~, BLDPROB+5, BLDPROB+7, BLDPROB+8, BLD1+2, BLD1+3
DATE	BLDPROB+1~, BLDPROB+5*, BLD1+5
DELETED	BLDPROB+1~, BLDPROB+4*, BLDPROB+6, BLDPROB+7, BLDPROB+8, BLD1+9, BLD1+12
DT	BLD1+11
DTIME	HELP+11
DUZ	IN1+3
DUZ("AG"	IN1
DUZ(2	IN1
FAC	BLDPROB+1~, BLD2+7*, BLD2+8, BLD2+9
FNM	HDR+1~, HDR+9*
>> GMPAGTOR	IN1+1*
>> GMPARAM("CLU"	IN1+4*
>> GMPARAM("PRT"	IN1+4*
>> GMPARAM("REV"	IN1+4*
>> GMPARAM("VER"	IN1+4*, BLD1+9, HELP+3, HELP+10
>> GMPCOUNT	BUILD+1, BUILD+4, BUILD+6, BLD1, BLD1+1, BLD1+7, BLD1+8, BLD2+3, BLD2+10, HDR+3
GMPDFN	INIT+1*!, INIT+2!, IN1+1, HDR+2
>> GMPGULF	IN1+1*
>> GMPION	IN1+1*
GMPL0	BLDPROB+1~, BLDPROB+2*, BLDPROB+3, BLDPROB+5, BLDPROB+7
GMPL1	BLDPROB+1~, BLDPROB+2*, BLDPROB+4, BLDPROB+8, BLDPROB+10, BLDPROB+11, BLD1+2, BLD1+9
GMPL800	BLDPROB+1~, BLDPROB+2*, BLDPROB+3
>> GMPLIST	IN1+5
>> GMPLUSER	BUILD+3
>> GMPLVIEW	IN1+5
>> GMPLVIEW("ACT"	IN1+2*, HDR+4, HDR+6
>> GMPLVIEW("PROV"	IN1+2*, HDR+9
>> GMPLVIEW("VIEW"	IN1+3*, IN1+6, BLDPROB+10, HDR+7
GMPROV	INIT+2*!
>> GMPSC	IN1+1*
>> GMPTOTAL	IN1+5, HDR+3
>> GMPVA	IN1*, IN1+1
>> GMPVAMC	IN1*
HDR	HDR+1~, HDR+6, HDR+7, HDR+8, HDR+9, HDR+10
I	BUILD+1~, BUILD+3, BLDPROB+1~, BLD2*, BLD2+1
ICD	BLDPROB+1~, BLDPROB+3*
IFN	BLDPROB~, BLDPROB+2, BLDPROB+6, BLD1+8, BLD1+11, BLD2+7, BLD2+8, BLD2+9
>> IOINHI	BLD1+9, BLD1+11
>> IOINORM	BLD1+9, BLD1+11
LINE	BLDPROB+1~, BLD1+1, BLD1+3, BLD1+4, BLD1+5, BLD1+6, BLD1+7, BLD1+9, BLD1+11, BLD2+1 , BLD2+2
LNM	HDR+1~, HDR+9*
NAME	BLDPROB+1~, BLDPROB+10, BLDPROB+11, BLD1+6
NIFN	BLDPROB+1~, BLD2+8*, BLD2+9
NOTE	BLDPROB+1~, BLD2+9*, BLD2+11
NUM	HDR+1~, HDR+3, HDR+4, HDR+5
PAT	HDR+1~, HDR+2*, HDR+5
PLIST	BUILD~
PLIST(	BUILD+3
PROBLEM	BLDPROB+1~, BLDPROB+6, BLDPROB+7, BLDPROB+8*, BLDPROB+9
SCTC	BLDPROB+1~, BLDPROB+3*
TEXT	BLDPROB+1~, BLDPROB+9, BLD2
TEXT(	BLD2+1
TEXT(1	BLD1+4
U	IN1+4, BUILD+4, BLDPROB+3, BLDPROB+4, BLDPROB+5, BLDPROB+7, BLDPROB+8, BLDPROB+10, BLDPROB+11, BLD1+2 , BLD1+8, BLD1+9, BLD2+9, HDR+2, HDR+9
>> VALMBCK	HELP+12*
>> VALMCC	HELP+12
>> VALMCNT	BUILD+1, BUILD+4, BLD1+6, BLD1+7, BLD1+8, BLD1+9, BLD1+11, BLD2+2, BLD2+3, BLD2+10 , BLD2+11
>> VALMHDR(1	HDR+5*
>> VALMHDR(2	HDR+10*
>> VALMQUIT	INIT+1, INIT+2
>> VALMSG	IN1+7, HELP+12
X	IN1+4!, HELP+1~, HELP+11
>> XRT0	BUILD+5
>> XRTL	BUILD+2
>> XRTN	BUILD+5*

Customize PDF page

Package: Problem List

Routine: GMPLMGR

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items