DGPTSUDO ;ALB/MTC - PTF UPDATE TRANSFER DRG NODE; 30 MAR 89@09 ; 3/12/02 12:14pm
Source file <DGPTSUDO.m>
Package | Total | Call Graph |
---|---|---|
DRG Grouper | 2 | ($$ICDDX,$$ICDOP)^ICDCODE $$GETDATE^ICDGTDRG |
Registration | 2 | ^DGPTICD ^DGPTSUD1 |
VA Fileman | 2 | ^%DTC FILE^DIE |
Package | Total | Caller Graph |
---|---|---|
Registration | 6 | DGPTC1 DGPTF DGPTF4 DGPTFQWK DGPTFUP DGPTTS |
Integrated Billing | 2 | IB20PT82 IB20PT83 |
Name | Comments | DBIA/ICR reference |
---|---|---|
Q | ;
|
|
VARS | ||
SWCH | ;
|
|
SU | ;
|
|
ONE | ;
|
|
UTIL | ||
BLD | ;
|
|
SUDO1 | ||
SUDO2 | ;
|
|
DRG | ;
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGPM - [#405] | SUDO1+3 |
^DGPM("APHY" | SUDO1+3 |
^DGPM("ATS" | SUDO1+1, SUDO1+2 |
^DGPT - [#45] | SUDO1+3, VARS+1, VARS+6, VARS+10, VARS+14, SUDO2+7, ONE+1, ONE+3, ONE+4 |
^DGPT("AADA" | ONE+5 |
^DIC(42.4 - [#42.4] | SUDO2+5, ONE+3 |
^DIC(45.7 - [#45.7] | UTIL |
^DPT - [#2] | VARS+1 |
^UTILITY($J | UTIL*, SUDO1!, SUDO1+4, VARS, VARS+1, SUDO2+1, SUDO2+2 |
^VA(200 - [#200] | DRG+3 |
Name | Line Occurrences |
---|---|
BLD | SUDO2+8, ONE+4 |
DRG | SUDO2+8, ONE+6 |
ONE | SUDO2+2 |
Q | VARS+1 |
SU | BLD+5 |
SUDO1 | VARS |
SUDO2 | SWCH+3 |
SWCH | SUDO2+4, SUDO2+6 |
UTIL | SUDO1+3 |
Name | Field # of Occurrence |
---|---|
^( | SUDO1+3, VARS+1, VARS+6, VARS+10 |
^("401P" | VARS+14 |
^("PTF" | SUDO1+3 |
^(0 | UTIL, SUDO1+3, VARS+1, VARS+7, VARS+11, SUDO2+5, SUDO2+7, ONE+1, ONE+3, ONE+4 |
^(70 | VARS+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> AGE | DRG+1* |
>> DFN | SUDO1+1, SUDO1+2, VARS+1 |
DG401P | VARS+15*, SUDO2+8, BLD+6, Q+1! |
>> DGADM | ONE+3*, ONE+5 |
>> DGDAT | VARS+1*, VARS+2* |
DGDMS | VARS+1*, ONE+2*, Q+1! |
DGDOC | SUDO2+2*, DRG+3*, DRG+9, ONE+1*, Q+1! |
DGDX | VARS+1*, SUDO2+8*, BLD+1*, BLD+2*, ONE+5*, Q+1! |
DGEXP | VARS+1*, ONE+2*, Q+1! |
DGFDA | DRG+4~ |
DGFDA( | DRG+5*, DRG+6*, DRG+7*, DRG+8*, DRG+9*, DRG+10* |
DGLEV | SWCH+1!, BLD+3*, Q+1! |
DGLOS | VARS+1*, SUDO2+8*, BLD+3*, DRG+1, DRG+8, Q+1! |
DGMSG | DRG+4~ |
DGNODE | SUDO2+7*, BLD+1, BLD+3, ONE+4*, Q+1! |
DGNSV | VARS+1*, SUDO2+5*, SUDO2+6, SUDO2+8, SWCH+2*, SU+8, Q+1! |
DGNXD | VARS+1*, SUDO2+1*, SUDO2+2, SUDO2+3, SUDO2+4, SUDO2+5, SWCH+2, BLD+3, BLD+5, BLD+6 , SU+8, DRG+7, ONE+1*, ONE+3, Q+1! |
DGPAS | SWCH+1!, BLD+3*, Q+1! |
>> DGPMCA | SUDO1+1, SUDO1+2 |
DGPRD | VARS+1*, SUDO2+3, SUDO2+4, SUDO2+5, SWCH+2*, BLD+3, DRG+1, ONE+1, Q+1! |
DGPROC | VARS+3!*, VARS+15*, SUDO2+8*, BLD+9, BLD+12*, Q+1! |
DGPROC( | VARS+11*, VARS+12*, BLD+6, BLD+7, BLD+13*, BLD+14! |
DGPSV | VARS+1*, SUDO2+5*, SUDO2+6, SUDO2+7, SUDO2+8, SWCH+2*, SU+8, DRG+6, ONE+3*, Q+1! |
DGPT | Q+1! |
DGPT(70 | VARS+1*, VARS+14, ONE+2, ONE+5 |
>> DGPTDAT | VARS+5*, VARS+8, VARS+12, VARS+15 |
>> DGPTTMP | VARS+8*, VARS+12*, VARS+15*, BLD+1* |
DGSURG | VARS+3!*, SUDO2+8*, SU+11, SU+14*, Q+1! |
DGSURG( | VARS+7*, VARS+8*, BLD+5, SU+9, SU+16! |
DGTLOS | VARS+1*, DRG+1*, DRG+10, Q+1! |
DGTRS | VARS+1*, ONE+2*, Q+1! |
>> DOB | VARS+1*, DRG+1 |
>> DRG | DRG+1*, DRG+5 |
DT | ONE+1 |
I | UTIL, SUDO1+1*, SUDO1+2, VARS+6*, VARS+7, VARS+10*, VARS+11, VARS+15*, SUDO2+3*, BLD+1* , BLD+4~, BLD+5*, BLD+6*, BLD+7, BLD+14, SU+8, SU+9, SU+16, ONE+5*, Q+1! |
I1 | SUDO2+2*, SUDO2+7, DRG+5, DRG+6, DRG+7, DRG+8, DRG+9, DRG+10, ONE+3*, ONE+6* , Q+1! |
I2 | Q+1! |
ICDSURG | Q+1! |
ICDSURG( | SU+15* |
J | UTIL, SUDO1+2*, SUDO1+3, VARS+8*, VARS+12*, BLD+4~, BLD+8*, BLD+13, SU+10*, SU+15 , Q+1! |
>> K | UTIL, SUDO1+3* |
L1 | Q+1! |
L1( | SUDO2+3*, SUDO2+4, SUDO2+5, ONE+1*, ONE+3 |
>> PTF | SUDO1+3, VARS+1, VARS+2, VARS+5, VARS+6, VARS+10, VARS+14, SUDO2+7, BLD+1, DRG+5 , DRG+6, DRG+7, DRG+8, DRG+9, DRG+10, ONE+1, ONE+3, ONE+4, ONE+5 |
>> SEX | VARS+1* |
T | SUDO1!, Q+1! |
T( | VARS+1*, SUDO2+2*, SUDO2+3, SWCH+2*, ONE+1* |
U | VARS+1, VARS+3, VARS+6, VARS+8, VARS+10, VARS+12, VARS+15, SUDO2+2, SUDO2+3, SUDO2+5 , SUDO2+7, SUDO2+8, BLD+1, BLD+2, BLD+3, BLD+8, BLD+10, BLD+12, SU+10, SU+12 , SU+14, ONE+1, ONE+2, ONE+3, ONE+5 |
X | UTIL, SUDO1+3*, VARS+6*, VARS+7, VARS+8, VARS+10*, VARS+11, VARS+12, VARS+14*, VARS+15 , BLD+3*, BLD+4~, BLD+7*, BLD+8, SU+9*, SU+10, Q+1! |
X1 | BLD+3*, Q+1! |
X2 | BLD+3*, Q+1! |
Y | UTIL, SUDO1+3*, VARS+7*, VARS+8, VARS+11*, VARS+12, BLD+4~, BLD+8*, BLD+10, BLD+12 , BLD+13, SU+10*, SU+12, SU+14, SU+15, Q+1! |
Z | BLD+4~, BLD+10*, SU+12* |