Re: Reading A Unicode File

What about embedded SQL and using SQL services?

To get a list of IFS names, use:

SELECT PATH_NAME, OBJECT_TYPE, DATA_SIZE, OBJECT_OWNER
FROM TABLE (QSYS2.IFS_OBJECT_STATISTICS(START_PATH_NAME => '/home/xxx', SUBTREE_DIRECTORIES => 'YES'));

Use the parameter OMIT_LIST to ignore specific files or folders.

Use a cursor to fetch the entries row by row.

Here a link to the reference: https://www.ibm.com/docs/en/i/7.5?topic=services-ifs-object-statistics-table-function

HTH
Daniel

Am 03.10.2023 um 23:04 schrieb Jack Woehr via COBOL400-L <cobol400-l@xxxxxxxxxxxxxxxxxx>:
not the purest, but the easiest:

- use PASE commands to get your file list
- redirect that output to a file in the IFS
- use /usr/bin/iconv in PASE to convert the IFS output to EBCDIC
- slurp it into your COBOL program


On Tue, Oct 3, 2023 at 11:50 AM Rich Loeber <rich@xxxxxxxxx> wrote:

I'm just trying to get a list of Paths in the IFS while excluding quite a
few of them.

--

*JACK WOEHR, IBM Champion 2021-2023
<https://www.credly.com/users/jack-woehr/badges>*

*SENIOR IBM i ENGINEER*

303.847.8442
jwoehr@xxxxxxxxxxxxxxxxxxxxxxxx
<https://www.linkedin.com/in/jackwoehr/> stay connected
<https://www.linkedin.com/company/absolute-performance-inc./>

<https://www.absolute-performance.com/>
www.absolute-performance.com

NON-DISCLOSURE NOTICE: This communication including any and all
attachments is for the intended recipient(s) only and may contain

confidential and privileged information. If you are not the intended
recipient of this communication, any disclosure, copying further

distribution or use of this communication is prohibited. If you received
this communication in error, please contact the sender and

delete/destroy all copies of this communication immediately.
--
This is the COBOL Programming on the IBM i (AS/400 and iSeries) (COBOL400-L) mailing list
To post a message email: COBOL400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/cobol400-l
or email: COBOL400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/cobol400-l.