静的テンポラリテーブルを入力として取得するコンストラクタ（プログレスABL）

Question

私は、主目的のテンポラリテーブルを中心にしたクラスを持っています。私は入力として同じテンポラリテーブルを取るコンストラクタを作成したい。

これまでのところ、コンパイラは、一時テーブルを入力パラメータとして渡す試みで、チョークします。代わりにテーブルハンドルを使用すると動作します。しかし、私はむしろ動的なテーブルから静的なテーブルにコピーしたくないでしょう。

進捗状況では、テーブルがコンパイル時に一致することが必要ですが、同じであることはわかります.iファイルに定義されています。

テーブルを整列する簡単な方法はありますか、それとも一度に1つのフィールドを解析することができますか？

Answer 1

私の魅力のように動作します。あなたはまたにより-REF一時テーブルを渡すことができ

ROUTINE-LEVEL ON ERROR UNDO, THROW. 

USING Test.TTOO.* FROM PROPATH. 

DEFINE VARIABLE oWrapper AS TempTableWrapper NO-UNDO . 

{Test/TTOO/ttCustomer.i} 

/* *************************** Main Block *************************** */ 

CREATE ttCustomer. 
ASSIGN ttCustomer.CustNum = 42 
     ttCustomer.Name = "It works" . 

oWrapper = NEW TempTableWrapper(TABLE ttCustomer) . 

：

CLASS Test.TTOO.TempTableWrapper: 

    {Test/TTOO/ttCustomer.i} 

    CONSTRUCTOR PUBLIC TempTableWrapper (TABLE ttCustomer): 

     FOR EACH ttCustomer: 
      DISPLAY ttCustomer.CustNum ttCustomer.Name . 
     END. 

    END CONSTRUCTOR. 
END CLASS. 

と、発信者

oWrapper = NEW TempTableWrapper(TABLE ttCustomer BY-REFERENCE) . 

をしかし、その後、一時テーブルのデータは、中availalbeですBY-REFERENCEとしてのコンストラクタは、呼び出しの間だけ呼び出し先のtemp-tableを「オーバーラップ」します。

永続的な「BY-REFERENCE」の場合は、呼び出しとパラメータにBINDキーワードを使用します。この場合、呼び出し先は一時表をREFERENCE-ONLYとして定義する必要があります。

メモ：インクルードファイル内に一時テーブルを定義する必要はありません（少なくとも私は推奨しますが）。実行時およびコンパイル時に、スキーマは一致する必要があります。

コンパイラが呼び出しを気に入らない場合は、クラスr-codeを削除して再コンパイルします。