Re: Opening an IFS Directory

[Bradley Stone <bvstone@xxxxxxxxx>]

How do you have the prototype of opendir defined?

Here's what I have, and it works fine:

D opendir         PR              *   EXTPROC('opendir')

D  dirname                        *   VALUE options(*string)


dir@ = opendir(%trimr(Path));



On Thu, Mar 19, 2015 at 2:47 PM, <JGallagher@xxxxxxxxxxxxxxxxxx> wrote:

> I am trying to use opendir API and all the examples I see all have a hard
> coded path and I have tried many ways to use a variable constructed path
> name with no luck.
>
> Example:
>
> eval      dir = opendir('/XXX/PAYROLL/020-MEMPHIS DEV/50113');  Works
>
> When I try constructing a path name from a file I created of sub folders I
> want to read the dir always returns null?
>
> eval      dir = opendir('/XXX/PAYROLL/' + pathout)); returns null where
> pathout is sub folder name from the file.
>
> Jack Gallagher
> MIS Dept.
> Newly Weds Foods
> 773-292-2482
> Fax 773-292-7549
> jgallagher@xxxxxxxxxxxxxxxxxx
>
> _____
> Contents may be confidential and legally privileged, and are intended only
> for the recipient(s) named above, and those on a need-to-know basis.
> Nothing herein is intended to be a binding signature.
> --
> This is the RPG programming on the IBM i (AS/400 and 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.