|
I tried all caps and no go... it gets one it just as it did when I had it lower-case .... the hit is the first '.' after that I receive a null here is my code... Rtn = *Zeros; @Dir = '/QDLS/FCCASES'; // Open the Directory d = opendir(%Trim(@Dir)); If d = *Null; Rtn = -1; Else; x = *zeros; p_dirent = readdir(d); dow p_dirent <> *Null; // Always in the beginning of the DIR you get . twice if %SubSt(d_Name:1:1) <> '.'; x = x + 1; contents(x) = %Trim(d_Name); endIf; / Clear the Name field for fresh Start d_Name = *Blanks; / Read next entry in Dir... p_dirent = readdir(d); endDo; rtn = closedir(d); endIf; @NumFnd = x; @Contents = %Addr(contents); Thanks-john
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.