IF hSession = 0 THEN
   BEGIN
   PostQuitMessage (0);  {terminate the application}
   Exit;
   END;
   
IF NOT DB_LoadCatalog (hSession, 'DTV', 'c:\phase3\dtv.sc' ) THEN
   Exit;
   
IF NOT DB_OpenCatalog (hSession, 'DTV' ) THEN
   Exit;      
