RE: What the beep is wrong with this?
Roger Harman <[email protected]>
| Newsgroups | gmane.comp.lang.as400.rpg |
|---|---|
| Message-ID | <BL3PR04MB809168253E8979F3EE91FE5CE492A@BL3PR04MB8091.namprd04.prod.outlook.com> |
I hadn't caught the case difference. Certainly could be the problem. I'd be curious what the errno return code was. Roger Harman COMMON Certified Application Developer - ILE RPG on IBM i on Power -----Original Message----- From: RPG400-L <rpg400-l-bounces-+hD5IHI5Xscn3HwCXmMcX9BPR1lH4CV8@public.gmane.org> On Behalf Of Mark Waterbury via RPG400-L Sent: Saturday, January 24, 2026 4:51 PM To: RPG programming on IBM i <[email protected]> Cc: Mark Waterbury <[email protected]> Subject: Re: What the beep is wrong with this? Hi, Jon, In one case, you have .../Bob/... in the path, but in the other case (the SQL with the table function) you have .../bob/... in the path. Could that be it? Mark On Saturday, January 24, 2026 at 07:07:24 PM EST, Jon Paris <[email protected]> wrote: I'm playing with Bob and asked him (it?) to create an RPG program to read an IFS file. I'm familiar with all of the required APIs (or thought I was) - but the Bob program will not open the file and I'm danged if I can see why. Here's an extract of the code which demonstrates the issue. Ctl-Opt DftActGrp(*No); // C API Prototypes - renamed to avoid opcode conflicts Dcl-Pr openFile Int(10) ExtProc('open'); *N Pointer Value Options(*String); *N Int(10) Value; *N Uns(10) Value Options(*NoPass); *N Uns(10) Value Options(*NoPass); End-Pr; // Constants for open() Dcl-C O_RDONLY 1; Dcl-C O_TEXTDATA 16777216; // Variables Dcl-S FilePath Varchar(256) Inz('/home/PARIS/Bob/Test.csv'); Dcl-S FileDesc Int(10); // Open the IFS file FileDesc = openFile(FilePath: O_RDONLY + O_TEXTDATA ); If FileDesc < 0; Dsply 'Error opening file'; Else; Dsply 'File Open'; EndIf; *InLr = *On; The file opens just fine if I use SQL ( SELECT * FROM TABLE(QSYS2.IFS_READ(PATH_NAME => '/home/paris/bob/Test.csv')) So I don't think it is a permissions problem (and yes I have checked that tooj. It has to be something dumb and I just can't see it. Jon Paris [email protected] -- This is the RPG programming on IBM i (RPG400-L) mailing list To post a message email: [email protected] To subscribe, unsubscribe, or change list options, visit: https://lists.midrange.com/mailman/listinfo/rpg400-l or email: RPG400-L-request-+hD5IHI5Xscn3HwCXmMcX9BPR1lH4CV8@public.gmane.org Before posting, please take a moment to review the archives at https://archive.midrange.com/rpg400-l. Please contact support-FMtJrHiV//lnDLsaKlm4mFaTQe2KTcn/@public.gmane.org for any subscription related questions. -- This is the RPG programming on IBM i (RPG400-L) mailing list To post a message email: [email protected] To subscribe, unsubscribe, or change list options, visit: https://lists.midrange.com/mailman/listinfo/rpg400-l or email: RPG400-L-request-+hD5IHI5Xscn3HwCXmMcX9BPR1lH4CV8@public.gmane.org Before posting, please take a moment to review the archives at https://archive.midrange.com/rpg400-l. Please contact support-FMtJrHiV//lnDLsaKlm4mFaTQe2KTcn/@public.gmane.org for any subscription related questions. -- This is the RPG programming on IBM i (RPG400-L) mailing list To post a message email: [email protected] To subscribe, unsubscribe, or change list options, visit: https://lists.midrange.com/mailman/listinfo/rpg400-l or email: RPG400-L-request-+hD5IHI5Xscn3HwCXmMcX9BPR1lH4CV8@public.gmane.org Before posting, please take a moment to review the archives at https://archive.midrange.com/rpg400-l. Please contact support-FMtJrHiV//lnDLsaKlm4mFaTQe2KTcn/@public.gmane.org for any subscription related questions.