This is what I have tried in afterrowcolchange event. But the recno() value does not change.

proc afterrowcolchange *******
LPARAMETERS ncolindex
LOCAL lawakid, lcurrentrow
SELE saldtl
************
IF THIS.currentrow != RECN()
lcurrentrow = RECN() && contion for changing previous row
IF !EMPTY(THIS.currentrow)
GO THIS.currentrow
IF !EMPTY(saldtl.awakid)
SELE rv_salawk1
lawakid = saldtl.awakid
LOCATE FOR ID = lawakid
IF FOUND()
REPL balance WITH balance - saldtl.qty
ENDIF
ENDIF
ENDIF
THIS.currentrow = lcurrentrow && contion for changing current row
SELECT saldtl
IF !EMPTY(THIS.currentrow)
GO THIS.currentrow
IF !EMPTY(saldtl.awakid)
SELE rv_salawk1
lawakid = saldtl.awakid
LOCATE FOR ID = lawakid
IF !FOUND()
SELE rv_salawk2
REQUERY()
IF RECC() > 0
SCAT TO lrecarr
SELE rv_salawk1
APPEND BLANK
GATHER FROM lrecarr
ENDIF
SELE rv_salawk1
LOCATE FOR ID = lawakid
IF FOUND()
REPL balance WITH saldtl.qty
ENDIF
ELSE
REPL balance WITH balance + saldtl.qty
ENDIF
ENDIF
ENDIF
ENDIF