AGED3 ; IHS/ASDS/EFG - EDIT PG 3 - EMERGENCY CONTACT/NEXT OF KIN ;
Source file <AGED3.m>
Package | Total | Call Graph |
---|---|---|
IHS Patient Registration | 5 | (,UPDATE1)^AGED READ^AGED1 ^AGED2 ^AGED4A (EDITCHEK,FETCHERR)^AGEDERR |
VA Fileman | 1 | $$GET1^DIQ |
Package | Total | Caller Graph |
---|---|---|
IHS Patient Registration | 2 | AGED2 AGED4A |
Name | Comments | DBIA/ICR reference |
---|---|---|
VAR | ||
1 | ;
|
|
DRAW | ;EP
|
|
END |
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 |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD( | DRAW+12 |
^UTILITY("DIQ1" | DRAW+5! |
Name | Line Occurrences |
---|---|
@( | VAR+12, VAR+18 |
DRAW | VAR |
END | VAR+13 |
VAR | VAR+10, VAR+13, VAR+15, VAR+21 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> A | DRAW+6*, DRAW+11* |
AG | END!, DRAW+7*, DRAW+11, DRAW+12 |
AG("C" | VAR+16*, VAR+18 |
AG("ED" | VAR+12 |
AG("ERR" | VAR+13 |
AG("N" | AGED3+3*, VAR+3, VAR+15, VAR+18 |
AG("PG" | DRAW+1*, DRAW+16 |
AG("SEL" | VAR+18* |
AGI | VAR+18*, VAR+20! |
>> AGLINE("-" | DRAW+14 |
>> AGLINE("EQ" | VAR+1 |
>> AGOPT("ESCAPE" | VAR+10, VAR+11 |
AGSCRN | END!, DRAW+8*, DRAW+9, DRAW+10 |
>> AGSELECT | DRAW+17 |
>> AGXTERN | VAR+12, END+2 |
AGY | VAR+17*, VAR+18, VAR+20! |
DA | END!, DRAW+3* |
>> DFN | VAR+19, DRAW+3, DRAW+13, DRAW+17 |
DFOUT | VAR+14, END! |
DIC | END!, DRAW+9*, DRAW+12, DRAW+13 |
DIR | VAR+2! |
DIR("?" | VAR+4*, VAR+5*, VAR+6*, VAR+7*, VAR+8* |
DIR("A" | VAR+3* |
>> DIROUT | END+3 |
DLOUT | VAR+13, END! |
DQOUT | VAR+15, END! |
DR | END!, DRAW+10*, DRAW+12, DRAW+13 |
DTOUT | VAR+14, END! |
>> DUOUT | VAR+13, END+4 |
DUZ(2 | VAR+19, DRAW+17 |
MYERRS | DRAW+15!, DRAW+16, DRAW+18 |
MYERRS("C" | VAR+10 |
MYVARS | DRAW+15!, DRAW+18 |
MYVARS("DFN" | DRAW+17* |
MYVARS("FINDCALL" | DRAW+17* |
MYVARS("SELECTION" | DRAW+17* |
MYVARS("SITE" | DRAW+17* |
ROUTID | END+1!, DRAW+2* |
U | DRAW+9, DRAW+10, DRAW+12 |
Y | VAR+10, VAR+11, VAR+13, VAR+15, VAR+17, END! |
Name | Field # of Occurrence |
---|---|
$T( | DRAW+2 |
$T(@1+AG | DRAW+8 |