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