Dass kann bei VARPG ggf. in die Hose gehen, da die Klausel "for update" AS/400-Spezifisch ist (daher auch die Satzsperre!).
Evtl. wird die Klausel ignoriert und die Satzsperre wird nicht gesetzt !
Desweiteren ist auch die Klausel beim Update "current of" ggf. nicht möglich.

Dies ist nur möglich, wenn "Serversite-Curser" verwendet werden !!

Ich würde dann, wie Birgitta empfiehlt, eine SQL-Funktion schreiben, die genau diese Probleme behebt.
Vorteil: Die Funktion läuft auf der AS/400, kann ein RPG-Programm sein und ist auch von VARPG verwendbar.