Routine: GMPLUTL

Package	Total	Call Graph
Problem List	5	GETFLDS^GMPLEDT3 GETPLIST^GMPLMGR1 (EN,NEW)^GMPLSAVE ($$EXTDT,$$PROBTEXT)^GMPLX ($$SERVICE,VADPT)^GMPLX1
Lexicon Utility	3	EN^LEXCODE $$GETASSN^LEXTRAN1 $$IMPDATE^LEXU
DRG Grouper	2	($$CSI,$$SAB)^ICDEX $$ICDDATA^ICDXCODE
Kernel	1	$$DT^XLFDT
PCE Patient Care Encounter	1	$$PROVNARR^PXAPI

Package	Total	Caller Graph
PCE Patient Care Encounter	7	PXAIPL PXBAPI PXBGPL PXBPL PXCAPL PXCAPL1 PXCAPL2
Clinical Case Registries	3	RORUPD07 RORX013A RORXU010
Order Entry Results Reporting	2	ORCPROB ORQQPL1
Problem List	2	GMPLCLNP GMPLX1
Imaging	1	MAGDHLS
Oncology	1	ONCPL
Text Integration Utility	1	TIURP

Name	Comments	DBIA/ICR reference
ACTIVE(GMPDFN,GMPL)	; Returns list of Active Problems for a Patient	ICR #928 Status: Active Usage: Controlled Subscription
CREATE(PL,PLY)	; Creates a new problem	ICR #928 Status: Active Usage: Controlled Subscription
CR1	; Ok to Create
CRQ	; Quit Create
FIXLEX(PL)	; Fix Lexicon expression pointer value for SNOMED Concepts
GETDX(CODE,GMPDT)	; Get ICD associated with SNOMED CT Code
GETDXX
UPDATE(PL,PLY)	; Update a Problem/Create if Not Found	ICR #928 Status: Active Usage: Controlled Subscription

