Forms

We currently fill out a CMM Request Sheet for each part we put on the CMM.

Is it possible to add this information to a Form that comes up at the start of each CMM Program for the details section?

Will then need a Pass / Fail Section at the end of the CMM Program and approval.

I'd like these to appear at the start and end of the CMM Reports

TIA for your help

Attached Files

Parents

JEFMAN over 1 year ago

I would do it like this, but I'm not sure that it's what you need...

Set PcApp = createobject("PCDLRN.application")
Set PcPart = PcApp.activepartprogram
Set Var1 = PcPart.GetVariableValue("V1")..............with ASSIGN/V1=SYSTEMTIME("HH:mm:ss") in the part program
time=Var1.stringvalue
Set Var2 = PcPart.GetVariableValue("V2")..............with ASSIGN/V2=SYSTEMDATE("MM’/’dd’/’yy") in the part program
date=Var2.stringvalue

Reply

JEFMAN over 1 year ago

I would do it like this, but I'm not sure that it's what you need...

Set PcApp = createobject("PCDLRN.application")
Set PcPart = PcApp.activepartprogram
Set Var1 = PcPart.GetVariableValue("V1")..............with ASSIGN/V1=SYSTEMTIME("HH:mm:ss") in the part program
time=Var1.stringvalue
Set Var2 = PcPart.GetVariableValue("V2")..............with ASSIGN/V2=SYSTEMDATE("MM’/’dd’/’yy") in the part program
date=Var2.stringvalue

Children

No Data