Function CrossIntoDatabase(Name:String;Number:Word):Word;

    This  allows  you  to  access  a  database  within  a  database.   It
    accesses the directory  entry  with  name  Name  and  number  Number.
    This entry must have its directory attribute set.

    Once you have accessed  the  database  within  a  database, make sure
    you do not make  that  database  any  larger  or  smaller.  If you do
    so the calling database(s)  will  have  incorrect  directory entries.
    You can manually change the  directory  entries should you so desire,
    however I recommend you do the  following  should  you need to shrink
    or expand a database within a database:

    Extract the  database  with  GetDataFile.   Then  delete  it from the
    database.  Open  the  sub-database  which  is now a separate database
    which can  be  modified  freely,  make  modifications  and  then  use
    NewDataFile to insert it back into the original database.

    You  can  however  read  or  use  ModData  on  a  database  within  a
    database.