Re: Periods in filenames

Hi,

Here are examples for both:
1. Native I/O
FMyFilePF  IF   E             DISK    ExtFile(MyFile) UsrOpn
D MyFile          S             10A
/Free
 MyFile = 'FILE.XX';
 Open MyFilePF;
 setll *LoVal MyFileF;

 DoU %EOF(MyFilePF);
     Read MyFileF;

     If Not %EOF;
        Dsply MyField;
     EndIf;

 EndDo;
 *InLR = *On;
/End-If

Embedded SQL:
Note: With embedded SQL the table name must be arounded with double quotes.
Example:
D Text            S             35A
C/Exec SQL
C+ Select MyField into :Text
C+   From "FILE.XX"
C+   Where MyField2 = 'Whatever'
C+ Fetch First Row Only;
C/End-Exec
 /Free
    Dsply MyField;
    *InLR = *On;
/End-Free


Mit freunlichen Grüßen / Best regards

Birgitta Hauser

"If you think education is expensive, try ignorance." (Derek Bok)

To: <rpg400-l@xxxxxxxxxxxx>
Sent: Wednesday, November 01, 2006 17:59
Subject: Periods in filenames

We've been having difficulty accessing some customer files
with periods in the filenames (from an ILE RPG program).

I'm not the one who ran into the problems, so I don't know
the details (although I'm thinking the period is being
interpreted as a member name separator), but does anybody
have the slightest idea what's going on, and how to deal
with it?

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