©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| QUIT | ; - exit
|
|
| RANGE | ; - date range
|
|
| MATCH(IEN) | ; - screen matches using visit array
|
|
| LST(VDT,DFN,PRAM,VSIT,VSITGET) | ; - search for matches
; - called by ^VSIT and Supported Direct Call |
|
| CKIP(DATE,PAT) | ; - check to see if inpatient over date range but admitted earlier
|
| 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 |
| Name | Line Occurrences |
|---|---|
| $$MATCH | LST+32, LST+38 |
| CKIP | LST+24, LST+29 |
| QUIT | LST+19, LST+44 |
| RANGE | LST+26 |
| >> | 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* |