DGPMX3 ; GENERATED FROM 'DGPM DISCHARGE' INPUT TEMPLATE(#448), FILE 405;10/30/24
Source file <DGPMX3.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 17 | ^%DT NOW^%DTC $$EZBLD^DIALOG $$LABEL^DIALOGZ ^DIC ^DICR E^DIE0 (,0,F,FIREREC,M,N,OUT,UNIQFERR,Z)^DIE17 Z^DIE2 ^DIE3 (AST,NOSCR,SET)^DIED QQ^DIEQ ($$OUTPUT,$$VALEXT,$$VALEXTS)^DIETLIBF $$GETTMP^DIKC1 ($$CREF,$$OREF)^DILF $$SET^DIQ RW^DIR2 |
Registration | 4 | ^DGPMDD1 ^DGPMDD2 ^DGPMGLC ON^DGYZODS |
ODS | 1 | ^A1B2XFR |
PCE Patient Care Encounter | 1 | CHGTYPSTAT^PXCOMPACT |
Name | Comments | DBIA/ICR reference |
---|---|---|
DE | ||
W | ||
O | ||
TR | ||
A | ||
B | ||
RE | ||
N | ||
RD | ||
T | ||
P | ||
V | ||
UNIQ | ||
Z | ||
X | ||
QS | ||
D | ||
Y | ||
PR | ||
R | ||
RP | ||
I | ||
SAVEVALS | ||
NKEY | ||
KEYCHK() | ||
BEGIN | ||
1 | ||
X1 | ||
2 | ||
C2 | ||
C2S | ||
C2F1 | ||
X2 | ||
3 | ||
4 | ||
X4 | ||
5 | ||
C5 | ||
C5S | ||
C5F1 | ||
X5 | ||
6 | ||
X6 | ||
7 | ||
X7 | ||
8 | ||
C8 | ||
C8S | ||
C8F1 | ||
X8 | ||
9 | ||
X9 | ||
10 | ||
X10 | ||
11 | ||
C11 | ||
C11S | ||
C11F1 | ||
X11 | ||
12 | ||
X12 | ||
13 | ||
X13 | ||
14 | ||
X14 | ||
15 | ||
X15 | ||
16 | ||
X16 | ||
17 | ||
C17 | ||
C17S | ||
C17F1 | ||
X17 | ||
18 | ||
19 | ||
X19 | ||
20 | ||
X20 | ||
21 | ||
X21 | ||
22 | ||
23 | ||
X23 | ||
24 |
Name | Field # of Occurrence |
---|---|
^%DT | X2, X23 |
NOW^%DTC | 23+1 |
^A1B2XFR | C2+16, C2S+16, C8+2, C8S+2, C11+2, C11S+2, C17+2, C17S+2 |
^DGPMDD1 | C2S+4 |
^DGPMDD2 | C2+4 |
^DGPMGLC | C2+14, C2S+14 |
ON^DGYZODS | X9 |
$$EZBLD^DIALOG | O+2 |
$$LABEL^DIALOGZ | 2, 8, 11, 13, 15, 17, 21, 23 |
^DIC | X5 |
^DICR | C5+2 |
E^DIE0 | I+1, 2+4, 21+4, 23+3 |
^DIE17 | RD |
0^DIE17 | 24 |
F^DIE17 | 1, 4, 5, 6, 7, 8, 9, 10, 11, 12 , 13, 14, 16, 19, 20, 21, 22 |
FIREREC^DIE17 | 1, 4, 6, 7, 9, 10, 12, 14, 16, 19 , 20 |
M^DIE17 | T |
N^DIE17 | RP, 2+4, 21+4, 23+3 |
OUT^DIE17 | 1, 4, 6, 7, 9, 10, 12, 14, 16, 19 , 20 |
UNIQFERR^DIE17 | Z |
Z^DIE17 | X |
Z^DIE2 | RD+1 |
^DIE3 | T |
AST^DIED | P |
NOSCR^DIED | P |
SET^DIED | T+3 |
QQ^DIEQ | QS |
$$OUTPUT^DIETLIBF | PR+1 |
$$VALEXT^DIETLIBF | T+2 |
$$VALEXTS^DIETLIBF | T+2 |
$$GETTMP^DIKC1 | BEGIN+1 |
$$CREF^DILF | C2F1 |
$$OREF^DILF | C2F1 |
$$SET^DIQ | R+2 |
RW^DIR2 | O+1 |
CHGTYPSTAT^PXCOMPACT | X19 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DGPM - [#405] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD( | R, R+1 |
^DD("DD" | R+2 |
^DD("KEY" - [#.31] | N |
^DD(405 | C2S+6, C2S+10, C5S+2 |
^DG(405.1 - [#405.1] | C5S+2 |
^DGPM - [#405] | DE, X1, C2+12, C2+14, C2+16, C2S+8, C2S+10, C2S+12, C2S+14, C2S+16 , C5+2, C5S+2, X7, C8+2, C8S+2, X20 |
^DGPM("ADFN" | C2+12!, C2S+12* |
^DGPM("B" | C2+2!, C2S+2* |
^DIE(448 | BEGIN+2 |
^DISV( | RD+2, Z*, X4*, X6* |
Name | Line Occurrences |
---|---|
$$KEYCHK | Z |
@( | B, V |
A | RE, N, Z, Y, RP, 1, 2+4, 4, 6, 7 , 9, 10, 12, 14, 16, 19, 20, 21+4, 22, 23+3 |
B | QS |
BEGIN | DGPMX3+1 |
C11F1 | C11S |
C11S | C11 |
C17F1 | C17S |
C17S | C17 |
C2F1 | C2S |
C2S | C2 |
C5F1 | C5S |
C5S | C5 |
C8F1 | C8S |
C8S | C8 |
D | RD, RD+1, P+1, QS |
DE | DGPMX3+1, 1, 4, 5, 6, 7, 8, 9, 10, 11 , 12, 13, 14, 16, 19, 20, 21, 22 |
N | Y |
NKEY | N |
O | Y, RP |
PR | RE, I+1 |
QS | RD, NKEY |
R | R, R+1 |
RD | Y, I, I+1, 2+5, 21+5, 23+4 |
RE | 5+3, 8+3, 11+3, 13+2, 15+2, 17+2 |
RP | PR, PR+1, R, R+1 |
SAVEVALS | Z |
TR | RE |
UNIQ | T+1 |
V | T+3, P+1 |
W | O, RE |
X | N, T, T+3, P, Y |
X1 | 1 |
X10 | 10 |
X12 | 12 |
X14 | 14 |
X16 | 16 |
X19 | 19 |
X20 | 20 |
X4 | 4 |
X6 | 6 |
X7 | 7 |
X9 | 9 |
Z | P+1, 21+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | DE+1*, DE+2*, DE+3*, UNIQ!*, R+2*, 23+1~ |
%( | UNIQ! |
%(0 | UNIQ |
%DT | X2*!, X23* |
%H | 23+1~ |
%I | 23+1~ |
%Z | DE+1*, DE+2*, DE+3*, DE+4! |
>> A1B2TAG | C2+16*, C2S+16*, C8+2*, C8S+2*, C11+2*, C11S+2*, C17+2*, C17S+2* |
>> D | N, D* |
>> D0 | BEGIN+3*, C2S+6*, C2S+10*, C5+2*, C5S+2* |
>> DA | DE, UNIQ, BEGIN+3, X1, C2+2, C2+12, C2+14, C2+16, C2S+2, C2S+8 , C2S+10, C2S+12, C2S+14, C2S+16, C5+2, C5S+2, X7, C8+2, C8S+2, X20 |
DB | DE!, C2!, C2S!, C5!, C5S!, C8!, C8S!, C11!, C11S!, C17! , C17S! |
DB( | T+2, P, X, 2+4*, 21+4*, 23+3* |
>> DC | RP |
DDER | T+3! |
DE | DE! |
DE( | O+2, RE, Z, Y, PR, RP, SAVEVALS, SAVEVALS+1, KEYCHK, 2+1* , 2+4, 5+1*, 8+1*, 11+1*, 17+1*, 21+4*, 23+3 |
DE(11 | DE+2*, C11, C11+1 |
DE(13 | DE+2* |
DE(15 | DE+2* |
DE(17 | DE+2*, C17, C17+1 |
DE(2 | DE+1*, C2, C2+1, C2+3, C2+5, C2+7, C2+9, C2+11, C2+13, C2+15 |
DE(21 | DE+3* |
DE(23 | DE+3* |
DE(5 | DE+1*, C5, C5+1 |
DE(8 | DE+1*, C8, C8+1 |
>> DFN | X19 |
DG | DE!, PR*, PR+1, R*, R+1*, R+2, 1, 4, 5, 6 , 7, 8, 9, 10, 11, 12, 13, 14, 16, 19 , 20, 21, 22 |
DG( | Z*, C2S, C2S+1, C2S+3, C2S+5, C2S+7, C2S+9, C2S+11, C2S+13, C2S+15 , C5S, C5S+1, C8S, C8S+1, C11S, C11S+1, C17S, C17S+1 |
>> DGHNYT | C2+14*, C2S+14* |
DGIDX | C2S+14! |
>> DGODS | X10 |
>> DGODSPT | X12 |
>> DGPMDDF | C2+4*, C2S+4* |
>> DGPMN | X1 |
>> DGPMP | X20 |
>> DGPMT | X2, X8 |
>> DGPMY | X1, 2+2, X19 |
DIC | DE*, P*, C2+1*, C2+3*, C2+5*, C2+7*, C2+9*, C2+11*, C2+13*, C2+15* , C2S+1*, C2S+3*, C2S+5*, C2S+7*, C2S+9*, C2S+11*, C2S+13*, C2S+15*, C5+1*, C5S+1* , X5!*, C8+1*, C8S+1*, C11+1*, C11S+1*, C17+1*, C17S+1* |
DIC("S" | Z!, X5* |
DIC(0 | P*, 1*, 4*, 6*, 7*, 9*, 10*, 12*, 14*, 16* , 19*, 20* |
>> DICRREC | BEGIN+2* |
>> DIE | DE*, P, UNIQ, C2+1, C2+3, C2+5, C2+7, C2+9, C2+11, C2+13 , C2+15, C2S+1, C2S+3, C2S+5, C2S+7, C2S+9, C2S+11, C2S+13, C2S+15, C2F1 , C5+1, C5S+1, X5, C8+1, C8S+1, C11+1, C11S+1, C17+1, C17S+1 |
DIEBADK | BEGIN+1! |
DIEFIRE | BEGIN+1!, 1, 4, 6, 7, 9, 10, 12, 14, 16 , 19, 20 |
>> DIEL | DE* |
>> DIEZ | BEGIN+3* |
DIEZAR | BEGIN+1~, BEGIN+2* |
DIEZRXR | BEGIN+1~ |
DIEZRXR(405 | C2F1*, C2F1+1* |
DIEZTMP | SAVEVALS, SAVEVALS+1, SAVEVALS+2, BEGIN+1~* |
>> DIFLD | O+2, N, T+2, UNIQ, D, PR+1, R+2, SAVEVALS, SAVEVALS+1, SAVEVALS+2 , 2*, 5*, 8*, 11*, 13*, 15*, 17*, 21*, 23* |
>> DIG | C5+2* |
>> DIH | C5+2* |
DIIENS | SAVEVALS, SAVEVALS+1, SAVEVALS+2, BEGIN+1~, BEGIN+3*, C2F1 |
DIPA | T+2!, PR+1! |
>> DIU | C2S+6*, C2S+10*, C5+2*, C5S+2* |
DIV | C2S+6, C2S+10!*, C5+2!*, C5S+2!* |
DIV(0 | C2S+10*, C5+2*, C5S+2* |
DIXR | BEGIN+1~, C2F1+1* |
>> DL | DE*, W |
DLAYGO | P*, Z! |
>> DLB | W, RD+2, Z, D, 2*, 5*, 8*, 11*, 13*, 15* , 17*, 21*, 23* |
>> DNM | BEGIN* |
>> DP | DE*, O+2, N, T+2, PR+1, R+2, SAVEVALS, SAVEVALS+1, SAVEVALS+2, 2 , 8, 11, 13, 15, 17, 21, 23 |
>> DQ | O+2, A*, B, RE, T+2, P, P+2, V, X, D , Y, PR, RP, SAVEVALS, BEGIN*, 1*, 2+4, C2S, C2S+1, C2S+3 , C2S+5, C2S+7, C2S+9, C2S+11, C2S+13, C2S+15, 3*, 4*, 5*, C5S , C5S+1, 6*, 7*, 8*, C8S, C8S+1, 9*, 10*, 11*, C11S , C11S+1, 12*, 13*, 14*, 16*, C17S, C17S+1, 18*, 19*, 20* , 21*, 21+4, 22*, 23+3 |
>> DQ( | A!, P+2, D*, PR |
DT | C2+14, C2S+14 |
DTIME | TR, BEGIN+3* |
>> DTOUT | TR* |
>> DU | DE*, P, D, PR, 2*, 5*, 5+2*, 8*, 8+2*, 11* , 11+2*, 13*, 13+1*, 15*, 15+1*, 17*, 21*, 21+1*, 23* |
DUZ | RD+2, Z, X4, X6, 21+2 |
DUZ("LANG" | R+2 |
DUZ(0 | TR, RE |
>> DV | O+1, O+2, TR, RE, N, RD+2, T, T+1, T+3, P , P+1, UNIQ, Z, D, Y, PR, RP, I, 2*, 2+4 , 5*, 8*, 11*, 13*, 15*, 17*, 21*, 21+4, 23*, 23+3 |
>> DW | Z, D, SAVEVALS+1, KEYCHK, 1*, 2*, 2+1, 4*, 5*, 5+1 , 6*, 7*, 8*, 8+1, 9*, 10*, 11*, 11+1, 12*, 13* , 14*, 15*, 16*, 17*, 17+1, 19*, 20*, 21*, 21+4, 23* |
>> DZ | QS* |
>> I(0 | C2S+6 |
U | DE+1, DE+2, DE+3, TR, P, P+2, Z, D, R, R+1 , BEGIN+3*, 1, C2+12, C2+14, C2S+6, C2S+8, C2S+10, C2S+12, C2S+14, 4 , C5+2, C5S+2, 6, 7, 9, 10, 12, 14, 16, 19 , 20, 22 |
X | O+2!*, TR*, N, RD, RD+1, RD+2*, T, P*, P+1!, P+2* , UNIQ!, Z, X+1*, QS, Y*, PR*, R*, R+1*, R+2, RP* , I+1, NKEY*, 1*, 2+2*, 2+3, 2+4*, C2+1*, C2+2, C2+3*, C2+5* , C2+7*, C2+9*, C2+11*, C2+12, C2+13*, C2+14, C2+15*, C2S*, C2S+1*, C2S+2 , C2S+3*, C2S+5*, C2S+6*, C2S+7*, C2S+9*, C2S+10*, C2S+11*, C2S+12, C2S+13*, C2S+14 , C2S+15*, X2*!, 4*, C5+1*, C5+2*, C5S*, C5S+1*, C5S+2*, X5*!, 6* , 7*, C8+1*, C8S*, C8S+1*, X8!, 9*, 10*, C11+1*, C11S*, C11S+1* , 12*, X12, 14*, 16*, X16, C17+1*, C17S*, C17S+1*, X17*!, 19* , 20*, 21+2*, 21+3, 21+4*, 21+5, 23+1*, 23+2, 23+3*, X23*! |
X("FIELD" | O+2* |
X("FILE" | O+2* |
Y | O, O+1, O+2, P, Y, PR*, R*, R+1*, R+2*, 1* , X1*, 2+3*, 2+4, C2+14*, C2S+6!, C2S+10!, C2S+14*, X2, 4*, C5+2! , C5S+2!, X5, 6*, 7*, X7*, 9*, 10*, X10*, 12*, X12* , 14*, X14*, 16*, X16*, 19*, 20*, X20*, 21+3*, 21+4, 22* , 23+2*, 23+3, X23 |
Y(0 | C2S+10* |
Y(1 | C2S+10*, C5+2*, C5S+2* |
Y(101 | C2S+6 |
YS | V! |
>> ZTQUEUED | X, NKEY |
Name | Field # of Occurrence |
---|---|
$T(@(3) | D |