Quiero hacer uso de un alias para utilizar la misma tabla y hacer una modificacion en un registro. ¿me pueden ayudar? gracias. esto es lo que tengo pero no funciiona

function correction.tffas200()
{
bandera = 0
db.retry.point()
select tffas200.*
from tffas200
where tffas200._index1 inrange {:depc.f, :year.f, :fasc.f, :peri.f}
and {:depc.t, :year.t, :fasc.t, :peri.t}
and tffas200.depc refers to tffas002
and tffas200.fasc refers to tffas007
order by tffas200._index1
selectdo
select tffas200.depr
from tffas200 aliasb
where tffas200._index1 = {:tffas200.depc, :tffas200.year, :tffas200.fasc, 8}
and tffas200.depc refers to tffas002
and tffas200.fasc refers to tffas007
selectdo
tffas200.depr = aliasb.depr
bandera = 1
rprt_send()
endselect
if bandera = 1 then
db.update(tffas200, db.retry)
endif
endselect
}

Hola trata estos cambios, Saludos, Felipe

function correction.tffas200()
{
bandera = 0
db.retry.point()
select tffas200.*
from tffas200 for update
where tffas200._index1 inrange {:depc.f, :year.f, :fasc.f, eri.f}
and {:depc.t, :year.t, :fasc.t, eri.t}
and tffas200.depc refers to tffas002
and tffas200.fasc refers to tffas007
order by tffas200._index1
selectdo
bandera = 0
|Manejo de la tabla Alias llamda a
select a.depr
from tffas200 a
where a._index1 = {:tffas200.depc, :tffas200.year, :tffas200.fasc, 8}
and a.depc refers to tffas002
and a.fasc refers to tffas007
selectdo
tffas200.depr = a.depr
bandera = 1
rprt_send()
endselect
if bandera = 1 then
db.update(tffas200, db.retry)
commit.transaction()
endif
endselect
}