演習 6 で完成した CustomerTableOperations.egl および duplicateTable.egl ファイル

次のコードは、演習 6 で完成したバージョンの CustomerTableOperations.egl ファイルおよび duplicateTable.egl ファイルです。このファイルのいずれかにエラーがある場合 (赤の X 記号でマークされます) は、作成したコードがこのコードと一致していることを確認してください。

[libraries/CustomerTableOperations.egl]

package libraries;

import eglderbyr7.ConditionHandlingLib;
import eglderbyr7.StatusRec;

library CustomerTableOperations type BasicLibrary {}

  function execCreateTable(status StatusRec inOut)
    try
      execute 
        #sql{
          CREATE TABLE EGL.CUSTOMERTEMP (
              CUSTOMER_ID INTEGER NOT NULL,
              FIRST_NAME VARCHAR(30),
              LAST_NAME VARCHAR(30),
              PASSWORD CHAR(8),
              PHONE VARCHAR(14),
              EMAIL_ADDRESS VARCHAR(50),
              STREET VARCHAR(30),
              APARTMENT VARCHAR(10),
              CITY VARCHAR(30),
              STATE CHAR(2),
              POSTALCODE VARCHAR(10),
              DIRECTIONS VARCHAR(255)
            )
          };
    onException (exception SQLException)
      ConditionHandlingLib.HandleException(status, exception);
    end
    
  end
  
  function execInsertIntoTable(status StatusRec inOut)
    try  
      execute #sql{
      INSERT INTO EGL.CUSTOMERTEMP 
        SELECT * FROM EGL.CUSTOMER
         } ;
    onException (exception SQLException)
      ConditionHandlingLib.HandleException(status, exception);
    end
  end
  
  function execDropTable(status StatusRec inOut)
    try  
      execute #sql{
        DROP TABLE EGL.CUSTOMERTEMP
        } ;
    onException (exception SQLException)
      ConditionHandlingLib.HandleException(status, exception);
    end
  end
  
end


[programs/duplicateTable.egl]

package programs;

import eglderbyr7.StatusRec;
import libraries.CustomerTableOperations;

program duplicateTable type BasicProgram {}
  
  status StatusRec;
  
  function main()
    CustomerTableOperations.execCreateTable(status);
    CustomerTableOperations.execInsertIntoTable(status);
    //CustomerTableOperations.execDropTable(status);
  end
  
end

演習 6: 任意の SQL コードの実行に戻る。