         << LINES .001/.009 ARE RESERVED FOR SYSTEMS INTEGRATION >>     00000001
        CIERR( ERRNUM := -LEQ'NO'FEQS );  << No FEQ's here >>  << 9180>>58445000
        OB'INDEX := 16;                                        << 9476>>58533000
        MOVE OUT'BUFF := " FILE EQUATIONS ";                   << 9476>>58534000
        PRINT'LINE;                                            << 9476>>58535000
        OUT'BUFF( 0 ) := SPACE;                                << 9476>>58535100
        MOVE OUT'BUFF( 1 ) := OUT'BUFF( 0 ),(255);             << 9476>>58535200
        OB'INDEX := 2;                                         << 9476>>58535300
        PRINT'LINE;                                            << 9476>>58535400
LOGICAL ARRAY HEADING'L(0:22);                                 << 9288>>59320000
BYTE    ARRAY HEADING(*) = HEADING'L;                          << 9288>>59325000
$EDIT                                                          << 9288>>59490000
$EDIT                                                          << 9288>>59495000
$EDIT                                                          << 9288>>59510000
$EDIT                                                          << 9288>>59515000
$EDIT                                                          << 9288>>59530000
$EDIT                                                          << 9288>>59535000
LOGICAL ARRAY T'ACCOUNT'L(0:3);     << Account in JDT entry  >><< 9288>>59545000
BYTE    ARRAY T'ACCOUNT(*)  = T'ACCOUNT'L;                     << 9288>>59546000
                                                               << 9288>>59547000
LOGICAL ARRAY T'GROUP'L(0:3);       << Group in JDT entry    >><< 9288>>59550000
BYTE    ARRAY T'GROUP(*)    = T'GROUP'L;                       << 9288>>59551000
                                                               << 9288>>59552000
LOGICAL ARRAY T'FILENAME'L(0:3);    << Filename in JDT entry >><< 9288>>59555000
BYTE    ARRAY T'FILENAME(*) = T'FILENAME'L;                    << 9288>>59556000
                                                               << 9288>>59557000
        RESULT      := FALSE,                                  << 9536>>59706000
IF @TFEQ'HEAD = @TFEQ'TAIL                                     << 9536>>65065000
   THEN BEGIN                                                  << 9536>>65066000
        RESULT := HANDLE'OLDPASS;                              << 9536>>65067000
        IF BPRESULT( 38 ) <> "@       "                        << 9536>>65068000
           THEN IF RESULT = FALSE                              << 9536>>65069000
                   THEN CIERR( ERRNUM := -LISTFTEMPNOTFEQS )   << 9536>>65070000
                   ELSE CIERR( ERRNUM := -LISTFTEMPNOTFOUND )  << 9536>>65071000
           ELSE IF RESULT = FALSE                              << 9536>>65072000
                   THEN CIERR( ERRNUM := -LISTFTEMPNOTFEQS )   << 9536>>65075000
                   ELSE PRINT'DRIVER                           << 9536>>65080000
        END                                                    << 9536>>65081000
$EDIT VOID=65520000                                            << 9552>>65520000
$EDIT VOID=65545000                                            << 9552>>65545000
$EDIT VOID=65590000                                            << 9552>>65590000
                JIR := LOCKJIR;                                << 9552>>65636000
                UNLOCKJIR( JIR );                              << 9552>>65641000
$EDIT VOID=65660000                                            << 9552>>65660000
