Call Graph
Call Graph Total: 4
| Package | Total | Call Graph |
|---|---|---|
| DRG Grouper | 2 | $$ROOT^ICDEX $$ICDIDC^ICDRGAPI |
| VA FileMan | 2 | $$ROOT^DILFD $$GET1^DIQ |
ICDRGAPI ;ALB/JAM - DRG GROUPER APIS ;05/29/12 2:39pm
Source file <ICDRGAPI.m>
| Package | Total | Call Graph |
|---|---|---|
| DRG Grouper | 2 | $$ROOT^ICDEX $$ICDIDC^ICDRGAPI |
| VA FileMan | 2 | $$ROOT^DILFD $$GET1^DIQ |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ICDID(FILE,ID,CODE) | ; Returns value indicating if identifier exist.
|
|
| IDIEN(FILE,ID) | ;get IEN for identifier
|
|
| ICDIDS(FILE,CODE,ARY) | ; Returns an array of identifiers.
|
|
| CHGIEN(FILE,CODE) | ;
|
|
| ICDIDF(ID,ARY) | ; Returns value indicating if identifier(s) exist in an array.
|
|
| ICDIDC(FILE,ID,ARY,RESULTS) | ; Returns value indicating if identifier(s) exist in a cluster.
|
|
| BLKCHK() | ;check if DX/PX code is in cluster
|
|
| ISOWNCC(IEN,CDT,FMT) | ; If DX is Own CC, return the CC value else zero
|
|
| ICDMRG(ARY1,ARY2) | ; Merge ARY2 with ARY1 and increment the counter
|
|
| CLUSTERS | ; Load Cluster Identifier Codes into ICD10SD, ICD10OR
|
|
| LDMDDRGD | ; Load DRG and Check MDC for Diagnosis Clusters
|
|
| LDMDDRGP | ; Load DRG and Check MDC for Procedure Clusters
|
|
| ICDRGCC(DRG,CDT) | ;Get CC/MCC flag from DRG (Temporary hard-code of ^ICD pending API)
|
|
| ISACCEX(IEN1,IEN2) | ; Is Code 2 an Excluded code of Code 1 so MCC/CC=0
|
|
| ICDXEXPT(DXIEN,LIST) | ;
; Checks if the DX code indicated by the DXIEN matches any code in LIST |
| FileNo | Call Tags |
|---|---|
| ^ICD9 - [#80] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ICD - [#80.2] | ICDRGCC+3, ICDRGCC+4, ICDRGCC+5 |
| ^ICD("B" | ICDRGCC+2 |
| ^ICD0 - [#80.1] | CHGIEN+3 |
| ^ICD0("B" | CHGIEN+3 |
| ^ICD9 - [#80] | CHGIEN+2, ISOWNCC+16, ISOWNCC+17, ISOWNCC+18, ISOWNCC+19 |
| ^ICD9("B" | CHGIEN+2 |
| ^ICDCCEX - [#82.13] | ISACCEX+19 |
| ^ICDCCEX("B" | ISACCEX+18 |
| ^ICDID - [#82] | CLUSTERS+3 |
| ^ICDID("B" | IDIEN+1, ICDIDC+29 |
| ^ICDIDD - [#82.12] | CLUSTERS+2 |
| ^ICDIDP - [#82.11] | CLUSTERS+8 |
| ^ICDIP - [#82.1] | CLUSTERS+9 |
| ^ICDIP("B" | IDIEN+2, ICDIDC+28 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARY | ICDIDS~, ICDIDF~, ICDIDC~ |
| ARY( | ICDIDS+20*, ICDIDF+17, ICDIDC+24 |
| ARY("" | ICDIDF+13, ICDIDC+20 |
| ARY1 | ICDMRG~ |
| ARY1( | ICDMRG+5*, ICDMRG+6* |
| ARY2 | ICDMRG~ |
| ARY2( | ICDMRG+4 |
| CDT | ISOWNCC~, ISOWNCC+16*, ICDRGCC~, ICDRGCC+3 |
| CODE | ICDID~, ICDID+17, ICDID+22, ICDIDS~, ICDIDS+16, ICDIDS+20, CHGIEN~, CHGIEN+2, CHGIEN+3 |
| DRG | ICDRGCC~, ICDRGCC+2 |
| DT | ISOWNCC+16 |
| DXIEN | ICDXEXPT~, ICDXEXPT+12 |
| FILE | ICDID~, ICDID+15, ICDID+20, ICDID+21, IDIEN~, IDIEN+1, ICDIDS~, ICDIDS+15, ICDIDS+17, ICDIDS+19 , CHGIEN~, CHGIEN+2, CHGIEN+3, ICDIDC~, ICDIDC+18, ICDIDC+21, ICDIDC+28, ICDIDC+29 |
| FMT | ISOWNCC~, ISOWNCC+16*, ISOWNCC+19 |
| ICD1 | ISACCEX+15~, ISACCEX+16*, ISACCEX+17 |
| ICD10CNT | ICDMRG+2~, ICDMRG+4* |
| ICD10I | ICDMRG+2~, ICDMRG+3*, ICDMRG+4*, ICDMRG+5, ICDMRG+6 |
| >> ICD10OR( | CLUSTERS+12* |
| ICD10ORT | CLUSTERS+1~ |
| ICD10PCT | CLUSTERS+1~, CLUSTERS+10 |
| ICD10PCT( | LDMDDRGP+2, LDMDDRGP+4 |
| >> ICD10SD( | CLUSTERS+6* |
| ICD10SDT | CLUSTERS+1~ |
| ICD2 | ISACCEX+15~, ISACCEX+16*, ISACCEX+19 |
| ICDAIEN | ICDRGCC+1~, ICDRGCC+4*, ICDRGCC+5 |
| ICDARR | ICDIDC+17~ |
| ICDARR( | ICDIDC+24*, BLKCHK+5 |
| ICDC | ICDIDS+14~, ICDIDS+20*, ICDIDS+21, CHGIEN+1~, CHGIEN+2*, CHGIEN+3*, BLKCHK+1~, BLKCHK+2*, BLKCHK+4*, BLKCHK+6 |
| ICDCC | ICDRGCC+1~, ICDRGCC+2*, ICDRGCC+5*, ICDRGCC+6 |
| ICDCCDAT | ISOWNCC+15~, ISOWNCC+16*, ISOWNCC+17 |
| ICDCCIEN | ISOWNCC+15~, ISOWNCC+17*, ISOWNCC+18, ISOWNCC+19 |
| ICDCCOUT | ISOWNCC+15~, ISOWNCC+19*, ISOWNCC+20 |
| ICDCCOWN | ISOWNCC+15~, ISOWNCC+18* |
| ICDCCX | ISOWNCC+15~, ISOWNCC+18*, ISOWNCC+19 |
| ICDCODE | ICDXEXPT+11~, ICDXEXPT+12*, ICDXEXPT+13 |
| ICDCX | ICDIDC+17~, ICDIDC+24*, ICDIDC+39*, ICDIDC+40 |
| ICDDA | ICDIDC+17~, ICDIDC+35*, ICDIDC+36, ICDIDC+37, ICDIDC+38, ICDIDC+39, ICDIDC+45, ICDIDC+46, ICDIDC+47, ICDIDC+48 , ICDRGCC+1~, ICDRGCC+3*, ICDRGCC+4 |
| ICDDRG | ICDIDC+17~, ICDIDC+48*, ICDIDC+49 |
| ICDDRGDX | ICDIDC+17~ |
| ICDDRGDX( | ICDIDC+40*, BLKCHK+3, BLKCHK+5 |
| ICDDRGT | LDMDDRGD+1~, LDMDDRGD+3*, LDMDDRGD+4, LDMDDRGP+1~, LDMDDRGP+4*, LDMDDRGP+5 |
| >> ICDDX | CLUSTERS+4 |
| ICDFND | ICDIDF+11~, ICDIDF+14*, ICDIDF+15, ICDIDF+17*, ICDIDF+18, ICDIDC+17~, ICDIDC+25*, ICDIDC+35, ICDIDC+37, ICDIDC+42* , ICDIDC+43, ICDIDC+50, BLKCHK+1~, BLKCHK+2*, BLKCHK+5*, BLKCHK+6*, BLKCHK+7 |
| ICDGBL | ICDID+14~, ICDID+20*, ICDID+22, ICDIDS+14~, ICDIDS+17*, ICDIDS+18, ICDIDC+17~, ICDIDC+21*, ICDIDC+22, ICDIDC+35 , ICDIDC+36, ICDIDC+37, ICDIDC+38, ICDIDC+39, ICDIDC+45, ICDIDC+46, ICDIDC+47, ICDIDC+48 |
| ICDGBLID | ICDIDS+14~, ICDIDS+19*, ICDIDS+20 |
| ICDGBLT | ICDIDS+14~, ICDIDS+19*, ICDIDS+20 |
| ICDI | ICDIDF+11~, ICDIDF+15*, ICDIDF+16 |
| ICDI1 | ICDIDC+17~, ICDIDC+37*, ICDIDC+38, ICDIDC+39, ICDIDC+45, ICDIDC+46, ICDIDC+47, ICDIDC+48 |
| ICDI2 | ICDIDC+17~, ICDIDC+38*, ICDIDC+39 |
| ICDI3 | ICDIDC+17~, ICDIDC+45*, ICDIDC+46, ICDIDC+47, ICDIDC+48 |
| ICDI4 | ICDIDC+17~, ICDIDC+47*, ICDIDC+48 |
| ICDID | ICDIDS+14~, CLUSTERS+1~, CLUSTERS+2*, CLUSTERS+8* |
| ICDIDC | CLUSTERS+1~, CLUSTERS+3*, CLUSTERS+4, CLUSTERS+6, CLUSTERS+9*, CLUSTERS+10, CLUSTERS+12 |
| ICDIDIEN | ICDID+14~, ICDID+21*, ICDID+22 |
| ICDIDV | ICDIDF+11~, ICDIDF+16*, ICDIDF+17 |
| ICDIEN | ICDIDC+17~, ICDIDC+28*, ICDIDC+29*, ICDIDC+35, CLUSTERS+1~, CLUSTERS+2*, CLUSTERS+3, CLUSTERS+8*, CLUSTERS+9, ICDRGCC+1~ , ICDRGCC+2*, ICDRGCC+3, ICDRGCC+4, ICDRGCC+5 |
| ICDJ | ICDIDC+17~, ICDIDC+38*, ICDIDC+40, BLKCHK+1~, BLKCHK+3*, BLKCHK+5 |
| ICDMDC | ICDIDC+17~, ICDIDC+46*, ICDIDC+49, LDMDDRGP+3 |
| ICDMDC( | LDMDDRGP+3 |
| ICDMDC(12 | LDMDDRGP+3 |
| ICDMDC(13 | LDMDDRGP+3 |
| ICDMDCT | LDMDDRGD+1~, LDMDDRGD+2*, LDMDDRGD+3, LDMDDRGP+1~, LDMDDRGP+2*, LDMDDRGP+3, LDMDDRGP+4 |
| >> ICDODRG( | LDMDDRGP+5* |
| >> ICDONR | LDMDDRGP+3* |
| ICDPDX | ISACCEX+15~, ISACCEX+17*, ISACCEX+18 |
| >> ICDPRC | CLUSTERS+8, CLUSTERS+10 |
| >> ICDSDRG( | LDMDDRGD+4* |
| ICDSUB | ICDIDC+17~, ICDIDC+38*, ICDIDC+39 |
| ICDTMP | CLUSTERS+1~, CLUSTERS+4 |
| ICDTMP( | LDMDDRGD+2, LDMDDRGD+3 |
| ICDX | ICDIDS+14~, ICDIDS+20*, ICDIDC+17~, ICDIDC+24*, CLUSTERS+1~, CLUSTERS+4*, CLUSTERS+5, CLUSTERS+10*, CLUSTERS+11 |
| ICDX1 | BLKCHK+1~, BLKCHK+5* |
| ICDXIEN | ISACCEX+15~, ISACCEX+18*, ISACCEX+19 |
| ID | ICDID~, ICDID+16, ICDID+21, IDIEN~, IDIEN+1, IDIEN+2, ICDIDF~, ICDIDF+12, ICDIDF+15, ICDIDF+16 , ICDIDC~, ICDIDC+19, ICDIDC+28, ICDIDC+29 |
| IEN | ISOWNCC~, ISOWNCC+16, ISOWNCC+17, ISOWNCC+18, ISOWNCC+19 |
| IEN1 | ISACCEX~, ISACCEX+16 |
| IEN2 | ISACCEX~, ISACCEX+16 |
| LIST | ICDXEXPT~, ICDXEXPT+13 |
| RESULTS | ICDIDC~ |
| RESULTS( | ICDIDC+49* |
| U | ICDIDS+20, ISOWNCC+18, ISOWNCC+19, CLUSTERS+3, CLUSTERS+5, CLUSTERS+9, CLUSTERS+11, ICDRGCC+5, ICDXEXPT+12 |
