Messergebnisse auf Datei

[[Ha...]]

Hallo,


wie ist die richtige Einstellungen in "Ergebnisse auf Datei" wenn ich das Ergebnis einen Prüfmerkmals (z.B. Ebenheit) fortlaufend in einer Excel oder Textdatei geschrieben haben möchte?

Wir wollen eine immer wiederkehrende Serienmessung eines bestimmten Teiles durchführen. Von den Ergebnissen her interessieren uns im Wesentlichen die langfristigen Verläufe. Calypso ist anscheinend darauf ausgelegt, für jede Messung eine eigene Datei (pdf, txt oder Excel) anzulegen. Dies ist aber für eine Auswertung über einen längeren Zeitraum nicht geeignet, da jede Datei einzeln geöffnet und die Werte eingetragen werden müssten.

Ich möchte nur folgendes:

- Messprogramm ausführen
- Ergebnis des Prüfmerkmals (z.B. Ebenheit) eine Zeile einer Textdatei
- nächste Messung => Ergebnis weitere Zeile in derselben Textdatei
- nächste Messung => Ergebnis in selbe Datei usw.

Ich bekomme es leider nicht hin. Immer wird für jeden Ablauf des Messprogramms eine eigne Datei erzeugt

[[SH...]]

-

[[He...]]

Geht mit PCM!
In den Ausgangseinstellungen des Prüfplans

addToFile("c:\user\test.txt",getActual("Konz_Aussen").actual)

eintragen! Schreibt den Aktuellen Wert fortlaufend in eine Text-Datei!

[[Ro...]]

Most of our parts are recorded and logged into a TXT for long term records, about 1/3 get dumped into a different folder where WIN-SPC finds it and logs dims into SPC graph automatically.
Its very labor intensive and requires a solid understanding of PCM.
The reason i have to do things this way instead of using one of Calypso's standard outputs is because i had to match EXACTLY the reports that were being generated by PCDmis CMM's for years prior to us buying a Zeiss, so i had to fit a system that was already in use.

By the way, i have no idea how the computer people take the TXT files and get WIN SPC to recognize them, i only create the files in the template they ask for, then i'm done with it.

Google Übersetzer.......
Die meisten unserer Teile werden aufgezeichnet und für Langzeitaufzeichnungen in einem TXT protokolliert. Etwa 1/3 wird in einem anderen Ordner abgelegt, in dem WIN-SPC sie findet und Dims automatisch im SPC-Diagramm protokolliert.
Es ist sehr arbeitsintensiv und erfordert ein solides Verständnis von PCM.
Der Grund, warum ich Dinge auf diese Weise tun muss, anstatt einen der Standardausgänge von Calypso zu verwenden, ist, dass ich genau mit den Berichten übereinstimmen musste, die jahrelang von PCDmis CMMs erstellt wurden, bevor wir einen Zeiss kauften, also musste ich ein System anpassen, das war bereits in Gebrauch.

Übrigens habe ich keine Ahnung, wie die Computer-Leute die TXT-Dateien nehmen und WIN SPC dazu bringen, sie zu erkennen. Ich erstelle nur die Dateien in der Vorlage, nach der sie fragen, und dann bin ich damit fertig.

fghjghjk.JPG

[[Cl...]]

If I'm understanding you correctly, you want to append, instead of overwrite each report?
This is what I use for that. Only helpful I guess if you have PCM.

Presetting's
********************************************************************
LN = getRecordHead("order")

clearCAD()
dir = getActualInspectionDir()

Part_Size = inquireList("Which size part would you like to run?", "Diameter_.1234", "Diameter_.5678")
selectCase Part_Size
case "Diameter_.1234"
readPCMFile(dir + "\Part_.1234.PARA")
loadCADFile(dir+"\.1234.sab")
OD="Diameter_.1234 (dimension 200)"
case "Diameter_.5678"
readPCMFile(dir + "\Part_.5678.PARA")
loadCADFile(dir+"\.5678.sab")
OD="Diameter_.5678 (dimension 200)"

endSelect

Post settings we use
********************************************************************
//Dims to Excel
filePath = "T:\DMR\CMM Data\Customer_Name\"+OD+"\"
ext = ".csv"

//N1 = getRecordHead ("Program_Name_Here_Rev. F")
//dirPath = filePath + N1 + (" ") +date()+" "+time()+ ext
Lot = getRecordHead("order")
partnum=getRecordHead("partnbinc")
dirPath=filePath+Lot+("_")+partnum+ext
display(dirPath)
if fileExists(dirPath) == true
deleteFile(dirPath)
endif

//#1
DIM200_1 = getActual("200a").actual
//#2
DIM200_2 = getActual("200b").actual

addToFile(dirPath,date())
addToFile(dirPath,time())
addToFile(dirPath,("T:\DMR\CMM Data\Customer_Name\Profile (dimension 200)"))
addToFile(dirPath,("Lot Number : "),LN)
addToFile(dirPath,("200a : "),DIM200_1)
addToFile(dirPath,("200b : "),DIM200_2)

[[Ro...]]

Clarke
You're close, but if you have date & time in your file name it'll never append, it'll always just create a unique file every run.
If you want a single log file for a long record, you need to simplify your file name to just be a part number.

Also, for visual ease i like to add a couple blank spaces at the end of my reports to seperate them, then possibly a 'break' to separate the outputs.

addToFile (dirPath, (" ")) //empty line
addToFile (dirPath, ("___________________")) //break

[[Cl...]]

This grabs "OD" from the Presettings and should append each run, correct?

//Dims to Excel filePath = "T:\DMR\CMM Data\Customer_Name\"+OD+"\"ext = ".csv"

[[Is...]]

Please sign in to view this quote.

Is it not better to generate a generic code for all programs instead to do it with every one?

[[Cl...]]

I've done that for all part family programs. I created a template and just modify it as needed.

[[Cl...]]

Please sign in to view this quote.

That's interesting because Zeiss wrote that code. It does append, we send the data (.txt files) from each run to the customer.
The only change was one that I made, below.

(//Dims to Excel
filePath = "T:\DMR\CMM Data\Customer_Name\"+OD+"\"
ext = ".csv"

This grabs the "OD" from the presetting's.

[[Ro...]]

Clarke
Yep, i see now that the dirpath that has the time & date has the // in front of it.

[[Cl...]]

I'm pretty sure you helped me with this part, thanks again.

//Dims to Excel
filePath = "T:\DMR\CMM Data\Customer_Name\"+OD+"\"
ext = ".csv"

This grabs the "OD" from the presetting's.