cancel
Showing results for 
Search instead for 
Did you mean: 
cancel
Showing results for 
Search instead for 
Did you mean: 

Community Tip - Want the oppurtunity to discuss enhancements to PTC products? Join a working group! X

Export of text files or data files with arbitrary delimiters

0 Kudos

Export of text files or data files with arbitrary delimiters

1. Describe your environment: What is your industry? What is your role in your organization? Describe your stakeholders.
Development engineer in the field of heavy mechanical engineering. Company with 13000 employees


2. What version of Mathcad are you currently using?
Mathcad15 M050

 

3. Describe the problem you want to solve. Please include full documentation such as screenshots, images or videos.

There is no way to write data to a file in Mathcad-Prime.

Example: Creo curve is automatically read in via the ATB bus.

Arc length open section

 

begin curve
-2.8199155408907756 284.1137652726735 -69.5870870870871
-2.629673362915227 284.4237096529964 -68.4647147147147
-2.45494053145579 284.708386057278 -67.3423423423423
-2.295388055095472 284.9683304814889 -66.21996996997 -2.1507236083080414 285.2040191851793 -65.0975975975976 -2.0206885997737203 285.4158734678066 -63.9752252252252
-1.9050556782221974
285.60426373224004 -62.8528528528528
-1.8036266157316873 285.7695129333105
-61.7304804804805
-1.7162305197729068 285.911899490765 -60.6081081081081
-1.6427223345215225 286,0316597309434 -59,4857357357357
-1,5829815995578684 286,1289899091162 -58,3633633633634
-1.536911440402406 286.2040478541144 -57.240990990991
-1.501417533981936 286.2618748667558 -56.1186186186186
-1.4672554467547485 286.31753206679866 -54.9962462462462
-1.4337857686237498 286.3720611873035 -53.8738738738739 -1.4010083604223098 286.42546245500176 -52.7515015015015 -1.3689230858982881 286.477736091877 -51.6291291291291
-1.3375298117113203 286.5288823151684
-50.5067567567568 -1.3068284074299612
286.5789013373763 -49.3843843843844
-1.2768187455290416
286.6277933662658 -48.262012012012
-1.2475007013870822 286.6755586048714 -47.1396396396396

Beispiel2: Messprogramm

****************************************************** **** *****************************
* Treffer *
* Auftrag: Neutral % ZÄHNEZAHL ! 41 *
* Materialnummer: BG650_22k_-0.25 Version: 1 *
* NOCOLUMNS % NSPG ! 12 ; NOLINES % NZLG ! 17 ; *
* % REFSP ! 6 ; % REFZL ! 9 ; *
* Datum: 09.01.2019 Benutzer: merz *
* CL XP YP ZP NX NY NZ *
****************************** ****************************************************** ****
1 1 -10.5169 272.7954 -51.5697 0.94 0.3385 -0.0429
1 2 -10.3163 273.0604 -45.1235 0.9394 0.3406 -0.0376
1 3 -10.1426 273.2901 -38.6773 0.939 0.3424 -0.0322
1 4 -9.9957 273,4844 -32,231 0,9386 0,3439 -0,0269
1 5 -9.8756 273,6434 -25,7848 0,9383 0,3452 -0,0,0215
1 6 -9,782 273,7671 -19,3386
0,938 0,346921. -0.0108
1 8 -9.6754 273.9085 -6.4462 0.9378 0.3472 -0.0054
1 9 -9.6621 273.9262 0 0.9377 0.3474 0
1 10 -9.6754 273.9085 6.4462 0.9378 0.3472 0.0054
1 11 -9.7154 273.8555 12.8924 0.9379 0.3468 0.0108
1 12 -9.7821 273.7671 19.3386 0.938 0.3461 0.0162
1 13 -9.8756 273.6434 25.7848 0.9383 0.3452 0.0215
1 14 -9.9957 273.4844 32.231 0.9386 0.3439 0.0269
1 15 -10.1426 273.2901 38.6773 0.939 0.3424 0.0322
1 16 -10.3163 273,0604 45,1235 0,9394 0,3406 0,0376
1 17 -10.5169 272.7954 51.5697 0,94 0.3385 0.0429
2 1 -10.7739 273.4958 -51.5951 0.9368 0.368 0.368
2 2 -10.5798 273.7742 -80.932 -45.1462
2 3 -10.4133 274.0197 -38.6971 0.9357 0.3513 -0.0325
2 4 -10.2744 274.2322 -32.2479 0.9352 0.3531 -0.0271
2 5 -10.1629 274.4117 -25.7987 0.9348 0.3546 -0.0217
2 6 -10.0788 274.5581 - 19.3493 0.9344 0.3558 -0.0163
2 7 -10.02 274.6656 - 12.8997 0.9342 0.3567 -0.0109
2 8 -9.9847 274.7301 -6.4499 0.934 0.3573 -0.0054
2 9 -9.9729 274.7515 0 0.9339 0.3574 0
2 10 -9.9847 274.7301 6.4499 0.934 0.3573 0.0054
2 11 -10.02 274.6656 12,8997 0,9342 0,3567 0, 0109
2 12 -10,0788 274,5581 19,3493 0,9344 0,3558 0,0163
2 13 -10,1629 274,4117 25,7987 0,9348 0,3546 0,0217
2 14 -10,2744 274,23222479 0,9352 14
2 15 -10,4133 274,0197 38,6971 0,3525 0,9357 0,9357 0,9357 0,9357
0,9357 10,5798 273,7742 45,1462 0,9362 0,3493 0,0378

 

