Listing:

    1  MODULE IndTest;
    2  (* IMPORT PMD;*)
    3  IMPORT ModBase3;
    4  IMPORT DBIndxes;
    5  IMPORT StringIO;
    6  IMPORT InitCompilerMods;
    7  VAR
    8    ind:DBIndxes.DBIndex;
*****                 ^ not supported yet
    9    dbf:ModBase3.DBFile;
*****                 ^ not supported yet
   10  BEGIN
   11    ModBase3.InitDBF('Modbase.DBF',dbf,60000,FALSE,TRUE,TRUE,ModBase3.DefaultFixUp);
*****    ^ not supported yet
*****             ^ not supported yet
*****                     ^ not supported yet
*****                                   ^ not supported yet
*****                                                             ^ not supported yet
*****                                                                      ^ not supported yet
   12    DBIndxes.InitIndex('Modbase.NDX',ind,dbf,10000,FALSE,TRUE);
*****    ^ not supported yet
*****             ^ not supported yet
*****                       ^ not supported yet
*****                                     ^ not supported yet
*****                                         ^ not supported yet
*****                                                             ^ not supported yet
   13    IF ModBase3.OpenDBF(dbf) THEN
*****       ^ not supported yet
*****                ^ not supported yet
*****                        ^ not supported yet
   14      StringIO.PrintMessage(DBIndxes.BuildIndex(ind,'NAME'));
*****      ^ not supported yet
*****               ^ not supported yet
*****                            ^ not supported yet
*****                                     ^ not supported yet
*****                                                ^ not supported yet
*****                                                    ^ not supported yet
   15    END;
   16  
   17  END IndTest.

   23 errors