Routine: ICD1831K

Package	Total	Call Graph
DRG Grouper	2	($$CONV801,NEW801)^ICD1831L $$ICDOP^ICDCODE
Kernel	2	$$NOW^XLFDT (BMES,MES)^XPDUTL
VA Fileman	1	UPDATE^DIE

Package	Total	Caller Graph
DRG Grouper	1	ICD1831P

Name	Comments	DBIA/ICR reference
GETCRCD(ICDIEN,ICDDGIEN,ICDMDIEN)	;
DRG(ICDTMP)	;post-install driver for file ICD Operation/Procedure ; file(#80.1) DRG updates
UPDDIAG(ICDIP,ICDNWCDA,ICDTOTP)	;
GETNCRCD(ICDIENP,ICDOAR,ICDCAR)	;

Name	Field # of Occurrence
UPDATE^DIE	UPDDIAG+24, UPDDIAG+36, UPDDIAG+45, UPDDIAG+54, UPDDIAG+62, UPDDIAG+70, UPDDIAG+78, UPDDIAG+86, UPDDIAG+94, UPDDIAG+102 , UPDDIAG+110, UPDDIAG+118, UPDDIAG+126
$$CONV801^ICD1831L	DRG+62
NEW801^ICD1831L	DRG+42
$$ICDOP^ICDCODE	DRG+32
$$NOW^XLFDT	DRG+19
BMES^XPDUTL	DRG+14
MES^XPDUTL	DRG+81, DRG+82, DRG+83, DRG+90, DRG+91, DRG+92

Name	Line Occurrences (* Changed, ! Killed)
^ICD0 - [#80.1]	DRG+24, DRG+26, DRG+28, DRG+29, DRG+34, DRG+37, DRG+53, DRG+56, GETCRCD+14, GETCRCD+17 , GETCRCD+21, GETCRCD+22, GETCRCD+23, UPDDIAG+20
^TMP("DIERR"	UPDDIAG+129, UPDDIAG+130
^TMP("ICDDGFY2008OP"	DRG+17, DRG+88
^TMP("ICDFILEOK"	DRG+79, DRG+95!, UPDDIAG+14, UPDDIAG+130

Name	Line Occurrences
$$GETCRCD	DRG+58
GETNCRCD	DRG+46
UPDDIAG	DRG+48, DRG+70

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
FDA	UPDDIAG+31!
FDA(1831	UPDDIAG+16!, UPDDIAG+22, UPDDIAG+23, UPDDIAG+25!, UPDDIAG+33, UPDDIAG+34, UPDDIAG+35, UPDDIAG+37!, UPDDIAG+41, UPDDIAG+42* , UPDDIAG+43, UPDDIAG+44, UPDDIAG+46!, UPDDIAG+50, UPDDIAG+51, UPDDIAG+52, UPDDIAG+53, UPDDIAG+55!, UPDDIAG+58, UPDDIAG+59 , UPDDIAG+60, UPDDIAG+61, UPDDIAG+63!, UPDDIAG+66, UPDDIAG+67, UPDDIAG+68, UPDDIAG+69, UPDDIAG+71!, UPDDIAG+74, UPDDIAG+75 , UPDDIAG+76, UPDDIAG+77, UPDDIAG+79!, UPDDIAG+82, UPDDIAG+83, UPDDIAG+84, UPDDIAG+85, UPDDIAG+87!, UPDDIAG+90, UPDDIAG+91 , UPDDIAG+92, UPDDIAG+93, UPDDIAG+95!, UPDDIAG+98, UPDDIAG+99, UPDDIAG+100, UPDDIAG+101, UPDDIAG+103!, UPDDIAG+106, UPDDIAG+107 , UPDDIAG+108, UPDDIAG+109, UPDDIAG+111!, UPDDIAG+114, UPDDIAG+115, UPDDIAG+116, UPDDIAG+117, UPDDIAG+119!, UPDDIAG+122, UPDDIAG+123 , UPDDIAG+124, UPDDIAG+125, UPDDIAG+127!
ICDCAR	GETNCRCD~
ICDCAR(	GETNCRCD+7, GETNCRCD+9
ICDCAR(0	GETNCRCD+2*
ICDCONAR	DRG+45!, DRG+46, DRG+48, DRG+74!
ICDCONAR(0	DRG+47
ICDCRCD	DRG+11~, DRG+94!, GETCRCD+10*
ICDCRCDS	GETCRCD+8~, GETCRCD+14, GETCRCD+17, GETCRCD+23*, GETCRCD+24
ICDDGCD	DRG+58*, DRG+60, DRG+62, DRG+74!
ICDDGIEN	GETCRCD~, GETCRCD+17, GETCRCD+21, GETCRCD+22, GETCRCD+23
ICDETOT	DRG+11~, DRG+22, DRG+74!, DRG+89, DRG+90
ICDFOK	DRG+11~
ICDFYMI	DRG+54, DRG+56, DRG+58, DRG+74!
ICDI	DRG+11~, DRG+22, DRG+24, DRG+26, DRG+28, DRG+29, DRG+34, DRG+37, DRG+46, DRG+48 , DRG+53, DRG+56, DRG+58, DRG+70, GETCRCD+14
ICDIEN	GETCRCD~, GETCRCD+17, GETCRCD+21, GETCRCD+22, GETCRCD+23
ICDIENP	GETNCRCD~, GETNCRCD+2, GETNCRCD+7
ICDIP	UPDDIAG~, UPDDIAG+8, UPDDIAG+14, UPDDIAG+20, UPDDIAG+22, UPDDIAG+33, UPDDIAG+41, UPDDIAG+50, UPDDIAG+58, UPDDIAG+66 , UPDDIAG+74, UPDDIAG+82, UPDDIAG+90, UPDDIAG+98, UPDDIAG+106, UPDDIAG+114, UPDDIAG+122, UPDDIAG+129, UPDDIAG+130
ICDJ	GETNCRCD+4~, GETNCRCD+5, GETNCRCD+6, GETNCRCD+7, GETNCRCD+8
ICDK	GETNCRCD+4~, GETNCRCD+5, GETNCRCD+8, GETNCRCD+9
ICDL	GETNCRCD+4~, GETNCRCD+5, GETNCRCD+7, GETNCRCD+9, GETNCRCD+10
>> ICDLEDI	DRG+53*, DRG+56, DRG+58
ICDMDIEN	GETCRCD~, GETCRCD+17, GETCRCD+21, GETCRCD+22, GETCRCD+23
ICDNCDAR	DRG+41!, DRG+42, DRG+43, DRG+46, DRG+74!
ICDNWCD	DRG+11~, DRG+57!, DRG+62*, DRG+65
ICDNWCDA	DRG+57!, DRG+65!, DRG+70, DRG+71!, DRG+74!, UPDDIAG~
ICDNWCDA(	UPDDIAG+29, UPDDIAG+31, UPDDIAG+32, UPDDIAG+35, UPDDIAG+40, UPDDIAG+43, UPDDIAG+44, UPDDIAG+49, UPDDIAG+52, UPDDIAG+53 , UPDDIAG+57, UPDDIAG+60, UPDDIAG+61, UPDDIAG+65, UPDDIAG+68, UPDDIAG+69, UPDDIAG+73, UPDDIAG+76, UPDDIAG+77, UPDDIAG+81 , UPDDIAG+84, UPDDIAG+85, UPDDIAG+89, UPDDIAG+92, UPDDIAG+93, UPDDIAG+97, UPDDIAG+100, UPDDIAG+101, UPDDIAG+105, UPDDIAG+108 , UPDDIAG+109, UPDDIAG+113, UPDDIAG+116, UPDDIAG+117, UPDDIAG+121, UPDDIAG+124, UPDDIAG+125, UPDDIAG+129
ICDNWCDA(0	DRG+65*, DRG+67, UPDDIAG+9, UPDDIAG+10, UPDDIAG+11, UPDDIAG+12
ICDOAR	GETNCRCD~
ICDOAR(	GETNCRCD+6, GETNCRCD+8
ICDTMP	DRG~, DRG+16, DRG+17, DRG+18, DRG+19, DRG+80, DRG+87, UPDDIAG+129
ICDTOT	DRG+11~, DRG+22, DRG+48, DRG+70, DRG+78, DRG+79*, DRG+82
ICDTOTP	UPDDIAG~
ICDVAL	DRG+11~, DRG+29*, DRG+30, DRG+32, DRG+42, DRG+94!
ICDX	DRG+11~, DRG+37, DRG+39, DRG+50, DRG+53, GETCRCD+11, GETCRCD+21*, GETCRCD+22, GETCRCD+23
ICDX1	UPDDIAG+3~, UPDDIAG+27, UPDDIAG+29, UPDDIAG+31, UPDDIAG+32, UPDDIAG+35, UPDDIAG+40, UPDDIAG+43, UPDDIAG+44, UPDDIAG+49 , UPDDIAG+52, UPDDIAG+53, UPDDIAG+57, UPDDIAG+60, UPDDIAG+61, UPDDIAG+65, UPDDIAG+68, UPDDIAG+69, UPDDIAG+73, UPDDIAG+76 , UPDDIAG+77, UPDDIAG+81, UPDDIAG+84, UPDDIAG+85, UPDDIAG+89, UPDDIAG+92, UPDDIAG+93, UPDDIAG+97, UPDDIAG+100, UPDDIAG+101 , UPDDIAG+105, UPDDIAG+108, UPDDIAG+109, UPDDIAG+113, UPDDIAG+116, UPDDIAG+117, UPDDIAG+121, UPDDIAG+124, UPDDIAG+125, UPDDIAG+129
ICDXS	GETCRCD+8~
>> ICDXX	DRG+88*
ICDY	DRG+11~, DRG+54*
ICDYY	DRG+11~, DRG+22, DRG+78, DRG+79*
ICDZZ	DRG+11~, DRG+32*, DRG+94!
U	DRG+12*, DRG+28, DRG+29, DRG+32, GETCRCD+14, GETCRCD+17, GETCRCD+23, UPDDIAG+10, UPDDIAG+11, UPDDIAG+12 , UPDDIAG+31, UPDDIAG+32, UPDDIAG+35, UPDDIAG+40, UPDDIAG+43, UPDDIAG+44, UPDDIAG+49, UPDDIAG+52, UPDDIAG+53, UPDDIAG+57 , UPDDIAG+60, UPDDIAG+61, UPDDIAG+65, UPDDIAG+68, UPDDIAG+69, UPDDIAG+73, UPDDIAG+76, UPDDIAG+77, UPDDIAG+81, UPDDIAG+84 , UPDDIAG+85, UPDDIAG+89, UPDDIAG+92, UPDDIAG+93, UPDDIAG+97, UPDDIAG+100, UPDDIAG+101, UPDDIAG+105, UPDDIAG+108, UPDDIAG+109 , UPDDIAG+113, UPDDIAG+116, UPDDIAG+117, UPDDIAG+121, UPDDIAG+124, UPDDIAG+125, UPDDIAG+129

Customize PDF page

Package: DRG Grouper

Routine: ICD1831K

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: