Routine: MAGGTIG

Information

MAGGTIG ;WOIFO/GEK/SG/NST - MAGGT Image Get. Callbacks to Get Image lists ; 14 Sep 2010 10:15 AM

Source file <MAGGTIG.m>

Name	Comments	DBIA/ICR reference
GRPCOUNT(MAGRY,MAGIEN)	;
IMAGES(MAGRY,MAGDFN)	;RPC [MAGG PAT IMAGES] ; Call to return a list of images for a patient. ; We are returning all images for a patient, Groups are returned ; as one Image. ; The Images are returned in Rev Chronological Order, latest image ; first, oldest image last. ; User can reorder at the workstation level.
PHOTOS(MAGRY,MAGDFN)	;RPC [MAGG PAT PHOTOS] ; Call to return list of all Photo ID's on file for a patient. ; We are returning all Photo ID images for a patient. ; The Images are returned in Rev Chronological Order, latest image ; first, oldest image last. ;
EACHIMG(MAGRY,MAGDFN,MAX,FLAGS)	;RPC [MAGG PAT EACH IMAGE] ; Call Returns list of recent Patient images. ; MAX = maximum number of images to return ; MAGDFN = patient DFN ; FLAGS = MAGDEV^START IEN ; p150
CAPINFO(IEN)	; RETURN A STRING OF INFORMATION ABOUT THE IMAGE ; This is for Capture App
TITLE(TIUDA)	; Return TIU Note TITLE
ARY2GLB	; Image count is getting big, switch from array to Global return type
GROUP(MAGRY,MAGIEN,NOCHK,FLAGS)	;RPC [MAGG GROUP IMAGES] ; CalL to Return image list of a Group. ; MAGIEN = the entry in MAG(2005 we assume it is a group. ; NOCHK = flag - Do (or) Not Do QI Check.
INVALID(MAGX,MAGZ)	;
INVCH(MSG,CHILD)	;Added for MAGQI integrity check ; MSG is passed by reference, we create a MAGFILE equivalent and pass it back.