Thank you for your quick answer,
how i can fix the code to work properly
m.cGetExpr = m.cGetExpr2 or m.cGetExpr = m.cGetExpr3
Original Code
LOCAL cGetExpr1,cGetExpr2,cGetExpr3,cJoin,cJoin1,cGetExpr
m.cGetExpr1 = THIS.SearchItem(THIS.cboFields1,THIS.cboOperators1,THIS.txtExpr1)
m.cGetExpr2 = THIS.SearchItem(THIS.cboFields2,THIS.cboOperators2,THIS.txtExpr2)
m.cGetExpr3 = THIS.SearchItem(THIS.cboFields3,THIS.cboOperators3,THIS.txtExpr3)
m.cJoin = IIF(THIS.optGrpAndOr.value = 2," OR "," AND ")
m.cJoin1 = IIF(THIS.optGrpAndOr2.value = 2," OR "," AND ")
DO CASE
CASE EMPTY(m.cGetExpr1) AND EMPTY(m.cGetExpr2) AND EMPTY(m.cGetExpr3)
m.cGetExpr = ""
CASE EMPTY(m.cGetExpr3) &&NEW
m.cGetExpr = m.cGetExpr1
CASE EMPTY(m.cGetExpr2)
m.cGetExpr = m.cGetExpr1
CASE EMPTY(m.cGetExpr1)
m.cGetExpr = m.cGetExpr2 or m.cGetExpr = m.cGetExpr3
OTHERWISE
m.cGetExpr = m.cGetExpr1+m.cJoin+m.cJoin1+m.cGetExpr2+m.cGetExpr3
ENDCASE
RETURN m.cGetExp
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only