Routine: ICDTBL3D

Information

ICDTBL3D ;ALB/MJB - GROUPER UTILITY FUNCTIONS;08/09/2010

Source file <ICDTBL3D.m>

Package	Total	Call Graph
DRG Grouper	1	DRG727^ICDTBL7D

Name	Comments	DBIA/ICR reference
DRG300	;
DRG301
DRG302	;
DRG303
DRG304	;
DRG305
DRG306	;
DRG307
DRG308	;
DRG309	;
DRG310	;I (ICDDX(1)=2559!$D(ICDDXT("427.41"))),'ICDEXP S ICDMCC=2
DRG311
DRG312
DRG313
DRG314	;
DRG315	;
DRG316
DRG326	;
DRG327	;
DRG328
DRG329	;
DRG330	;
DRG331
DRG332	;
DRG333	;
DRG334
DRG335	;
DRG336	;
DRG337
DRG338	;
DRG339	;
DRG340
DRG341	;
DRG342	;
DRG343
DRG344	;
DRG345	;
DRG346
DRG347	;
DRG348	;
DRG349
DRG350	;
DRG351	;
DRG352
DRG353	;
DRG354	;
DRG355
DRG356	;
DRG357	;
DRG358
DRG368	;
DRG369	;
DRG370
DRG371	;
DRG372	;
DRG373
DRG374	;
DRG375	;
DRG376
DRG377	;
DRG378	;
DRG379
DRG380	;
DRG381	;
DRG382
DRG383	;
DRG384
DRG385	;
DRG386	;
DRG387
DRG388	;
DRG389	;
DRG390
DRG391	;
DRG392
DRG393	;
DRG394	;
DRG395

Name	Field # of Occurrence
DRG727^ICDTBL7D	DRG343+2

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"DRG340" Line Location: DRG340+0
Function Call: WRITE	Prompt: !,"DRG343",ICDDX(1) Line Location: DRG343+1

Name	Field # of Occurrence
>> ICDDX(1	DRG310+1, DRG310+2, DRG331, DRG340, DRG343+1, DRG373
>> ICDDXT("425.4"	DRG310+1, DRG310+2
>> ICDDXT("427.5"	DRG331
>> ICDDXT("785.59"	DRG373
>> ICDDXT("799.1"	DRG392
>> ICDEXP	DRG331, DRG373, DRG392
>> ICDMCC	DRG301, DRG303, DRG305, DRG307, DRG310+1, DRG310+2, DRG310+4, DRG316, DRG328, DRG331* , DRG331+1, DRG334, DRG337, DRG340+1, DRG343+3, DRG346, DRG349, DRG352, DRG355, DRG358 , DRG370, DRG373*, DRG373+1, DRG376, DRG379, DRG382, DRG384, DRG387, DRG390, DRG392 , DRG392+1, DRG395+1
>> ICDOR	DRG343, DRG343+2, DRG352, DRG395
>> ICDRG	DRG301, DRG303, DRG305, DRG307, DRG310+4, DRG311, DRG312, DRG313, DRG316, DRG328 , DRG331+1, DRG334, DRG337, DRG340+1, DRG343+3, DRG346, DRG349, DRG352, DRG355, DRG358 , DRG370, DRG373+1, DRG376, DRG379, DRG382, DRG384, DRG387, DRG390, DRG392, DRG392+1 , DRG395+1*