©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
AGGRPAT ;VNGT/HS/ALA-Recent Patient save and retrieve ; 16 May 2010 1:07 PM
Source file <AGGRPAT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SAVE(DATA,NUM,DIEN,INFO) | ; EP - AGG SAVE RECENT PATIENT LIST
; Input ; NUM - Max number of enties to keep ; DIEN - (DFN) Patient's IEN ; INFO - extra data to be stored ; ; Output: ; DATA = name of global (passed by reference) in which the data is stored ; RESULT = 1 (unlock will always succeed) ; RESULT = -1 if invalid patient IEN (shouldn't happen) ; or ; BMXSEC - if M error encountered ; |
|
| ERR | ;
|
|
| GET(DATA,FAKE) | ; EP - AGG RECENT PATIENT RETRIEVE
; Input ; FAKE - extra 'blank' parameter required by BMXNET async 'feature' ; ; Output: ; DATA = name of global (passed by reference) in which the data is stored |
| RPC Name | Call Tags |
|---|---|
| AGG SAVE PAT LIST | SAVE |
| AGG GET PAT LIST | GET |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD("DD" | ERR+3 |
| ^TMP("AGGRPAT" | GET+12, SAVE+15 |
| ^XTMP("AGGRPAT" | GET+19, SAVE+26 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> BMXSEC | ERR+4* |
| CNT | GET+10~, GET+19*, GET+28, SAVE+24~, SAVE+36*, SAVE+41*, SAVE+43 |
| DATA | GET~, GET+12*, GET+13, GET+17, GET+27, GET+29, SAVE~, SAVE+15*, SAVE+16, SAVE+23 , SAVE+50, SAVE+51, ERR+5 |
| DIEN | GET+10~, GET+23*, GET+24*, GET+26, GET+27, SAVE~, SAVE+31, SAVE+34 |
| DT | SAVE+27 |
| DUZ | GET+19, SAVE+26 |
| DUZ(2 | GET+25, SAVE+31, SAVE+34, SAVE+40, SAVE+46 |
| ERRDTM | ERR+2~, ERR+3*, ERR+4 |
| FAKE | GET~ |
| I | SAVE+24~, SAVE+43* |
| IEN | SAVE+24~, SAVE+31*, SAVE+38*, SAVE+39, SAVE+40, SAVE+45*, SAVE+46, SAVE+47 |
| II | GET+10~, GET+17*, GET+27*, GET+28, GET+29*, SAVE+13~, SAVE+23*, SAVE+50*, SAVE+51*, ERR+5* |
| INFO | GET+10~, GET+26*, GET+27, SAVE~, SAVE+34 |
| >> LOC | GET+25*, GET+26 |
| NUM | SAVE~, SAVE+19*, SAVE+43 |
| QFL | GET+10~, GET+19*, GET+22, GET+24, GET+28* |
| RESULT | SAVE+24~, SAVE+25*, SAVE+49*, SAVE+50 |
| SDT | GET+10~, GET+19*, GET+22*, GET+24, GET+26, GET+27, SAVE+24~, SAVE+29*, SAVE+30*, SAVE+31 , SAVE+33*, SAVE+34, SAVE+36*, SAVE+37*, SAVE+38, SAVE+39, SAVE+40, SAVE+44*, SAVE+45, SAVE+46 , SAVE+47 |
| SGLOB | GET+10~, GET+19*, GET+22, GET+24, GET+26, SAVE+26*, SAVE+27, SAVE+30, SAVE+31, SAVE+34 , SAVE+37, SAVE+38, SAVE+39, SAVE+40, SAVE+44, SAVE+45, SAVE+46, SAVE+47 |
| U | SAVE+27 |
| UID | GET+10~, GET+11*, GET+12, SAVE+13~, SAVE+14*, SAVE+15 |
| Y | ERR+2~, ERR+3* |
| >> ZTSK | GET+11, SAVE+14 |