Name	Field # of Occurrence
GETFLDS^GMPLEDT3	UPDATE+42
GETPLIST^GMPLMGR1	ACTIVE+35
EN^GMPLSAVE	UPDATE+61
NEW^GMPLSAVE	CR1+16
$$EXTDT^GMPLX	ACTIVE+44
$$PROBTEXT^GMPLX	ACTIVE+42
$$SERVICE^GMPLX1	CR1+6
VADPT^GMPLX1	CREATE+41, UPDATE+45
$$CSI^ICDEX	ACTIVE+40, UPDATE+48
$$SAB^ICDEX	ACTIVE+40, UPDATE+48
$$ICDDATA^ICDXCODE	ACTIVE+41
EN^LEXCODE	FIXLEX+3
$$GETASSN^LEXTRAN1	GETDX+4
$$IMPDATE^LEXU	GETDX+2
$$PROVNARR^PXAPI	CREATE+36
$$DT^XLFDT	CREATE+40, GETDX+1, UPDATE+46

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPROB - [#9000011]	ACTIVE+39, UPDATE+39, UPDATE+41
^DPT - [#2]	CREATE+37
^GMPL(125.99 - [#125.99]	ACTIVE+33, CR1+8
^VA(200 - [#200]	CREATE+38, UPDATE+40

Name	Line Occurrences
$$GETDX	FIXLEX+6
@(	CREATE+42, CREATE+44, UPDATE+53
CREATE	UPDATE+38
FIXLEX	CR1+1
GETDXX	GETDX+5

Name	Field # of Occurrence
^(1	ACTIVE+39
^(802	ACTIVE+39

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CNT	ACTIVE+31~, ACTIVE+32, ACTIVE+39, ACTIVE+42, ACTIVE+43, ACTIVE+44, ACTIVE+45, ACTIVE+47, ACTIVE+48
CODE	GETDX~, GETDX+4
DA	CREATE+31~, CR1+16
DIFFRENT	UPDATE+35~, UPDATE+54, UPDATE+59, UPDATE+60*, UPDATE+61
DUZ	CR1+10
DUZ("AG"	CREATE+33, UPDATE+37
DUZ(2	CREATE+33, UPDATE+37
FLD	UPDATE+35~, UPDATE+49*, UPDATE+51, UPDATE+54
GMPAGTOR	CREATE+30~, CREATE+39, UPDATE+36~, UPDATE+45
GMPARAM	ACTIVE+31~
GMPARAM("QUIET"	ACTIVE+33*
GMPARAM("REV"	ACTIVE+33*
GMPCSYS	ACTIVE+37~, ACTIVE+40*, ACTIVE+41
GMPCV	CREATE+31~, CREATE+39*
GMPDFN	ACTIVE~, ACTIVE+32, CREATE+31~, CREATE+39, CREATE+41, UPDATE+35~, UPDATE+41, UPDATE+43, UPDATE+45
GMPDT	ACTIVE+37~, ACTIVE+40, ACTIVE+41, GETDX~, GETDX+1, GETDX+3, GETDX+4, GETDX+5
GMPFLD	CREATE+30~, UPDATE+35~, UPDATE+42
GMPFLD(	CR1+2, CR1+3, CR1+4, CR1+5, CR1+6, CR1+7, CR1+8, CR1+9, CR1+10, CR1+12 , CR1+13, CR1+14, UPDATE+51, UPDATE+54, UPDATE+56, UPDATE+57, UPDATE+59
GMPFLD(10	CR1+10, CR1+11, UPDATE+60*
GMPFLD(80201	CR1+15*
GMPGULF	CREATE+30~, CREATE+39, UPDATE+36~, UPDATE+45
GMPHNC	CREATE+31~, CREATE+39*
GMPI	CREATE+30~, CREATE+42, CREATE+44, UPDATE+35~, UPDATE+50*, UPDATE+51, UPDATE+54
GMPIFN	UPDATE+35~, UPDATE+38*, UPDATE+39, UPDATE+41, UPDATE+42, UPDATE+61
GMPIMPDT	GETDX+1~, GETDX+2*, GETDX+3, GETDX+5
GMPION	CREATE+30~, CREATE+39, UPDATE+36~, UPDATE+45
GMPL	ACTIVE~
GMPL(	ACTIVE+39, ACTIVE+42, ACTIVE+43, ACTIVE+44, ACTIVE+45, ACTIVE+47
GMPL(0	ACTIVE+48*
GMPL0	ACTIVE+37~, ACTIVE+39*, ACTIVE+40, ACTIVE+41, ACTIVE+43
GMPL1	ACTIVE+37~, ACTIVE+39*, ACTIVE+42, ACTIVE+45, ACTIVE+46
GMPL802	ACTIVE+37~, ACTIVE+39*, ACTIVE+40
GMPLIST	ACTIVE+31~, ACTIVE+35
GMPLIST(	ACTIVE+36, ACTIVE+38
>> GMPLUSER	CR1+8
GMPLVIEW	ACTIVE+31~, ACTIVE+35
GMPLVIEW("ACT"	ACTIVE+34*
GMPLVIEW("PROV"	ACTIVE+34*
GMPLVIEW("VIEW"	ACTIVE+34*
GMPMPDEF	GETDX+1~, GETDX+3*, GETDX+4
GMPMST	CREATE+31~, CREATE+39*
GMPORIG	UPDATE+35~
GMPQUIT	CREATE+30~, CREATE+42, CREATE+43, CREATE+44, CREATE+45, UPDATE+35~, UPDATE+50, UPDATE+52*, UPDATE+53, UPDATE+55
GMPROV	CREATE+31~, CR1+5, UPDATE+35~, UPDATE+41
GMPSC	CREATE+30~, CREATE+39, UPDATE+36~, UPDATE+45
GMPSHD	CREATE+31~, CREATE+39*
GMPTOTAL	ACTIVE+31~, ACTIVE+35
GMPVA	CREATE+30~, CREATE+33, CREATE+41, UPDATE+35~, UPDATE+37, UPDATE+45
GMPVAMC	CREATE+30~, CREATE+33, UPDATE+35~, UPDATE+37
I	ACTIVE+37~, ACTIVE+46*
ICD	GETDX+8~, GETDX+9*, GETDX+10
ICDC	ACTIVE+37~, ACTIVE+41*, ACTIVE+43
ICDS	FIXLEX+1~, FIXLEX+6*, FIXLEX+7
IFN	ACTIVE+31~, ACTIVE+38*, ACTIVE+39, ACTIVE+42
ITEMS	UPDATE+35~, UPDATE+49*, UPDATE+50
LEX	GETDX+1~, GETDX+5
LEX(	GETDX+7, GETDX+9
LEXS	FIXLEX+1~
LEXS("SCT"	FIXLEX+3, FIXLEX+5
NUM	ACTIVE+31~, ACTIVE+36*, ACTIVE+38
ONSET	ACTIVE+37~, ACTIVE+43*, ACTIVE+44
ORI	GETDX+1~, GETDX+6, GETDX+7, GETDX+9
ORY	GETDX+1~, GETDX+2, GETDX+4, GETDX+5, GETDX+6, GETDX+10, GETDX+11, GETDXX
PL	CREATE~, CR1+1, FIXLEX~, UPDATE~, UPDATE+38
PL(	UPDATE+51*, UPDATE+52, UPDATE+53, UPDATE+54
PL("AO"	CR1+12
PL("CODESYS"	UPDATE+47, UPDATE+48*
PL("COMMENT"	CR1+11, UPDATE+60
PL("CV"	CR1+14
PL("DIAGNOSIS"	CR1+2, FIXLEX+7*, UPDATE+47, UPDATE+48
PL("DX_DATE_OF_INTEREST"	CREATE+40, CR1+15, FIXLEX+6, UPDATE+46, UPDATE+48
PL("EC"	CR1+13
PL("HNC"	CR1+13
PL("IR"	CR1+12
PL("LEXICON"	CR1+1, CR1+3, FIXLEX+5*
PL("LOCATION"	CR1+10
PL("MST"	CR1+13
PL("NARRATIVE"	CREATE+34, CREATE+36, CR1+1, CR1+2, CR1+4, FIXLEX+2, FIXLEX+4*, FIXLEX+5, UPDATE+58, UPDATE+59
PL("ONSET"	CR1+7
PL("PATIENT"	CREATE+37, CREATE+39, UPDATE+43
PL("PROBLEM"	UPDATE+38
PL("PROVIDER"	CREATE+38, CR1+5, CR1+6, UPDATE+40, UPDATE+41
PL("RECORDED"	CR1+7, UPDATE+44
PL("RESOLVED"	CR1+9
PL("SC"	CR1+12
PL("SHD"	CR1+14
PL("STATUS"	CR1+9
PLY	CREATE~, CREATE+32!, CR1+16, UPDATE~, UPDATE+37, UPDATE+38, UPDATE+61
PLY(0	CREATE+32, CREATE+34, CREATE+36, CREATE+37, CREATE+38, UPDATE+37, UPDATE+39, UPDATE+40, UPDATE+42, UPDATE+43 , UPDATE+44, UPDATE+52, UPDATE+56, UPDATE+57, UPDATE+58, UPDATE+61
SCT	FIXLEX+1~, FIXLEX+2*, FIXLEX+3, FIXLEX+5, FIXLEX+6
SP	ACTIVE+31~, ACTIVE+32, ACTIVE+46, ACTIVE+47
SUB	UPDATE+35~, UPDATE+50*, UPDATE+51, UPDATE+52, UPDATE+53, UPDATE+54
U	ACTIVE+33, ACTIVE+40, ACTIVE+41, ACTIVE+42, ACTIVE+43, ACTIVE+44, ACTIVE+45, ACTIVE+46, CREATE+36, CR1+1 , CR1+2, CR1+4, CR1+8, FIXLEX+5, FIXLEX+7, GETDX+5, UPDATE+41, UPDATE+50, UPDATE+51, UPDATE+54 , UPDATE+58, UPDATE+59

Customize PDF page

Package: Problem List

Routine: GMPLUTL

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 17

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: