Routine: GMPLDISP

Call Graph Total: 8

Package	Total	Call Graph
Problem List	3	DT^GMPLHIST ($$ICDDESC,$$SCTTEXT)^GMPLUTL2 ($$EXTDT,$$MSG,$$PAD,$$PROBTEXT,WRAP)^GMPLX
Kernel	2	($$FMTE,$$HTFM)^XLFDT $$REPEAT^XLFSTR
Registration	2	$$SETSTR^VALM1 (CLEAN,CNTRL)^VALM10
DRG Grouper	1	$$ICDDX^ICDCODE

Entry Points

Name	Comments	DBIA/ICR reference
EN	; Init Variables (need GMPLSEL,GMPLNO) and List Array
HDR	; Header Code (uses GMPDFN, GMPIFN)
ERROR	; Error Message - drop into EXIT
EXIT	; Exit Code
PR4	; Audit Trail
PR1	; Onset ; SC Condition ; Status ; Exposure ; Provider ; Service/Clinic
PR3	; Comments
PR2	; Recorded ; Entered ; Provider Narrative ; ICD code
PRQ	; Header Node
DEFLT()	; Default Action, using GMPI and GMPLNO
PROB	; Display problem GMPIFN
HELP	; Help Code

External References

Name	Field # of Occurrence
DT^GMPLHIST	PR4+6
$$ICDDESC^GMPLUTL2	PROB+10, PROB+29
$$SCTTEXT^GMPLUTL2	PROB+18
$$EXTDT^GMPLX	PR1+6, PR1+11, PR2+4, PR2+7, PR3+8
$$MSG^GMPLX	PRQ+1, HELP+7
$$PAD^GMPLX	PROB+30
$$PROBTEXT^GMPLX	PROB+9
WRAP^GMPLX	PROB+13, PROB+21, PROB+25
$$ICDDX^ICDCODE	PROB+8
$$SETSTR^VALM1	PR1+8, PR1+14, PR1+17, PR1+21
CLEAN^VALM10	PROB+3
CNTRL^VALM10	PR3+2, PR4+3
$$FMTE^XLFDT	HDR+3
$$HTFM^XLFDT	HDR+2
$$REPEAT^XLFSTR	HDR+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"There are no more problems that have been selected to view!",! Line Location: EN+3
Function Call: WRITE	Prompt: !!,"Retrieving current data for problem #"_GMPLNUM_" ...",! Line Location: EN+6
Function Call: WRITE	Prompt: !!?4,"You may view detailed information here on this problem;" Line Location: HELP+1
Function Call: WRITE	Prompt: !?4,"more data may be available by entering 'Next Screen'." Line Location: HELP+2
Function Call: WRITE	Prompt: !?4,"If you have selected multiple problems to view, you may" Line Location: HELP+3
Function Call: WRITE	Prompt: !?4,"enter 'Continue to Next Selected Problem'; to return to" Line Location: HELP+4
Function Call: WRITE	Prompt: !?4,"the patient's problem list, enter 'Quit to Problem List'." Line Location: HELP+5
Function Call: WRITE	Prompt: !!,"Press <return> to continue ... " Line Location: HELP+6
Function Call: WRITE	Prompt: !!,"ERROR -- Cannot continue ... Returning to Problem List.",! Line Location: ERROR+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPROB - [#9000011]	PROB+4, PROB+28, PROB+29, PR3+4, PR3+6, PR3+7, HDR+2
^DIC(49 - [#49]	PR1+18
^GMPL(125.8 - [#125.8]	PR4+4, PR4+5, PR4+6
^SC - [#44]	PR1+19
^TMP("GMPLIDX"	EN+5
^VA(200 - [#200]	PR1+15, PR2+5, PR2+8, PR3+10

Name	Line Occurrences
ERROR	EN+1, EN+4, EN+5, PROB+3
PR4	PR3+5
PRQ	PR4+4

Name	Field # of Occurrence
^(1	PROB+4
^(800	PROB+4
^(803	PROB+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AIFN	PROB+1~, PR4+6*
DA	PROB+28~*, PROB+29
DESCR	PROB+2~, PROB+25, PROB+26
DESCR(	PROB+26
DESCR(1	PROB+25
DT	PROB+5
DTIME	HELP+6
FAC	PROB+1~, PR3+4*, PR3+5, PR3+6, PR3+7
>> GMPARAM("VER"	PR2+9
>> GMPDFN	HDR+1
GMPDT	EXIT+1!
GMPDT(	PROB+14, PROB+16, PROB+17, PROB+21, PROB+22, PROB+23, PROB+25, PROB+26, PROB+30, PROB+31 , PR1+8, PR1+14, PR1+17, PR1+21, PR1+22, PR2+6, PR2+10, PR2+11, PR3+1, PR3+5 , PR3+9, PR3+10, PR3+11, PR4+1, PR4+2, PR4+4
GMPDT(0	PRQ+1*
>> GMPI	EN+2*, EN+4, DEFLT+1
>> GMPIFN	EN+5*, PROB+3, PROB+4, PROB+9, PROB+28, PROB+29, PR3+4, PR3+6, PR3+7, PR4+4 , PR4+5, PR4+6, HDR+2
GMPL0	PROB+1~, PROB+4*, PROB+5, PROB+8, PROB+10, PROB+18, PR1+6, PR1+9, PR2+7
GMPL1	PROB+1~, PROB+4*, PROB+5, PROB+6, PR1+7, PR1+10, PR1+11, PR1+15, PR1+18, PR1+19 , PR2+4, PR2+5, PR2+8, PR2+9
GMPL800	PROB+1~, PROB+4*, PROB+11
GMPL803	PROB+1~, PROB+4*, PROB+27
GMPLDT	PROB+1~, PROB+5*
>> GMPLNO	EN+1, EN+2, DEFLT+1
>> GMPLNUM	EN+4*, EN+5, EN+6
>> GMPLSEL	EN+1, EN+4
>> GMPLVIEW("VIEW"	PR1+18
>> GMPVA	PR1+7, PR1+13, PR1+16, PR1+20
I	PROB+1~, PROB+6, PROB+17
ICD	PROB+2~, PROB+8*, PROB+10, PROB+23
ICDDESC	PROB+2~, PROB+10*, PROB+23, PROB+25
ICDN	PROB+29~*, PROB+30
ICDNDX	PROB+29~*, PROB+30
IDT	PROB+1~, PR4+5*, PR4+6
>> IOUOFF	PR3+2, PR4+3
>> IOUON	PR3+2, PR4+3
J	PROB+1~, PROB+26*
L	PROB+1~, PROB+22*
LASTMOD	HDR+1~, HDR+2, HDR+3, HDR+4
LCNT	PROB+1~, PROB+4, PROB+14, PROB+16, PROB+17, PROB+21, PROB+22, PROB+23, PROB+25, PROB+26* , PROB+30, PROB+31, PR1+8, PR1+12, PR1+14, PR1+15, PR1+17, PR1+20, PR1+21, PR1+22* , PR2+6, PR2+8, PR2+10, PR2+11, PR3+1, PR3+2, PR3+5, PR3+9, PR3+10, PR3+11 , PR4+1, PR4+2, PR4+3, PR4+4*, PRQ+1
LINE	PROB+1~, PR1+6, PR1+8, PR1+9, PR1+10, PR1+11, PR1+14, PR1+15, PR1+17, PR1+18* , PR1+19, PR1+21, PR2+4, PR2+5, PR2+6, PR2+7, PR2+8, PR2+9, PR2+10, PR3+8 , PR3+9, PR3+10*
NIFN	PROB+2~, PR3+6*, PR3+7
NOTE	PROB+1~, PR3+7*, PR3+8, PR3+10, PR3+11
PAT	HDR+1~*, HDR+4
PNTXT	PROB+2~, PROB+12*, PROB+20
PROVNAR	PROB+2~, PROB+9*, PROB+12, PROB+13
SCTC	PROB+2~, PROB+11*, PROB+17, PROB+18, PROB+19
SCTD	PROB+2~, PROB+11*, PROB+17, PROB+19
SCTT	PROB+2~, PROB+18*, PROB+20, PROB+21
>> SCTTTXT	PROB+21, PROB+22
>> SCTTTXT(	PROB+22
>> SCTTTXT(1	PROB+21
SP	PROB+1~, PROB+4, PROB+6, PROB+7*, PR1+13, PR1+16, PR1+20
STR	PROB+1~, PR1+6, PR1+7, PR1+8, PR1+12, PR1+13, PR1+14, PR1+15, PR1+16, PR1+17 , PR1+20*, PR1+21
TEXT	PROB+1~, PROB+13, PROB+14, PROB+15, PROB+17
TEXT(	PROB+17
TEXT(1	PROB+14, PROB+16
U	EN+5, PROB+5, PROB+6, PROB+8, PROB+10, PROB+11, PROB+18, PROB+29, PR1+6, PR1+7 , PR1+9, PR1+10, PR1+11, PR1+13, PR1+15, PR1+16, PR1+18, PR1+19, PR1+20, PR2+4 , PR2+5, PR2+7, PR2+8, PR2+9, PR3+8, PR3+10, HDR+1, HDR+2
>> VALMBCK	EN+3, PRQ+1, HELP+7, ERROR+2
>> VALMBG	PRQ+1*
>> VALMCC	HELP+7
>> VALMCNT	PRQ+1*
>> VALMHDR(1	HDR+4*
>> VALMSG	PRQ+1, HELP+7
X	PROB+1~, PR1+9, PR1+10, PR1+11, HELP+1~, HELP+6
Y	PROB+1~

Customize PDF page

Package: Problem List

Routine: GMPLDISP

Information

Source Information

Call Graph

Call Graph Total: 8

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: