Hola de nuevo:
Te adjunto el código que he probado, que yo no le veo problemas. Pruebálo y
nos cuentas....
Yo tengo un nivel más bajo de HIPER.
Fichero F50V5R4, creado con SIZE(50) y REUSEDLT(*YES)
A UNIQUE
A R RF50V5R4
A CODIGO 4S 0
A DATOS 50
A K CODIGO
y el programa R50V5R4
ff50v5r4 uf a e k disk
d clave s like(codigo)
d x s like(codigo)
/free
for x=1 to 50;
codigo=x;
datos='REGISTRO NUMERO ' + %editc(x : '3');
write rf50v5r4;
endfor;
for x=1 to 50;
chain x f50v5r4;
if %found( f50v5r4 ) ;
delete rf50v5r4;
endif;
endfor;
*inlr = *on;
/end-free
El día 26/06/07, Javier Mora <[EMAIL PROTECTED]> escribió:
Hola Alex:
1) El problema no son los 50 registros migrados. He destruido el objeto y
vuelto a crearlo. He hecho "mil perrerías". Ni siquiera con RGZPFM.
Realmente, el problema que tengo es el hecho de no reutilizar los registros
suprimidos.
2) Pedí la semana pasada las HIPER y me las mandaron con nivel 45.
3) Sí, daré el aviso al CAS. Me parece muy extraño todo esto.
4) No he visto ningún error adicional en las joblog. Puedo intentar
ejecutar el mandato STROBJCVN.
Un saludo,
Javier Mora
------------------------------
*De:* [EMAIL PROTECTED] [mailto:
[EMAIL PROTECTED] *En nombre de *alex martinez
*Enviado el:* lunes, 25 de junio de 2007 19:53
*Para:* forum.help400
*Asunto:* Re: Reutilizar registros borrados y V5R4
Hola.
Quizás el problema son esos 50 registros suprimidos migrados desde V5R3.
¿has probado con un RGZPFM para acomodar el fichero a la nueva V5R4 ?
He visto que el ultimo nivel de HIPER están en el nivel 47.
Si piensas que es problema de del OS/400 llama al CAS de IBM.
¿Hay algun error mas en el joblog ? Recuerdo que era recomensable realizar
un STROBJCVN para que el sistema realizara una conversion de estructuras
internas de los *FILE, pero no sé si está relacionado.
Salu2
El día 25/06/07, Javier Mora <[EMAIL PROTECTED]> escribió:
>
> Hola a todos de nuevo (estoy hoy muy pesado):
>
> El problema que planteo ahora si que es grave. Estoy preparándome para
> cambiar a una nueva máquina con una nueva versión de S.O. (la V5R4).
> Parto de una máquina con V5R3. Estoy probando procesos críticos para evitar
> sorpresas el día que la ponga en producción. Tengo instaladas las últimas
> PTFs acumulativas (07107) y las últimas de grupo para HIPER (45), base de
> datos (11), etc. Hasta aquí todo bien.
>
> Ahora viene lo bueno. Por regla general todos los ficheros de mi base de
> datos tienen activa la opción de reutilizar registros borrados
> (REUSEDLT(*YES)). Puede que no sea muy eficiente, pero así lo tenemos.
> También tenemos puestos que el tamaño sea *NOMAX (SIZE(*NOMAX)). Sin
> embargo, tengo algunos ficheros temporales (por despiste o no) que tienen un
> tamaño de 50 registros sin incrementos pero reutilizando registros. Hasta
> ahora ha sido suficiente. Nunca los programas que lo utilizaban fallaron.
>
> Con este entorno me dispongo a probar un programa vital: la facturación
> por ejemplo. Ah, ¡sorpresa! Error de ejecución con el id CPF5018: El miembro
> XXXXXX ha alcanzado el tamaño máximo. No se permiten incrementos. Parece que
> no es grave, pero si lo es.
>
> Este error me ayuda a descubrir que el sistema no está reutilizando
> registros, ya que el miembro está vacío pero con 50 registros borrados. Es
> decir, en principio se pueden reutilizar los cincuenta. Lo curioso del
> asunto es:
>
> - si un programa en RPG emitie una operación WRITE sobre este fichero,
> en este estado (50 borrados y 0 registros) se produce el error anterior.
>
> - si intento añadir un registro por DFU, ¡si me deja!
>
> - en cambio, si lo intento con un CPYF, ¡no me deja!
>
> Entiendo que esto es un problema de PTFs. Consulto en la Web de IBM:
> APARS, PSP, Cover letters; no encuentro nada relacionado con el tema.
>
> Realmente el problema es el siguiente: existen ciertos archivos en mi
> base de datos que están utilizándose 24x7x365; en el que se borran e
> insertan registros continuamente; contienen millones de registros; y no me
> puedo permitir un RGZPFM. Si el sistema no reutiliza estos registros, me
> puedo encontrar con un problema de ocupación.
>
> Termino. ¿Alguien en V5R4 se ha encontrado con este problema? ¿Cómo lo
> ha resuelto? No quiero, a estas alturas, ponerme a modificar programas que
> están funcionando perfectamente en V5R3, y son muchos.
>
> Un saludo y gracias por vuestra comprensión.
>
> *Javier Mora*
> Dpto. Informática
>
> E-mail: *mailto:[EMAIL PROTECTED] * <[EMAIL PROTECTED]>
> Web: *http://www.dialsur.es * <http://www.dialsur.es>
>
>
> __________________________________________________
> Forum.HELP400 es un servicio m&#225;s de NEWS/400.
> &#169; Publicaciones Help400, S.L. - Todos los derechos reservados
> http://www.help400.es
> _____________________________________________________
>
> Para darte de baja visita la siguente URL:
> http://listas.combios.es/mailman/listinfo/forum.help400
>
--
Mi blog sobre as400
http://www.ajut400.com
__________________________________________________
Forum.HELP400 es un servicio m&#225;s de NEWS/400.
&#169; Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400
--
Mi blog sobre as400
http://www.ajut400.com
__________________________________________________
Forum.HELP400 es un servicio m&#225;s de NEWS/400.
&#169; Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400
