MAGDQR08 ;WOIFO/EdM,MLH,BT - Cross-References for Query/Retrieve ; 27 Nov 2012 12:58 PM
Source file <MAGDQR08.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 |
|---|---|---|
| UIDS(REQ,T,UID,PRMUID,ANY,OK,UIDS) | ; Overflow from MAGDQR02
|
|
| PRUNE(RESULT) | ; Remove duplicate UIDs based on PRMUID
; PRMUID must be defined before calling this procedure ; PRMUID : Duplicate UID Handling parameter ; 0 : Error if there is duplicate UID (Error Handled outside this procedure) ; 1 : All (Duplicate is not an error so this proc won't be called) ; 2 : Keep UID with the oldest image saved date, delete the rest (handled in this procedure) ; 3 : Keep UID with the latest image saved date, delete the rest (handled in this procedure) |
|
| REMDUP(HDR) | ; Based on HDR array, remove or keep Study UID records, return number of records removed
|
|
| SAVHDR(KEEP,HDR) | ; Based on what to keep, generate HDR array contains records to keep and to remove
|
|
| KEEPHDR(KEEP) | ; Based on PRMUID, get "the oldest/latest date" records to keep
|
|
| DELSUB(RESULT,HDRRECNO) | ; Delete Sub File (2006.57321) record group including indices
; The Header Information such as Highest IEN and Counter will be updated at the end (UPDSUBHD) |
|
| UPDHDREC(RESULT,R1,NEWCNT) | ; Update Header Result # record with a new counter
|
|
| UPDSUBHD(RESULT,KILLCNT) | ; Update the Sub File 2006.57321 Header
|
|
| ACCNUM(IMAGE) | ; Calculate Accession Number for Image
|
|
| PROCNAM(IMAGE) | ; Calculate Procedure Name for Image
|
|
| PROCNUM(IMAGE) | ; Calculate Procedure Number for Image
|
|
| X1(DA,KILL) | ||
| X2(IMAGE,KILL) | ||
| REDO |
| FileNo | Call Tags |
|---|---|
| ^TIU(8925 - [#8925] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^MAG(2005 - [#2005] | UIDS+16, UIDS+20, UIDS+21, UIDS+29, UIDS+30, ACCNUM+2, PROCNAM+2, PROCNUM+2, X1+1, X1+5! , X1+6*, X2+1, X2+4, X2+7!, X2+8*, REDO!, REDO+1 |
| ^MAG(2005.84 - [#2005.84] | PROCNAM+3, X2+5 |
| ^MAGDQR(2006.5732 - [#2006.5732] | SAVHDR+7, SAVHDR+8, SAVHDR+9, DELSUB+8, DELSUB+9, DELSUB+11!, DELSUB+12!, UPDHDREC+4*, UPDSUBHD+2, UPDSUBHD+4 , UPDSUBHD+5, UPDSUBHD+7* |
| ^MAGV(2005.6 - [#2005.6] | UIDS+45 |
| ^MAGV(2005.61 - [#2005.61] | UIDS+44 |
| ^MAGV(2005.62 - [#2005.62] | UIDS+40, UIDS+41, UIDS+43 |
| ^TMP("MAG" | UIDS+4!, UIDS+9!, UIDS+13, UIDS+28*, UIDS+31*, UIDS+38, UIDS+48*, UIDS+61, UIDS+63, UIDS+71 , UIDS+72*, UIDS+76!, KEEPHDR+6, KEEPHDR+7, KEEPHDR+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ANY | UIDS~, UIDS+5*, UIDS+9* |
| C | UIDS+17~, UIDS+29*, UIDS+30 |
| CNT | UPDSUBHD+1~, UPDSUBHD+6*, UPDSUBHD+7 |
| CO | X2~, X2+5*, X2+7, X2+8 |
| DA | X1~, REDO+1*, REDO+2, REDO+3 |
| DELCNT | DELSUB+4~, DELSUB+5*, DELSUB+13*, DELSUB+15 |
| FATAL | UIDS+1~, UIDS+2*, UIDS+56*, UIDS+58 |
| GMRCPTR | ACCNUM+1~, ACCNUM+5*, ACCNUM+6 |
| GP | X1~, X1+4*, X1+5, X1+6, X2~, X2+6*, X2+7, X2+8 |
| HDR | PRUNE+15~, PRUNE+16, PRUNE+20, REMDUP~, SAVHDR~, UPDSUBHD+1~, UPDSUBHD+2*, UPDSUBHD+3, UPDSUBHD+6 |
| HDR( | REMDUP+7, REMDUP+9, SAVHDR+10* |
| HDRRECNO | REMDUP+4~, REMDUP+5*, REMDUP+7*, REMDUP+9, REMDUP+11, SAVHDR+5~, SAVHDR+9*, SAVHDR+10, KEEPHDR+4~, KEEPHDR+8* , KEEPHDR+9, DELSUB~, DELSUB+6, DELSUB+10 |
| HDRTAG | SAVHDR+1~, SAVHDR+3*, SAVHDR+9, DELSUB+2~, DELSUB+3*, DELSUB+10 |
| I | UIDS+1~, UIDS+4*, UIDS+11*, UIDS+15*, UIDS+16*, UIDS+20, UIDS+21, UIDS+28, UIDS+29, UIDS+30 , UIDS+36*, UIDS+40*, UIDS+41, UIDS+43, UIDS+48, UIDS+61*, UIDS+63, UIDS+70*, UIDS+71, UIDS+72 , UIDS+76* |
| IDX | UIDS+1~, UIDS+21* |
| IMAGE | ACCNUM~, ACCNUM+2, PROCNAM~, PROCNAM+2, PROCNUM~, PROCNUM+2, X1+1, X1+5, X1+6, X2~ , X2+1, X2+4, X2+7, X2+8 |
| IMGSAVDT | KEEPHDR+4~, KEEPHDR+7*, KEEPHDR+8 |
| KEEP | PRUNE+11~, PRUNE+12, PRUNE+16, SAVHDR~, KEEPHDR~ |
| KEEP( | SAVHDR+10, KEEPHDR+9* |
| KILL | X1~, X1+5, X2~, X2+7 |
| KILLCNT | PRUNE+19~, PRUNE+20*, PRUNE+23, REMDUP+1~, REMDUP+3*, REMDUP+9*, REMDUP+13, UPDSUBHD~, UPDSUBHD+6 |
| LSTIEN | UPDSUBHD+1~, UPDSUBHD+3*, UPDSUBHD+5*, UPDSUBHD+7 |
| LSTRECNO | UPDSUBHD+1~, UPDSUBHD+4*, UPDSUBHD+5 |
| NEWCNT | REMDUP+1~, REMDUP+2*, REMDUP+11, UPDHDREC~, UPDHDREC+2*, UPDHDREC+3 |
| OK | UIDS~, UIDS+60*, UIDS+61, UIDS+64*, UIDS+69 |
| ORD | KEEPHDR+1~, KEEPHDR+2*, KEEPHDR+7 |
| P | UIDS+1~, UIDS+7*, UIDS+8*, UIDS+11, UIDS+36, UIDS+62*, UIDS+63, UIDS+65 |
| PA | X1~, X1+1*, X1+2, X2~, X2+1*, X2+2 |
| PARENT | ACCNUM+1~, ACCNUM+2*, ACCNUM+3 |
| PAT | UIDS+1~, UIDS+5*, UIDS+14*, UIDS+23*, UIDS+25*, UIDS+38, UIDS+39*, UIDS+40, UIDS+46*, UIDS+47* , UIDS+53 |
| PAT0 | UIDS+1~, UIDS+20*, UIDS+21, UIDS+22, UIDS+23, UIDS+25, UIDS+45*, UIDS+46, UIDS+47 |
| PATIX | UIDS+42~, UIDS+44*, UIDS+45 |
| PR | X2~, X2+4*, X2+5 |
| PRMUID | UIDS~, UIDS+3*, UIDS+24, UIDS+47, UIDS+54, PRUNE+8, KEEPHDR+2 |
| PRMUID( | UIDS+54* |
| PROCIX | UIDS+42~, UIDS+43*, UIDS+44 |
| PROCPTR | PROCNAM+1~, PROCNAM+2*, PROCNAM+3 |
| QUIT | DELSUB+4~, DELSUB+5*, DELSUB+8, DELSUB+10* |
| R1 | UPDHDREC~, UPDHDREC+4 |
| RECNO | DELSUB+4~, DELSUB+6*, DELSUB+8*, DELSUB+9, DELSUB+10, DELSUB+11, DELSUB+12 |
| REQ | UIDS~ |
| REQ( | UIDS+8, UIDS+11, UIDS+36 |
| RESULT | PRUNE~, PRUNE+23, REMDUP+9, REMDUP+11, SAVHDR+7, SAVHDR+8, SAVHDR+9, DELSUB~, DELSUB+8, DELSUB+9 , DELSUB+11, DELSUB+12, UPDHDREC~, UPDHDREC+4, UPDSUBHD~, UPDSUBHD+2, UPDSUBHD+4, UPDSUBHD+5, UPDSUBHD+7 |
| STUDYUID | SAVHDR+5~, SAVHDR+8*, SAVHDR+10, KEEPHDR+4~, KEEPHDR+5*, KEEPHDR+6*, KEEPHDR+7, KEEPHDR+8, KEEPHDR+9 |
| STUIDREC | SAVHDR+5~, SAVHDR+6*, SAVHDR+7*, SAVHDR+8, SAVHDR+9 |
| STUIDTAG | SAVHDR+1~, SAVHDR+2*, SAVHDR+7 |
| T | UIDS~, UIDS+5*, UIDS+8, UIDS+11, UIDS+36, UIDS+54, UIDS+61*, UIDS+63, UIDS+65, UIDS+69* , UIDS+70, UIDS+73* |
| T0 | X1~, X1+1*, X1+3, X1+4, X2~, X2+1*, X2+3, X2+6 |
| TAG | DELSUB+4~, DELSUB+9*, DELSUB+10, DELSUB+12 |
| TAGVAL | UPDHDREC+1~, UPDHDREC+3*, UPDHDREC+4 |
| TIUPTR | ACCNUM+1~, ACCNUM+2*, ACCNUM+4, ACCNUM+5 |
| U | SAVHDR+8, DELSUB+9, UPDHDREC+4, UPDSUBHD+3, UPDSUBHD+6, UPDSUBHD+7 |
| UID | UIDS~, UIDS+28*, UIDS+48* |
| UIDS | UIDS~, UIDS+60*, UIDS+64*, UIDS+65* |
| V | UIDS+1~, UIDS+12*, UIDS+13*, UIDS+16, UIDS+37*, UIDS+38*, UIDS+40 |
| X | UIDS+17~, UIDS+20*, UIDS+27, UIDS+30*, UIDS+31, UIDS+60*, UIDS+65, ACCNUM+1~, ACCNUM+2*, PROCNAM+1~ , PROCNAM+2*, PROCNAM+3*, PROCNAM+4, PROCNUM+1~, PROCNUM+2*, PROCNUM+3, X1~, X1+1*, X2~, X2+1* , X2+4*, X2+5*, REDO* |