MAG3 CPRS TIU NOTE - Revision history

NeilArmstrong: Added a glossary link to CPRS~

2012-08-09T21:48:31Z

Added a glossary link to CPRS~

← Older revision		Revision as of 21:48, 9 August 2012
Line 1:		Line 1:
	To [[VistA Imaging Issues]]		To [[VistA Imaging Issues]]

	MAG3 CPRS TIU NOTE		MAG3 [[CPRS~\|CPRS]] TIU NOTE

	Returns a list of all images for a TIU document		Returns a list of all images for a TIU document

	NUMBER: 1015		NUMBER: 1015
	''NAME'': '''MAG3 CPRS TIU NOTE'''		''NAME'': '''MAG3 [[CPRS~\|CPRS]] TIU NOTE'''
	''TAG'': '''IMAGES'''		''TAG'': '''IMAGES'''
	''ROUTINE'': '''MAGGNTI'''		''ROUTINE'': '''MAGGNTI'''
Line 70:		Line 70:
	9-15-05		9-15-05
	Information about the RPC Call:		Information about the RPC Call:
	MAG3 CPRS TIU NOTE -- Returns a list of all images for a TIU document		MAG3 [[CPRS~\|CPRS]] TIU NOTE -- Returns a list of all images for a TIU document
	-->IMAGES^MAGGNTI(.result,TIUIEN)		-->IMAGES^MAGGNTI(.result,TIUIEN)
	calls GETILST^TIUSRVPL(.MAGARR,TIUDA) to get a list of all documents for document		calls GETILST^TIUSRVPL(.MAGARR,TIUDA) to get a list of all documents for document

68.170.186.124 at 02:27, 25 September 2005

2005-09-25T02:27:11Z

