進行中4gl獲取臨時表的字段名稱

Question

我的腳本中有一些臨時表，我將導出到一個csv文件。我還需要導出字段名稱以及它們的值。我如何獲得臨時表的字段名稱？

Answer 1

這裏是你問了一個快速和骯髒的例子：

define temp-table tt1 
    field f1 as character 
    field f2 as decimal 
    . 

def var iCnt as integer no-undo. 

create tt1. 
assign 
    tt1.f1 = "f1" 
    tt1.f2 = 123.456 
    . 

do icnt = 1 to buffer tt1:num-fields: 

    display buffer tt1:buffer-field(icnt):name 
      buffer tt1:buffer-field(icnt):buffer-value 
     with down 
     . 

    down. 

end.