Hola:
Pongo un ejemplo:
La tabla la creo con esta instrucci�n:
CREATE TABLE JJJORGE.TABLA1(
AutoIncrem BIGINT GENERATED BY DEFAULT AS IDENTITY(
START WITH 1 INCREMENT BY 1
MINVALUE 1 NO MAXVALUE NO CYCLE NO ORDER CACHE 20),
NUMERO NUMERIC(6, 0) NOT NULL DEFAULT 0)
El cuerpo del programa en RPG es el siguiente:
H DECEDIT('0,') DATEDIT(*DMY/)
FTABLA1 UF A E K DISK RENAME(TABLA1:RTABLA1)
D X S 3S 0 INZ(0)
C Eval x = 0
C DoW ( X < 100 )
C Eval x = x + 1
C Eval numero = x
C Write RTABLA1
C EndDo
C Eval *InLr = *Off
C Return
Y el resultado es que el campo autoincremental est� a 0 en todos los
registros.
�Me puede ayudar alguien?
Gracias,
-----Mensaje original-----
De: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] nombre de alex martinez
Enviado el: martes, 24 de mayo de 2005 14:43 p.m.
Para: [email protected]
Asunto: Re: [Help400] Write en ILE-RPG con campos autoincrementales
Hola:
yo lo he probado esto en V5R2 y funciona sin problemas.
�no hay ninguna anotacion en el log?
CREATE TABLE ALEX/AJUT400 (CODIGO BIGINT
GENERATED BY DEFAULT AS IDENTITY (START WITH 1,
INCREMENT BY 1
MINVALUE 1 NO MAXVALUE NO CYCLE NO ORDER CACHE 20) not null,
DESCRI CHAR (50 ) NOT NULL WITH DEFAULT)
c/exec sql
c+ INSERT INTO ALEX/AJUT400 (DESCRI) VALUES('http://www.ajut400.com')
c/end-exec
On 5/24/05, jorge <[EMAIL PROTECTED]> wrote:
> Hola:
>
> �Alguien ha probado a grabar un registro de una tabla con un campo
> autoincremental desde RPG-ILE?
> Lo he probado y con la siguiente definici�n de campo no me graba nada.
>
>
> AutoIncrem BIGINT GENERATED BY DEFAULT AS IDENTITY(
> START WITH 1 INCREMENT BY 1
> MINVALUE 1 NO MAXVALUE NO CYCLE NO ORDER CACHE 20)
>
>
> Saludos
>
>
> __________________________________________________
> Forum.HELP400 es un servicio m�s de NEWS/400.
> (c) Publicaciones Help400, S.L. - Todos los derechos reservados
> http://www.help400.es
> _____________________________________________________
>
> Para darte de baja visita la siguente URL:
> http://coyote.combios.es/mailman/listinfo/forum.help400
>
__________________________________________________
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://coyote.combios.es/mailman/listinfo/forum.help400
__________________________________________________
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://coyote.combios.es/mailman/listinfo/forum.help400