In Mathcad, the script creates the data.

 

function Variable_in_DateiEvent::Start()
{
// TODO: Geben Sie hier Ihren Code ein
}

function Variable_in_DateiEvent::Exec(Inputs,Outputs)
{
var objFSO, objTextFile;
var sRead, sReadLine, sReadAll;
var ForReading = 1, ForWriting = 2, ForAppending = 8;
var i,j;
VA = Inputs(0);
Dateiname = Inputs(1).Value;
Trennzeichen = Inputs(2).Value;


objFSO = new ActiveXObject("Scripting.FileSystemObject");
objTextFile =objFSO.CreateTextFile(Dateiname , true);

// Schreiben einer Zeile.
for (i=0;i<VA.Rows;i++) {
for (j=0;j<VA.Cols-1;j++){
objTextFile.Write(VA.Value(i,j)+Trennzeichen);
}
objTextFile.Write(VA.Value(i,VA.Cols-1))
objTextFile.WriteBlankLines(1);
}

objTextFile.Close();

}

function Variable_in_DateiEvent::Stop()
{
// TODO: Geben Sie hier Ihren Code ein
}

 

4. What is the use case for your organization?
We calculate path data for a 5-axis grinding machine. This data is transferred to the measuring machine as a data file.
The component is then measured using another data set. The measurement result is analyzed and evaluated with Mathcad.

 

5. What commercial value would your proposal bring to your company?
Since Mathcad 15 is no longer maintained, we're about to have a major problem in the manufacturing flow.

 

Translated by @olivierlp  using Google Translate on 01/04/2023
-----------------------------------------------------------------------------------------------

 

Subject: Export von Textdateien oder Datendateien mit beliebigen Trennzeichen

 

1. Beschreiben Sie Ihr Umfeld: Was ist Ihre Branche? Was ist Ihre Rolle in Ihrer Organisation? Beschreiben Sie Ihre Stakeholder.
Entwicklungsingenieur im Bereich Schwermaschinenbau. Unternehmen mit 13000 Mitarbeitern


2. Welche Version von Mathcad verwenden Sie derzeit?
Mathcad15 M050

3. Beschreiben Sie das Problem, das Sie lösen möchten. Bitte fügen Sie eine vollständige Dokumentation wie Screenshots, Bilder oder Videos bei.

In Mathcad-Prime gibt es keine Möglichkeit, Daten in eine Datei zu schreiben.

Beispiel: Creo Kurve wird automatisch über den ATB-Bus eingelesen.

Bogenlänge öffnen Abschnitt
beginnen! 1
begin curve
-2.8199155408907756 284.1137652726735 -69.5870870870871
-2.629673362915227 284.4237096529964 -68.4647147147147
-2.45494053145579 284.708386057278 -67.3423423423423
-2.295388055095472 284.9683304814889 -66.21996996997 -2.1507236083080414 285.2040191851793 -65.0975975975976 -2.0206885997737203 285.4158734678066 -63.9752252252252
-1.9050556782221974
285.60426373224004 -62.8528528528528
-1.8036266157316873 285.7695129333105
-61.7304804804805
-1.7162305197729068 285.911899490765 -60.6081081081081
-1.6427223345215225 286,0316597309434 -59,4857357357357
-1,5829815995578684 286,1289899091162 -58,3633633633634
-1.536911440402406 286.2040478541144 -57.240990990991
-1.501417533981936 286.2618748667558 -56.1186186186186
-1.4672554467547485 286.31753206679866 -54.9962462462462
-1.4337857686237498 286.3720611873035 -53.8738738738739 -1.4010083604223098 286.42546245500176 -52.7515015015015 -1.3689230858982881 286.477736091877 -51.6291291291291
-1.3375298117113203 286.5288823151684
-50.5067567567568 -1.3068284074299612
286.5789013373763 -49.3843843843844
-1.2768187455290416
286.6277933662658 -48.262012012012
-1.2475007013870822 286.6755586048714 -47.1396396396396

Beispiel2: Messprogramm

