22555
Automotive
- Dec 17, 2003
- 24
Hi,
I am doing distance calculation between 2 products using following code. I am getting different values while running the same code in interactive mode versus batch mode. Any help to resolve this would be appreciated. Thanks
Dim cDistances As Distances
Set cDistances = RootProduct.GetTechnologicalObject("Distances")
Dim NewDistance 'As Distance
Set NewDistance = cDistances.Add
oGroup1.AddExplicit Product1
oGroup2.AddExplicit Product2
NewDistance.FirstGroup = oGroup1
NewDistance.SecondGroup = oGroup2
NewDistance.ComputationType = catDistanceComputationTypeBetweenTwo
NewDistance.MeasureType = catDistanceMeasureTypeMinimum
NewDistance.Compute
I am doing distance calculation between 2 products using following code. I am getting different values while running the same code in interactive mode versus batch mode. Any help to resolve this would be appreciated. Thanks
Dim cDistances As Distances
Set cDistances = RootProduct.GetTechnologicalObject("Distances")
Dim NewDistance 'As Distance
Set NewDistance = cDistances.Add
oGroup1.AddExplicit Product1
oGroup2.AddExplicit Product2
NewDistance.FirstGroup = oGroup1
NewDistance.SecondGroup = oGroup2
NewDistance.ComputationType = catDistanceComputationTypeBetweenTwo
NewDistance.MeasureType = catDistanceMeasureTypeMinimum
NewDistance.Compute