RE: SV: Embedded SQL

[rob@xxxxxxxxx]

I agree with Charles.  We used to use this technique with no problems. 
Then a release came out quite some time ago that caused much grief by 
enforcing the 1-for-1 field matching between the select * and the host 
data structure.

Rob Berendt
-- 
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





"Wilt, Charles" <CWilt@xxxxxxxxxxxx> 
Sent by: rpg400-l-bounces+rob=dekko.com@xxxxxxxxxxxx
05/12/2005 11:07 AM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
cc

Subject
RE: SV: Embedded SQL






Note however that while I've been guilty of using select * in an embedded 
SQL statement myself, it is _NOT_ recommended.

Basically, if you use select *, and the file changes then you need to 
recompile the program.

Related is of course the use of customer_ds as an externally defined DS.

Both of which throw away one of the benefits of SQL; being able to change 
the file layout without requiring programs to be touched.


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 Helge Bichel
> Sent: Thursday, May 12, 2005 11:35 AM
> To: RPG programming on the AS400 / iSeries
> Subject: SV: SV: Embedded SQL
> 
> 
> The host-vars (:custno, :custadr .....) must be defined.
> 
> d customer_ds       e ds                  extname(customer)
> 
> or
> 
> by an F-statement for file CUSTOMER.
> 
> If you want to retrieve every field from CUSTOMER change the 
> select to:
> 
>    c     SqlBuildSelec begsr 
> 
>    c                   eval      SqlSelect = 
>    c                               'select ' 
>    c                              + ' *' 
>    c                              + ' from' 
>    c                              + ' customer' 
> 
>    c                   endsr 
> 
> and the read to:
> 
> 
>    c     SqlRead      begsr
> 
>    c/exec sql
>    c+  fetch SqlCur into into :customer_ds
>    c/end-exec
> 
> 
> 
> Brgds
> Helge Bichel
> Copenhagen
> Denmark
> hbi@xxxxxxx
> 
> 

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