MAGVIM09 ;WOIFO/DAC,MAT,JSJ,RRM,BT,JSL - Utilities for RPC calls for DICOM file processing ; Oct 04, 2022@19:19:13
Source file <MAGVIM09.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 |
|---|---|---|
| GETWI(OUT,ID,STOPTAG,SRV) | ; Return Work Item record in OUT array
; OUT - array that holds the result ; ID - IEN of the Work Item ; STOPTAG - The last tag of a record to be returned (optional) |
|
| IMSTATUS(OUT,UIDS) | ; Get import status
|
|
| SOPCHECK(UIDS,I) | ;
|
|
| RECHKFLE(UIDS,I,UID,TYPE) | ;
|
|
| DUPUID(UIDS,I,UID,TYPE) | ||
| FIND(OUT,TYPE,SUBTYPE,STATUS,PLACEID,PRIORITY,STOPTAG,MAXROWS,TAGS,LASTIEN,ORDER,DTFROM,DTTO) | ; Find records with given attributes - return ID
|
|
| UPDWI(ID,FDA,MSGUPD) | ; Update work item
; Return 0|Error`Message error ; ; ID - IEN of Work Item ; FDA - VA FileMan FDA array ; MSGUPD - Message array |
|
| UPCASE(X) | ;
|
| Name | Field # of Occurrence |
|---|---|
| FILE^DIE | UPDWI+13 |
| WP^DIE | UPDWI+18 |
| GETS^DIQ | GETWI+9, FIND+39 |
| CHECKUID^MAGDRPCA | IMSTATUS+15, IMSTATUS+17, SOPCHECK+4, SOPCHECK+6 |
| $$DTINRNG^MAGVIM01 | FIND+37 |
| $$GFLTITM^MAGVIM01 | FIND+25 |
| $$INPUTSEP^MAGVIM01 | IMSTATUS+3, FIND+5 |
| $$OUTSEP^MAGVIM01 | GETWI+6, IMSTATUS+3 |
| $$SRV^MAGVIM01 | FIND+47 |
| $$STATSEP^MAGVIM01 | GETWI+6, FIND+5, UPDWI+7 |
| VALIDATE^MAGVIM06 | UPDWI+9 |
| GETWI^MAGVIM09 | FIND+67 |
| $$FMTE^XLFDT | GETWI+35 |
| $$IEN^XUAF4 | FIND+12 |
| $$STA^XUAF4 | GETWI+27 |
| FileNo | Call Tags |
|---|---|
| ^MAGV(2006.941 - [#2006.941] | GETS^DIQ, WP^DIE |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^MAG(2005 - [#2005] | SOPCHECK+3 |
| ^MAGV( | RECHKFLE+4, RECHKFLE+5, RECHKFLE+6, DUPUID+15, DUPUID+17 |
| ^MAGV(2005.62 - [#2005.62] | IMSTATUS+41, IMSTATUS+43, IMSTATUS+47, RECHKFLE+8 |
| ^MAGV(2005.63 - [#2005.63] | IMSTATUS+33, IMSTATUS+35, IMSTATUS+39, RECHKFLE+11 |
| ^MAGV(2005.64 - [#2005.64] | IMSTATUS+26, IMSTATUS+27, IMSTATUS+31 |
| ^MAGV(2005.66 - [#2005.66] | IMSTATUS+26, IMSTATUS+33, IMSTATUS+41, DUPUID+10, DUPUID+11 |
| ^MAGV(2006.941 - [#2006.941] | GETWI+47, GETWI+48, FIND+50, FIND+51, FIND+55, FIND+56, FIND+57, FIND+58, FIND+60, FIND+61 , FIND+62, FIND+63 |
| Name | Line Occurrences |
|---|---|
| $$DUPUID | IMSTATUS+29, IMSTATUS+37, IMSTATUS+45 |
| $$RECHKFLE | IMSTATUS+34, IMSTATUS+42 |
| $$UPCASE | FIND+59 |
| SOPCHECK | IMSTATUS+23, IMSTATUS+26 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AFLD | GETWI+4~, FIND+3~ |
| AFLD( | GETWI+12*, GETWI+35, GETWI+36, GETWI+37, FIND+42, FIND+43 |
| AFLD(1 | GETWI+13*, FIND+19* |
| AFLD(10 | GETWI+20* |
| AFLD(14 | GETWI+21* |
| AFLD(15 | GETWI+22* |
| AFLD(16 | GETWI+23* |
| AFLD(2 | GETWI+14*, FIND+20* |
| AFLD(3 | GETWI+15*, FIND+21* |
| AFLD(4 | GETWI+16*, FIND+22* |
| AFLD(5 | GETWI+17*, FIND+23* |
| AFLD(8 | GETWI+18* |
| AFLD(9 | GETWI+19* |
| CNT | GETWI+4~, GETWI+30*, GETWI+32, GETWI+35, GETWI+36, GETWI+37, GETWI+41*, GETWI+45*, GETWI+50*, GETWI+52 , IMSTATUS+1~, IMSTATUS+3*, IMSTATUS+6*, IMSTATUS+18*, IMSTATUS+52 |
| DATA | GETWI+4~, GETWI+48*, GETWI+49 |
| DTFROM | FIND~, FIND+6*, FIND+37 |
| DTTO | FIND~, FIND+7*, FIND+37 |
| ERR | GETWI+4~, GETWI+10, FIND+29!, FIND+36, FIND+38!, FIND+40, FIND+68*, FIND+73, UPDWI+6~, UPDWI+9 , UPDWI+12!, UPDWI+17! |
| ERR("DIERR" | GETWI+10, FIND+40, UPDWI+10, UPDWI+14, UPDWI+19 |
| FDA | UPDWI~, UPDWI+9 |
| FILE | GETWI+4~, GETWI+7*, GETWI+9, GETWI+26, GETWI+27, GETWI+33, GETWI+35, GETWI+36, GETWI+37, GETWI+40 , GETWI+41, RECHKFLE+1~, RECHKFLE+2*, RECHKFLE+3*, RECHKFLE+4, RECHKFLE+5, RECHKFLE+6, DUPUID+6~, DUPUID+7*, DUPUID+15 , DUPUID+17 |
| FLD | GETWI+4~, GETWI+31*, GETWI+33*, GETWI+34, GETWI+35, GETWI+36, GETWI+37, FIND+2~, FIND+41*, FIND+42* , FIND+43 |
| FLDS | FIND+3~, FIND+18*, FIND+19*, FIND+20*, FIND+21*, FIND+22*, FIND+23*, FIND+39 |
| FLTITM | FIND+4~, FIND+25! |
| FOUNDUID | IMSTATUS+1~, IMSTATUS+6*, IMSTATUS+33, IMSTATUS+34*, IMSTATUS+35, IMSTATUS+41, IMSTATUS+42*, IMSTATUS+43 |
| GLB | FIND+4~, FIND+26*, FIND+27*, FIND+36 |
| I | GETWI+4~, GETWI+40*, GETWI+41, GETWI+44*, GETWI+46*, GETWI+47*, GETWI+48, IMSTATUS+1~, IMSTATUS+3*, IMSTATUS+5* , IMSTATUS+6, IMSTATUS+7, IMSTATUS+8, IMSTATUS+9, IMSTATUS+10, IMSTATUS+11, IMSTATUS+18, IMSTATUS+19, IMSTATUS+23, IMSTATUS+26 , IMSTATUS+29, IMSTATUS+34, IMSTATUS+37, IMSTATUS+42, IMSTATUS+45, IMSTATUS+48, SOPCHECK~, SOPCHECK+2, SOPCHECK+7, RECHKFLE~ , DUPUID~, DUPUID+18 |
| ID | GETWI~, GETWI+8, GETWI+9, GETWI+32, GETWI+47, GETWI+48, UPDWI~, UPDWI+18, UPDWI+21 |
| IEN | RECHKFLE+5*, RECHKFLE+6*, RECHKFLE+8, RECHKFLE+11, DUPUID+6~, DUPUID+8*, DUPUID+15*, DUPUID+16, DUPUID+17, DUPUID+20 , FIND+2~, FIND+34*, FIND+36*, FIND+37, FIND+38, FIND+47, FIND+50, FIND+51, FIND+55, FIND+56 , FIND+57, FIND+58, FIND+60, FIND+61, FIND+62, FIND+63, FIND+67, FIND+70, FIND+73 |
| IEN2 | FIND+2~, FIND+62*, FIND+63 |
| IENS | GETWI+4~, GETWI+8*, GETWI+26, GETWI+27, GETWI+33, GETWI+35, GETWI+36, GETWI+37, GETWI+40, GETWI+41 , FIND+3~, FIND+38*, FIND+39, FIND+43 |
| ISEP | IMSTATUS+1~, IMSTATUS+3*, IMSTATUS+7, SOPCHECK+2, DUPUID+18, FIND+2~, FIND+5*, FIND+49 |
| J | FIND+2~, FIND+47*, FIND+48*, FIND+49 |
| LASTIEN | FIND~, FIND+31, FIND+32*, FIND+33*, FIND+34, FIND+70*, FIND+73 |
| LOCIEN | FIND+3~, FIND+12*, FIND+13, FIND+22 |
| MAG2005IEN | SOPCHECK+1~ |
| MAGOUT | GETWI+4~, FIND+3~, FIND+38! |
| MAGOUT( | GETWI+26, GETWI+27*, GETWI+33, GETWI+35, GETWI+36, GETWI+37, GETWI+40, GETWI+41 |
| MAGOUT("2006.941" | FIND+43 |
| MAGPARENTIEN | SOPCHECK+1~ |
| MAXROWS | FIND~, FIND+9, FIND+36 |
| MSGUPD | UPDWI~, UPDWI+18 |
| NEWUID | RECHKFLE+1~, RECHKFLE+8*, RECHKFLE+11*, RECHKFLE+13 |
| NOMATCH | FIND+3~, FIND+41*, FIND+42, FIND+43*, FIND+45 |
| ONFILESOP | IMSTATUS+2~, IMSTATUS+6*, IMSTATUS+20*, IMSTATUS+23, IMSTATUS+49*, SOPCHECK+8* |
| ORDER | FIND~, FIND+30*, FIND+32, FIND+33, FIND+36 |
| OSEP | GETWI+5~, GETWI+6*, GETWI+35, GETWI+36, GETWI+37, GETWI+45, GETWI+50 |
| OUT | GETWI~, GETWI+10*, IMSTATUS~, FIND~, FIND+9*, FIND+11, FIND+13*, FIND+40!, FIND+67 |
| OUT( | GETWI+32*, GETWI+35*, GETWI+36*, GETWI+37*, GETWI+41*, GETWI+45*, GETWI+50*, IMSTATUS+8*, IMSTATUS+9*, IMSTATUS+10* , IMSTATUS+11*, IMSTATUS+19*, IMSTATUS+48*, SOPCHECK+7* |
| OUT(0 | GETWI+30, GETWI+52*, FIND+16*, FIND+40*, FIND+68, FIND+73* |
| OUT(1 | IMSTATUS+4*, IMSTATUS+52* |
| PATNAME | FIND+4~, FIND+58*, FIND+59 |
| PLACEID | FIND~, FIND+11, FIND+12 |
| PRIORITY | FIND~, FIND+23 |
| REC0 | DUPUID+6~, DUPUID+11*, DUPUID+12, DUPUID+13, DUPUID+15, DUPUID+18 |
| RET | FIND+4~, FIND+25*, FIND+26, FIND+27 |
| RPLFND | DUPUID+6~, DUPUID+8*, DUPUID+10, DUPUID+19* |
| RPLIEN | DUPUID+6~, DUPUID+8*, DUPUID+10*, DUPUID+11 |
| SERIEN | IMSTATUS+1~, IMSTATUS+35*, IMSTATUS+37*, IMSTATUS+38, IMSTATUS+39, IMSTATUS+42 |
| SERUID | IMSTATUS+1~, IMSTATUS+7*, IMSTATUS+9, IMSTATUS+33, IMSTATUS+35, IMSTATUS+37, IMSTATUS+42 |
| SOPIEN | IMSTATUS+1~, IMSTATUS+27*, IMSTATUS+29*, IMSTATUS+30, IMSTATUS+31, IMSTATUS+34, IMSTATUS+49 |
| SOPLIST | IMSTATUS+1~, IMSTATUS+17, SOPCHECK+4 |
| SOPLIST(1 | IMSTATUS+13* |
| SOPLIST(2 | IMSTATUS+13* |
| SOPOUT | IMSTATUS+1~, IMSTATUS+17, IMSTATUS+24*, SOPCHECK+4 |
| SOPOUT(2 | IMSTATUS+18, SOPCHECK+5, SOPCHECK+7 |
| SOPUID | IMSTATUS+1~, IMSTATUS+7*, IMSTATUS+10, IMSTATUS+13, IMSTATUS+26, IMSTATUS+27, IMSTATUS+29, IMSTATUS+34, SOPCHECK+2*, SOPCHECK+3 |
| SRV | GETWI~, GETWI+45, FIND+3~, FIND+47*, FIND+53, FIND+54, FIND+67 |
| SSEP | GETWI+5~, GETWI+6*, GETWI+10, GETWI+32, GETWI+41, GETWI+45, GETWI+50, IMSTATUS+1~, IMSTATUS+3*, IMSTATUS+4 , IMSTATUS+8, IMSTATUS+9, IMSTATUS+10, IMSTATUS+11, IMSTATUS+19, IMSTATUS+48, IMSTATUS+52, SOPCHECK+7, FIND+2~, FIND+5* , FIND+9, FIND+13, FIND+40, FIND+73, UPDWI+6~, UPDWI+7*, UPDWI+10, UPDWI+14, UPDWI+19, UPDWI+21 |
| STATUS | FIND~, FIND+21 |
| STOP | GETWI+5~, GETWI+44*, GETWI+47, GETWI+51* |
| STOPTAG | GETWI~, GETWI+51, FIND~ |
| STUDIEN | IMSTATUS+1~, IMSTATUS+43*, IMSTATUS+45*, IMSTATUS+46, IMSTATUS+47 |
| STUDYLIST | IMSTATUS+1~, IMSTATUS+15, SOPCHECK+6 |
| STUDYLIST(1 | IMSTATUS+12* |
| STUDYLIST(2 | IMSTATUS+12* |
| STUDYOUT | IMSTATUS+1~, IMSTATUS+15, SOPCHECK+6 |
| STUDYOUT(2 | IMSTATUS+16, IMSTATUS+23 |
| STUDYUID | IMSTATUS+1~, IMSTATUS+7*, IMSTATUS+8, IMSTATUS+12, IMSTATUS+41, IMSTATUS+43, IMSTATUS+45 |
| SUBTYPE | FIND~, FIND+20 |
| TAG | FIND+2~, FIND+49*, FIND+50, FIND+51, FIND+52, FIND+55, FIND+56, FIND+57, FIND+60, FIND+61 , FIND+62 |
| TAGITM | FIND+4~, FIND+57*, FIND+58 |
| TAGMATCH | FIND+2~, FIND+47*, FIND+48, FIND+54*, FIND+55*, FIND+57*, FIND+58*, FIND+59*, FIND+60*, FIND+63* , FIND+65 |
| TAGNAME | GETWI+5~, GETWI+49*, GETWI+50, GETWI+51 |
| TAGS | GETWI+4~, GETWI+44*, FIND~, FIND+25 |
| TAGS( | FIND+48, FIND+49 |
| TAGVALUE | GETWI+5~, GETWI+49*, GETWI+50 |
| TYPE | RECHKFLE~, RECHKFLE+2, RECHKFLE+3, RECHKFLE+7, RECHKFLE+10, DUPUID~, DUPUID+5, DUPUID+7, DUPUID+12, DUPUID+18 , FIND~, FIND+19 |
| U | GETWI+49, IMSTATUS+47, DUPUID+12, DUPUID+13, DUPUID+15, DUPUID+18, FIND+58, FIND+63 |
| UID | RECHKFLE~, RECHKFLE+4, RECHKFLE+5, DUPUID~, DUPUID+5, DUPUID+10, DUPUID+13, DUPUID+17 |
| UIDS | IMSTATUS~, IMSTATUS+4, IMSTATUS+23, IMSTATUS+26, IMSTATUS+29, IMSTATUS+34, IMSTATUS+37, IMSTATUS+42, IMSTATUS+45, SOPCHECK~ , RECHKFLE~, DUPUID~ |
| UIDS( | IMSTATUS+5, IMSTATUS+7, IMSTATUS+11, IMSTATUS+19, IMSTATUS+48, SOPCHECK+2, SOPCHECK+7, DUPUID+18* |
| VALUE | FIND+3~, FIND+49*, FIND+50, FIND+51, FIND+52, FIND+53, FIND+54, FIND+55, FIND+56, FIND+59 , FIND+60, FIND+61, FIND+63 |
| WICOUNT | FIND+2~, FIND+34*, FIND+36, FIND+69* |
| X | UPCASE~, UPCASE+1 |
