Re: SQL0312 on UPDATE but not on INSERT

[Gina M Whitney <whitneyg@xxxxxxxxxx>]

The manual is incorrect... Take out the ( ) when using a structure
variable.

 c/exec SQL
 c+ Update BATCH
 c+   Set  ROW  =   :JrnBATCH      :NULLindI
 c+   Where rrn(BATCH    ) = :@JrnRRN




> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Peter Dow
> Sent: Wednesday, April 13, 2005 11:57 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