****************************************************** **** *****************************
* Treffer *
* Auftrag: Neutral % ZÄHNEZAHL ! 41 *
* Materialnummer: BG650_22k_-0.25 Version: 1 *
* NOCOLUMNS % NSPG ! 12 ; NOLINES % NZLG ! 17 ; *
* % REFSP ! 6 ; % REFZL ! 9 ; *
* Datum: 09.01.2019 Benutzer: merz *
* CL XP YP ZP NX NY NZ *
****************************** ****************************************************** ****
1 1 -10.5169 272.7954 -51.5697 0.94 0.3385 -0.0429
1 2 -10.3163 273.0604 -45.1235 0.9394 0.3406 -0.0376
1 3 -10.1426 273.2901 -38.6773 0.939 0.3424 -0.0322
1 4 -9.9957 273,4844 -32,231 0,9386 0,3439 -0,0269
1 5 -9.8756 273,6434 -25,7848 0,9383 0,3452 -0,0,0215
1 6 -9,782 273,7671 -19,3386
0,938 0,346921. -0.0108
1 8 -9.6754 273.9085 -6.4462 0.9378 0.3472 -0.0054
1 9 -9.6621 273.9262 0 0.9377 0.3474 0
1 10 -9.6754 273.9085 6.4462 0.9378 0.3472 0.0054
1 11 -9.7154 273.8555 12.8924 0.9379 0.3468 0.0108
1 12 -9.7821 273.7671 19.3386 0.938 0.3461 0.0162
1 13 -9.8756 273.6434 25.7848 0.9383 0.3452 0.0215
1 14 -9.9957 273.4844 32.231 0.9386 0.3439 0.0269
1 15 -10.1426 273.2901 38.6773 0.939 0.3424 0.0322
1 16 -10.3163 273,0604 45,1235 0,9394 0,3406 0,0376
1 17 -10.5169 272.7954 51.5697 0,94 0.3385 0.0429
2 1 -10.7739 273.4958 -51.5951 0.9368 0.368 0.368
2 2 -10.5798 273.7742 -80.932 -45.1462
2 3 -10.4133 274.0197 -38.6971 0.9357 0.3513 -0.0325
2 4 -10.2744 274.2322 -32.2479 0.9352 0.3531 -0.0271
2 5 -10.1629 274.4117 -25.7987 0.9348 0.3546 -0.0217
2 6 -10.0788 274.5581 - 19.3493 0.9344 0.3558 -0.0163
2 7 -10.02 274.6656 - 12.8997 0.9342 0.3567 -0.0109
2 8 -9.9847 274.7301 -6.4499 0.934 0.3573 -0.0054
2 9 -9.9729 274.7515 0 0.9339 0.3574 0
2 10 -9.9847 274.7301 6.4499 0.934 0.3573 0.0054
2 11 -10.02 274.6656 12,8997 0,9342 0,3567 0, 0109
2 12 -10,0788 274,5581 19,3493 0,9344 0,3558 0,0163
2 13 -10,1629 274,4117 25,7987 0,9348 0,3546 0,0217
2 14 -10,2744 274,23222479 0,9352 14
2 15 -10,4133 274,0197 38,6971 0,3525 0,9357 0,9357 0,9357 0,9357
0,9357 10,5798 273,7742 45,1462 0,9362 0,3493 0,0378

in Mathcad werden die Daten über das Skript erstellt.

function Variable_in_DateiEvent::Start()
{
// TODO: Geben Sie hier Ihren Code ein
}

function Variable_in_DateiEvent::Exec(Inputs,Outputs)
{
var objFSO, objTextFile;
var sRead, sReadLine, sReadAll;
var ForReading = 1, ForWriting = 2, ForAppending = 8;
var i,j;
VA = Inputs(0);
Dateiname = Inputs(1).Value;
Trennzeichen = Inputs(2).Value;


objFSO = new ActiveXObject("Scripting.FileSystemObject");
objTextFile =objFSO.CreateTextFile(Dateiname , true);

// Schreiben einer Zeile.
for (i=0;i<VA.Rows;i++) {
for (j=0;j<VA.Cols-1;j++){
objTextFile.Write(VA.Value(i,j)+Trennzeichen);
}
objTextFile.Write(VA.Value(i,VA.Cols-1))
objTextFile.WriteBlankLines(1);
}

objTextFile.Close();

}

function Variable_in_DateiEvent::Stop()
{
// TODO: Geben Sie hier Ihren Code ein
}

 



4. Was ist der Anwendungsfall für Ihre Organisation?
Wir berechnen Bahndaten für eine 5-Achsschleifmaschine. Diese Daten werden als Daten-Datei an die Messmaschine übergeben.
Anschließend wird über einen weiteren Datensatz das Bauteil vermessen. Das Messergebnis wird mit Mathcad ausgewertet und bewertet.

5. Welchen geschäftlichen Wert würde Ihr Vorschlag für Ihr Unternehmen darstellen?
Da Mathcad 15 nicht mehr gewartet wird, haben wir demnächst ein großes Problem in dem Fertigungsablauf.

1 Comment
olivierlp
Community Manager
Status changed to: Acknowledged

Thank you @JUERGENMERZ for your idea. Based on the information you provided, we are acknowledging it as the Community management team. This is not a commitment from the Product team. Other users may comment and vote your idea up.