一意名は、内部浮動小数点データ項目でもよい。
データ転送のサイズは装置および実行時環境によって決まる (使用可能な function-name のリストについては「特殊名段落」を、装置およびデータ転送サイズの制限の詳細については COBOL システムのドキュメントを参照)。
装置が受け取り側データ項目と同じサイズのデータを転送できる場合には、転送されたデータが受け取り側データ項目に収められる。そうでない場合は、次のように扱われる。
FROM オプションを指定しなかった場合は、FROM CONSOLE と指定したのに等しい。
現在の引数の数が 0 に設定されていると、これは、実行単位のメイン プログラムのプログラム名が返されることを意味する。しかし、プログラムの呼び出しにいろいろな変形があるため、メイン プログラム名の代わりにユーティリティ プログラムまたは呼び出し元プログラムの名前が返されることがある。
ACCEPT 文の実行時に現在の引数の数が、
99 より大きいか、0 より小さいか、
コマンド ライン上の実際の引数の数よりも大きい場合、imperative-statement-1 が指定されていると、これが実行される。
DAY-OF-WEEK、
および TIME は概念的なデータであり、COBOL プログラム中には記述されていない。
文字位置 | 内容 |
---|---|
1 から 2 | グレゴリオ歴の暦年 (末尾 2 桁) を表す 2 桁の数字。 |
3 から 4 | 年内の月を表す 2 桁の数字。値は 01 から 12 まで。 |
5 から 6 | 月内の日を表す 2 桁の数字。値は 01 から 31 まで。 |
文字位置 | 内容 |
---|---|
1 から 4 | グレゴリオ歴の暦年を表す 4 桁の数字。 |
5 から 6 | 年内の月を表す 2 桁の数字。値は 01 から 12 まで。 |
7 から 8 | 月内の日を表す 2 桁の数字。値は 01 から 31 まで。 |
文字位置 | 内容 |
---|---|
1 から 2 | グレゴリオ歴の暦年 (末尾 2 桁) を表す 2 桁の数字。 |
3 から 5 | 年内の日を表す 3 桁の数字。値は 01 から 366 まで。 |
文字位置 | 内容 |
---|---|
1 から 4 | グレゴリオ歴の暦年を表す 4 桁の数字。 |
5 から 7 | 年内の日を表す 3 桁の数字。値は 01 から 366 まで。 |
DATE-AND-TIME は、年、月、日、時間、分、秒、100 分の 1 秒のデータ要素から構成される。シーケンスは YYYYMMDDHHMMSShh である。したがって、現在の日時が 2013 年 7 月 1 日の午後 2 時 41 分である場合は、2013070114410000 と表される。
DATE-AND-TIME は、プログラムから呼び出すと、16 桁の符号なしの基本整数データ項目として記述してあるように取り扱うことができる。
DAY-AND-TIME は、年、日、時間、分、秒、100 分の 1 秒のデータ要素から構成される。シーケンスは YYYYDDDHHMMSShh である。したがって、現在の日時が 2013 年 7 月 1 日の午後 2 時 41 分である場合は、201318214410000 と表される。DAY-AND-TIME は、プログラムから呼び出すと、15 桁の符号なしの基本整数データ項目として記述してあるように取り扱うことができる。
EXCEPTION STATUS 項目には、3 桁のコードが入っている。このコードは、CALL 文を実行中に発生した、例外条件の種類を識別する。
EXCEPTION STATUS を調べる場合は、CALL 文の直後で行うのがよい。CALL と ACCEPT FROM EXCEPTION STATUS との間には、何もあってはならない。たとえば、その間にファイル入出力をはさむと、EXCEPTION STATUS が変えられてしまうので、その内容を調べる意味がなくなってしまう。
CURSOR IS 句 (「特殊名段落」の CURSOR IS 句の規則を参照) 内で別途指定しない限り、カーソルは最初の項目の始点に位置指定される。各項目への ACCEPT 処理が終わると、カーソルは次の項目の先頭に移行する。
画面記述句に指定できるオプションの他に、WITH 指定にはいくつかのオプションが加えられている。SPACE-FILL、ZERO-FILL、LEFT-JUSTIFY、RIGHT-JUSTIFY、TRAILING-SIGN、UPDATE である。ZERO-FILL には 2 つの用法があるため、本リストおよび画面記述句に記載する。2 番目の用法については、本章で後述する。
自由形式で数値および数字編集の画面フィールドにデータを入力するための構成オプションがある。COBOL では、非編集数値データ項目は、内部形式でデータを保持することを目的としたものである。自由形式を用いると、このようなデータ項目を画面上に表示できる。詳細については、ユーザー インターフェイスに関する COBOL システムのドキュメントを参照。自由形式が有効である場合、データは自動的に再フォーマットされて表示される。
SPACE-FILL、ZERO-FILL、LEFT-JUSTIFY、RIGHT-JUSTIFY、および TRAILING-SIGN オプションを使用すると、上記の形式を補正できる。
ACCEPT INPUT-FIELD TIME-OUT AFTER +10
すると、ACCEPT の開始から 10 秒経過後に、時間切れ条件が発生する。この場合、ACCEPT の開始 5 秒後に何か文字を打ったとしても、時間切れ条件の発生を防ぐことにはならない。
また、時間切れ測定用の時計を再設定するように ADIS が構成されているとする。すると、上記の同じ文を実行した場合、何か文字を打つたびに TIMEOUT「時計」はゼロに設定し直される。