update LIB/File
set feld1 = substr(feld1, 1, 81) concat '10,0' concat substr(feld1, 86, >restlänge<)
where
substr(Feld1, 82, 4) = ' 9,0'