MAGDSTAB ;WOIFO/PMK - Q/R Retrieve of DICOM images from PACS to VistA ; Mar 04, 2022@14:35:44
Source file <MAGDSTAB.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 |
|---|---|---|
| FINDSUID(ACNUMB,SSN,PACSSTUDYUID,SERIESCOUNT,IMAGECOUNT) | ; get study instance uid
|
|
| MOVEALL() | ; retrieve all the images for the study
|
|
| MOVEALL1(STUDYUID) | ; retrieve all the images for the Study Instance UID
; retrieve the whole study |
|
| PARM | ; set query/retrieve site parameters
|
|
| ANPREFIX() | ; Get the value of the accession number prefix
|
|
| DASHES() | ; Get the value of the patient identifier dashes
|
|
| ACNLAST4() | ; Get the value of the last 4 query key
|
|
| CHECKDIV() | ; Get the value of the check study division switch
|
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DIQ | ANPREFIX+4, DASHES+4, ACNLAST4+4, CHECKDIV+4 |
| $$QRSCP^MAGDSTA8 | FINDSUID+21, MOVEALL1+7 |
| $$YESNO^MAGDSTQ | PARM+11, PARM+16, PARM+28 |
| CONTINUE^MAGDSTQ | PARM+31 |
| $$GETANPFX^MAGDSTQ1 | PARM+6 |
| SOPUIDQ^MAGDSTV1 | FINDSUID+24 |
| SOPUIDR^MAGDSTV1 | MOVEALL1+10 |
| $$KSP^XUPARAM | PARM+2, ANPREFIX+2, DASHES+2, ACNLAST4+2, CHECKDIV+2 |
| FileNo | Call Tags |
|---|---|
| ^MAG(2006.1 - [#2006.1] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^MAG(2006.1 - [#2006.1] | PARM+3, PARM+7*, PARM+12*, PARM+17*, PARM+29*, ANPREFIX+3, DASHES+3, ACNLAST4+3, CHECKDIV+3 |
| ^TMP("MAG" | FINDSUID+6!, FINDSUID+8*, FINDSUID+10*, FINDSUID+18*, FINDSUID+21*, FINDSUID+22*, FINDSUID+23*, MOVEALL1+5!, MOVEALL1+6*, MOVEALL1+7* , MOVEALL1+8*, MOVEALL1+9* |
| ^XTMP( | FINDSUID+28, FINDSUID+30, FINDSUID+32, FINDSUID+33, MOVEALL+5, MOVEALL+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACNUMB | FINDSUID~, FINDSUID+4, FINDSUID+8, FINDSUID+10 |
| ANPREFIX | PARM+1~, PARM+6*, PARM+7 |
| >> DEFAULT | PARM+10*, PARM+11, PARM+15*, PARM+16, PARM+27*, PARM+28 |
| ERROR | MOVEALL+1~, MOVEALL+3*, MOVEALL+5, MOVEALL+8*, MOVEALL+9, MOVEALL+11 |
| HELP | PARM+20~, PARM+28 |
| HELP(1 | PARM+21* |
| HELP(2 | PARM+22* |
| HELP(3 | PARM+23* |
| HELP(4 | PARM+24* |
| HELP(5 | PARM+25* |
| HELP(6 | PARM+26* |
| >> HOSTNAME | FINDSUID+28, FINDSUID+30, FINDSUID+32, FINDSUID+33, MOVEALL+5, MOVEALL+7 |
| I | FINDSUID+1~, FINDSUID+28*, FINDSUID+30, FINDSUID+32, FINDSUID+33, MOVEALL+1~, MOVEALL+5*, MOVEALL+7 |
| IEN | PARM+1~, PARM+3*, PARM+7, PARM+12, PARM+17, PARM+29, ANPREFIX+1~, ANPREFIX+3*, ANPREFIX+4, DASHES+1~ , DASHES+3*, DASHES+4, ACNLAST4+1~, ACNLAST4+3*, ACNLAST4+4, CHECKDIV+1~, CHECKDIV+3*, CHECKDIV+4 |
| IMAGECOUNT | FINDSUID~, FINDSUID+27*, FINDSUID+33* |
| >> IMAGINGSERVICE | FINDSUID+7 |
| KSITEPAR | PARM+1~, PARM+2*, PARM+3, ANPREFIX+1~, ANPREFIX+2*, ANPREFIX+3, DASHES+2*, DASHES+3, ACNLAST4+1~, ACNLAST4+2* , ACNLAST4+3, CHECKDIV+1~, CHECKDIV+2*, CHECKDIV+3 |
| KSITPAR | DASHES+1~ |
| L | FINDSUID+1~, FINDSUID+17*, FINDSUID+18 |
| >> MAGXTMP | FINDSUID+28, FINDSUID+30, FINDSUID+32, FINDSUID+33, MOVEALL+5, MOVEALL+7 |
| PACSSTUDYUID | FINDSUID~ |
| PACSSTUDYUID( | FINDSUID+30* |
| >> QRSTACK | FINDSUID+8, FINDSUID+10, FINDSUID+18, FINDSUID+21, FINDSUID+22, FINDSUID+23, FINDSUID+28, FINDSUID+30, FINDSUID+32, FINDSUID+33 , MOVEALL+5, MOVEALL+7, MOVEALL1+6, MOVEALL1+7, MOVEALL1+8, MOVEALL1+9 |
| RETURN | FINDSUID+1~ |
| SERIESCOUNT | FINDSUID~, FINDSUID+27*, FINDSUID+32* |
| SSN | FINDSUID~, FINDSUID+17, FINDSUID+18 |
| STUDYUID | MOVEALL+7*, MOVEALL+8, MOVEALL1~, MOVEALL1+2*, MOVEALL1+3, MOVEALL1+6 |
| >> X | PARM+11, PARM+12, PARM+16, PARM+17, PARM+28, PARM+29 |
