VSITGET ;ISD/RJP - Visit Return Search and Match Logic of a Visit ;6/20/96
Source file <VSITGET.m>
Package | Total | Call Graph |
---|---|---|
PCE Patient Care Encounter | 2 | $$IP^VSITCK1 FLD^VSITFLD |
VA FileMan | 1 | C^%DTC |
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 |
---|---|---|
PCE Patient Care Encounter | 1 | VSIT |
Name | Comments | DBIA/ICR reference |
---|---|---|
LST(VDT,DFN,PRAM,VSIT,VSITGET) | ; - search for matches
; - called by ^VSIT and Supported Direct Call |
|
QUIT | ; - exit
|
|
CKIP(DATE,PAT) | ; - check to see if inpatient over date range but admitted earlier
|
|
MATCH(IEN) | ; - screen matches using visit array
|
|
RANGE | ; - date range
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNVSIT - [#9000010] | MATCH+6 |
^AUPNVSIT("AA" | LST+28, LST+31 |
^DGPM - [#405] | CKIP+5 |
^DIC(150.9 - [#150.9] | CKIP+4 |
^TMP("VSITDD" | LST+21, MATCH+12 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DATE | CKIP~, CKIP+3 |
DFN | LST~, LST+17 |
IEN | LST+22~, LST+30*, LST+31*, LST+32, LST+33, LST+34, LST+37*, LST+38, LST+39, MATCH~ , MATCH+5, MATCH+6 |
IPM | CKIP+2~, CKIP+3*, CKIP+4, CKIP+5 |
IPV | CKIP+2~, CKIP+5*, CKIP+6 |
NOD | LST+22~, LST+32*, LST+33, LST+38*, LST+39, LST+43*, LST+44, LST+47, LST+49*, MATCH+6* , MATCH+7, MATCH+10, MATCH+12, MATCH+13*, MATCH+14 |
PAT | CKIP~, CKIP+3 |
PRAM | LST~, LST+18 |
VDT | LST~, LST+16 |
VSIT | LST~ |
VSIT( | MATCH+10, MATCH+12 |
VSIT("PAT" | LST+17*, LST+19, LST+24, LST+28, LST+29, LST+31 |
VSIT("SVC" | LST+24, LST+29 |
VSIT("VDT" | LST+16*, LST+19, LST+24, RANGE+8, RANGE+13, RANGE+14 |
VSIT(0 | LST+18*, MATCH+8, RANGE+9, RANGE+10, RANGE+13, RANGE+14 |
VSITBEG | LST+22~, LST+27, RANGE+13* |
VSITDAT | LST+22~, LST+27*, LST+28*, LST+29, LST+31 |
VSITEND | LST+22~, LST+28, RANGE+14* |
VSITGET | LST~, LST+13!, LST+14*, LST+42*, LST+46*, LST+47, LST+49* |
VSITGET( | LST+47*, LST+49* |
VSITI | MATCH+9~, MATCH+12* |
VSITIPV | LST+22~, LST+36*, LST+37 |
VSITIPV( | LST+34!, LST+36, CKIP+6* |
VSITM | MATCH+9~, MATCH+11*, MATCH+12*, MATCH+13 |
VSITSORT | LST+22~ |
VSITSORT( | LST+33*, LST+39* |
VSITSORT(0 | LST+43 |
X | MATCH+9~, MATCH+10*, MATCH+12, RANGE+7~, RANGE+14 |
X1 | RANGE+7~, RANGE+8* |
X2 | RANGE+7~, RANGE+9*, RANGE+10*, RANGE+11* |