|
-----Message d'origine-----
De : rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] De la part de Dennis Lovelady
My last unbidden response:
DoU SqlCod <> 0;
Exec SQL
Fetch Next from C2 Into :MyFile_DS;
Leave;
I just noticed that LEAVE - the indentation got me.
Correction: Only one row (at most) will be read.
In that case, would be MUCH better off with:
dateChar = %char(someDateField)
Exec SQL
SELECT * FROM myFile
INTO :DS
WHERE myField = :dateChar
Fetch first row only
;
As an Amazon Associate we earn from qualifying purchases.
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.