Here you go. BTW, this is in DF20.0. The search function works fine.
Code:
Object oPromptList is a cWebPromptList
Set pbFillHeight to True
Set piColumnSpan to 13
Set piColumnIndex to 3
Set pbDataAware to False
Object oCLIENTINTERNAL_NO is a cWebColumn
Set psCaption to "#"
Set piWidth to 140
Set peDataType to typeNumber
End_Object
Object oCLIENTFIRSTNAME is a cWebColumn
Set psCaption to "FIRST NAME"
Set piWidth to 220
Set psAutoComplete to "off"
End_Object
Object oCLIENTLASTNAME is a cWebColumn
Set psCaption to "LAST NAME"
Set piWidth to 220
Set psAutoComplete to "off"
End_Object
Object oCLIENTLAST_ALTERNATENAME is a cWebColumn
Set psCaption to "ALTERNATE NAME"
Set piWidth to 220
End_Object
Object oCLIENTDOB is a cWebColumn
Set psCaption to "DOB"
Set piWidth to 100
Set peDataType to typeDate
End_Object
Procedure OK
Boolean bApply
WebGet pbApply of oApplyFilter to bApply
If (bApply) Begin
WebSet pbApply of oApplyFilter to False
Send GridRefresh to (Self)
Procedure_Return
End
Else Forward Send OK
End_Procedure
Procedure OnManualLoadData tWebRow[] ByRef aTheRows String ByRef sCurrentRowID
Forward Send OnManualLoadData (&aTheRows) (&sCurrentRowID)
Note: Nic, I removed a whole bunch of code here as to how we fill our list as it isn't important
End_Procedure
End_Object