VIABMS2 ;SGU/GJW - VIA BMS RPCs ;04/15/2016
Source file <VIABMS2.m>
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 |
---|---|---|
VistA Integration Adapter | 1 | VIABMS1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
HOSLOC | ;Returns a list of hospital locations from File #44;ICR-10040;ICR-4782
|
|
HOSLOC1(J) | ;
|
|
HOSLOC2(RESULT,IENS) | ;
|
|
WALK(STARTI,STARTJ,MAX,START,END,ROOT) | ;
|
|
DONE | ;
|
|
LPATMVT2 | ;This is the original code that is not used, but left here for reference as it uses the default LDIC logic.
|
|
LSTPAT2 | ;Returns a list of patients from File #2;ICR-10035, ICR-6607
|
|
CONTX | ;
|
|
SEEK(SDATE) | ;
|
|
WALK3(ROOT,MAX,STARTI,STARTJ) | ;
|
|
VISIT(I,J,ROOT,CNT) | ;
|
|
ENTERED(VIAIEN) | ;
|
|
NEXT(I,J) | ;
|
|
NXTQ | ;
|
|
PTR2(VIAIEN) | ;
|
|
GPATMVT | ; Returns a patient movement records from the PATIENT MOVEMENT file #405;ICR-1865
|
FileNo | Call Tags |
---|---|
^DGPM - [#405] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGPM - [#405] | PTR2+18, GPATMVT+16 |
^DGPM("AC" | GPATMVT+21, GPATMVT+22 |
^DGPM("B" | WALK+12, WALK+13 |
^DGPM("C" | WALK+19, WALK+27, WALK+31 |
^DPT - [#2] | ENTERED+2, PTR2+1, PTR2+3, PTR2+4, PTR2+5, PTR2+6, PTR2+7, PTR2+8 |
^DPT("BMS" | LSTPAT2+18, SEEK+3, SEEK+4, SEEK+6, WALK3+7, NEXT+4, NEXT+6, NEXT+7 |
^SC - [#44] | HOSLOC+14, HOSLOC+20, HOSLOC1+2, HOSLOC1+4, HOSLOC1+5, HOSLOC1+6, HOSLOC1+7 |
^TMP("VIADATA" | CONTX+2, WALK3+1 |
^TMP($J | HOSLOC+9, WALK+10 |
Name | Field # of Occurrence |
---|---|
^(0 | PTR2+18 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADM | PTR2+2~, PTR2+16*, PTR2+17, PTR2+18 |
CNT | HOSLOC+7~, HOSLOC+13*, HOSLOC+14, HOSLOC+15*, HOSLOC+16, HOSLOC+17, HOSLOC2+1~, HOSLOC2+2*, HOSLOC2+6*, HOSLOC2+7 , WALK+1~, WALK+2*, WALK+12, WALK+13, WALK+15*, WALK+16, WALK+17, WALK+19, WALK+23*, WALK+24 , WALK+26, WALK+31, WALK3+5~, WALK3+9*, WALK3+10, WALK3+11, WALK3+13, WALK3+14, WALK3+15, WALK3+16 , VISIT~, VISIT+1*, VISIT+2, GPATMVT+11~, GPATMVT+12*, GPATMVT+17*, GPATMVT+18 |
DGPAT | WALK+1~ |
DX | PTR2+2~ |
END | WALK~, WALK+8*, WALK+12, WALK+21, WALK+26, WALK+33 |
ENDI | LSTPAT2+10~, CONTX+15*, CONTX+22, WALK3+9* |
ENDJ | LSTPAT2+10~, CONTX+15*, CONTX+22, WALK3+9* |
FIRST | WALK3+5~ |
FLAG | HOSLOC+7~, HOSLOC+12*, HOSLOC+16*, HOSLOC+18, HOSLOC+23 |
I | HOSLOC+7~, HOSLOC+13*, HOSLOC+14*, HOSLOC+17, HOSLOC+20, HOSLOC+26*, HOSLOC+27*, HOSLOC+28, HOSLOC2+1~, HOSLOC2+4* , HOSLOC2+5, WALK+1~, WALK+3*, WALK+7*, WALK+12*, WALK+13, WALK+16, WALK+20*, WALK+21, WALK+24 , LPATMVT2+10~, LPATMVT2+26*, LPATMVT2+27*, LPATMVT2+28, LSTPAT2+10~, CONTX+5*, CONTX+6, CONTX+7, CONTX+18*, CONTX+19* , CONTX+24*, CONTX+25*, SEEK+1~, SEEK+3*, SEEK+4*, SEEK+5, SEEK+6, SEEK+7, WALK3+5~, WALK3+6* , WALK3+10, WALK3+13, WALK3+14, WALK3+15*, WALK3+17, VISIT~, NEXT~, NEXT+3, NEXT+4, NEXT+5 , NEXT+6, GPATMVT+11~, GPATMVT+14*, GPATMVT+15 |
IEN | HOSLOC2+1~, HOSLOC2+5*, HOSLOC2+7, GPATMVT+11~, GPATMVT+15*, GPATMVT+16, GPATMVT+18, GPATMVT+22*, GPATMVT+23 |
IENS | HOSLOC2~, HOSLOC2+4, HOSLOC2+5 |
II | WALK+1~, WALK+32*, WALK+33 |
IROOT | WALK3+5~, WALK3+7*, WALK3+14, WALK3+15 |
J | HOSLOC1~, HOSLOC1+1, HOSLOC1+2, HOSLOC1+3, HOSLOC1+4, HOSLOC1+5, HOSLOC1+6, HOSLOC1+7, WALK+1~, WALK+2* , WALK+4*, WALK+13*, WALK+14, WALK+16, WALK+17, WALK+19*, WALK+20, WALK+22, WALK+24, SEEK+1~ , SEEK+6*, SEEK+7, WALK3+5~, WALK3+6*, WALK3+11, WALK3+12, WALK3+13, WALK3+14*, WALK3+17, VISIT~ , VISIT+2, NEXT~, NEXT+4 |
JJ | WALK+1~, WALK+27*, WALK+28, WALK+31*, WALK+32 |
K | NEXT+1~, NEXT+4*, NEXT+5, NEXT+6*, NEXT+7, NEXT+8 |
L | NEXT+1~, NEXT+7*, NEXT+8 |
MAX | WALK~, WALK+9*, WALK+12, WALK+13, WALK+16, WALK+17, WALK+19, WALK+24, WALK3~, WALK3+2* , WALK3+10, WALK3+11, WALK3+14, WALK3+15, WALK3+16 |
MORE | WALK+1~, WALK+2*, WALK+17*, WALK+28*, WALK+31, WALK+33*, DONE+1, WALK3+5~, WALK3+16*, WALK3+17 |
MORED | LSTPAT2+10~, CONTX+1*, CONTX+15*, CONTX+16, CONTX+20 |
NODE0 | PTR2+2~, PTR2+3*, PTR2+9, PTR2+10, PTR2+11, PTR2+12, PTR2+13 |
NODE103 | PTR2+2~, PTR2+4*, PTR2+14 |
NODE1041 | PTR2+2~, PTR2+6*, PTR2+15 |
NODE105 | PTR2+2~, PTR2+7*, PTR2+16 |
NODE109 | PTR2+2~, PTR2+5*, PTR2+19 |
NODE3 | PTR2+2~, PTR2+8*, PTR2+20 |
OFFSET | HOSLOC+7~, HOSLOC+22*, HOSLOC+25*, HOSLOC+28 |
>> PATIEN | WALK+5*, WALK+11, WALK+18, WALK+19, WALK+27, WALK+31 |
PREVI | WALK+1~, WALK+2*, WALK+16*, WALK+24*, WALK+28*, DONE+1 |
PREVJ | WALK+1~, WALK+2*, WALK+16*, WALK+24*, WALK+27, WALK+28, WALK+31, DONE+1 |
REC | HOSLOC1+3*, HOSLOC1+4*, HOSLOC1+5*, HOSLOC1+6*, HOSLOC1+7*, HOSLOC1+8, PTR2+2~, PTR2+9*, PTR2+10*, PTR2+11* , PTR2+12*, PTR2+13*, PTR2+14*, PTR2+15*, PTR2+17*, PTR2+18*, PTR2+19*, PTR2+20*, PTR2+21 |
RES | LSTPAT2+10~, CONTX+12*, CONTX+14*, CONTX+15 |
RESULT | HOSLOC+8, HOSLOC2~, LPATMVT2+14 |
RESULT( | HOSLOC+28*, HOSLOC2+7*, LPATMVT2+27, LPATMVT2+28*, CONTX+7*, CONTX+19*, CONTX+25*, GPATMVT+18* |
RESULT(1 | HOSLOC+19*, HOSLOC+24*, HOSLOC2+3*, LSTPAT2+19*, CONTX+4*, CONTX+13*, CONTX+17*, CONTX+21*, GPATMVT+13*, GPATMVT+20* |
RESULT(2 | HOSLOC+20*, CONTX+22*, GPATMVT+23* |
RESULT(3 | HOSLOC+21*, CONTX+23* |
ROOT | WALK~, WALK+10*, WALK+15, WALK+23, LSTPAT2+10~, CONTX+2*, CONTX+14, CONTX+19, CONTX+25, CONTX+26 , WALK3~, WALK3+1*, WALK3+8, WALK3+13, VISIT~, VISIT+2 |
SDATE | SEEK~, SEEK+2, SEEK+3, SEEK+4 |
START | HOSLOC+7~, HOSLOC+11*, HOSLOC+13, WALK~, WALK+6*, WALK+7, WALK+21, WALK+26, WALK+33 |
STARTI | WALK~, WALK+3, LSTPAT2+10~, CONTX+10*, CONTX+11*, CONTX+13, CONTX+14, WALK3~, WALK3+3*, WALK3+6 |
STARTJ | WALK~, WALK+4, LSTPAT2+10~, CONTX+10*, CONTX+11*, CONTX+14, WALK3~, WALK3+4*, WALK3+6 |
STOP | WALK+1~, WALK+2* |
U | HOSLOC1+4, HOSLOC1+5, HOSLOC1+6, HOSLOC1+7, DONE+1, LPATMVT2+28, CONTX+10, CONTX+15, SEEK+2, SEEK+5 , SEEK+7, WALK3+17, ENTERED+2, NEXT+3, NEXT+5, NEXT+8, PTR2+9, PTR2+10, PTR2+11, PTR2+12 , PTR2+13, PTR2+14, PTR2+15, PTR2+16, PTR2+17, PTR2+18, PTR2+19, PTR2+20 |
VAL | WALK+1~, WALK+14*, WALK+15, WALK+22*, WALK+23, LSTPAT2+10~, CONTX+9*, CONTX+10, NEXT+1~, NEXT+3* , NEXT+5*, NEXT+8*, NXTQ+1 |
VIADATA | HOSLOC+7~, HOSLOC+9*, HOSLOC+10, HOSLOC+17, HOSLOC+27, HOSLOC+28, HOSLOC+29 |
>> VIAEDT | LPATMVT2+14, LPATMVT2+18, LPATMVT2+21, LSTPAT2+11, LSTPAT2+12, LSTPAT2+15*, WALK3+12 |
>> VIAER | LSTPAT2+11*, LSTPAT2+12*, GPATMVT+9*, GPATMVT+24*, GPATMVT+25 |
VIAFIELDS | LPATMVT2+10~, LPATMVT2+12* |
VIAFILE | LPATMVT2+10~, LPATMVT2+11* |
>> VIAFLAGS | LPATMVT2+13* |
>> VIAFROM | HOSLOC+11, CONTX+11 |
VIAIEN | ENTERED~, ENTERED+1, ENTERED+2, PTR2~, PTR2+1, PTR2+3, PTR2+4, PTR2+5, PTR2+6, PTR2+7 , PTR2+8, PTR2+9 |
>> VIAIENS | HOSLOC+8, LSTPAT2+11, LSTPAT2+17, CONTX+3, CONTX+5, CONTX+6, CONTX+8, GPATMVT+9, GPATMVT+10, GPATMVT+14 , GPATMVT+15, GPATMVT+19 |
VIALAGS | LPATMVT2+10~ |
>> VIAMAX | HOSLOC+14, HOSLOC+16, CONTX+14 |
>> VIAMDT | GPATMVT+9, GPATMVT+19, GPATMVT+21, GPATMVT+22 |
>> VIAMTYP | GPATMVT+9, GPATMVT+19, GPATMVT+21, GPATMVT+22 |
>> VIAPIEN | WALK+5, LPATMVT2+15, LPATMVT2+18, LPATMVT2+21, GPATMVT+9, GPATMVT+19, GPATMVT+21, GPATMVT+22 |
VIASCRN | LPATMVT2+10~, LPATMVT2+17*, LPATMVT2+20*, LPATMVT2+23* |
>> VIASDT | LPATMVT2+14, LPATMVT2+18, LPATMVT2+21, LSTPAT2+11, LSTPAT2+12, LSTPAT2+14*, LSTPAT2+17, LSTPAT2+18, CONTX+9, WALK3+12 |
VIAXREF | LPATMVT2+10~, LPATMVT2+16*, LPATMVT2+19*, LPATMVT2+22* |
X | LSTPAT2+10~, CONTX+6*, CONTX+7 |