Hi Charles,

The problem is I can't even save the view due to the error, but FYI below is the code in the view parameter container's cmdQuerry.click() setting the value of vp_lfilter which evaluates to a logical.

LOCAL lnLocked
lnLocked = This.Parent.optgrpLocked.value

WITH loBizObj.oCursor.parameters
   DO CASE
      CASE lnLocked = 1  && Unlocked only
         .item("vp_lFilter").value = "lLockOut # .t."
         *.item("vp_lUnlocked").value =  .f.
         *.item("vp_llocked").value   =  .f.
      CASE lnLocked = 2  && Locked only
         .item("vp_lFilter").value = "lLockOut = .t."
         *.item("vp_lUnlocked").value =  .t.
         *.item("vp_llocked").value   =  .t.
      CASE lnLocked = 3  && both Unlocked AND Locked
         .item("vp_lFilter").value = ".t."
         *.item("vp_lUnlocked").value =  .f.
         *.item("vp_llocked").value   =  .t.

   ENDCASE   && lnLocked
ENDWITH      && loBizObj.oCursor.parameters