572585_zh-CN

liliconcom

数据表的选择问题

你好，

 

我希望你过得很好。

这是一个非常长且未优化的代码，用于执行来自两个不同数据集（“CL 和 Spec”和“数据集”）的 2 个子集。 有一个文本框可以根据数据集的级别选择要选择的行。

但是，问题是在执行第一个数据表的子集（名为“CL and Spec”的数据集）之后，第二个数据集的子集（名为“Data set”）无法正常工作，并且没有任何错误消息。 只是没有执行子集。 我的理解是，我为子集选择数据集的方式存在问题。 或者我没有正确使用“当前数据表”功能。

 

这是我的代码：

 

dt2 = Data Table( "CL and Spec" );
Current Data Table( dt2 );

// get unique values from the strength column
Summarize( dt2, levels = by( :Product ) );

// construct a window containing checkboxes
New Window( "Selection",
 modal,
 Border Box( top( 20 ), bottom( 20 ), Left( 20 ), Right( 20 ),
  V List Box(
   Text Box( "Select values:" ),
   here:cb = Check Box( levels ),
   Spacer Box( size( 0, 20 ) ),
   Button Box( "Create Subset", doSubset() )
  )
 )
);

// define function to perform when button is cliccked
doSubset = Function( {},
 {default local}, 

 dt2 = Current Data Table();
 dt2 << clear select;

  // get user selections
 selected = here:cb << get selected;
  
  // iterate over each of the selected values
 // and select the associated rows
 For( i = 1, i <= N Items( selected ), i++,
  rows = dt2 << select  where( :Product == selected[i], current selection( "extend" ) )
 );
  // create a subset table
 dt2 << subset( selected rows( 1 ), selected columns only( 0 ) );
 dt2 << clear select;

);

// Define the control and specification limits
LSL = dt2:LSL[1];
USL = dt2:USL[1];

dt = Data Table( "Data Set" );
Current Data Table( dt );

// get unique values from the strength column
Summarize( dt, levels = by( :Strength ) );

// construct a window containing checkboxes
New Window( "Selection",
 modal,
 Border Box( top( 20 ), bottom( 20 ), Left( 20 ), Right( 20 ),
  V List Box(
   Text Box( "Select values:" ),
   here:cb = Check Box( levels ),
   Spacer Box( size( 0, 20 ) ),
   Button Box( "Create Subset", doSubset() )
  )
 )
);


// define function to perform when button is cliccked

doSubset = Function( {},
 {default local}, 

 dt = Data Table( "Data Set" );
 Current Data Table( dt );
 dt << clear select;

  // get user selections
 selected = here:cb << get selected;
  
  // iterate over each of the selected values
 // and select the associated rows
 For( i = 1, i <= N Items( selected ), i++,
  rows = dt << select  where( :Strength == selected[i], current selection( "extend" ) )
 );
  // create a subset table
 dt << subset( selected rows( 1 ), selected columns only( 0 ) );
  
 dt << clear select;

);

我希望我的问题和问题得到明确表达；）

 

非常感谢您的帮助，祝您有愉快的一天！

 

让

脚本回复：数据表的选择问题

我没有你的表格，但这是我处理类似问题的方式：

Names Default to Here( 1 );
dt2 = Data Table( "CL and Spec" );

// get unique values from the strength column
levels = Associative Array( dt2:product ) << Get Keys;

// construct a window containing checkboxes
continue = 0;
New Window( "Selection",
 <<MODAL></MODAL>

 

回复：数据表的选择问题

事实上，我担心的是我想打开 2 个不同的数据集并使用第一个数据集，然后切换到下一个数据集。

我在执行子集之前使用了“当前数据表”功能。

 

代码的第一部分是加载“CL and Spec”数据集，打开一个文本框，对“CL and Spec”数据集的一行进行子集化，并将参数“LSL”和“USL”存储在 LSL 中和 USL 变量。 然后不再使用“CL and Spec”数据集。

 

Names Default to Here( 1 );
dt2 = Data Table( "CL and Spec" );

// get unique values from the strength column
levels = Associative Array( dt2:product ) << Get Keys;

// construct a window containing checkboxes
continue = 0;
New Window( "Selection",
 <<MODAL></MODAL>

然后代码的第二部分是加载“Data set”数据集，打开一个文本框，并对“Data set”数据集的行进行子集化。

dt = Data Table( "Data Set" );
Current Data Table( dt );

// get unique values from the strength column
Summarize( dt, levels = by( :Strength ) );

// construct a window containing checkboxes
New Window( "Selection",
 modal,
 Border Box( top( 20 ), bottom( 20 ), Left( 20 ), Right( 20 ),
  V List Box(
   Text Box( "Select values:" ),
   here:cb = Check Box( levels ),
   Spacer Box( size( 0, 20 ) ),
   Button Box( "Create Subset", doSubset() )
  )
 )
);


// define function to perform when button is cliccked

doSubset = Function( {},
 {default local}, 

 dt = Data Table( "Data Set" );
 Current Data Table( dt );
 dt << clear select;

  // get user selections
 selected = here:cb << get selected;
  
  // iterate over each of the selected values
 // and select the associated rows
 For( i = 1, i <= N Items( selected ), i++,
  rows = dt << select  where( :Strength == selected[i], current selection( "extend" ) )
 );
  // create a subset table
 dt << subset( selected rows( 1 ), selected columns only( 0 ) );
  
 dt << clear select;

);

但是，第二个数据未加载或没有行的子集......

 

非常感谢您的帮助！