Use Combo box to select/deselect rows

bernie426

I like to set up a combo box that can help me to select/deselect/exclude/hide some rows in some specific row,

Can any help out on my script below?

Many Thanks,

Names Default To Here(1);

dt=Current Data table();

MRB_List={"Bin1", "Bin2", "Bin3", "Bin4", "Bin5"};

Prod_List={"Binned"};

New Window("Production & MRB Filter",Outline Box("Production Selection/Exclusion"),

  cb=Combo Box ({"MRB","Prodction Goods"},

  selection = cb << getselected()

  << select  where( Contains( MRB_List, :BinClass_ )),//<< Enable <<Exclude <<Hide

  << select  where( Contains( Prod_List, :Category ))),//<< Enable <<Exclude <<Hide

)

ian_jmp

Not sure I completely understand what you want. But this example should help with the 'mechanics' of the 'ComboBox()':

Names Default To Here(1);

// Make a table

n = 30;

MRB_List={"Bin1", "Bin2", "Bin3", "Bin4", "Bin5", , "Bin6", , "Bin7", , "Bin8", , "Bin9", , "Bin10"};

MRBVals = {};

for(i=1, i<=n, i++, InsertInto(MRBVals, MRB_List[RandomInteger(1, NItems(MRB_List))]));

dt = NewTable("Bin Data", NewColumn("BinClass_", Character, Nominal, Values(MRBVals)));

// Make the UI

New Window("MRB Filter",Outline Box("Bin Selection/Exclusion"), cb = Combo Box (MRB_List, cbScript));

cbScript =

Expr(

   myBin = cb << getselected;

   dt << clearRowStates;

   dt << selectWhere(:BinClass_ == myBin ) << Enable <<Exclude <<Hide;

);