← Older revision		Revision as of 02:27, 25 September 2005
Line 66:		Line 66:
	$p(13^14) Dicom Series number and Dicom Image Number		$p(13^14) Dicom Series number and Dicom Image Number
	$p(15) Count of images in the group, or 1 if a single image		$p(15) Count of images in the group, or 1 if a single image


			9-15-05
			Information about the RPC Call:
			MAG3 CPRS TIU NOTE -- Returns a list of all images for a TIU document
			-->IMAGES^MAGGNTI(.result,TIUIEN)
			calls GETILST^TIUSRVPL(.MAGARR,TIUDA) to get a list of all documents for document
			--> This gets list from "ADI" index in file 8925.91 (TIU EXTERNAL DATA LINK)
			for each image in list,
			checks ^MAG(2005.1,MAGIEN, (file 2005.1 = IMAGE AUDIT) to see if deleted.
			checks ^MAG(2005,MAGIEN (file 2005 = IMAGE) to see if it exists.

			checks if field PATIENT (field #5) in file IMAGE to see if proper link to patient
			checks if field PARENT GLOBAL ROOT D0 (field #17) in IMAGE file to see if proper link to document
			should = TIUIEN
			checks INFO^MAGGTII //Get info for an Image File entry
			-->FINDFILE^MAGFILEB
			; The call to FINDFILE returns:
			; MAGFILE1=LA100066.ABS filename
			; if no Network Location pointer or INVALID Pointer
			; then MAGFILE1=-1~NO NETWORK LOCATION POINTER
			; or -1~INVALID NETWORK LOCATION POINTER
			; MAGFILE1(.01)=KIRIN,B 202524404 image desc
			; MAGJBOL= desc of Offline server
			; MAGOFFLN= if JB is offline
			; MAGPREF=C:\TEMP\LA\10\00\ path
			; MAGTYPE=MAG MAG or WORM

68.170.186.124 at 23:56, 24 September 2005

2005-09-24T23:56:33Z

← Older revision		Revision as of 23:56, 24 September 2005
Line 1:		Line 1:
			To [[VistA Imaging Issues]]

	MAG3 CPRS TIU NOTE		MAG3 CPRS TIU NOTE

69.68.182.66 at 20:07, 20 September 2005

2005-09-20T20:07:58Z

← Older revision		Revision as of 20:07, 20 September 2005
Line 43:		Line 43:
	Array of "^" delimited Image information in the format :		Array of "^" delimited Image information in the format :
	$P(1) 0 = error; otherwise X (number of images)		$P(1) 0 = error; otherwise X (number of images)
	$P(2) x Images for selected TIU NOTE (or whatever file)		$P(2) "x Images for selected TIU NOTE" (or whatever file)
	$P(3) IEN (from TIU Note, or whatever file)		$P(3) IEN (from TIU Note, or whatever file)
	$P(4) SHORT DESCRIPTION field -- Patient Name + Note Name + DateTime		$P(4) SHORT DESCRIPTION field -- Patient Name + Note Name + DateTime
Line 50:		Line 50:
	Entry Format (NOTICE: this is different than official info from Fileman, given above)		Entry Format (NOTICE: this is different than official info from Fileman, given above)
	Array of "^" delimited Image information in the format :		Array of "^" delimited Image information in the format :
	$P(1) "B2" <-- I don't know significance, but is hard coded in.		$P(1) "B2" <-- I don't know significance, but it is hard coded in.
	$P(2) IEN		$P(2) IEN
	$P(3) Image FullPath and name		$P(3) Image FullPath and name

69.68.182.66 at 11:36, 20 September 2005

2005-09-20T11:36:06Z

← Older revision		Revision as of 11:36, 20 September 2005
Line 48:		Line 48:
	$P(5) Number of images (?)		$P(5) Number of images (?)

	Entry Format		Entry Format (NOTICE: this is different than official info from Fileman, given above)
	Array of "^" delimited Image information in the format :		Array of "^" delimited Image information in the format :
	$P(1) "B2" <-- I don't know significance, but is hard coded in.		$P(1) "B2" <-- I don't know significance, but is hard coded in.

69.68.182.66 at 11:31, 20 September 2005

2005-09-20T11:31:55Z

@@ Line 33: / Line 33: @@
      $p(14)   Count of images in the group, or 1 if a single image
- Comments 9/20/05 -- K. Toppenberg
+Comments 9/20/05 -- K. Toppenberg
      in the Results array, it appears that the first entry is a header as follows
      Results(0) = header
@@ Line 46: / Line 47: @@
      $P(4)   SHORT DESCRIPTION field -- Patient Name + Note Name + DateTime
      $P(5)   Number of images (?)

69.68.182.66 at 11:21, 20 September 2005

2005-09-20T11:21:16Z

← Older revision		Revision as of 11:21, 20 September 2005
Line 32:		Line 32:
	$p(12^13) Dicom Series number and Dicom Image Number		$p(12^13) Dicom Series number and Dicom Image Number
	$p(14) Count of images in the group, or 1 if a single image		$p(14) Count of images in the group, or 1 if a single image

			Comments 9/20/05 -- K. Toppenberg
			in the Results array, it appears that the first entry is a header as follows
			Results(0) = header
			Results(1) = entry
			Results(2) = entry ...

			Header Format:
			Array of "^" delimited Image information in the format :
			$P(1) 0 = error; otherwise X (number of images)
			$P(2) x Images for selected TIU NOTE (or whatever file)
			$P(3) IEN (from TIU Note, or whatever file)
			$P(4) SHORT DESCRIPTION field -- Patient Name + Note Name + DateTime
			$P(5) Number of images (?)

69.68.182.66 at 16:46, 18 September 2005

2005-09-18T16:46:15Z

← Older revision		Revision as of 16:46, 18 September 2005
Line 1:		Line 1:
	MAG3 CPRS TIU NOTE		MAG3 CPRS TIU NOTE

			Returns a list of all images for a TIU document

	NUMBER: 1015		NUMBER: 1015

69.68.182.66 at 16:40, 18 September 2005

2005-09-18T16:40:29Z

New page

MAG3 CPRS TIU NOTE

NUMBER: 1015
''NAME'': '''MAG3 CPRS TIU NOTE'''
''TAG'': '''IMAGES'''
''ROUTINE'': '''MAGGNTI'''
''RETURN VALUE TYPE'': '''ARRAY'''
''AVAILABILITY'': '''RESTRICTED'''
''DESCRIPTION'':
Returns a list of all images for a TIU document
for a TIU document
''INPUT PARAMETER'': '''TIUDA'''
PARAMETER TYPE: LITERAL
MAXIMUM DATA LENGTH: 30
REQUIRED: YES
SEQUENCE NUMBER: 1
''DESCRIPTION'':
Internal entry number of document i.e. ^TIU(8925,TIUDA
''RETURN PARAMETER DESCRIPTION'':
Array of "^" delimited Image information in the format :
$P(1^2^3) IEN^Image FullPath and name^Abstract FullPath and Name
$P(4) SHORT DESCRIPTION field
$P(5) PROCEDURE/ EXAM DATE/TIME field
$P(6) OBJECT TYPE
$P(7) PROCEDURE field
$P(8) Procedure Date in Display format
$P(9) PARENT DATA FILE image pointer
$P(10) the ABSTYPE : 'M' magnetic 'W' worm 'O' offline
$P(11) Image accessibility 'A' accessable or 'O' offline
$p(12^13) Dicom Series number and Dicom Image Number
$p(14) Count of images in the group, or 1 if a single image