ICDDG010 ;KUM - DRG GROUPER PROCESSING BEGINS ;05/02/12 4:06pm
Source file <ICDDG010.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GROUP | ;
|
|
| GLAST | ;
|
|
| PRECOND | ||
| MDCSPROC | ||
| NEONATE | ||
| NEONATF | ;NEONATE - Continuation of xecute line
|
|
| NBCOMP | ; check for complication related to Newborn
|
|
| SURGICAL | ; Apply Surgical Hierarchy
|
|
| ICDRGCC(DRG,CDT) | ;Get CC/MCC flag from DRG
; ; Input: ; DRG DRG Number ; CDT Effective Date |
|
| DEFAULT | ||
| ENTER | ||
| GETMOR | ||
| CKDRG | ||
| DODRG | ;Go to DRG file and retrieve table entry to use if defined
|
|
| ORNI(X) | ;
|
|
| END | ;
; - MDC24 PROCESSING ; - MDC25 PROCESSING ; - PREMDC PROCESSING ; - MDC4 PROCESSING ; - CHECK FOR MCC/CC |
|
| AGAIN | ||
| CKBURN | ; MDC22 - Burns (extensive, full thickness, or non-extensive)
|
|
| FTBURN | ; full thickness burn check
|
|
| MI | ;
; if PTCA and not a bypass |
|
| PREMDC | ; Check if any Surgical Procedure Code in Pre-MDC and, if so, use that DRG group
|
|
| PDX11T13() | ;Is PDX assigned to DRG 11, 12 or 12
|
