PC-DMIS 2021.1 Object Library
ReportData Object
See Also  Members  Send Topic Feedback | See Object Hierarchy Chart
PCDLRN ActiveX DLL : ReportData Object

Glossary Item Box

Description

The ReportData object lets you access data sent to reports during the EventReportData event.

Remarks

This event can only be accessed inside the Properties dialog box inside the Label and Report Template Editors inside PC-DMIS versions 4.0 and higher.

 

Properties dialog box

 

Using this object in conjunction with the EventReportData event, you can access the desired information.

Example

Suppose in PC-DMIS's Label Template Editor, you use a Border object to change its background color to match the current dimension out of tolerance color. You can do this using the ReportData object. The following code works inside of the PC-DMIS's label template editor in the EventReportData event of a Border object.

Dim Count As Integer

Dim i As Integer

Dim MaxIndex As Integer

Dim MaxDev As Double

Dim CurrentDev as Variant

Dim Dev as Variant

Dim PTol as Variant

Dim MTol as Variant

Dim DevColor as Long

' Initialize Max Deviation and Max Index

MaxDev = 0.0

MaxIndex = 1

'Get the number of axes for this dimension

Count = ReportData.GetCount(132)

'Adjust the bottom of the border to fit the number of axes

Border1.Bottom = 106+((Count-1)*25)

'Loop through to find the largest deviation

'When loop is complete, MaxIndex is the index to the

' largest deviation

For i=1 to Count

 CurrentDev = ABS(ReportData.GetValue(DIM_DEVIATION,i))

 If CurrentDev > MaxDev Then

   MaxDev = CurrentDev

   MaxIndex = i

 End If

Next i

' Using MaxIndex, acquire the axis's deviation +TOL and -TOL

Dev = ReportData.GetValue(340, MaxIndex)

PTol = ReportData.GetValue(167, MaxIndex)

MTol = ReportData.GetValue(168, MaxIndex)

' Use this information to adjust the background color of the border

DevColor = ReportData.GetTolColor(Dev,PTol,MTol)

Border1.BackColor = DevColor

Border1.ForeColor = DevColor

See Also

Copyright © 2020. Hexagon Manufacturing Intelligence – Metrology Software, Inc. All Rights Reserved.