× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Pete,

Found this in a SQL Precompiler Enhancement Survey:
http://archive.midrange.com/rpg400-l/200106/msg00104.html

"g. Support for host structure in Update statements

The current version of the SQL precompiler lets you specify a data structure
in place of a list of host variables in the Select Into, Fetch, and Insert
statements. The precompiler treats a data structure as if you specified a
list of the subfields within the data structure. This SQL/400 extension can
simplify coding and improve performance in some situations. This precompiler
enhancement would let you specify a data structure in an Update statement,
as well. For example, you might code: Update T Set Row = ( :MyStructure )"

Note that it's from 2001, but perhaps this enhancement has never made it to 
production.

I'd give IBM a call to double check.


HTH,

Charles Wilt
iSeries Systems Administrator / Developer
Mitsubishi Electric Automotive America
ph: 513-573-4343
fax: 513-398-1121
 

> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Peter Dow
> Sent: Wednesday, April 13, 2005 2:27 AM
> To: RPG400-L@xxxxxxxxxxxx
> Subject: SQL0312 on UPDATE but not on INSERT
> 
> 
> Hi Everyone,
> 
> I have the following code in an SQLRPGLE program:
> ------------------------------------------------------
> d JrnBATCH      e ds                  extname(BATCH)
> d NULLindI        s              5i 0 dim(006)
> 
> c                   Select
> 
> c                   When      @JrnEntryType='PT'c/exec SQL
> c+ Insert Into BATCH
> c+   Values(:JrnBATCH      :NULLindI)
> c/end-exec
> 
> c                   When      @JrnEntryType='DL'
> c/exec SQL
> c+ Delete From BATCH
> c+   Where rrn(BATCH     ) = :@JrnRRN
> c/end-exec
> 
> c                   When      @JrnEntryType='UP'
> c/exec SQL
> c+ Update BATCH
> c+   Set  ROW  =  (:JrnBATCH      :NULLindI)
> c+   Where rrn(BATCH    ) = :@JrnRRN
> c/end-exec
> 
> c                   EndSl
> ------------------------------------------------------
> 
> The fascinating thing is that the INSERT stmt compiles, but 
> not the UPDATE.
> The precompiler complains:
> 
> SQL0312  30      70  Position 26 Variable JRNBATCH not defined or not
> usable.
> 
> Any ideas why?
> 
> Peter Dow
> Dow Software Services, Inc.
> 909 793-9050 voice
> 909 793-4480 fax
> 951 522-3214 cell
> 
> 
> 
> -- 
> No virus found in this outgoing message.
> Checked by AVG Anti-Virus.
> Version: 7.0.308 / Virus Database: 266.9.7 - Release Date: 4/12/2005
> 
> 
> -- 
> 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.
> 
> 


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.