aldob respondió:
Si bien no das muchos detalles por lo que interpreto podes hacer esto en una función: long ll_codigo select max(nro_codigo) from tabla into :ll_codigo; //chequear error en sqlca //si OK ll_codigo ++ //le sumas uno update tabla set nro_codigo =...