MAGJLST1 ;WIRMFO/JHC - VistARad RPC calls ; 30 Dec 2011 1:36 PM
Source file <MAGJLST1.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 |
---|---|---|
Imaging | 4 | MAGJ GET TREATING LIST MAGJ PT ALL EXAMS MAGJ PTRADEXAMS MAGNUTL2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
ERR | ||
PTLSTALL(MAGGRY,DATA) | ; List ALL exams for a patient
; MAGGRY - indirect reference to return array of exams for a patient ; DATA -- DFN ^ BEGDT ^ ONESHOT ; --> see PTLIST comments ; RPC is MAGJ PT ALL EXAMS |
|
PTLIST(MAGGRY,DATA) | ; get list of exams for a patient
; ; MAGGRY - indirect reference to return array of exams for a patient ; DATA -- DFN ^ unused ^ unused ^ BEGDT ^ ONESHOT ; DFN--Required; Patient's DFN ; BEGDT--Optional; Begin date for exam fetch (see below) ; ONESHOT--Optional; Number days back to search, return all records in one fell swoop ; Returns data in ^TMP($J,"MAGRAEX",0:n) ; RPC Call: MAGJ PTRADEXAMS |
|
PTLOOP | ; loop through exam data & package it for VRAD use
|
|
STATN(X) | ; get station #, else return input value
|
|
FACLIST(MAGGRY,DATA) | ; get Treating Facility List for a patient
; RPC Call: MAGJ GET TREATING LIST ; MAGGRY -- return array--supplied by TFL^VAFCTFU1 ; Input: DATA -- Patient DFN ; Returns: ; Array; first entry contains result header with # lines to follow ; and reply message description. ; Entries 2:N (if any exist) contain data for each Treating facility ; up-caret delimited : A ^ B ^ C ^ D ^ E ; A: Institution IEN of the Facility ; B: Institution Name ; C: Current date on record for that institution ; D: ADT/HL7 event reason ; E: FACILITY TYPE ; Note--see TFL^VAFCTFU1 for further details ; |
|
FACLISTZ | ||
END |
RPC Name | Call Tags |
---|---|
MAGJ PTRADEXAMS | PTLIST |
MAGJ PT ALL EXAMS | PTLSTALL |
MAGJ GET TREATING LIST | FACLIST |
FileNo | Call Tags |
---|---|
^DIC(4 - [#4] | GETS^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^%ZOSF("ERRTN" | ERR+2 |
^DPT - [#2] | PTLIST+31 |
^MAG(2005.2 - [#2005.2] | PTLOOP+9 |
^MAG(2006.1 - [#2006.1] | PTLOOP+7 |
^MAG(2006.69 - [#2006.69] | PTLIST+28 |
^TMP($J | ERR*, ERR+1, PTLIST+29!, PTLIST+58*, PTLIST+60*, PTLIST+61, PTLIST+62!, PTLOOP+2, PTLOOP+30* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
BEGDT | PTLIST+21~, PTLIST+26*, PTLIST+34*, PTLIST+35*, PTLIST+36*, PTLIST+40, PTLIST+41*, PTLIST+42 |
CNT | PTLIST+19~, PTLIST+29*, PTLIST+49, PTLIST+56, PTLOOP+3* |
CPT | PTLIST+21~, PTLOOP+16*, PTLOOP+19, PTLOOP+30 |
CURPRIO | PTLIST+22~, PTLOOP+20*, PTLOOP+23*, PTLOOP+24*, PTLOOP+25*, PTLOOP+26*, PTLOOP+30 |
DATA | PTLSTALL~, PTLSTALL+6, PTLIST~, PTLIST+26, PTLIST+27, FACLIST~, FACLIST+19 |
DAYCASE | PTLIST+20~, PTLOOP+14*, PTLOOP+15, PTLOOP+17 |
DFN | PTLIST+19~, PTLIST+27*, PTLIST+31, PTLIST+42, FACLIST+18~, FACLIST+19*, FACLIST+21, FACLIST+23 |
DIQUIET | PTLIST+19~, PTLIST+25*, FACLIST+17* |
DIV | PTLIST+20~, PTLOOP+11* |
DT | PTLIST+36 |
DUZ(2 | PTLOOP+11 |
ENDDT | PTLIST+21~, PTLIST+40*, PTLIST+41, PTLIST+42 |
ENDLOOP | PTLIST+20~, PTLIST+34*, PTLIST+35, PTLIST+43* |
ERR | ERR~* |
EXCAT | PTLIST+20~, PTLOOP+20*, PTLOOP+22*, PTLOOP+23, PTLOOP+24, PTLOOP+27*, PTLOOP+28*, PTLOOP+30 |
>> I | PTLOOP+9* |
IMGCNT | PTLIST+23~, PTLOOP+5*, PTLOOP+17, PTLOOP+23 |
ISS | PTLIST+19~, PTLOOP+1*, PTLOOP+2*, PTLOOP+30 |
KEY | PTLIST+22~, PTLOOP+5*, PTLOOP+30 |
LIMDAYS | PTLIST+22~, PTLIST+38*, PTLIST+39*, PTLIST+41 |
LIMEXAMS | PTLIST+21~ |
LRFLAG | PTLIST+23~, PTLOOP+20*, PTLOOP+30 |
MAGDT | PTLIST+20~, PTLOOP+5*, PTLOOP+12*, PTLOOP+13*, PTLOOP+17 |
MAGGRY | ERR+1*, PTLSTALL~, PTLSTALL+7, PTLIST~, PTLIST+27!, PTLIST+61*, FACLIST~, FACLIST+19!, FACLIST+23, FACLIST+24 |
MAGGRY("" | FACLIST+26 |
MAGGRY(0 | FACLISTZ* |
MAGGRY(1 | FACLIST+25! |
>> MAGJOB("USER" | PTLIST+53 |
MAGRACNT | PTLIST+19~, PTLIST+29*, PTLIST+42, PTLIST+43, PTLIST+46, PTLIST+48 |
MAGRET | PTLIST+19~, PTLIST+42 |
MODALITY | PTLIST+20~, PTLOOP+5*, PTLOOP+19, PTLOOP+30 |
MORE | PTLIST+21~, PTLIST+35, PTLIST+38*, PTLIST+42, PTLIST+44, PTLIST+45, PTLIST+50, PTLIST+51* |
MSG | PTLIST+23~, PTLIST+50*, PTLIST+51*, PTLIST+56, PTLIST+57 |
MYLOCK | PTLIST+20~, PTLOOP+14*, PTLOOP+15*, PTLOOP+30 |
ONESHOT | PTLIST+22~, PTLIST+26*, PTLIST+39, PTLIST+43 |
ONL | PTLIST+23~, PTLOOP+5*, PTLOOP+17, PTLOOP+26 |
PARAM | PTLSTALL+5~, PTLSTALL+6*, PTLSTALL+7 |
PATNAME | PTLIST+19~, PTLIST+31*, PTLIST+48, PTLIST+54, PTLIST+56 |
PLACE | PTLIST+20~, PTLOOP+5*, PTLOOP+7*, PTLOOP+19 |
PROCMOD | PTLIST+23~, PTLOOP+16*, PTLOOP+17 |
PSSN | PTLIST+21~, PTLIST+32*, PTLIST+54*, PTLIST+55*, PTLIST+56 |
RARPT | PTLIST+22~, PTLOOP+3*, PTLOOP+4, PTLOOP+14, PTLOOP+30 |
RASTCAT | PTLIST+23~, PTLOOP+20*, PTLOOP+22 |
RASTORD | PTLIST+23~, PTLOOP+16*, PTLOOP+23, PTLOOP+27 |
RDRIST | PTLIST+21~, PTLOOP+16*, PTLOOP+19 |
REMOTE | PTLIST+19~, PTLOOP+5*, PTLOOP+6, PTLOOP+8, PTLOOP+9, PTLOOP+10*, PTLOOP+18 |
REMOTE2 | PTLIST+22~, PTLOOP+6*, PTLOOP+30 |
REPLY | PTLIST+19~, PTLIST+30*, PTLIST+47*, PTLIST+48*, PTLIST+49, PTLIST+56*, PTLIST+57*, PTLIST+59*, PTLIST+60, FACLIST+20* , FACLIST+22*, FACLIST+24*, FACLIST+25*, FACLIST+26*, FACLISTZ |
SAVBEGDT | PTLIST+21~, PTLIST+44*, PTLIST+45*, PTLIST+59 |
SNDREMOT | PTLIST+23~, PTLIST+28*, PTLIST+58, PTLOOP+18 |
STATPRIORITY | PTLIST+23~, PTLOOP+29*, PTLOOP+30 |
STATUS | PTLIST+22~, PTLOOP+20*, PTLOOP+21 |
T | PTLOOP+9*, PTLOOP+10, PTLOOP+15*, STATN+1~, STATN+2* |
T(4 | STATN+2 |
U | PTLSTALL+6, PTLIST+26, PTLIST+28, PTLIST+31, PTLOOP+3, PTLOOP+5, PTLOOP+7, PTLOOP+9, PTLOOP+11, PTLOOP+12 , PTLOOP+14, PTLOOP+15, PTLOOP+16, PTLOOP+17, PTLOOP+18, PTLOOP+19, PTLOOP+20, PTLOOP+30, FACLIST+25, FACLIST+26 |
>> VA("BID" | PTLIST+33! |
>> VA("PID" | PTLIST+32, PTLIST+33! |
VAERR | PTLIST+32, PTLIST+33! |
WHOLOCK | PTLIST+20~, PTLOOP+14*, PTLOOP+15*, PTLOOP+17, PTLOOP+30 |
X | PTLIST+53*, PTLIST+54, PTLOOP+11*, STATN~, STATN+2*, STATN+3 |
X2 | PTLIST+22~, PTLIST+36*, PTLIST+37*, PTLIST+40 |
XX | PTLIST+20~, PTLOOP+2*, PTLOOP+3, PTLOOP+12, PTLOOP+14, PTLOOP+16, PTLOOP+17, PTLOOP+19, PTLOOP+20, PTLOOP+30 |
XX2 | PTLIST+20~, PTLOOP+2*, PTLOOP+11, PTLOOP+16, PTLOOP+20 |
>> Y | PTLOOP+4, PTLOOP+5, PTLOOP+17*, PTLOOP+18*, PTLOOP+19*, PTLOOP+30 |