Table of Content
HAL Forum
procedure SetWindowSubset (
integer WindowId,string SubsetValue)
Description:
Set record list window subset filtering key, that is used by sorting keys that have been defined with SubsetKeyBegin2. When set, only records that have the subset value listed on field that was defined with AppendFieldToKeyName get listed.
Parameters:
WindowId Identificator, that refers to a window that holds a record list, that has subset sorting keys defined.
SubsetValue The value that is used for filtering the record list records when subset sorting key is used.
function Boolean IN2SClassOnOKWindow(Integer wn)
begin  
  LongInt l;
  string 255 subset;
  Array string 255 adi;
  Integer i,acnt;
    
  l = SelectedListLine(wn);
  subset = GetSelDI_IN2SClass(GetWindowSubset(wn),l,adi,acnt);
  ClearStringList(wn);
//  IN2SClassOnOKWindowDo(subset,adi,acnt);
  for (i=0;i<acnt;i=i+1) begin
    SetListString(wn,i,adi[i],false);  
  end;
  SetWindowSubset(wn,subset);
  i = SelectedListLine(wn);
  UpdateBrowses("");
  IN2SClassOnOKWindow = true;
  return;
end;
Related topics:
««