MAGVIM05 ;WOIFO/MAT,JL,DAC,PMK,BT - Utilities for RPC calls for DICOM file processing ;15 March 2023 9:56 AM
Source file <MAGVIM05.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 | MAGV RAD EXAM ORDER MAGV RAD EXAM REGISTER MAGV RAD STAT COMPLETE MAGV RAD STAT EXAMINED |
Name | Comments | DBIA/ICR reference |
---|---|---|
XMCOMPLT(RETURN,RADPT,RAEXAM1,RAEXAM2,MAGVUSR,MAGVUSRDV,RAIMGTYP,RASTDRPT,RADXPRIM,RADXSCND) | ;
|
|
XMEXAMIN(RETURN,RADFN,RAEXAM1,RAEXAM2,MAGVUSR,MAGVUSRDV,RAIMGTYP) | ;
|
|
XMORDER(RETURN,DFN,RAMLC,RADPROC,STUDYDAT,RACAT,REQLOC,REQPHYS,REASON,MISC) | ;
|
|
XMREGSTR(RETURN,RAOIFN,EXMDTE,RAMSC) | ;
|
|
ZRUSEPIN | ;
|
|
GETDIV() | ;
|
|
MAKELIST(RACTION,RAIMGTYP,RAMSC,MAGVUSR,MAGSITEP) | ; output required fields
; Load required flags |
|
STNDRPRT(RASTDRPT,SSCR,INDEX1) | ;
|
|
MANRPRT(TXTLST,SSCR,INDEX1) | ;
|
|
OUTPUT(TEXT,ARRAY) | ;
|
|
IMAGELOC(RESULT,PROCIEN,DIVISION) | ;
; return the outside imaging location for a given radiology procedure and division |
|
ADDROOM(INFO,RAEXAM) | ; add the OUTSIDE STUDY camera equipment room to the IMAGING LOCATION
|
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | XMREGSTR+27, MAKELIST+17, MAKELIST+22, MAKELIST+27, MAKELIST+57, IMAGELOC+14, IMAGELOC+19, IMAGELOC+26 |
ADDROOM^MAGDRPCB | ADDROOM+2 |
IMAGELOC^MAGDRPCB | XMREGSTR+15 |
$$OUTSEP^MAGVIM01 | ZRUSEPIN+1 |
$$STATSEP^MAGVIM01 | ZRUSEPIN+2 |
ALERT^MAGVIMRA | XMCOMPLT+100 |
COMPLETE^RAMAGRP1 | XMCOMPLT+76, XMCOMPLT+82 |
ORDER^RAMAGRP1 | XMORDER+26 |
REGISTER^RAMAGRP1 | XMREGSTR+34 |
EXAMINED^RAMAGRP2 | XMEXAMIN+45, XMEXAMIN+51 |
EXMSTREQ^RAMAGRP2 | MAKELIST+3 |
$$HL7TFM^XLFDT | XMORDER+9 |
$$NOW^XLFDT | MAKELIST+7 |
$$GET^XPAR | GETDIV+2 |
$$IEN^XUAF4 | XMCOMPLT+32, XMEXAMIN+26 |
RPC Name | Call Tags |
---|---|
MAGV RAD EXAM ORDER | XMORDER |
MAGV RAD EXAM REGISTER | XMREGSTR |
MAGV RAD STAT EXAMINED | XMEXAMIN |
MAGV RAD STAT COMPLETE | XMCOMPLT |
FileNo | Call Tags |
---|---|
^MAG(2006.1 - [#2006.1] | GET1^DIQ |
^MAGD(2006.5759 - [#2006.5759] | GET1^DIQ |
^DIC(4 - [#4] | GET1^DIQ |
^RAMIS(71 - [#71] | GET1^DIQ |
^RA(79.1 - [#79.1] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^MAG(2006.1 - [#2006.1] | XMCOMPLT+29, XMCOMPLT+33, XMEXAMIN+23, XMEXAMIN+27, XMORDER+6 |
^MAGD(2006.5759 - [#2006.5759] | IMAGELOC+22 |
^RA(74.1 - [#74.1] | MAKELIST+46, MAKELIST+72, STNDRPRT+5, STNDRPRT+7 |
^RAO(75.1 - [#75.1] | XMORDER+19, XMREGSTR+7 |
Name | Line Occurrences |
---|---|
$$GETDIV | XMREGSTR+4 |
$$MAKELIST | XMCOMPLT+58, XMEXAMIN+37 |
ADDROOM | XMCOMPLT+79, XMEXAMIN+48 |
IMAGELOC | XMREGSTR+10, XMREGSTR+22 |
MANRPRT | MAKELIST+37, MAKELIST+63 |
OUTPUT | XMCOMPLT+64, XMCOMPLT+70, XMCOMPLT+74, XMEXAMIN+43, MAKELIST+78, MAKELIST+79, STNDRPRT+7, MANRPRT+6 |
STNDRPRT | MAKELIST+40, MAKELIST+66 |
ZRUSEPIN | XMCOMPLT+4, XMEXAMIN+4, XMORDER+3, XMREGSTR+3, IMAGELOC+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARRAY | OUTPUT~ |
ARRAY( | OUTPUT+3* |
ARRAY("" | OUTPUT+2 |
CT | XMCOMPLT+48~*, XMCOMPLT+49*, XMCOMPLT+50, XMCOMPLT+51, XMCOMPLT+52, XMCOMPLT+69~*, XMCOMPLT+70*, STNDRPRT+4~, STNDRPRT+5*, STNDRPRT+7 , MANRPRT+3~*, MANRPRT+4*, MANRPRT+6 |
DFN | XMORDER~, XMORDER+19, XMORDER+26 |
DIV | XMREGSTR+4~*, XMREGSTR+10, XMREGSTR+22, GETDIV+1~, GETDIV+2*, GETDIV+3, GETDIV+4 |
DIVISION | IMAGELOC~, IMAGELOC+9*, IMAGELOC+10, IMAGELOC+11, IMAGELOC+19, IMAGELOC+20, IMAGELOC+22, IMAGELOC+24 |
DUZ(2 | XMCOMPLT+29, XMEXAMIN+23, GETDIV+3 |
EXMDTE | XMREGSTR~, XMREGSTR+34 |
FMDAY | XMORDER+3~, XMORDER+9*, XMORDER+10, XMORDER+14 |
I | XMORDER+3~, XMORDER+19*, OUTPUT+1~, OUTPUT+2*, OUTPUT+3 |
ICT | XMCOMPLT+46~*, XMCOMPLT+51* |
IEN | IMAGELOC+2~, IMAGELOC+22*, IMAGELOC+23, IMAGELOC+26 |
IENINST | XMCOMPLT+32~*, XMCOMPLT+33, XMEXAMIN+26~*, XMEXAMIN+27 |
IMAGETYPE | IMAGELOC+2~, IMAGELOC+14*, IMAGELOC+15, IMAGELOC+22 |
IMAGLOC | XMREGSTR+3~, XMREGSTR+27*, XMREGSTR+29 |
INDEX | MAKELIST+76~, MAKELIST+77*, MAKELIST+78, MAKELIST+79 |
INDEX1 | STNDRPRT~, STNDRPRT+7, MANRPRT~, MANRPRT+6 |
INFO | XMCOMPLT+78~, XMCOMPLT+79, XMCOMPLT+81, XMEXAMIN+47~, XMEXAMIN+48, XMEXAMIN+50, MAKELIST+2~, MAKELIST+3, ADDROOM~, ADDROOM+2 |
INFO(0 | MAKELIST+4, MAKELIST+77 |
INFO(1 | XMCOMPLT+81, XMEXAMIN+50, MAKELIST+4 |
LOCINFO | XMREGSTR+9~, XMREGSTR+15, XMREGSTR+16 |
MAGERR | XMCOMPLT+12~*, XMCOMPLT+14, XMCOMPLT+15*, XMCOMPLT+19, XMCOMPLT+34*, XMCOMPLT+37, XMCOMPLT+58*, XMCOMPLT+59, XMCOMPLT+60, XMEXAMIN+6~* , XMEXAMIN+8, XMEXAMIN+9*, XMEXAMIN+13, XMEXAMIN+28*, XMEXAMIN+31, XMEXAMIN+37*, XMEXAMIN+38, XMEXAMIN+39 |
MAGSITEP | XMCOMPLT+27~, XMCOMPLT+29*, XMCOMPLT+30, XMCOMPLT+33*, XMCOMPLT+58, XMEXAMIN+21~, XMEXAMIN+23*, XMEXAMIN+24, XMEXAMIN+27*, XMEXAMIN+37 , MAKELIST~, MAKELIST+17, MAKELIST+22, MAKELIST+27, MAKELIST+57 |
MAGVUSR | XMCOMPLT~, XMCOMPLT+58, XMEXAMIN~, XMEXAMIN+37, MAKELIST~, MAKELIST+11 |
MAGVUSRDV | XMCOMPLT~, XMCOMPLT+29*, XMCOMPLT+32, XMCOMPLT+34, XMEXAMIN~, XMEXAMIN+23*, XMEXAMIN+26, XMEXAMIN+28 |
MAXORDER | XMORDER+3~, XMORDER+6*, XMORDER+7*, XMORDER+19 |
MISC | XMORDER~, XMORDER+26 |
MSG | XMCOMPLT+4~, XMCOMPLT+34*, XMCOMPLT+38, XMEXAMIN+4~, XMEXAMIN+28*, XMEXAMIN+32 |
NOIMPR | MAKELIST+70~*, MAKELIST+71*, MAKELIST+72*, MAKELIST+73*, MAKELIST+74 |
NOREPORT | MAKELIST+44~*, MAKELIST+45*, MAKELIST+46*, MAKELIST+47*, MAKELIST+48 |
ORDINFO | XMORDER+26, XMORDER+29!, XMORDER+38! |
ORDINFO( | XMORDER+32, XMORDER+34 |
ORDINFO("A" | XMORDER+31 |
ORDINFO(0 | XMORDER+29, XMORDER+37 |
PARAM | XMCOMPLT+12~, XMCOMPLT+14*, XMCOMPLT+15, XMCOMPLT+20, XMEXAMIN+6~, XMEXAMIN+8*, XMEXAMIN+9, XMEXAMIN+14 |
PREFIX | STNDRPRT+2~*, STNDRPRT+7, MANRPRT+2~*, MANRPRT+6 |
PROC1 | XMORDER+3~, XMORDER+15*, XMORDER+19 |
PROCIEN | XMREGSTR+9~*, XMREGSTR+10, XMREGSTR+20!, XMREGSTR+21*, XMREGSTR+22, IMAGELOC~, IMAGELOC+4*, IMAGELOC+5, IMAGELOC+6, IMAGELOC+14 , IMAGELOC+16, IMAGELOC+24 |
RACAT | XMORDER~, XMORDER+26 |
RACTION | MAKELIST~, MAKELIST+3 |
RADFN | XMEXAMIN~, XMEXAMIN+18 |
RADPROC | XMORDER~, XMORDER+15, XMORDER+26 |
RADPT | XMCOMPLT~, XMCOMPLT+24, XMCOMPLT+100 |
RADPVAL | MAKELIST+9~, MAKELIST+17*, MAKELIST+18, MAKELIST+22*, MAKELIST+23, MAKELIST+27*, MAKELIST+28, MAKELIST+57*, MAKELIST+58 |
RADXPRIM | XMCOMPLT~, XMCOMPLT+64, MAKELIST+21 |
RADXSCND | XMCOMPLT~, XMCOMPLT+54!* |
RADXSCND( | XMCOMPLT+49, XMCOMPLT+50, XMCOMPLT+51, XMCOMPLT+52, XMCOMPLT+70 |
RADXSCND(0 | XMCOMPLT+43, XMCOMPLT+67 |
RAEXAM | XMCOMPLT+24*, XMCOMPLT+76, XMCOMPLT+79, XMCOMPLT+82, XMEXAMIN+18~*, XMEXAMIN+45, XMEXAMIN+48, XMEXAMIN+51, ADDROOM~, ADDROOM+2 |
RAEXAM1 | XMCOMPLT~, XMCOMPLT+24, XMCOMPLT+100, XMEXAMIN~, XMEXAMIN+18 |
RAEXAM2 | XMCOMPLT~, XMCOMPLT+24, XMCOMPLT+100, XMEXAMIN~, XMEXAMIN+18 |
RAIMGTYP | XMCOMPLT~, XMCOMPLT+58, XMEXAMIN~, XMEXAMIN+37, MAKELIST~, MAKELIST+3 |
RAIMPRS | XMCOMPLT+8~*, XMCOMPLT+51*, MAKELIST+63, MAKELIST+71, MAKELIST+72, MAKELIST+73 |
RAIMPRS( | XMCOMPLT+51* |
RAMAN | XMCOMPLT+6~, XMCOMPLT+50*, XMCOMPLT+51*, MAKELIST+37, MAKELIST+38, MAKELIST+63, MAKELIST+64 |
RAMLC | XMORDER~, XMORDER+26, XMREGSTR+9~, XMREGSTR+10, XMREGSTR+11, XMREGSTR+13*, XMREGSTR+15, XMREGSTR+20!, XMREGSTR+22, XMREGSTR+23 , XMREGSTR+25*, XMREGSTR+27 |
RAMSC | XMCOMPLT+58, XMCOMPLT+64, XMCOMPLT+70, XMCOMPLT+74, XMCOMPLT+76, XMCOMPLT+82, XMEXAMIN+37, XMEXAMIN+43, XMEXAMIN+45, XMEXAMIN+51 , XMREGSTR~, XMREGSTR+28!, XMREGSTR+34, MAKELIST~, MAKELIST+78, MAKELIST+79, STNDRPRT+7, MANRPRT+6 |
RAMSC(1 | XMREGSTR+29* |
RAMSC(2 | XMREGSTR+30* |
RAOIEN | XMORDER+3~, XMORDER+17*, XMORDER+19*, XMORDER+20, XMORDER+22 |
RAOIFN | XMREGSTR~, XMREGSTR+7, XMREGSTR+15, XMREGSTR+34 |
RARESULT | XMCOMPLT+4~, XMCOMPLT+76, XMCOMPLT+80!, XMCOMPLT+81*, XMCOMPLT+82, XMEXAMIN+4~, XMEXAMIN+45, XMEXAMIN+49!, XMEXAMIN+50*, XMEXAMIN+51 , XMREGSTR+34 |
RARESULT( | XMCOMPLT+90, XMCOMPLT+91, XMCOMPLT+96, XMCOMPLT+97, XMEXAMIN+59, XMEXAMIN+60, XMEXAMIN+65, XMEXAMIN+66, XMREGSTR+39, XMREGSTR+41 , XMREGSTR+45, XMREGSTR+47 |
RARESULT("A" | XMCOMPLT+88, XMEXAMIN+57, XMREGSTR+38 |
RARESULT(0 | XMCOMPLT+86, XMCOMPLT+94, XMEXAMIN+55, XMEXAMIN+63, XMREGSTR+36, XMREGSTR+44 |
RARESULT(1 | XMCOMPLT+77, XMEXAMIN+46 |
RARPTXT | XMCOMPLT+7~*, XMCOMPLT+50*, MAKELIST+37, MAKELIST+45, MAKELIST+46, MAKELIST+47 |
RARPTXT( | XMCOMPLT+50* |
RASCND | XMCOMPLT+9~, XMCOMPLT+54 |
RASCND( | XMCOMPLT+52* |
RASTDRPT | XMCOMPLT~, MAKELIST+39, MAKELIST+40, MAKELIST+45, MAKELIST+46, MAKELIST+47, MAKELIST+65, MAKELIST+66, MAKELIST+71, MAKELIST+72 , MAKELIST+73, STNDRPRT~, STNDRPRT+5, STNDRPRT+7 |
RCT | XMCOMPLT+45~*, XMCOMPLT+50* |
REASON | XMORDER~, XMORDER+26 |
REQ | MAKELIST+9~ |
REQ( | MAKELIST+78, MAKELIST+79 |
REQ(1 | MAKELIST+11* |
REQ(11 | MAKELIST+36*, MAKELIST+39*, MAKELIST+48* |
REQ(12 | MAKELIST+51*, MAKELIST+52* |
REQ(14 | MAKELIST+58* |
REQ(16 | MAKELIST+65*, MAKELIST+74* |
REQ(4 | MAKELIST+18* |
REQ(5 | MAKELIST+23* |
REQ(6 | MAKELIST+28* |
REQLOC | XMORDER~, XMORDER+26 |
REQPHYS | XMORDER~, XMORDER+26 |
RESULT | IMAGELOC~, IMAGELOC+3!, IMAGELOC+6*, IMAGELOC+11*, IMAGELOC+16*, IMAGELOC+20*, IMAGELOC+24*, IMAGELOC+26* |
RETURN | XMCOMPLT~, XMCOMPLT+3!, XMEXAMIN~, XMEXAMIN+3!, XMORDER~, XMORDER+2!, XMREGSTR~, XMREGSTR+2! |
RETURN( | XMCOMPLT+91*, XMCOMPLT+97*, XMEXAMIN+60*, XMEXAMIN+66*, XMORDER+34*, XMREGSTR+41*, XMREGSTR+47* |
RETURN(0 | XMCOMPLT+20*, XMCOMPLT+38*, XMCOMPLT+60*, XMCOMPLT+88*, XMCOMPLT+94*, XMEXAMIN+14*, XMEXAMIN+32*, XMEXAMIN+39*, XMEXAMIN+57*, XMEXAMIN+63* , XMORDER+11*, XMORDER+21*, XMORDER+31*, XMORDER+37*, XMREGSTR+11*, XMREGSTR+12, XMREGSTR+16*, XMREGSTR+23*, XMREGSTR+24, XMREGSTR+32 , XMREGSTR+38*, XMREGSTR+44* |
RETURN(1 | XMORDER+12*, XMORDER+22* |
REVERSEDAY | XMORDER+3~, XMORDER+14*, XMORDER+19 |
RODATA | XMREGSTR+7~*, XMREGSTR+8, XMREGSTR+9, XMREGSTR+21 |
RPTXT | STNDRPRT+6~, STNDRPRT+7*, MANRPRT+5~, MANRPRT+6* |
SCT | XMCOMPLT+47~*, XMCOMPLT+52* |
SEPOUTP | XMCOMPLT+4~, XMCOMPLT+97, XMEXAMIN+4~, XMEXAMIN+66, XMORDER+3~, XMREGSTR+3~, XMREGSTR+47, ZRUSEPIN+1*, IMAGELOC+2~ |
SEPSTAT | XMCOMPLT+4~, XMCOMPLT+20, XMCOMPLT+38, XMCOMPLT+60, XMCOMPLT+88, XMCOMPLT+91, XMCOMPLT+94, XMEXAMIN+4~, XMEXAMIN+14, XMEXAMIN+32 , XMEXAMIN+39, XMEXAMIN+57, XMEXAMIN+60, XMEXAMIN+63, XMORDER+3~, XMORDER+11, XMORDER+12, XMORDER+21, XMORDER+22, XMORDER+31 , XMORDER+34, XMREGSTR+3~, XMREGSTR+11, XMREGSTR+13, XMREGSTR+23, XMREGSTR+25, XMREGSTR+38, XMREGSTR+41, XMREGSTR+44, ZRUSEPIN+2* , IMAGELOC+2~, IMAGELOC+6, IMAGELOC+11, IMAGELOC+16, IMAGELOC+20, IMAGELOC+24, IMAGELOC+26 |
SSCR | STNDRPRT~, STNDRPRT+2, STNDRPRT+5, STNDRPRT+7, MANRPRT~, MANRPRT+2 |
STUDYDAT | XMORDER~, XMORDER+9, XMORDER+12, XMORDER+26 |
TEXT | OUTPUT~, OUTPUT+3 |
TODAYHL7 | MAKELIST+6~, MAKELIST+7*, MAKELIST+36, MAKELIST+51 |
TXTLST | MANRPRT~ |
TXTLST( | MANRPRT+4, MANRPRT+6 |
U | XMCOMPLT+24, XMCOMPLT+60, XMCOMPLT+70, XMCOMPLT+91, XMCOMPLT+97, XMEXAMIN+18, XMEXAMIN+39, XMEXAMIN+60, XMEXAMIN+66, XMORDER+6 , XMORDER+15, XMORDER+34, XMREGSTR+8, XMREGSTR+9, XMREGSTR+21, XMREGSTR+41, XMREGSTR+47, MAKELIST+18, STNDRPRT+7, MANRPRT+6 |
X | XMCOMPLT+89~*, XMCOMPLT+90*, XMCOMPLT+91, XMCOMPLT+95~*, XMCOMPLT+96*, XMCOMPLT+97, XMEXAMIN+58~*, XMEXAMIN+59*, XMEXAMIN+60, XMEXAMIN+64~* , XMEXAMIN+65*, XMEXAMIN+66, XMORDER+32~*, XMORDER+34, XMREGSTR+39~*, XMREGSTR+41, XMREGSTR+45~*, XMREGSTR+47 |