|
-----Original Message-----
From: Phil <sublime78ska@yahoo.com>
To: rpg400-l@midrange.com <rpg400-l@midrange.com>
Date: Thursday, September 13, 2001 5:14 PM
Subject: RE: SQL Problem
>You could also do this:
>
>D hostDS ds
>D sitnbr 1
>D xxxx 5
>--etc--
>D nullDS ds
>D field1 5i 0
>D field2 5i 0
>--etc--
>
>C/exec sql
>C+ fetch c1 into :hostDS :nullDS
>C/end-exec
Danger Will Robinson!
Note that the above code will fail if the database format changes, but the
program is not recompiled, and NOT with a level check. The level checking is
obviated by this code and using a structure that is fixed by some previous
point in time as the record layout can lead to headaches.
Unless you are prepared to ALWAYS recompile ALL programs that use a file
when the database changes, this method is not the recommended way of
accessing data with SQL. It is convienient, but not a healthy way of using
SQL.
===========================================================
R. Bruce Hoffman, Jr.
-- IBM Certified Specialist - AS/400 Administrator
-- IBM Certified Specialist - RPG IV Developer
"America is the land that fought for freedom and then
began passing laws to get rid of it."
- Alfred E. Neuman
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 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.