# Property of Four Js*
# (c) Copyright Four Js 1995, 2019. All Rights Reserved.
# * Trademark of Four Js Development Tools Europe Ltd
#   in the United States and elsewhere
# 
# Four Js and its suppliers do not warrant or guarantee that these
# samples are accurate and suitable for your purposes. Their inclusion is
# purely for information purposes only.

ACTION DEFAULTS
  ACTION filter (ACCELERATOR = CONTROL-ENTER, ACCELERATOR2 = CONTROL-RETURN)
END

LAYOUT ( STYLE = "dialog4" )
GRID
{
Filter: [f                                      ]
<t t1                                          >
 Id        City                           State
[id       |name                          |st   ]
[id       |name                          |st   ]
[id       |name                          |st   ]
[id       |name                          |st   ]
[id       |name                          |st   ]
[id       |name                          |st   ]
<                                              >
}
END
END

ATTRIBUTES
BUTTONEDIT f = FORMONLY.filter TYPE CHAR, ACTION=filter, IMAGE="filter",
 COMMENT = "Presse Control-Enter to apply filter";
TABLE t1 : COMMENT = "Double-click to select an item from the list";
EDIT id = FORMONLY.city_id TYPE INTEGER;
EDIT name = FORMONLY.city_name TYPE CHAR;
EDIT st = FORMONLY.city_state TYPE CHAR;
END

INSTRUCTIONS
SCREEN RECORD sr (FORMONLY.city_id, FORMONLY.city_name, FORMONLY.city_state);
END