2017-08-23 54 views
0

美好的一天如何將字段導出到CSV在OPENEDGE

我有一個2部分的問題。目前我有一個表的列表,其數據需要導出到CSV。我的代碼在這裏:

def temp table tt-table 
field f1 as int 
field f2 as char 
field . . . . 

output to value(session:temp-directory + "temp.csv"). 

put f1 at 1 
"," f2. . .  

output close. 

有沒有辦法自動或縮短這段代碼?每桌平均有30-40個字段,需要輸出5個表。

第二部分:

如果我進口他們回到我們的系統,是它可以動態地創建基於字段的數量變量及其對應的變量類型?

回答

4

您可以使用IMPORTEXPORT語句。到臨時表導出爲CSV文件,使用此代碼:

OUTPUT TO VALUE(SESSION:TEMP-DIRECTORY + "temp.csv"). 

FOR EACH tt-table NO-LOCK: 
    EXPORT tt-table.  
END. 

OUTPUT CLOSE. 

我不知道的方式從文件動態地建立一個臨時表。但要將文件導入到同一個表中,請執行以下操作:

INPUT FROM VALUE(SESSION:TEMP-DIRECTORY + "temp.csv"). 

REPEAT: 
    CREATE tt-table. 
    IMPORT tt-table. 
END. 

INPUT CLOSE. 
+0

哎感謝您的回覆。我嘗試導出,它像一個魅力。但是當我用記事本打開它時,沒有分隔符。我可以用分隔符「,」分配嗎?沒有引號。謝謝 – noob

+0

謝謝。我得到了導出部分並添加了分隔符。會嘗試導入謝謝。 – noob

+0

@noob'EXPORT DELIMITER「,」tt-table「會這樣做。 – Jensd