IBTRV2 ;ALB/AAS - CLAIMS TRACKING - REVIEW ACTIONS ; 19-JUL-93
Source file <IBTRV2.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 6 | $$DAT1^IBOUTL LOCKED^IBTRCD1 EN^IBTRE3 EN^IBTRE4 EN^IBTRE5 (BLD,EN)^IBTRV |
VA Fileman | 3 | FILE^DICN ^DIE ^DIR |
Scheduling | 2 | ASK^SDCO3 ASK^SDCO4 |
DRG Grouper | 1 | ^ICDDRG |
Kernel | 1 | $$FMDIFF^XLFDT |
Registration | 1 | (FULL,PAUSE)^VALM1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
DA(IBTRN) | ; -- Add Diagnosis
|
|
COMDRG(IBTRN) | ; -- compute drg from tracking file
|
|
DAYREM(DGPM,LOS) | ; -- Compute days remaining
|
|
PROV(IBTRN,IBETYP,BLD) | ; -- Add Procedures
|
|
DRG(IBTRN) | ; -- entry point to compute drg
|
|
COMDRGQ | ||
DISPDRG(DGPMCA) | ; -- Display drg's
|
|
ALOS(X,Y) | ; -- compute alos for drg for year
|
|
PROC(IBTRN,IBETYP,BLD) | ; -- Add Procedures
|
Name | Field # of Occurrence |
---|---|
FILE^DICN | DRG+21 |
^DIE | DRG+27 |
^DIR | DRG+10 |
$$DAT1^IBOUTL | DISPDRG+5 |
LOCKED^IBTRCD1 | DRG+24 |
EN^IBTRE3 | DA+8 |
EN^IBTRE4 | PROC+5 |
EN^IBTRE5 | PROV+4 |
BLD^IBTRV | DA+9, PROC+6, PROV+8 |
EN^IBTRV | % |
^ICDDRG | COMDRG+25 |
ASK^SDCO3 | PROV+5 |
ASK^SDCO4 | DA+6 |
FULL^VALM1 | DA+4, PROC+3, PROV+3 |
PAUSE^VALM1 | DA+7, PROC+4, PROV+6, PROV+7 |
$$FMDIFF^XLFDT | DAYREM+2, COMDRG+15 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^IBT(356.93 - [#356.93] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGPM - [#405] | DAYREM+2 |
^DPT - [#2] | COMDRG+14, COMDRG+15 |
^IBE(356.5 - [#356.5] | ALOS+4, ALOS+5, ALOS+6 |
^IBT(356 - [#356] | DRG+3, COMDRG+12, COMDRG+16 |
^IBT(356.9 - [#356.9] | DRG+6, COMDRG+19, COMDRG+20 |
^IBT(356.91 - [#356.91] | COMDRG+23 |
^IBT(356.93 - [#356.93] | DRG+15, DRG+24, DRG+28, DISPDRG+3, DISPDRG+4 |
^ICD - [#80.2] | DRG+13, DISPDRG+5 |
Name | Line Occurrences |
---|---|
$$COMDRG | DRG+12 |
COMDRGQ | COMDRG+16 |
DISPDRG | DRG+7 |
DRG | DA+9 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> AGE | COMDRG+15* |
BLD | DA+9, PROC~, PROC+3, PROC+6, PROV~, PROV+3, PROV+8 |
DA | DRG+2~, DRG+25* |
DD | DRG+17! |
>> DFN | COMDRG+12*, COMDRG+14, COMDRG+15 |
DGPM | DAYREM~, DAYREM+2 |
>> DGPMA | COMDRG+16*, COMDRG+19, COMDRG+20, COMDRG+23 |
DGPMCA | DRG+2~, DRG+3*, DRG+6, DRG+7, DRG+15, DRG+20, DISPDRG~, DISPDRG+3 |
DIC | DRG+2~, DRG+19*, DRG+21! |
DIC("DR" | DRG+20* |
DIC(0 | DRG+19* |
DIE | DRG+2~, DRG+25* |
DIFF | DAYREM+1~, DAYREM+2*, DAYREM+3 |
DIR | DRG+2~, DRG+10! |
DIR("?" | DRG+9* |
DIR("A" | DRG+10* |
DIR("B" | DRG+10* |
DIR(0 | DRG+10* |
>> DLAYGO | DRG+19* |
DO | DRG+17! |
DR | DRG+2~, DRG+26* |
DT | DRG+15, DRG+20, DAYREM+2, COMDRG+15 |
DX | DRG+2~, DRG+6*, COMDRG+11~, COMDRG+18*, COMDRG+20* |
I | COMDRG+11~, DISPDRG+1~, DISPDRG+3* |
IBALOS | DRG+2~ |
IBCNT | COMDRG+11~, COMDRG+12*, COMDRG+18*, COMDRG+20*, COMDRG+22*, COMDRG+23*, DISPDRG+3*, DISPDRG+6*, DISPDRG+7 |
>> IBDA | DRG+15*, DRG+16, DRG+21*, DRG+22, DRG+24, DRG+25, DRG+28 |
IBDRG | DRG+2~, DRG+12*, DRG+13, DRG+18, DISPDRG+1~, DISPDRG+4*, DISPDRG+5 |
IBDT | ALOS+3~, ALOS+4*, ALOS+5 |
IBETYP | DA+3~, DA+5, DA+8, PROC~, PROC+4, PROC+5, PROV~, PROV+4, PROV+5, PROV+6 , PROV+7 |
IBTRN | DA~, DA+8, PROC~, PROC+5, PROV~, PROV+4, DRG~, DRG+3, DRG+12, COMDRG~ , COMDRG+12, COMDRG+16 |
>> IBTRND | DA+6, DA+7, PROV+5 |
IBTRVD | DRG+2~ |
IBX | DAYREM+1~*, DAYREM+3*, DAYREM+4*, DAYREM+5 |
ICDDMS | COMDRG+11~, COMDRG+12* |
ICDDRG | COMDRG+11~, COMDRG+12*, COMDRGQ |
ICDDX | COMDRG+11~ |
ICDDX( | COMDRG+20* |
ICDDX(1 | COMDRG+19*, COMDRG+25 |
ICDEXP | COMDRG+11~, COMDRG+12* |
ICDMDC | COMDRG+11~ |
ICDPRC | COMDRG+11~ |
ICDPRC( | COMDRG+23* |
ICDTRS | COMDRG+11~, COMDRG+12* |
J | ALOS+3~, ALOS+5*, ALOS+6, COMDRG+11~, COMDRG+22*, COMDRG+23*, DISPDRG+1~, DISPDRG+3*, DISPDRG+4 |
LOS | DAYREM~, DAYREM+1, DAYREM+3 |
PR | COMDRG+11~, COMDRG+23* |
SDCOQUIT | DA+6!, PROV+5! |
SEX | COMDRG+11~, COMDRG+14* |
U | COMDRG+14, COMDRG+15 |
>> VALMBCK | DA+10*, PROC+7*, PROV+9* |
X | DRG+18*, ALOS~, ALOS+4, ALOS+5, COMDRG+20* |
Y | DRG+11, DRG+21, ALOS~, ALOS+4 |