DGENL2 ;ALB/RMO - Patient Enrollment - Build List Area Cont.;16 JUN 1997 ; 7/8/05 1:37pm
Source file <DGENL2.m>
Package | Total | Call Graph |
---|---|---|
List Manager | 2 | $$SETSTR^VALM1 CNTRL^VALM10 |
Registration | 2 | ($$FINDPRI,$$GET)^DGENA $$EXT^DGENU |
VA FileMan | 1 | $$EXTERNAL^DILFD |
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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
HIS(DGARY,DFN,DGENRIEN,DGLINE,DGCNT) | ;Enrollment history
; Input -- DGARY Global array subscript ; DFN Patient IEN ; DGENRIEN Enrollment IEN ; DGLINE Line number ; Output -- DGCNT Number of lines in the list |
|
SET(DGARY,DGLINE,DGTEXT,DGCOL,DGON,DGOFF,DGSUB,DGNUM,DGDATA,DGCNT) | ; -- set display array
; Input -- DGARY Global array subscript ; DGLINE Line number ; DGTEXT Text ; DGCOL Column to start at (optional) ; DGON Highlighting on (optional) ; DGOFF Highlighting off (optional) ; DGSUB Secondary list subscript (optional) ; DGNUM Selection number (optional) ; DGDATA Data associated with selection (optional) ; Output -- DGCNT Number of lines in the list |
|
PHEART(DFN,DGENRIEN,PHENRDT) | ;find Purple Heart information based on enrollment date
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | EXTERNAL^DILFD |
^DGEN(27.11 - [#27.11] | EXTERNAL^DILFD |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGEN(27.11 - [#27.11] | PHEART+6, PHEART+7, PHEART+9, PHEART+10 |
^DPT - [#2] | PHEART+8, PHEART+11, PHEART+16, PHEART+17, PHEART+19, PHEART+21 |
^TMP( | SET+13, SET+14*, SET+17* |
Name | Line Occurrences |
---|---|
SET | HIS+10, HIS+14, HIS+16, HIS+22, HIS+23, HIS+24, HIS+25, HIS+26 |
Name | Field # of Occurrence |
---|---|
^(0 | SET+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DFN | HIS~, PHEART~, PHEART+6, PHEART+8, PHEART+9, PHEART+11, PHEART+16, PHEART+17, PHEART+19, PHEART+21 |
DGARY | HIS~, HIS+10, HIS+14, HIS+16, HIS+22, HIS+23, HIS+24, HIS+25, HIS+26, SET~ , SET+13, SET+14, SET+17 |
DGCNT | HIS~, HIS+10, HIS+14, HIS+16, HIS+22, HIS+23, HIS+24, HIS+25, HIS+26, SET~ , SET+12* |
DGCOL | SET~, SET+14, SET+15 |
DGDATA | SET~, SET+17 |
DGENR | HIS+6~, HIS+19 |
DGENR("DATETIME" | HIS+26 |
DGENR("EFFDATE" | HIS+23 |
DGENR("PRIORITY" | HIS+25 |
DGENR("STATUS" | HIS+24 |
DGENR("SUBGRP" | HIS+25 |
DGENRIEN | HIS~, HIS+17, PHEART~, PHEART+4, PHEART+6, PHEART+9 |
DGLINE | HIS~, HIS+8, HIS+10, HIS+13*, HIS+14, HIS+15*, HIS+16, HIS+21*, HIS+22, HIS+23 , HIS+24, HIS+25, HIS+26, SET~, SET+12, SET+13, SET+14, SET+15, SET+17 |
DGNUM | HIS+6~, HIS+9*, HIS+20*, HIS+22, SET~, SET+17 |
DGOFF | SET~, SET+15 |
DGON | SET~, SET+15 |
DGPRIEN | HIS+6~, HIS+17*, HIS+18*, HIS+19, HIS+22 |
DGSTART | HIS+6~, HIS+8* |
DGSUB | SET~, SET+17 |
DGTEXT | SET~, SET+14, SET+15 |
>> IORVOFF | HIS+10 |
>> IORVON | HIS+10 |
NXTDIF | PHEART+2~, PHEART+3*, PHEART+15*, PHEART+16 |
NXTENDT | PHEART+1~, PHEART+5*, PHEART+10*, PHEART+12, PHEART+13, PHEART+14 |
NXTENR | PHEART+1~, PHEART+9*, PHEART+10 |
NXTENTM | PHEART+2~, PHEART+14*, PHEART+15 |
NXTPHDT | PHEART+2~, PHEART+11*, PHEART+12, PHEART+13, PHEART+14, PHEART+16, PHEART+17 |
NXTPHTM | PHEART+2~, PHEART+14*, PHEART+15 |
PHARY | PHEART+1~, PHEART+21*, PHEART+22, PHEART+23, PHEART+24 |
PHDIERR | PHEART+1~, PHEART+22, PHEART+23, PHEART+24 |
PHENRDT | PHEART~, PHEART+4, PHEART+8, PHEART+11, PHEART+12, PHEART+14 |
PHENTM | PHEART+2~, PHEART+14*, PHEART+15 |
PHI | PHEART+1~, PHEART+22*, PHEART+25 |
PHREC | PHEART+2~, PHEART+16*, PHEART+17*, PHEART+18, PHEART+19*, PHEART+20, PHEART+21 |
PHRR | PHEART+1~, PHEART+24*, PHEART+25 |
PHST | PHEART+1~, PHEART+23*, PHEART+25 |
PRVDIF | PHEART+2~, PHEART+3*, PHEART+15*, PHEART+16 |
PRVENDT | PHEART+1~, PHEART+5*, PHEART+7* |
PRVENR | PHEART+1~, PHEART+6*, PHEART+7 |
PRVPHDT | PHEART+2~, PHEART+8*, PHEART+18, PHEART+19 |
U | PHEART+3*, PHEART+7, PHEART+10, PHEART+22, PHEART+23, PHEART+24 |
X | SET+11~, SET+13*, SET+14 |