COBOLのAT

質問

ACCEPTやDISPLAYでATの後ろに数字があるのですが、どのように使っているのかわかりません。
何を指している数字なのでしょうか？
指定するときのルールなどを教えてください。
また、どのようなケースで使用するのでしょうか？

よろしくお願い致します。

回答No.5

chukenkenkou · ベストアンサー

提示されたサイトを見ました。
他の方の回答にもあるように、古い特定メーカーのオフコンなどを対象としたものであり、COBOLの標準仕様準拠でないし、かなり古いCOBOLの機能の説明が多いです。

もし、情報処理技術者試験などの対策なら、このサイトは利用しない方がいいでしょう。

お礼

ありがとうございました。
質問してよかったです。
助かりました。

回答No.4

kernel_kazzz

#3さんの回答通りでしょう。
画面制御は各社のオリジナルが多いですから。
行桁の指定なんて、解像度が一定のモニターで、固定行・固定桁じゃないと使えません。まったく一般的では無い訳です。

勉強でしたら、個人が書いてるサイトよりも、まずは書籍などでリファレンスを勉強した方が良いでしょう。

お礼

ありがとうございました。
一般的でないなら問題なしです。
助かりました。

回答No.3

notnot

＞http://www.aufheben.info/kouza/beginner/kouza_cobol.html
を見てみましたが、画面上のどの位置にDISPLAYするか、ACCEPTで入力する位置をどこにするかという指定のようですね。
おそらく、オフコン(昔の小型コンピュータ)用の専用端末の画面制御システムを組み込んだ独自機能だと思います。
COBOL言語を学ぶ上では気にしないでおきましょう。

このページを書いた人はそのオフコンメーカーの独自機能だということに気づいてないみたいですね。

お礼

ありがとうございました。
気にしないことにします。
助かりました。

回答No.2

chukenkenkou

どこのメーカーの何というCOBOLですか？
具体的に、どのような記述ですか？

ACCEPTではFROM、DISPLAYではUPONを使うのが普通で、ATは聞いたことがありません。
ただ、オブジェクト指向などへの対応で実装されたかも知れないし、独自機能として持っている場合も否定できないので、上記を明示してください。

補足

サイトで勉強しています。
http://www.aufheben.info/kouza/beginner/kouza_cobol.html

ACCEPT 変数 AT 位置.の説明がありましたが、理解できませんでした。
もう少し調べると、教えてGooに、下記のコードが見つかりましたので一般的に使用されているのかと思いました。
あまり使用されないのでしょうか？

http://oshiete1.goo.ne.jp/qa3024973.html

01 １月 PIC 9(8).
01 ２月 PIC 9(8).
01 ３月 PIC 9(8).
01 ４月 PIC 9(8).
01 ５月 PIC 9(8).
01 ６月 PIC 9(8).
01 半年合計 PIC 9(9).
01 表示半年合計 PIC Z(9)9.
01 １月割合 PIC Z(2)9.99.
01 ２月割合 PIC Z(2)9.99.
01 ３月割合 PIC Z(2)9.99.
01 ４月割合 PIC Z(2)9.99.
01 ５月割合 PIC Z(2)9.99.
01 ６月割合 PIC Z(2)9.99.
PROCEDURE DIVISION.
DISPLAY "各月の売上高を入力してください。" AT 0505.
DISPLAY "１月の売上高" AT 0705.
ACCEPT １月 AT 0718.
DISPLAY "２月の売上高" AT 0805.
ACCEPT ２月 AT 0818.
DISPLAY "３月の売上高" AT 0905.
ACCEPT ３月 AT 0918.
DISPLAY "４月の売上高" AT 1005.
ACCEPT ４月 AT 1018.
DISPLAY "５月の売上高" AT 1105.
ACCEPT ５月 AT 1118.
DISPLAY "６月の売上高" AT 1205.
ACCEPT ６月 AT 1218.
COMPUTE 半年合計 = １月 + ２月 + ３月 + ４月 + ５月 + ６月.
MOVE 半年合計 TO 表示半年合計.
DISPLAY "合計売上高は" AT 1405.
DISPLAY 表示半年合計 AT 1428.
DISPLAY "円です。" AT 1436.
COMPUTE １月割合 = 100.00 * (１月 / 半年合計).
COMPUTE ２月割合 = 100.00 * (２月 / 半年合計).
COMPUTE ３月割合 = 100.00 * (３月 / 半年合計).
COMPUTE ４月割合 = 100.00 * (４月 / 半年合計).
COMPUTE ５月割合 = 100.00 * (５月 / 半年合計).
COMPUTE ６月割合 = 100.00 * (６月 / 半年合計).
DISPLAY "半年間の売上高に対する各月の割合は" AT 1605.
DISPLAY "１月：" AT 1905.
DISPLAY １月割合 AT 1912.
DISPLAY "％" AT 1918.
DISPLAY "２月：" AT 2005.
DISPLAY ２月割合 AT 2012.
DISPLAY "％" AT 2018.
DISPLAY "３月：" AT 2105.
DISPLAY ３月割合 AT 2112.
DISPLAY "％" AT 2118.
DISPLAY "４月：" AT 2205.
DISPLAY ４月割合 AT 2212.
DISPLAY "％" AT 2218.
DISPLAY "５月：" AT 2305.
DISPLAY ５月割合 AT 2312.
DISPLAY "％" AT 2318.
DISPLAY "６月：" AT 2405.
DISPLAY ６月割合 AT 2412.
DISPLAY "％" AT 2418.
STOP RUN.

回答No.1

kernel_kazzz

accept文やdisplay文の構文にはatは無いと記憶しているのですが。
その1文をそのまま書いてもらえませんか？
一意名などは別名に加工して頂いても構いませんが。

補足

chukenkenkouさんへの補足と一致してしまいますが、
コードは下記のようなものです。

DISPLAY "各月の売上高を入力してください。" AT 0505.
ACCEPT １月 AT 0718.

よろしくお願い致します。