Jump to content

Cylinder Bore Grading using PCM?


---
 Share

Recommended Posts

Prismo Navigator – Vast Head - Integrated Ø400mm Rotary Table - Calypso 5.4.12 (12.12.2012)

Is there a way of outputting Cylinder Bore Grades?
I assume, if possible, the method would be using PCM?
In such the measured diameter would be calculated then assigned the correct letter for the grading.
Example, measured Diameter is Ø83.023245, therefore would be assigned the Grade C

The Cylinder bore grading spec as follows,
GRADE A Ø83.000000 – Ø83.006099
GRADE X Ø83.006100 – Ø83.012099
GRADE B Ø83.012100 – Ø83.018099
GRADE C Ø83.018100 – Ø83.024099
GRADE D Ø83.024100 – Ø83.030099
GRADE E Ø83.030100 – Ø83.036099
GRADE F Ø83.036100 – Ø83.042099
GRADE G Ø83.042100 – Ø83.050099
GRADE 5 Ø83.050100 – Ø83.060000

Note: Nobody here has had PCM training & the software version is quite old, Calypso 5.4.12 (12.12.2012)

Thanks
Link to comment
Share on other sites

Unfortunately I don't think Israel's solution will work because of the old (ancient) version. I think selectCase came somewhere after Calypso 6.0.

But something like this should work. I'm not at a calypso-computer right now so I can't test it. Test it and if it doesn't work just post a message and I or someone else will try to help. This could be input in the presettings of a text element and then the parameter GradeForHole can be used for the formula in the textbox.
//Start defining a list with the grade-name, lower and upper limits.
Grade_ID[1] = "GRADE A"
Grade_Min[1] = 83.000000
Grade_Max[1] = 83.006099
Grade_ID[2] = "GRADE X"
Grade_Min[2] = 83.006100
Grade_Max[2] = 83.012099
Grade_ID[3] = "GRADE B"
Grade_Min[3] = 83.012100
Grade_Max[3] = 83.018099
Grade_ID[4] = "GRADE C"
Grade_Min[4] = 83.018100
Grade_Max[4] = 83.024099
Grade_ID[5] = "GRADE D"
Grade_Min[5] = 83.024100
Grade_Max[5] = 83.030099
Grade_ID[6] = "GRADE E"
Grade_Min[6] = 83.030100
Grade_Max[6] = 83.036099
Grade_ID[7] = "GRADE F"
Grade_Min[7] = 83.036100
Grade_Max[7] = 83.042099
Grade_ID[8] = "GRADE G"
Grade_Min[8] = 83.042100
Grade_Max[8] = 83.050099
Grade_ID[9] = "GRADE 5"
Grade_Min[9] = 83.050100
Grade_Max[9] = 83.060000

//Since there are gaps between the interval the need to round the input diameter to the 6th decimal place. Change the name of Cylinder123 to the correct one.
Diameter_Rounded = round(getActual("Cylinder123").diameter,6)


GradeForHole = "Unknown"
for i = 1 to 9
	if (Diameter_Rounded >= Grade_Min[i]) and (Diameter_Rounded <= Grade_Max[i])
		GradeForHole = Grade_ID[i]
		i = 9
	endif
next i
Link to comment
Share on other sites

Thanks for your reply.
Please excuse my ignorance, but I may have to go step by step.

Some additional information,
We have four Cylinder bores to grade, the Feature names are (-58MM CYL 1) (-58MM CYL 2) (-58MM CYL 3) (-58MM CYL 4)
The (2 point Diameter) Characteristic names are (GAUGE DIA CYL 1) (GAUGE DIA CYL 2) (GAUGE DIA CYL 3) (GAUGE DIA CYL 4)

And just to make it more difficult, the grading is to use the MINIUMUM diameter of a 2 Point Diameter calculation.

Because of this I suspect the code part of the code.......Diameter_Rounded = round(getActual("Cylinder123").diameter,6)
Would be replaced as either...........................................Diameter_Rounded = round(getMinActual("-58MM CYL 1").diameter,6)
or.....................................................................................Diameter_Rounded = round(getMinActual("GAUGE DIA CYL 1").actual,6)


So, if I am correct, I created a Text element in Characteristics, right clicked and opened Parameter.
Copied your code (with changed the Diameter_Rounded line code) and pasted it into the Presettings.

The next step is confusing me "and then the parameter GradeForHole can be used for the formula in the textbox" please could you elaborate?

See the full code uploaded in the presettings below

cyl bores pcm.jpg

Link to comment
Share on other sites

Please sign in to view this quote.

Since it is the minimum diameter from a 2-point diameter you will need to use this (your second option):
Diameter_Rounded = round(getMinActual("GAUGE DIA CYL 1").actual,6)

With GAUGE DIA CYL 1 being the name och the 2-point diameter characteristic.

Creating the text element and pasting the code in presettings is correct. Then select all the code in presettings, right click and choose compute. This will run the code and hopefully not display any error messages. Then click OK.
Then you open the text element, right click the big text box and choose formula. Then you write GradeForHole in the formula dialog. If everything works you will get the text output that corresponds with the current Grade of the hole.
Link to comment
Share on other sites

 Share

×
×
  • Create New...