BDMVAG1 ; cmi/anch/maw - PATIENT DATA VIEW ;
Source file <BDMVAG1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
11 | ;;DRAW^AGED11
|
|
10 | ;;DRAW^AGED10
|
|
13 | ;;DRAW^AGED13
|
|
12 | ;;DRAW^AGED12
|
|
6 | ;;DRAW^AGED6
|
|
L5 | ;D @($P($T(@AGPAGE),";;",2)) W:$Y<7 !?32,"NONE..." X AGLINE("EQ") W !?32,"Press RETURN " D READ^AGED1
|
|
1 | ;;^AGED1
|
|
3 | ;;DRAW^AGED3
|
|
2 | ;;DRAW^AGED2
|
|
L2 | ||
4 | ;;^AGED4
|
|
7 | ;;^AGSEE7
|
|
L1 | ;D ^AG W !!!?27,"Patient Data View System",!!
|
|
9 | ;;DRAW^AGED9
|
|
5 | ;;^AGED5
|
|
8 | ;;DRAW^AGED8
|
Name | Field # of Occurrence |
---|---|
^AGVAR | BDMVAG1+5 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences |
---|---|
@( | L5+1 |
L2 | L5+7 |
L5 | L1+2, L5+7 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AG | L2! |
AG("LKDATA" | L2! |
AG("LKERR" | L2! |
AG("LKPRINT" | L2! |
AGPAGE | L1+2*, L2!, L5+7* |
AGSEENLY | L1+2*, L2! |
>> DFN | L1+2 |
DIC | L2! |
>> I | L5+2* |
Name | Field # of Occurrence |
---|---|
$T(@AGPAGE | L5+1 |