Click above to get retro games delivered to your door ever month!

 DflArchiveIDGet()
------------------------------------------------------------------------------
 Purpose:
 Get ID of the last object to archive a deleted file.

 Syntax:
 dwObjID = DflArchiveIDGet()

 Parameters:
 None.

 Returns:
 A numeric value (unsigned long int).

 The CA-Clipper name for this function is:
 DflArcIDGet()

 Description:
 DflArchiveIDGet() returns the bindery object ID number of the last user
 that archived the last deleted file returned by the function
 DirDeletedFileList().

 DflArchiveIDGet() can only be called after DirDeletedFileList() returns a
 valid file name.

 Example:
 // To list the deleted files in directory SYS:DATA\WP, the
 // date and time they were last archived and the user that last archived
 // them:
 lpszfilename = DirDeletedFileList( "SYS:DATA\WP" )
 ? "Deleted files in directory SYS:DATA\WP"
 ? "File name | Date Archived | Time Archived | Archiver"
 do while ( !empty( lpszfilename ) )
    ? lpszfilename+" "+ DflArchiveDateGet() +" " +;
          DflArchiveTimeGet()+;
          " "+UsrNameGet( DflArchiveIDGet() )
    lpszfilename = DirDeletedFileList( "" )
 enddo

 Notes:
 This function only works with NetWare 386 and appropriate trustee
 access rights are required.