VPRSDADG ;SLC/MKB -- SDA DG PTF utilities ;04/25/22 15:29
Source file <VPRSDADG.m>
Package | Total | Call Graph |
---|---|---|
Registration | 3 | RPC^DGPTFAPI ($$STR601,PTFIEN)^DGPTFUT PTF^DGPTPXRM |
DRG Grouper | 1 | $$CODEBA^ICDEX |
VA FileMan | 1 | $$FIND1^DIC |
Virtual Patient Record | 1 | $$VNUM^VPRSDAV |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
VA FileMan | 1 | ^DDE |
Name | Comments | DBIA/ICR reference |
---|---|---|
DXQ | ; -- get PTF Dx via Admissions
; Query called from GET^DDE, returns DLIST(#)=ien ; Expects context variables DFN, DSTRT, DSTOP, DMAX |
|
DX1 | ; -- get info for single PTF record [ID Action]
; Expects DIEN = #45 ien, returns VPRPOA & VPRPTF array |
|
OPQ | ; -- get PTF 601 procedure codes via Admissions
; Query called from GET^DDE, returns DLIST(#)=ien ; Expects context variables DFN, DSTRT, DSTOP, DMAX |
|
OP1 | ; -- get info for single PTF record [ID Action]
; Expects DIEN = #45 iens, returns VPRPTF & VPRVST |
FileNo | Call Tags |
---|---|
^DGPM - [#405] | FIND1^DIC |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNVSIT - [#9000010] | DX1+7, OP1+8 |
^DGPM - [#405] | DXQ+8, DX1+6, OPQ+8, OP1+7 |
^DGPM("ATID1" | DXQ+6, DXQ+7, OPQ+6, OPQ+7 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADM | DXQ+4~, DXQ+7*, DXQ+8, DX1+5~*, DX1+6, DX1+7, OPQ+4~, OPQ+7*, OPQ+8, OP1+5~ , OP1+6*, OP1+7, OP1+8 |
DA | OPQ+4~, OPQ+10*, OPQ+11, OPQ+12 |
>> DDEOUT | DX1+4*, DX1+9*, DX1+12*, OP1+4* |
>> DFN | DXQ+6, DXQ+7, DX1+6*, OPQ+6, OPQ+7, OP1+7* |
>> DIEN | DX1+3*, DX1+5, DX1+9, DX1+14, OP1+3* |
>> DLIST( | DXQ+11*, DXQ+12*, OPQ+12* |
>> DMAX | DXQ+6, DXQ+7, OPQ+6, OPQ+7 |
>> DSTOP | DXQ+5, OPQ+5 |
>> DSTRT | DXQ+5, OPQ+5 |
END | DXQ+4~, DXQ+5*, DXQ+6, OPQ+4~, OPQ+5*, OPQ+6 |
I | DXQ+4~, DXQ+12* |
IDT | DXQ+4~, DXQ+5*, DXQ+6*, DXQ+7, OPQ+4~, OPQ+5*, OPQ+6*, OPQ+7 |
N | DX1+2~, DX1+10*, DX1+11 |
P | OPQ+4~, OPQ+12* |
PTF | DXQ+4~, DXQ+8*, DXQ+10, DXQ+11, DXQ+12, OPQ+4~, OPQ+8*, OPQ+9, OPQ+11, OPQ+12 , OP1+5~, OP1+6* |
STR | OPQ+4~, OPQ+11*, OPQ+12 |
U | DXQ+8, DXQ+11, DXQ+12, DX1+6, DX1+10, DX1+11, DX1+13, OPQ+8, OPQ+12, OP1+7 |
VPRN | DXQ+4~, DXQ+5*, DXQ+6, DXQ+7, DXQ+11*, DXQ+12*, OPQ+4~, OPQ+5*, OPQ+6, OPQ+7 , OPQ+12* |
>> VPRPOA | DX1+10* |
VPRPTF | DX1+2!, DX1+3*, DX1+10, DX1+14, OP1+3*, OP1+6 |
VPRPTF("DX" | DX1+13* |
VPRPTF("VISIT" | DX1+8* |
>> VPRVST | OP1+9* |
VPTF | DXQ+4~, DXQ+10, DX1+2~, DX1+9, OPQ+4~, OPQ+9, OP1+2~ |
VPTF( | OPQ+10 |
VPTF(0 | DXQ+10, DX1+9 |
VPTF(1 | DXQ+11, DX1+11 |
VPTF(2 | DXQ+12, DX1+11 |
VPTF(3 | DX1+10 |
VST | DX1+2~, DX1+4*, DX1+7*, DX1+8, OP1+2~, OP1+4*, OP1+8*, OP1+9 |
X | DX1+2~, DX1+11*, DX1+12, DX1+13, OPQ+4~, OPQ+12*, OP1+2~ |
Y | DX1+2~, DX1+12*, DX1+13, OP1+2~ |