
declare
    f$drvusr          lit '0',        /* drive/user byte               */
    f$name            lit '1',        /* file name                     */
    f$namelen         lit '8',        /* file name length              */
    f$type            lit '9',        /* file type field               */
    f$typelen         lit '3',        /* type length                   */
    f$rw              lit '9',        /* high bit is R/W attribute     */
    f$dirsys          lit '10',       /* high bit is dir/sys attribute */
    f$arc             lit '11',       /* high bit is archive attribute */
    f$ex              lit '12',       /* extent                        */
    f$s1              lit '13',       /* module byte                   */
    f$rc              lit '15',       /* record count                  */
    f$diskmap         lit '16',       /* file disk map                 */
    diskmaplen        lit '16',       /* disk map length               */
    f$drvusr2         lit '16',       /* fcb2                          */
    f$name2           lit '17',
    f$type2           lit '25',
    f$cr              lit '32',       /* current record                */
    f$rrec            lit '33',       /* random record                 */
    f$rreco           lit '35';       /*   "      "    overflow        */
