
何年か前にはNECでプログラムを組んでいたのですが、最近は富士通のCOBOLでプログラムを組んでいます。富士通のCOBOLで画面の定義がよく
わかりません。例えば下記の記述で
FD DSP-F.
01 GM-REC.
03 GRP001.
05 GM-SYORI-K-COM PIC X(03).
05 GM-SYORI-K PIC 9(01).
上記のGM-SYORI-K-COM PIC X(03)の3バイトは何を定義しているのですか?それとこの3バイトを使ってどんな事ができるのですか?
富士通のマニュアルを見ても説明しているところがなくて困っています。
基本的な質問で申し訳ありませんが、よろしくお願いします
No.1ベストアンサー
- 回答日時:
画面定義ファイルを使用した富士通系COBOLプログラム
のコーディング例です。
表示ファイルのレコードレイアウトを定義しています。
ちなみGM-SYORI-K-COMは、英数字半角3桁の画面項目です。
項目詳細設定は、別途管理で画面定義ファイルに記します。
まず、開発手順の概要を下記します。
1.画面定義ファイルの作成
・画面項目の属性設定
位置、フォント、入出力、色・・・etc
2.COBOLプログラムの作成
・画面定義ファイルと表示ファイルDSP-Fを関連付けする。
・OPEN命令で表示ファイルをオープンする。
・READ命令で画面入力項目値を取得する。
・WRITE命令で画面出力項目値へ設定する。
・CLOSE命令で表示ファイルをクローズする。
という感じで画面操作をプログラム的にファイル入出力で行います。
この回答への補足
早速の回答有難うございます。まだまだ未熟な者で、またお伺いしますが
ある人の作ったプログラムの中で、下記の処理をしているのですが
この1,2,3,は画面に対してどのような処理をしているのでしょうか
1, IF (GM-SYORI-K-COM(1:1) = "Z" )
2, IF (GM-SYORI-K-COM(1:1) = "S" )
3, MOVE " C " TO GM-SYORI-K-COM
よろしくお願いします。
No.2
- 回答日時:
1, IF (GM-SYORI-K-COM(1:1) = "Z" )
2, IF (GM-SYORI-K-COM(1:1) = "S" )
3, MOVE " C " TO GM-SYORI-K-COM
上記コーディングの処理内容ですが
1,2,は入力項目の判定で
1,GM-SYORI-K-COMの先頭1桁入力値が"Z"ならばという制御文
2,GM-SYORI-K-COMの先頭1桁入力値が"S"ならばという制御文
3,GM-SYORI-K-COMへ" C "という3桁の文字を出力する転記文
です。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
営業秘密の漏洩について
-
C言語初心者の質問失礼します。
-
テキストファイルの最終行を削...
-
vba ActiveSheet.pasteを使った...
-
mp3のID3タグをVBで編集する方法
-
大きいサイズのテキストファイ...
-
Python で例えば静岡県の病院の...
-
csvファイルを開かずに文字を検...
-
fopenの"r+"モードで同時に読み...
-
Thunderbirdでemlファイルを開...
-
Android ファイルの書き込み
-
音を出す方法
-
DTDファイルについて
-
ShellExecuteEx→WaitForSingleO...
-
「VBScript」ADODB.Streamにお...
-
ダイアログボックスで複数フォ...
-
アプリケーション終了時例外エ...
-
バッチで118項目のCSVを処理し...
-
マスタとファイルの違いって?
-
受信メール内のURLをクリッ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
C言語初心者の質問失礼します。
-
営業秘密の漏洩について
-
vba ActiveSheet.pasteを使った...
-
ファイル名の先頭にアンダース...
-
csvファイルを開かずに文字を検...
-
SGファイルって何ですか?
-
テキストファイルの最終行を削...
-
CSVファイルへの保存の際、デー...
-
バッチで118項目のCSVを処理し...
-
Thunderbirdでemlファイルを開...
-
ファイルの結合
-
ダイアログボックスで複数フォ...
-
SAVファイル等について
-
最近使ったファイルからファイ...
-
VBAにてEXCEL以外のファイル(テ...
-
グローバル変数のよくない使い...
-
Cでのネットワークファイルの読...
-
「VBScript」ADODB.Streamにお...
-
RPGでファイル名(もしくはレコ...
-
BI書、FD書 とは
おすすめ情報