Re: does any release allow "create table as" with a host variable?

[Charles Wilt <charles.wilt@xxxxxxxxx>]

do it as a dynamic SQL

wSql =  'create table qtemp/fgShpnum as ('
               + ' with t1 as ('
               + ' select distinct a.finpalid, a.shpnum'
               + '  from            dshpf05 a'
               + ' where           date(a.assemts)'
               + ' between date(' + fromdate + ') and'
               + ' date(' + todate + '))'
               + ' select      a.finpalid, decimal(count(*),7,0) NbrShpnum'
               + ' from        t1 a'
               + ' group by    a.finpalid )'
               + ' with data ';
exec sql
  execute immediate :wSql;

Charles


On Tue, Dec 11, 2012 at 6:20 PM, Steve Richter <stephenrichter@xxxxxxxxx>wrote:

> the following RPGSQL is not allowed at V5R4. Is it allowed in a newer
> release?
>
> Would like to use "create table as" to create an extract table, pulling a
> few rows from a large table.  Then later on in the code I do a bunch of
> counts, sums and joins against the smaller extract file.
>
> I do not follow why a host variable is not allowed in this situation.
>
>  exec sql
>  create table qtemp/fgShpnum as (
>  with t1 as (
>  select distinct a.finpalid, a.shpnum
>  from            dshpf05 a
>  where           date(a.assemts) between date(:fromdate) and
> date(:todate))
>  select      a.finpalid, decimal(count(*),7,0) NbrShpnum
>  from        t1 a
>  group by    a.finpalid )
>  with data ;
> --
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.