<html>
  <head>
    <meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
  </head>
  <body text="#330099" bgcolor="#FFFFFF">
    <tt>Boaz,<br>
      Yes that would be my workaround.  This worked so much easier and
      it is already written.  But it seems everything else works ok so,
      I might just do that.<br>
      <br>
      Nancy<br>
    </tt><br>
    <div class="moz-cite-prefix">On 6/14/2019 8:36 AM, Boaz Bezborodko
      wrote:<br>
    </div>
    <blockquote type="cite"
      cite="mid:3373e47c-ce43-6b5d-7143-2d2199166a28@mirrotek.com">
      <br>
      <blockquote type="cite">Message: 1
        <br>
        Date: Thu, 13 Jun 2019 17:34:50 -0400
        <br>
        From: Nancy Palmquist <a class="moz-txt-link-rfc2396E" href="mailto:Nancy.Palmquist@vss3.com"><Nancy.Palmquist@vss3.com></a>
        <br>
        To: filePro Mailing List
        <a class="moz-txt-link-rfc2396E" href="mailto:filepro-list@lists.celestial.com"><filepro-list@lists.celestial.com></a>
        <br>
        Subject: OPENDIR() using a cifs file system mount
        <br>
        Message-ID:
        <a class="moz-txt-link-rfc2396E" href="mailto:e2372286-9ee9-9cfc-a3cc-eb57d2ecc9f6@vss3.com"><e2372286-9ee9-9cfc-a3cc-eb57d2ecc9f6@vss3.com></a>
        <br>
        Content-Type: text/plain; charset="utf-8"; Format="flowed"
        <br>
        <br>
        Fellow Filepro users,
        <br>
        <br>
        I have run into an issue using a Linux version of filepro 5.0
        and we
        <br>
        store historical data on a cifs mounted device.? FilePro needs
        to read
        <br>
        the filenames and move the files to permanent storage based on
        some
        <br>
        information.
        <br>
        <br>
        So generally the files are dropped in a tmp folder, filepro uses
        <br>
        OPENDIR() to get an array with the file names, we lookup the
        order and
        <br>
        then move the file to an archive folder based on the looked up
        info.
        <br>
        <br>
        This worked great until the drive failed and we had to replace
        it.
        <br>
        <br>
        cifs mount on the Linux side was setup the same.? I added
        commands to
        <br>
        the mount to set the owner, group, file modes and directory
        modes.? I
        <br>
        setup the drive as Read/Write.? I can export a file into the TMP
        <br>
        folder.? I can use SYSTEM "ls -l TMPFOLDER" and get a directory
        listing.
        <br>
        But aa=opendir("*.xml",TMPFOLDER) returns 0 files (There are a
        few
        <br>
        hundred in the folder)
        <br>
        <br>
        Any ideas?
        <br>
        <br>
        I expect the NAS device we had to put in place in this emergency
        is not
        <br>
        functioning correctly.? It is WINDOWS based and the one that
        crashed was
        <br>
        LINUX based.
        <br>
        <br>
        Is there something else I should be checking before I reprogram
        the
        <br>
        logic using another method than OPENDIR()???
        <br>
        <br>
        Nancy
        <br>
        <br>
      </blockquote>
      <br>
      I use to use OPENDIR until I ran into its 32 character limit.  Now
      I regularly use a routine to list the contents of the directory
      into a file and a loop to READLINE the file into an array.  (This
      is a DOS version.)
      <br>
      <br>
      ::DECLARE Command, File_Location, NextLine, Total_Files(4,.0)
      <br>
      GetFil:::
      <br>
      ::Command="DIR"<File_Location{"Inbound\*.csv /b >
      H\fpro\temp\XXX_Dir_List.txt":
      <br>
      ::SYSTEM Command:
      <br>
      ::ar=OPEN("H\\FPRO\\temp\\XXX_Dir_List.txt","rt"):
      <br>
      ::CHDIR File_Location:
      <br>
      ::Total_Files="0":
      <br>
      LOOP:'Read file information:as=READLINE(ar,NextLine):
      <br>
      :as eq "0":CHDIR "H\fpro" ; RETURN:
      <br>
      ::o=Total_Files+"1":
      <br>
      ::DownFile(o)=NextLine:
      <br>
      ::Total_Files=Total_Files+"1":
      <br>
      ::GOTO LOOP:
      <br>
      <br>
      <br>
      <br>
      ---
      <br>
      This email has been checked for viruses by Avast antivirus
      software.
      <br>
      <a class="moz-txt-link-freetext" href="https://www.avast.com/antivirus">https://www.avast.com/antivirus</a>
      <br>
      <br>
      <br>
    </blockquote>
    <br>
    <pre class="moz-signature" cols="72">-- 
Nancy Palmquist         MOS & filePro Training Available
Virtual Software Systems    Web Based Training and Consulting   
PHONE: (412) 835-9417           Web site:  <a class="moz-txt-link-freetext" href="http://www.vss3.com">http://www.vss3.com</a> 
</pre>
  </body>
</html>