안녕,
이러한 코드를 결합하여 "Formulation Change Review (new)"에서 실행하고 새 데이터 테이블 / 표 탭을 닫고 그래프 만 남겨두고 싶습니다.
많은 도움을 주셔서 감사합니다!
(Data Table( "Formulation Change Review (new)" ) <<
Tabulate(
Add Table(
Column Table( Grouping Columns( :Lab RFT ), Statistics( Row % ) ),
Row Table( Grouping Columns( :Grade ) )
)
)) << Make Into Data Table
Graph Builder(
Size( 1896, 951 ),
Show Control Panel( 0 ),
Show Legend( 0 ),
Variables(
X(
:Grade,
Order By( :Name( "Row %(Y)" ), Ascending, Order Statistic( "Mean" ) )
),
Y( :Name( "Row %(Y)" ) ),
Overlay( :Grade )
),
Elements( Bar( X, Y, Legend( 6 ), Label( "Label by Value" ) ) ),
SendToReport(
Dispatch( {}, "graph title", TextEditBox, {Set Text( "RFT % per grade" )} ),
Dispatch( {}, "Y title", TextEditBox, {Set Text( "RFT%" )} )테스트되지 않았지만 다음과 같이 작은 블록으로 나눕니다.
dt1 = Data Table( "Formulation Change Review (new)" );
tab = (dt1 << Tabulate(
Add Table(
Column Table( Grouping Columns( :Lab RFT ), Statistics( Row % ) ),
Row Table( Grouping Columns( :Grade ) )
)
)) ;
dt2 = tab << Make Into Data Table;
gb = dt2 << Graph Builder(
Size( 1896, 951 ),
Show Control Panel( 0 ),
Show Legend( 0 ),
Variables(
X(
:Grade,
Order By( :Name( "Row %(Y)" ), Ascending, Order Statistic( "Mean" ) )
),
Y( :Name( "Row %(Y)" ) ),
Overlay( :Grade )
),
Elements( Bar( X, Y, Legend( 6 ), Label( "Label by Value" ) ) ),
SendToReport(
Dispatch( {}, "graph title", TextEditBox, {Set Text( "RFT % per grade" )} ),
Dispatch( {}, "Y title", TextEditBox, {Set Text( "RFT%" )} );
tab<<CLOSEWINDOW></CLOSEWINDOW>편집 : 그래프 작성기 섹션 끝에 누락 된 것으로 보입니다. 함께 붙여 넣을 때 스크립트에 저장 창에서 모든 JSL을 가져와야합니다.
편집 2 : 닫기 (dt2, nosave) 직전 원하는 경우
gb << journal;
gb<<CLOSEWINDOW></CLOSEWINDOW>
그래프 빌더 보고서는 테이블을 열어야하지만 저널은 자체 포함되어 있기 때문입니다. 저널 그래프는 데이터에 연결되어 있지 않으며 행 선택을 할 수 없습니다.