14796_de-DE

liliconcom

JSL: Analyse an Journal senden und dann PDF speichern

Hallo, ich habe JSL geschrieben, um eine Kontrolldiagrammanalyse zu erstellen.

 

Ich möchte die Analyse an ein Journal senden und das Journal dann als PDF-Datei speichern.

 

Hier ist die letzte Codezeile, die nicht funktioniert:

  

 jrn << Save PDF( "C:\test.pdf");

 

Jede Hilfe wäre willkommen!

 

 

//!
Names Default To Here(1);
dt = Open( "$SAMPLE_DATA/Quality Control/Diameter.jmp" );
dt << New Column ( "LOT", Character( 1 ), Nominal, Set Values( {
  "A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A",
  "A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A",
  "A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A",
  "A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A",
  "B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B",
  "B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B",
  "B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B",
  "B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B"
  } )
);
cchart = Control Chart( Sample Label(:DAY),Phase(:LOT),Group Size(1),KSigma(3),
  Chart Col( :DIAMETER,
    Individual Measurement(
      Phase Level( "A", LCL( 3.49 ), Avg( 4.36 ), UCL( 5.23 ) ),
      Phase Level( "B", LCL( 3.46 ), Avg( 4.32 ), UCL( 5.18 ) )
    )
  ),
  SendToReport(
    Dispatch(
      {"Individual Measurement of DIAMETER"},
      "IR Chart of IM",FrameBox,
      {Row Legend( MACHINE,Color(1),Color Theme("JMP Default") )}
    )
  ),
  Where( :OPERATOR == "RMM" )
);
jrn = New Window( cchart << Journal );
jrn << Save PDF( "C:\test.pdf");

 

Betreff: JSL: Analyse an Journal senden und dann PDF speichern<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />

Ich definiere ::fid als globale Variable ganz am Anfang des Skripts.Dasselbe gilt für die globale Variable ::PathOut. Für mich ist ::fid nur eine Abkürzung für Datei-ID - etwas, das ich den Dateinamen nennen möchte. Ich gebe die Datei-ID und den Pfadnamen in den ersten Zeilen des Skripts an und führe dann eine Vielzahl von Analysen durch, die jeweils in einem Journal gespeichert werden. Ich beende das Skript, indem ich einen Titel für das Journal festlege, ihm eine Referenz gebe (z. B. jrn) und es schließlich sowohl als HTML als auch als PowerPoint speichere.

Betreff: JSL: Analyse an Journal senden und dann PDF speichern

Interessante Idee, aber ich konnte es nicht zum Laufen bringen.

Wie ist ::fid Gebraucht ?Muss ich diese globale Variable irgendwo deklarieren?Vielen Dank.

Betreff: JSL: Analyse an Journal senden und dann PDF speichern

Das hat funktioniert! Vielen Dank.

Ich konnte sogar als Landschaft speichern, wodurch die Darstellung der Phased Limits behoben wurde

Betreff: JSL: Analyse an Journal senden und dann PDF speichern

Das hat funktioniert! Vielen Dank.

Betreff: JSL: Analyse an Journal senden und dann PDF speichern

Ich hatte ein ähnliches Problem beim Speichern in eine PowerPoint-Datei und bin schließlich über den Befehl „Präsentation speichern“ gestolpert.Ich führe alle meine Analysen durch und speichere sie in einem gemeinsamen Journal und führe dann die folgenden Zeilen aus.Ich definiere eine globale Variable namens ::fid.Ja, ich kenne die Gefahren kollidierender Namespaces, aber ich bin so ziemlich der einzige, der in meiner kleinen Firma in JSL codiert. Also mache ich naiv in glückseliger Ignoranz weiter ...

 

 

Current Journal()<< Set Window Title(::fid || "Summary");
 
/* Set the title of the Journal Window */
jrn=Current Journal();
jrn<<SAVE presentation=""></SAVE>

 

 

Ich dachte nur, ich würde eine ähnliche Erfahrung teilen.

 

David

Betreff: JSL: Analyse an Journal senden und dann PDF speichern

Ich habe nicht die erforderlichen Berechtigungen, um auf die oberste Ebene meines C-Laufwerks zu schreiben.Außerdem gibt es ein Flag, das Sie einschließen können, um zu verhindern, dass der Seiteneinrichtungsdialog erscheint.Schließlich müssen Sie das Tagebuch nicht in ein Fenster stellen.Versuche dies:

 

 

jrn = cchart << Journal;
jrn << Save PDF( "C:\temp\test1.pdf", show page setup(0));

 

Betreff: JSL: Analyse an Journal senden und dann PDF speichern

2 Dinge:

1. Irgendwie würde es die Datei nicht in "C:" für mich speichern.

2. PDF speichern funktioniert für Berichte, aber nicht für Zeitschriften, wie es scheint.

 

Dieser Code funktioniert bei mir:

 

 

Names Default To Here(1);
dt = Open( "$SAMPLE_DATA/Quality Control/Diameter.jmp" );
dt << New Column ( "LOT", Character( 1 ), Nominal, Set Values( {
  "A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A",
  "A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A",
  "A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A",
  "A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A","A",
  "B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B",
  "B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B",
  "B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B",
  "B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B","B"
  } )
);
cchart = Control Chart( Sample Label(:DAY),Phase(:LOT),Group Size(1),KSigma(3),
  Chart Col( :DIAMETER,
    Individual Measurement(
      Phase Level( "A", LCL( 3.49 ), Avg( 4.36 ), UCL( 5.23 ) ),
      Phase Level( "B", LCL( 3.46 ), Avg( 4.32 ), UCL( 5.18 ) )
    )
  ),
  SendToReport(
    Dispatch(
      {"Individual Measurement of DIAMETER"},
      "IR Chart of IM",FrameBox,
      {Row Legend( MACHINE,Color(1),Color Theme("JMP Default") )}
    )
  ),
  Where( :OPERATOR == "RMM" )
);
 
jrn = cchart << Report;
jrn << Save PDF( "C:\Users\USERNAME\Desktop\test.pdf");