Re: SQLRPGLE

Matt - if you could give an example of what you are having problems with
showing the file definition of what you are you are trying to insert into
what file definition of what you are inserting from
Here is how I EXEC SQL statement
D Quote               c                   Const('''')
 D Sqlstmt01       c                   Const('INSERT INTO SLSTOPITMP
 D                                              (SELECT ISUFFX, SKUNO, ')
 D Sqlstmt02       c                   Const(', 0, 0, 0 FROM
 D                                               ITMMSTV1 WHERE NOT EXISTS
 D                                               (SELECT * FROM ITMMSTV1 A
WHERE
 D                                               EXISTS
 D                                              (SELECT * FROM SLSTOPITMP B
WHERE
 D                                              A.ISUFFX = B.SUFFIX AND
 D                                              A.SKUNO  = B.SKUNO)))')


c                   eval      Sqlstatement = Sqlstmt01 + Quote + ' ' +
c                                            Quote + Sqlstmt02
C                   exsr      Xcutesql


C     Xcutesql      begsr

 c/EXEC SQL
 c+ prepare sel from :Sqlstatement
 c/END-EXEC
 c/EXEC SQL
 C+ EXECUTE sel
 c/END-EXEC
  *
 c                   endsr

Hope this helps


Alan Shore

NBTY, Inc
(631) 244-2000 ext. 5019
AShore@xxxxxxxx
rpg400-l-bounces@xxxxxxxxxxxx wrote on 08/14/2006 10:10:47 AM:

I am trying to build a string containing an SQL statement, which
will be doing an INSERT INTO operation.

  I'm running into a problem when one of the fields will contain
numeric data.  The compile error is that "Operands are not compatible".

  I've tried a number of techniques to use the syntax with %NUM and
%EDITC, but I'm still having problems.

  Any help/example appreciated.

  Also, on the EXEC SQL statement, how would I execute a string?

  Thanks,

  Matt
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing

list

To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.