Fernando,
¿estás seguro que con *Input no puedes actualizar?
Copio y pego literalmente del manual ILE RPG Reference V5R3, lo que pone
para la operación UPDATE sobre una DS con EXTNAME (en concreto fijate en el
punto 3):
The UPDATE operation modifies the last locked record retrieved for processing
from an update disk file or subfile. No other operation should be performed on
the file between the input operation that retrieved the record and the UPDATE
operation.
The name operand must be the name of a file or record format to be updated. A
record format name is required with an externally described file. The record
format name must be the name of the last record read from the file; otherwise,
an error occurs. A file name as the name operand is required with a program
described file.
If the data-structure operand is specified, the record is updated directly from
the data structure. The data structure must conform to the rules below:
1. If the data-structure operand is specified, the record is updated directly
from the data structure.
2. If name refers to a program-described file (identified by an F in Position
22 of the file description specification), the data structure can be any data
structure of the same length as the files declared record length.
3. If name refers to an externally-described file or a record format from an
externally described file, the data structure must be a data structure defined
with EXTNAME(...:*INPUT) or LIKEREC(...:*INPUT).
Saludos,
Jordi.
______________________________________________
Enviado desde Correo Yahoo! La bandeja de entrada más inteligente.__________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© 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