![]() |
declare i1 as binary-long display i1 *> Optionally, the variables can be initialised inline declare c2 as condition-value = true display c2 declare string-list2 as string occurs 3 = table of string("Bill", "Ben", "LittleWeed") ************************************************************************** * Iteration Variables ************************************************************************** *> A variable can be declared at the point of use in an iterator. *> In this case the scope of i will be until the end-perform. perform varying i as binary-long from 1 by 1 until i > 10 display i end-perform ************************************************************************** * Exception Variables ************************************************************************** *> The example below shows that you can declare e at the point of use. *> It is in scope until the end-try. try display "exception test" catch e as type Exception display e::Message end-try
ローカル変数のサンプルも参照してください。このサンプルは、[スタート > すべてのプログラム > Micro Focus Visual COBOL > Samples]、 の場合JVM COBOL 言語リファレンスの場合 (Windows) または $COBDIR/demo (UNIX)。 に用意されています。
インライン ローカル変数の範囲は、宣言のポイントから最奥の包含ブロックの最後までです。段落、セクション、メソッド全体は、ブロックと見なされます。