自動化 FoxPro 到 Oracle 遷移：C++ 生成 SQL*Loader 全套文件

遷移痛點

早期 MIS 系統多基於 FoxPro 2.x (DBF) 構建，升級 Oracle 時需將海量 DBF 匯入。手工編寫 CREATE TABLE 與 SQL*Loader 控制檔（.ctl）不僅繁瑣，且極易在 POSITION 起止位置上出錯，嚴重拖慢遷移進度。

DBF 結構速覽

• 檔頭（32 位元組）：版本標識、最後修改日期、記錄數、檔頭長度、記錄長度。
• 欄位描述（每欄 32 位元組）：欄位名(11)、類型(1)、檔內偏移(4)、長度(1)、小數位(1)、保留(14)。
• 記錄區：每筆記錄以 0x20 (空格) 開頭作刪除標記，後接定長 ASCII 字段。

自動化工具 load.cpp 設計

輸入：FoxPro 資料庫名（或目錄）。
輸出三類文件：

1. 數據文本檔：將 DBF 導出為 SDF（固定寬度）格式，供 SQL*Loader 讀取。
2. 建表腳本：解析欄位描述，生成 CREATE TABLE，類型映射規則：
   • Character → VARCHAR2(n)
   • Numeric → NUMBER(p,s)（注意 FoxPro 寬度含小數點，Oracle 不含）
   • Logical → CHAR(1)（Oracle 無布林型）
   • Date → DATE
   • Memo/General/Picture → 暫不處理
3. SQL*Loader 控制檔：自動計算每欄 POSITION(start:end)，生成 INFILE、FIELDS TERMINATED BY 等子句。

核心流程碼

// 伪代碼示意
void GenerateAll(const char* dbName) {
    DBFHeader hdr = ReadHeader(dbName);
    vector fields = ReadFields(dbName);

    // 1. 導出 SDF 數據
    ExportSDF(dbName, fields, "data.txt");

    // 2. 生成 CREATE TABLE
    ofstream sql("create.sql");
    sql << "CREATE TABLE " << dbName << " (\n";
    for (auto& f : fields) {
        sql << "  " << f.name << " " << MapType(f) << ",\n";
    }
    sql.seekp(-2, ios::cur); // 移除最後逗號
    sql << "\n);\n";

    // 3. 生成 .ctl
    ofstream ctl("load.ctl");
    ctl << "LOAD DATA\n"
        << "INFILE 'data.txt'\n"
        << "INTO TABLE " << dbName << "\n"
        << "FIELDS FIXED\n"
        << "(\n";
    int pos = 1;
    for (auto& f : fields) {
        ctl << "  " << f.name << " POSITION(" << pos << ":" << pos+f.len-1 << ")"
            << (f.type=='N' ? " EXTERNAL" : "") << ",\n";
        pos += f.len;
    }
    ctl.seekp(-2, ios::cur);
    ctl << "\n)\n";
}

實戰效益

• 將原本數天的手工遷移壓縮為「跑一次程式 + 執行兩條命令」。
• 消除 POSITION 手算錯誤，數據加載零失敗。
• 支援批量處理數百張表，易於擴展字段類型映射、分區表、Direct Path Load 等高級特性。

擴展方向

結合 Oracle EXTERNAL TABLE、Data Pump 或 Python cx_Oracle 進一步實現全自動化 ETL 流水線。