× 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.



Ok got it reproduced (thanks Rick for your full source member).
Problem happens when SQL statements occur in a nested type of scenario
(such as a subroutine or DOU)
I have opened SE25187 to track this problem.

thanks,

Violaine Batthish
WebSphere Development Studio Client, IBM Toronto Lab



wdsci-l-bounces@xxxxxxxxxxxx wrote on 12/04/2006 02:05:32 PM:

> Hi Rick & Violaine,
>
> This happens when the source type is RPGLE instead of SQLRPGLE.
>
> Gene Burns
> Programmer Analyst
> Haulers Insurance Company, Inc.
> gburns@xxxxxxxx
> 931-381-5406 x189
>
> Violaine Batthish wrote:
> > Hi Rick,
> >
> > I was not able to reproduce your problem given the information here.
> > Would you mind emailing me your entire member (if still available) at
> > batthish@xxxxxxxxxx?
> >
> > thanks,
> >
> > Violaine Batthish
> > WebSphere Development Studio Client, IBM Toronto Lab
> >
> > You know you've achieved perfection in design, not when you have
nothing
> > more to add, but when you have nothing more to take away. - Antoine de
> > Saint-Exupéry
> >
> >
> >
> > wdsci-l-bounces@xxxxxxxxxxxx wrote on 30/03/2006 04:20:48 PM:
> >
> >
> >> hi Group,
> >>
> >>    Has anyone noticed this?  I am working around it by only converting
in
> >> selected blocks.
> >>
> >>    Version :6.0.1
> >>    Build : 20050725_1800
> >>
> >>    It changes :
> >>
> >>      C/Exec Sql
> >>      C+    Prepare A1 From :SqlString
> >>      C/End-Exec
> >>      C/Exec Sql
> >>      C+    Declare B1 Cursor For A1
> >>      C/End-Exec
> >>      C/Exec Sql
> >>      C+    Open B1
> >>      C/End-Exec
> >>
> >>    To:
> >>
> >>      C/  ec Sql
> >>           Prepare A1 From :SqlString;
> >>      C/  ec Sql
> >>           Declare B1 Cursor For A1;
> >>      C/  ec Sql
> >>           Open B1;
> >>          DoU SqlCod = 100 Or
> >>                SqlCod < 0;
> >>
> >>      C/Ex   Sql
> >>          Fetch B1 Into :FlRec;
> >>
> >>    This is from the Source menu 'Convert All To Free Form'...
> >>
> >> Regards,
> >>
> >>
> >> Rick DuVall
> >> Systems Manager
> >> Dealer's Auto Auction of Okc
> >> 405 947-2886 Ext:143
> >> rick@xxxxxxxxxx



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

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.