Re: Write to db containing values defined by DB2

Here's one using ROWID and a date column:

CREATE TABLE STEO01/TEMPTEST (
  GRPID SMALLINT GENERATED ALWAYS AS IDENTITY (
  START WITH 1 INCREMENT BY 1
  NO MINVALUE NO MAXVALUE
  NO CYCLE NO ORDER
  CACHE 20 )
  ,
  GRPNAME CHAR(25) CCSID 278 NOT NULL DEFAULT '' ,
  CUSER CHAR(10) CCSID 278 NOT NULL DEFAULT '' ,
  CDATE DATE NOT NULL DEFAULT CURRENT_DATE )
  ;

And here's how I'd code it in RPG (the formatting will be off, sorry):

h option(*nodebugio)
ftemptest  uf a e             disk    rename(temptest: rtemptest)
 /free
  *inlr = '1';

  grpname = 'xyz';
  cuser = 'someone';
  write rtemptest;

  return;
 /end-free

I specify writing to two columns and DB2 puts in values for the other two
(identity column and date).
Is this behaviour possible to imitate?

Thank you.

2010/9/16 <Gene_Gaunt-HhiojMv268KEK/[email protected]>

> Can you post the DDL and an SQL CREATE and an SQL INSERT ?
>
>
>
> From:   Erik Olsson <[email protected]>
> To:     mi400-Zwy7GipZuJhWk0Htik3J/[email protected]
> Date:   09/16/2010 08:49 AM
> Subject:        [MI400] Write to db containing values defined by DB2
> Sent by:        mi400-bounces-Zwy7GipZuJhWk0Htik3J/[email protected]
>
>
> Hello,
>
> Posted this on the C list but was adviced to try out here as well.
>
> If I have DDL defined tables with columns holding DB2 generated values such
> as ROWID, defaults as CURRENT_TIMESTAMP etc - how do I code a write to
> columns like that using (the C runtime) _Rwrite (I don't know what one
> would
> use in MI)?
>
> That is, is there a way to emulate how an RPG write opcode handles the same
> situation?
>
> Best wishes,
> Erik
> _______________________________________________
> This is the MI Programming on the AS400 / iSeries (MI400) mailing list
> To post a message email: MI400-Zwy7GipZuJhWk0Htik3J/[email protected]
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/mi400
> or email: MI400-request-Zwy7GipZuJhWk0Htik3J/[email protected]
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/mi400.
>
>
>
> _______________________________________________
> This is the MI Programming on the AS400 / iSeries (MI400) mailing list
> To post a message email: MI400-Zwy7GipZuJhWk0Htik3J/[email protected]
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/mi400
> or email: MI400-request-Zwy7GipZuJhWk0Htik3J/[email protected]
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/mi400.
>
>
_______________________________________________
This is the MI Programming on the AS400 / iSeries (MI400) mailing list
To post a message email: MI400-Zwy7GipZuJhWk0Htik3J/[email protected]
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/mi400
or email: MI400-request-Zwy7GipZuJhWk0Htik3J/[email protected]
Before posting, please take a moment to review the archives
at http://archive.midrange.com/mi400.