A 回答 (3件)
- 最新から表示
- 回答順に表示
No.3
- 回答日時:
その後、解決されましたか?
B(A)は多分、配列ですよ。配列(テーブル)とは同じ型のデータを連続的に並べたデータ形式のことです。
例えば・・・
ワークに以下のように定義します
01 W-A PIC9(01)
01 W-B PIC9(01)
01 W-C PIC9(01)
これは同じ型と桁数が連続しているので配列にできます。
01 W-TBL PIC9(01) OCCURS 3
⇒W-TBLという項目で9(1)の属性で3連続で定義
↓ つまり・・
W-TBL(1) = W-A
W-TBL(2) = W-B
W-TBL(3) = W-C のことです。
(1)は配列1つ目、(2)は配列2つ目・・って事です。
また、部分参照であれば書き方としては
(定義)
01 W-A PICX(08)
01 W-B PICX(01)
MOVE W-A(3:1) TO W-B
です。
W-Aの3桁目から1桁のみW-Bへ設定するという意味になります。
ご参考までに・・・
No.2
- 回答日時:
補足にお書きのプログラムだと、B(W-A) のところでコンパイルエラーになると思います。
変数名の後にカッコが来るのは、#1の方がお書きの配列のn番目の参照か、文字列の部分参照ですが、後者だとB(W-A:)のようにコロンが必要ですし、Bの長さが1なので部分参照も出来ません。
何か勘違いがあるのだと思います。
回答ありがとうございました。返事が遅くなり大変申し訳ありません。私の勘違いなのでしょうか。結局、無知過ぎて理解できなかったので、もっと調べてみます。大変ご迷惑をおかけしました。ご協力、ありがとうございました。
No.1
- 回答日時:
ex) A = 5
B = 1
C = 0 と定義しているとします
ですでに勘違いされているようです。
(B=1とは定義できません)
B(A)は配列(テーブル)です。
B(1)とかB(2)とかで表します。
COBOLで言うと
01 B PIC X(03) OCCURS 5
これは3文字入る領域を5つ定義したことになります。
MOVEの仕方は
MOVE "ABC" TO B(1)
MOVE "DEF" TO B(2)
とします。
この回答への補足
回答して頂いてありがとうございます。
私の質問の仕方が悪かったみたいです。。。
たぶん、私が質問したい内容とは別の様です。
大変、申し訳ありません。
改めて記入させて頂きます。
ex) 01 W-A PIC9(01) VALUE 2
ワークに定義したものとします。(定義の仕方が間違えていたらすみません。)
01 B PIC9(01) VALUE 3
01 C PIC9(01) VALUE 5
IF B(W-A) = C
DISPLAY '***'
ELSE
DISPLAY '@@@'
END-IF
と定義すると、どちらがDISPLAYされるのでしょうか?
それ以前に最初に質問した内容と同じでしたらすみません。。。
本トに、初歩的な事が解っていないのでご迷惑をお掛けします。。。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- 英語 仮主語の「to be+名詞」の和訳について 4 2022/05/07 14:49
- 英語 英語についての質問です。 The Japanese cities weren’t to be fou 3 2022/12/11 14:35
- Excel(エクセル) Excelシフト表 固定シフトの自動変換化 1 2022/04/14 16:10
- 英語 英訳をお願いできますでしょうか 1 2022/10/20 13:50
- 大学・短大 教授と揉めました。私達が悪かったのでしょうか? 3 2022/11/16 21:30
- 英語 figureの意味 3 2023/06/12 05:01
- カスタマイズ(車) トヨタ純正カーナビの配線を固定している固定具の取り外し方 2 2022/06/22 15:35
- 数学 モデルのパラメータの定義がいまいちわかりません。 3 2022/10/11 15:16
- 英語 "as provided for by law"の"for"の働きについて 1 2023/04/10 15:54
- 英語 提示した名言の"be to be able to do"の意味等について 4 2023/05/17 10:02
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
COBOLのMOVEで桁数が異なる場合
その他(プログラミング・Web制作)
-
COBOLでのNOT = の AND条件
その他(プログラミング・Web制作)
-
COBOLの改行
その他(プログラミング・Web制作)
-
-
4
S9タイプからXタイプにデータは移行できるのか。(COBOL)
その他(プログラミング・Web制作)
-
5
COBOL等でのHIGH_VALUEについて
IT・エンジニアリング
-
6
COBOLで文字タイプを数字タイプに変換する方法
その他(プログラミング・Web制作)
-
7
COBOL 9(02)で定義した変数にマイナス値をセットすると?
その他(プログラミング・Web制作)
-
8
COBOL 2次元配列について
その他(プログラミング・Web制作)
-
9
COBOLのINVALID KEYが理解できません
その他(プログラミング・Web制作)
-
10
COBOLの文法
その他(プログラミング・Web制作)
-
11
COBOLについて
その他(プログラミング・Web制作)
-
12
COBOLによる全角・半角混在→全角に
その他(プログラミング・Web制作)
-
13
COBOLのCOMP形式について
その他(プログラミング・Web制作)
-
14
COBOL、項目末尾に空白がある場合削除の方法その他
その他(プログラミング・Web制作)
-
15
COBOLのIFの入れ子について
その他(プログラミング・Web制作)
-
16
COBOLの計算方法
その他(プログラミング・Web制作)
-
17
COBOL数値転記の仕様
その他(プログラミング・Web制作)
-
18
COBOLのALPHABETICについて
その他(プログラミング・Web制作)
-
19
COBOL エンドフラグについて
その他(プログラミング・Web制作)
-
20
COBOL OCCURSで指定したデータの参照の仕方
その他(プログラミング・Web制作)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA 変数名に変数を使用したい。
-
vba フィルター 複数条件 3つ以...
-
配列の中の最大値とそのインデ...
-
エクセルでXY座標に並べられた...
-
Redim とEraseの違いは?
-
VB.NETの配列にExcelから読み込...
-
Dir関数で読み取り順を操作でき...
-
C#でbyte配列から画像を表示さ...
-
pictureboxの名前を変数で設定...
-
VB6のメモリ解放に関して
-
Segmentation Fault (メモリ制限?)
-
配列の要素がすべてカラかどう...
-
OutOfMemoryExceptionの回避策...
-
大量の変数を定義するにはどう...
-
VBAで配列引数を値渡しできない...
-
VBAのワークシート関数で配列の...
-
複数のtextboxの処理を一括で行...
-
エクセルVBAで実行時エラー7、...
-
C言語 ポインタと配列
-
Excelのメモリ(配列)の上限は2G...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBA 変数名に変数を使用したい。
-
C#でbyte配列から画像を表示さ...
-
vba フィルター 複数条件 3つ以...
-
Dir関数で読み取り順を操作でき...
-
Excel2010のinputboxで複数デー...
-
配列の中の最大値とそのインデ...
-
構造体配列の特定のメンバーをF...
-
COBOLの基本的な事なので...
-
構造体配列内の文字列検索のよ...
-
コンボボックスのインデックス...
-
エクセルでXY座標に並べられた...
-
エクセル(VBA)の空白配列の削除...
-
Redim とEraseの違いは?
-
定数配列の書き方
-
VB6のメモリ解放に関して
-
CheckBoxの配列化
-
複数のtextboxの処理を一括で行...
-
Excelのメモリ(配列)の上限は2G...
-
大量の変数を定義するにはどう...
-
OutOfMemoryExceptionの回避策...
おすすめ情報