VBECA1B ;HIOFO/BNT - VBECS Patient Data APIs ; 01/21/05 8:30am
Source file <VBECA1B.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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ABORH(DFN,VBECTYP) | ; Returns VBECS Patient ABO Group and Rh Type
; Input: DFN = PATIENT file (#2) IEN ; VBECTYP = "ABORH" or "ABO" or "RH" as needed. |
|
| ABOEN(ARR,DOC) | ;
|
|
| ABOSET(CBK) | ;
|
|
| TRRX(DFN) | ; Returns VBECS Patient Transfusion Reaction History
|
|
| TRRXEN(ARR,DOC) | ;
|
|
| TRRXSET(CBK) | ;
|
|
| ABID(DFN) | ; Returns VBECS Patient Antibodies Identified
|
|
| ABIDEN(ARR,DOC) | ;
|
|
| ABSET(CBK) | ;
|
|
| AVUNIT(TMPLOC,DFN) | ; Returns VBECS Patient Available Units
; Input variable; ; TMPLOC = Node in ^TMP to be used for output data array ; DFN = Internal number of patient |
|
| AVUEN(ARR,DOC) | ;
|
|
| AVUSET(CBK) | ;
|
|
| TRAN(DFN) | ; Returns VBECS Patient Transfusion History
|
|
| TRANEN(ARR,DOC) | ;
|
|
| TRANSET(CBK) | ;
|
|
| DFN(DFN) | ; Returns VBECS Patient Reports for CPRS
|
|
| RPTEN(ARR,DOC) | ;
|
|
| RPTSET(CBK) | ;
|
| Name | Field # of Occurrence |
|---|---|
| EN^MXMLPRSE | ABOEN+6, TRRXEN+6, ABIDEN+6, AVUEN+6, TRANEN+6, RPTEN+6 |
| PARSE^VBECRPC1 | ABORH+12, TRRX+8, ABID+8, AVUNIT+17, TRAN+8, DFN+8 |
| $$EXECUTE^VBECRPCC | ABORH+11, TRRX+7, ABID+7, AVUNIT+16, TRAN+7, DFN+7 |
| INITV^VBECRPCC | ABORH+6, TRRX+2, ABID+1, AVUNIT+11, TRAN+2, DFN+1 |
| $$CHARCHK^XOBVLIB | ABORH+10, TRRX+6, ABID+6, AVUNIT+15, TRAN+6, DFN+6 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | ABORH+3 |
| ^TMP( | AVUNIT+10!, AVUNIT+20* |
| ^TMP("VBDATA" | RPTEN+2 |
| ^TMP("VBECA1B" | TRRXEN+2, ABIDEN+2, AVUEN+2, TRANEN+2, TRANEN+11! |
| ^TMP("VBECAPI" | ABORH+5!, ABORH+15!, TRRX+1!, TRRXEN+10!, AVUNIT+10!, AVUEN+10!, TRAN+1!, TRANEN+11! |
| ^TMP("VBECAPI1" | ABORH+5!, ABORH+15!, TRRX+1!, TRRXEN+10!, AVUNIT+10!, AVUEN+10!, TRAN+1!, TRANEN+11! |
| Name | Line Occurrences |
|---|---|
| ABIDEN | ABID+9 |
| ABOEN | ABORH+14 |
| ABOSET | ABOEN+5 |
| ABSET | ABIDEN+5 |
| AVUEN | AVUNIT+18 |
| AVUSET | AVUEN+5 |
| RPTEN | DFN+9 |
| RPTSET | RPTEN+5 |
| TRANEN | TRAN+9 |
| TRANSET | TRANEN+5 |
| TRRXEN | TRRX+9 |
| TRRXSET | TRRXEN+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARR | ABORH+14, ABOEN~, TRRX+9, TRRXEN~, ABID+9, ABIDEN~, AVUNIT+18, AVUNIT+20, AVUNIT+21!, AVUEN~ , AVUEN+7*, TRAN+9, TRANEN~, TRANEN+7*, TRANEN+8*, DFN+9, RPTEN~, RPTEN+7* |
| ARR("ABID" | ABIDEN+7* |
| ARR("ERROR" | ABORH+3*, ABORH+4*, ABORH+8*, ABORH+13*, TRRX+4*, ABID+4*, AVUNIT+13*, TRAN+4*, DFN+4* |
| ARR("TRRX" | TRRX+10*, TRRXEN+7* |
| ARR("UNIT" | AVUNIT+19* |
| ARR1 | ABORH+5!, ABORH+15!, ABID+11!, AVUEN+10! |
| ARR1("API" | ABOEN+2 |
| ATR | ABID+11! |
| CBK | ABOEN+1~, ABOEN+5, ABOEN+6, ABOSET~, ABOSET+1!, TRRXEN+1~, TRRXEN+5, TRRXEN+6, TRRXSET~, TRRXSET+1! , ABID+11!, ABIDEN+1~, ABIDEN+5, ABIDEN+6, ABSET~, ABSET+1!, AVUEN+1~, AVUEN+5, AVUEN+6, AVUSET~ , AVUSET+1!, TRANEN+1~, TRANEN+5, TRANEN+6, TRANSET~, TRANSET+1!, RPTEN+1~, RPTEN+5, RPTEN+6, RPTSET~ , RPTSET+1! |
| CBK("CHARACTERS" | ABOSET+4*, TRRXSET+4*, ABSET+4*, AVUSET+4*, TRANSET+4*, RPTSET+4* |
| CBK("ENDELEMENT" | ABOSET+3*, TRRXSET+3*, ABSET+3*, AVUSET+3*, TRANSET+3*, RPTSET+3* |
| CBK("STARTELEMENT" | ABOSET+2*, TRRXSET+2*, ABSET+2*, AVUSET+2*, TRANSET+2*, RPTSET+2* |
| CNT | ABOEN+1~, TRRXEN+1~, ABID+11!, ABIDEN+1~, AVUEN+1~, TRANEN+1~, RPTEN+1~ |
| DFN | ABORH~, ABORH+3, ABORH+10, TRRX~, TRRX+6, ABID~, ABID+6, ABID+11!, AVUNIT~, AVUNIT+9 , AVUNIT+15, TRAN~, TRAN+6, DFN~, DFN+6 |
| DOC | ABOEN~, ABOEN+6, TRRXEN~, TRRXEN+6, ABID+11!, ABIDEN~, ABIDEN+6, AVUEN~, AVUEN+6, TRANEN~ , TRANEN+6, RPTEN~, RPTEN+6 |
| ELE | ABID+11! |
| OPTION | ABOEN+2*, ABOEN+6, TRRXEN+2*, TRRXEN+6, ABID+11!, ABIDEN+2*, ABIDEN+6, AVUEN+2*, AVUEN+6, TRANEN+2* , TRANEN+6, RPTEN+2*, RPTEN+6 |
| TEXT | ABID+11! |
| TMPLOC | AVUNIT~, AVUNIT+8, AVUNIT+10, AVUNIT+20 |
| VBECABHC | ABOEN+4*, TRRXEN+4*, TRRXEN+8!, ABID+11!, ABIDEN+4*, AVUEN+4*, AVUEN+8!, TRANEN+4*, TRANEN+9!, DFN+11! , RPTEN+4* |
| >> VBECCRC | RPTEN+4* |
| VBECLN | ABOEN+4*, TRRXEN+4*, TRRXEN+8!, ABID+11!, ABIDEN+4*, AVUEN+4*, AVUEN+8!, TRANEN+4*, TRANEN+9!, DFN+11! , RPTEN+4* |
| VBECMSBC | ABOEN+4*, TRRXEN+4*, TRRXEN+8!, ABID+12!, ABIDEN+4*, AVUEN+4*, AVUEN+8!, TRANEN+4*, TRANEN+9!, DFN+11! , RPTEN+4* |
| VBECPRMS | ABORH+11, ABORH+12, TRRX+7, TRRX+8, TRRXEN+8!, ABID+7, ABID+8, ABID+12!, AVUNIT+16, AVUNIT+17 , AVUEN+8!, TRAN+7, TRAN+8, TRANEN+9!, DFN+7, DFN+8, DFN+11! |
| VBECPRMS("ERROR" | ABORH+8, TRRX+4, ABID+4, AVUNIT+13, TRAN+4, DFN+4 |
| VBECPRMS("PARAMS" | ABORH+9*, ABORH+10*, TRRX+5*, TRRX+6*, ABID+5*, ABID+6*, AVUNIT+14*, AVUNIT+15*, TRAN+5*, TRAN+6* , DFN+5*, DFN+6* |
| VBECPRMS("RESULTS" | ABORH+7*, TRRX+3*, ABID+2*, ABID+3, AVUNIT+12*, TRAN+3*, DFN+2*, DFN+3 |
| VBECRES | ABOEN+2*, ABOEN+3, TRRXEN+2*, TRRXEN+3, TRRXEN+7, TRRXEN+8!, ABID+12!, ABIDEN+2*, ABIDEN+3, ABIDEN+7 , AVUEN+2*, AVUEN+3, AVUEN+7, AVUEN+8!, TRANEN+2*, TRANEN+3, TRANEN+7, TRANEN+8, TRANEN+9!, DFN+11! , RPTEN+2*, RPTEN+3, RPTEN+7 |
| VBECSRC | ABORH+17!, ABOEN+4*, TRRXEN+4*, TRRXEN+8!, ABID+12!, ABIDEN+4*, AVUEN+4*, AVUEN+8!, TRANEN+4*, TRANEN+9! , DFN+11!, RPTEN+4* |
| VBECSTAT | ABORH+11*, ABORH+17!, TRRX+7*, TRRXEN+8!, ABID+7*, ABID+12!, AVUNIT+16*, AVUEN+8!, TRAN+7*, TRANEN+9! , DFN+7*, DFN+11! |
| >> VBECSTC | RPTEN+4* |
| VBECTRHC | ABORH+17!, ABOEN+4*, TRRXEN+4*, TRRXEN+9!, ABID+12!, ABIDEN+4*, AVUEN+4*, AVUEN+9!, TRANEN+4*, TRANEN+10! , DFN+12!, RPTEN+4* |
| VBECTSTC | ABORH+17!, ABOEN+4*, TRRXEN+4*, TRRXEN+9!, ABID+12!, ABIDEN+4*, AVUEN+4*, AVUEN+9!, TRANEN+4*, TRANEN+10! , DFN+12!, RPTEN+4* |
| VBECTYP | ABORH~, ABORH+4, ABORH+19 |
| VBECUNA | ABORH+17!, ABOEN+4*, TRRXEN+4*, TRRXEN+9!, ABID+13!, ABIDEN+4*, AVUEN+4*, AVUEN+9!, TRANEN+4*, TRANEN+10! , DFN+12!, RPTEN+4* |
| VBECUNC | ABORH+17!, ABOEN+4*, TRRXEN+4*, TRRXEN+9!, ABID+13!, ABIDEN+4*, AVUEN+4*, AVUEN+9!, TRANEN+4*, TRANEN+10! , DFN+12!, RPTEN+4* |
| VBECUND | ABORH+17!, ABOEN+4*, TRRXEN+4*, TRRXEN+9!, ABID+13!, ABIDEN+4*, AVUEN+4*, AVUEN+9!, TRANEN+4*, TRANEN+10! , DFN+12!, RPTEN+4* |
| VBECUNS | ABORH+18!, ABOEN+4*, TRRXEN+4*, TRRXEN+9!, ABID+13!, ABIDEN+4*, AVUEN+4*, AVUEN+9!, TRANEN+4*, TRANEN+10! , DFN+12!, RPTEN+4* |
| VBECY | ABORH+7*, ABORH+12, ABORH+13, ABORH+14, ABORH+18!, TRRX+3*, TRRX+8, TRRX+9, TRRXEN+9!, ABID+2* , ABID+3, ABID+8, ABID+9, ABID+13!, AVUNIT+12*, AVUNIT+17, AVUNIT+18, AVUEN+9!, TRAN+3*, TRAN+8 , TRAN+9, TRANEN+10!, DFN+2*, DFN+3, DFN+8, DFN+9, DFN+12! |