Disculpa, Jordi, me equivoqué al enunciar el problema. No es un update lo que quiero hacer, sino un write. En ese caso, según el manual (y el compilador coincide con él, porque me da error) la DS ha de estar definida con *output. El problema es que también necesito hacer un chain.

Perdón de nuevo por describir pésimamente mi problema, se me han cruzado los cables.

Saludos.

Fernando Pérez 

Cerámica Saloni. Dpto. Auditoría y Organización



Jordi S.G. escribió:

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 file’s 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
begin:vcard
fn;quoted-printable:Fernando P=C3=A9rez
n;quoted-printable:P=C3=A9rez;Fernando
org;quoted-printable:;Auditor=C3=ADa y Organizaci=C3=B3n
email;internet:[EMAIL PROTECTED]
tel;work:Ext. 627
x-mozilla-html:TRUE
version:2.1
end:vcard

__________________________________________________
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

Responder a