At 10:38 AM 5/11/95 -0700, Jeff Vance wrote:
>Elbert, Stan, Evan and now Jim have suggested that a user-callable intrinsic
>(probably new items to FLABELINFO (and maybe to FFILEINFO?) may be more
>valuable to those who have asked for this functionality, than enhancing the
>exiting LISTF[ILE] commands.
...
>There is not enough time to do both an intrinsic and a command that calls this
>intrinsic.
 
If the choice has to be made, I agree that the intrinsic should come first;
but if the LISTFILE enhancement cannot be done in the same pass, then at
least please add support at the finfo() function level so we can make
immediate use of the enhancement from the CI without writing any non-CI
code.  This would address the issue of CI scripts and backwards
compatibility, since it eliminates the backwards listfile-output-parsing
method in favor of the forwards finfo-output-processing approach.
 
    user defined command file GRABFILE.IMAGINARY.CMDS:
 
    parm FILENAME
    while finfo("!FILENAME","LOCKED_EXCLUSIVE") = TRUE
      setvar enemy finfo("!FILENAME","EXCLUSIVE_ACCESSOR_JSNO")
      warn !enemy; Mine, mine, mine!
      abortjob !enemy
    endwhile
 
 
  -----------------------------------------------------------------------
               Jon Diercks -------- mail: [log in to unmask]
        Programmer/Analyst   /||  | talk: [log in to unmask]
        Computing Services  /_||  | WWW : http://rowlf.csv.anderson.edu/
       Anderson University /  ||__| tel : (317)641-4305
        Anderson, IN 46012 -------- fax : (317)641-3851
    o________________________________________________________  ___
    _\_,                                                     \=`==^==>
  ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^