|
翻訳集団の定義の概要 | 環境部 | |
見出し部では、プログラム、
クラス、
ファクトリ・オブジェクト、
オブジェクト、
メソッド、
インターフェイスを識別する。
ソース要素を含むファイルのファイル名から得られる基本名からも、そのファイル中に定義されている最初のソース要素が識別される。段落の見出しはその段落に含まれる情報の種類を示す。ユーザーはプログラムの作成日および一般形式に示されている段落のもとで望まれる他の情報を含めることができる。
この部全体を（見出しも含めて）プログラム定義中に指定しても指定しなくてもよい。
AUTHOR, INSTALLATION,
DATE-WRITTEN , DATE-COMPILED, SECURITYの各段落は、ANSI'85標準では廃要素に分類されている。ANSI'85標準の次の全面改訂の際に削除される予定である。
この構文は、ISO2000を除くMicro Focus COBOLに組み込まれているすべての方言で使用できる。FLAGSTDコンパイラ指令を使用すると、この構文が用いられているすべての箇所を見つけ出すことができる。
標準COBOL定義の一部を構成するにもかかわらず、X/Open COBOL言語定義では、廃要素が明示的に除外されている。したがって、X/Openに準拠する原始プログラムでは、それらを使用するべきではない。
段落はどのような順番で書いてもよい。
見出し部内の段落名の後ろの終止符は、書いても書かなくてもよい。同様に、プログラム名の後ろの終止符も、書いても書かなくてもよい。
コンパイラ指令のSOURCEFORMATにFREEと指定すると、注記項を継続することはできない。次の行には注記項以外を記述しなければならない。
注記項の中の任意の位置に、SKIP1, SKIP2, SKIP3, EJECT, TITLEの各文を含めることができる。これらの文は、1行に単独で書いた場合にその機能を発揮する。この場合は、これらの文は、注意項を終わらせることはない。
注記項の中のB領域の任意の位置に、SKIP1, SKIP2, SKIP3, EJECTの各文を含めることができる。これらの文は、1行に単独で書いた場合にその機能を発揮する。この場合は、これらの文は注記項を終わらせることはない。
注記項は、注記行のA領域またはB領域の任意の位置に書ける。ただし、次の行のA領域に下記のCOBOLの語のどれかを書くと、注記項は終わりとされ、次の段落または部が始まるものとみなされる。
PROGRAM-ID
AUTHOR
INSTALLATION
DATE-WRITTEN
DATE-COMPILED
SECURITY
ENVIRONMENT
DATA
PROCEDURE
プログラム名（PROGRAM-ID）段落は、プログラムを識別する名前を付けるとともに、指定されたプログラム属性をプログラムに割り当てる。
プログラム名段落は、呼出しプロトタイプを識別する名前を指定する。
プログラム名-1は数字以外の定数であってもよい。それを引用符で囲んでも囲まなくてもよい。定数の内容はプログラム名の構成規則に従っていなければならない。ただし、文字@,#, $を含んでいてもよい。
プログラム名-1はユーザーが定義した他の語と同じであってもよい。
他のプログラムに含まれないプログラムのプログラム名-1の最初の８文字はシステム内で一意でなければならない。先頭の文字はアルファベットでなければならない。そうでない場合は、下記の規則に従って変換される。
他のプログラムに含まれないプログラムのプログラム名-1の２文字目から８文字目までの間にハイフンがあると、それはゼロに変えられる。
他のプログラムに含まれるプログラムに関しては、プログラム名-1は長さが30文字まで任意のユーザー定義のCOBOLの語とすることができる。最初の８文字が一意である必要はない。上記のプログラム名の変換は行われない。小文字を使用してもかまわない。ただし、小文字を使用した場合、大文字と小文字は区別される。
この動作はMAPNAMEコンパイラ指令を用いて制御する。
他のプログラムに含まれるプログラムに、その親の翻訳単位内に含まれている他のプログラムと同じ名前を付けてはならない。
任意指定のCOMMON指定は、プログラムが他のプログラムに含まれる場合だけ指定できる。
IS PROGRAM指定を書く場合は、COMMONとINITIALのどちらか一方、または両方を指定する。両方を指定する場合、どちらを先に書いてもよい。
定数-1は英数字の定数でなければならず、表意定数であってはならない。
他のプログラム内に含まれるプログラムの中に定数-1を指定してはならない。
COMMON指定は、プログラムが共通のものであることを指定する。共通のプログラムは他のプログラムの中に含まれるが、親のプログラム以外のプログラムからも呼び出せる。
INITIAL指定は、プログラムが初期処理用のものであることを指定する。初期プログラムが呼ばれると、そのプログラムおよびその中に含まれるすべてのプログラムが初期化される。（この章で前述した「プログラムの初期状態の節を参照）プログラム名-1は、CALL定数文の妥当性と性質を判定するための構文チェックの間に使用される、呼出しプロトタイプに名前を付ける。
クラス名段落は、該当の見出し部でクラス定義を行おうとしていることを示し、クラスを識別する名前を指定するとともに、クラスにクラス属性を割り当てる。
CLASS-ID. [ AS 定数-1 ]
[ INHERITS FROM クラス名-2 ]
[ USING { パラメータ名-1 } ... ] .
またはこのソース要素のクラス管理段落の中で指定されたクラスの名前とする。
ファクトリ段落は、この見出し部でファクトリ定義を行おうとしていることを示す。
FACTORY.
オブジェクト段落は、この見出し部でオブジェクト定義を行おうとしていることを示す。
OBJECT.
メソッド名段落は、この見出し部でメソッド定義を行おうとしていることを示し、メソッドを識別する名前を指定するとともに、メソッドにメソッド属性を割り当てる。
INTERFACE-ID段落は、この見出し部でインターフェイス定義を行おうとしていることを示し、インターフェイスを識別する名前を指定するとともに、インターフェイスにインターフェイス属性を割り当てる。
INTERFACE-ID. インターフェイス名-1 [ AS 定数-1 ]
[ INHERITS FROM インターフェイス名-2 ]
[ USING { パラメータ名-1 } ... ] .
翻訳日付（date-compiled）段落は、原始プログラム・リストの見出し部の中に、中間コードが生成された日を挿入する。
DATE-COMPILED. 現在の日付と時刻。
ここで、日付と時刻の形式は、DD-MMM-YY hh:mmである。
The DATEコンパイラ 指令を使用すると、注記項を置き換えるためにCOBOLコンパイラによって使用される文字列を変形できる。
翻訳日付段落に挿入される値は、組込み関数の
WHEN-COMPILEDで使用される値でもある。ただし、両者の形式に違いがあることもある。
|
翻訳集団の定義の概要 | 環境部 | |