AVAP10 ;IHS/ASDST/GTH - CORRECT GIHS XREF FROM 200 TO 6 ; [ 02/24/1999 1:45 PM ]
Source file <AVAP10.m>
Package | Total | Caller Graph |
---|---|---|
IHS VA Support Files | 2 | AVA32P17 AVA32P22 |
Name | Comments | DBIA/ICR reference |
---|---|---|
SET | ;;N % S %=$P(^DIC(3,DA,0),U,16) I %]"" S:'$D(^DIC(6,%,9999999)) ^DIC(6,%,9999999)="" S $P(^(9999999),U,9)=X,^DIC(6,"GIHS",X,%)=""
|
|
EOJ | ;
|
|
UPDATEDD | ;
|
|
KILL | ;;N % S %=$P(^DIC(3,DA,0),U,16) I %]"",$D(^DIC(6,%,9999999)) S $P(^(9999999),U,9)="" K ^DIC(6,"GIHS",X,%)
|
|
OLDSET | ;;N % S %=$P(^DIC(3,DA,0),U,16) I %]"" S:'$D(^DIC(6,%,9999999)) ^DIC(6,%,9999999)="" S $P(^(9999999),U,9)=X
|
|
OLDKILL | ;;N % S %=$P(^DIC(3,DA,0),U,16) I %]"",$D(^DIC(6,%,9999999)) S $P(^(9999999),U,9)=""
|
|
XREF | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD(200 | UPDATEDD+3, UPDATEDD+6, UPDATEDD+8, UPDATEDD+11*, UPDATEDD+15*, UPDATEDD+18* |
^VA(200 - [#200] | AVAP10+9, AVAP10+10 |
Name | Line Occurrences |
---|---|
EOJ | AVAP10+18, UPDATEDD+4, UPDATEDD+6, UPDATEDD+8 |
KILL | UPDATEDD+15 |
OLDKILL | UPDATEDD+8 |
OLDSET | UPDATEDD+6 |
SET | UPDATEDD+11 |
Name | Field # of Occurrence |
---|---|
^( | UPDATEDD+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | UPDATEDD+3* |
DA | UPDATEDD+2~, UPDATEDD+3*, UPDATEDD+4, UPDATEDD+6, UPDATEDD+8, UPDATEDD+11, UPDATEDD+15, UPDATEDD+19!, EOJ+1! |
DIC | EOJ+1! |
DIE | EOJ+1! |
DIK | XREF+2~, XREF+3*, XREF+5! |
DIK(1 | XREF+3* |
DIR | AVAP10+13~, AVAP10+17!, EOJ+1! |
DIR("A" | AVAP10+15* |
DIR("B" | AVAP10+14* |
DIR(0 | AVAP10+14* |
DR | EOJ+1! |
U | AVAP10+3*, AVAP10+9, AVAP10+10 |
X | EOJ+1! |
Y | AVAP10+18, EOJ+1! |
Name | Field # of Occurrence |
---|---|
$T(KILL | UPDATEDD+15 |
$T(OLDKILL | UPDATEDD+8 |
$T(OLDSET | UPDATEDD+6 |
$T(SET | UPDATEDD+11 |