Ed writes:

> Help, cann't find intrinsic manual.
> Anyone know the syntax for the HP3000 MPX/5.5 intrinsic FFILEINFO?

<plug>
He also doesn't have CSEQ, apparently :)


:cseq ffileinfo


CSEQ [2.2] - LPS Toolbox [A.02a]            (c) 1995 Lund Performance Solutions

For Help at the CSEQ prompt enter   ?


Procedure FFILEINFO (
   filenum      :        int16   ;        {R26}
   itemnum1     :        int16   ;        {R25} := $0000
   itemvalue1   : anyvar record  ;        {R24} := nil
   itemnum2     :        int16   ;        {R23} := 0
   itemvalue2   : anyvar record  ;        {SP-$0034} := nil
   itemnum3     :        int16   ;        {SP-$0036} := 0
   itemvalue3   : anyvar record  ;        {SP-$003c} := nil
   itemnum4     :        int16   ;        {SP-$003e} := 0
   itemvalue4   : anyvar record  ;        {SP-$0044} := nil
   itemnum5     :        int16   ;        {SP-$0046} := 0
   itemvalue5   : anyvar record  )        {SP-$004c} := nil
      { CCE: ok                                                  }
      { CCL: error                                               }
   {itemnums, types, meanings:                                         }
   {  ("halfs" means 16-bit words)                                     }
   {  1 CA  filename (28 bytes)                                        }
   {  2 u16 foptions                                                   }
   {  3 u16 aoptions                                                   }
   {  4 i16 rec size (<0 = bytes)                                      }
   {    (if 0, use item 67)                                            }
   {  5 i16 bits 0:8 = subtype, 8:8 = devicetype                       }
   {  6 u16 bits 0:8 = NS info, 8:8 = ldev                             }
...
...about 200 lines more...

http://www.lund.com

</plug>

--
Stan Sieler                                          [log in to unmask]
                                     http://www.allegro.com/sieler.html