JSL: 저널에 분석을 보낸 다음 PDF 저장

[#1]

안녕하세요, 컨트롤 차트 분석을 만들기 위해 JSL을 스크립팅했습니다.

분석을 저널에 보낸 다음 저널을 PDF 파일로 저장하고 싶습니다.

작동하지 않는 코드의 마지막 줄은 다음과 같습니다.

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

도움을 주시면 감사하겠습니다!

//!
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");

[#2]

2가지:

1. 왠지 "C:"에 파일이 저장되지 않습니다.

2. PDF 저장 보고서에는 작동하지만 저널에는 작동하지 않는 것 같습니다.

이 코드는 저에게 효과적입니다.

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");

[#3]

이것은 효과가 있었다! 감사해요.

[#4 · Accepted solution]

내 C 드라이브의 최상위 수준에 쓰는 데 필요한 권한이 없습니다.또한 페이지 설정 대화 상자가 팝업되지 않도록 포함할 수 있는 플래그가 있습니다.마지막으로 저널을 창 안에 넣을 필요가 없습니다.이 시도:

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

[#5]

이것은 효과가 있었다! 감사해요.

Phased Limits 프리젠테이션을 수정한 Landscape로 저장할 수도 있었습니다.

[#6]

PowerPoint 파일로 저장하는 비슷한 문제가 있었고 마침내 프레젠테이션 저장 명령을 우연히 발견했습니다.모든 분석을 실행하고 공통 저널에 저장한 후 다음 줄을 실행합니다.::fid라는 전역 변수를 정의합니다.예, 네임스페이스 충돌의 위험성을 알고 있지만 소규모 회사에서 JSL로 코딩하는 유일한 사람입니다.

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

비슷한 경험을 공유하고 싶다고 생각했습니다.

데이브

[#7]

흥미로운 아이디어지만 실행에 옮기지는 못했습니다.

어때 ::버팀대 사용된 ?이 전역 변수를 어딘가에 선언해야 합니까?감사해요.

[#8]

나는 스크립트 맨 처음에 ::fid를 전역 변수로 정의합니다.::PathOut 전역 변수에 대해서도 마찬가지입니다. 나에게 ::fid는 파일 ID의 줄임말입니다. 파일 이름을 부르고 싶은 것입니다. 스크립트의 시작 줄에 파일 ID와 경로 이름을 제공한 다음 각각 하나의 저널에 저장되는 다양한 분석을 실행합니다. 저널의 제목을 설정하고 참조(예: jrn)를 제공한 다음 마지막으로 HTML과 PowerPoint로 저장하여 스크립트를 종료합니다.