> UPDATE EligAct SET ; > ActStatus = ALLTRIM(m.ActStatus) ; > ActDate = DATE(), ; > ActType = 'On Demand' ; > FROM EligAct ; > WHERE ; > EligAct.PatNum = THISFORM.txtPat_No ; > AND EligAct.DOSBegin = m.DOSBegin ; > AND EligAct.DOSEnd = m.DOSEnd > IF _TALLY = 0 && No match found >try
UPDATE EA SET ; ActStatus = ALLTRIM(m.ActStatus) ; ActDate = DATE(), ; ActType = 'On Demand' ; FROM EligAct EA ; WHERE ; EA.PatNum = m.THISFORM.txtPat_No ; AND EA.DOSBegin = m.DOSBegin ; AND EA.DOSEnd = m.DOSEnd IF _TALLY = 0 && No match found