Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: MAGDQR08

Package: Imaging

Routine: MAGDQR08


Information

MAGDQR08 ;WOIFO/EdM,MLH,BT - Cross-References for Query/Retrieve ; 27 Nov 2012 12:58 PM

Source Information

Source file <MAGDQR08.m>

Entry Points

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^TIU(8925 - [#8925] GET1^DIQ
Info |  Source |  Entry Points |  FileMan Files Accessed Via FileMan Db Call