- 2016.11.22
COBOL/YCOBOLサンプル一覧
NO PROGRAM STATEMENT 1 SAMPLE_01 DISPLAY(表示) 2 SAMPLE_02 MOVE(項目移送) 3 SAMPLE_03 Z型と9型変数の編集 4 SAMPLE_04 COMPUTE(演算) 5 SAMPLE_05 VALUE(変数の初期値設定) 6 SAMPLE_06 ACCEPT(キーボード入力) 7 SAMPLE_07 日付取得、表示 8 SAMPLE_ […]
NO PROGRAM STATEMENT 1 SAMPLE_01 DISPLAY(表示) 2 SAMPLE_02 MOVE(項目移送) 3 SAMPLE_03 Z型と9型変数の編集 4 SAMPLE_04 COMPUTE(演算) 5 SAMPLE_05 VALUE(変数の初期値設定) 6 SAMPLE_06 ACCEPT(キーボード入力) 7 SAMPLE_07 日付取得、表示 8 SAMPLE_ […]
【DELETEステートメント】 DELETEステートメントは、テーブルのデータを削除するためのステートメントです。 売上テーブルから任意のお客様番号、売上年月、商品コードのキーのデータを削除するSQLを記述してみます。 キーは、お客様番号=CUST01、売上年月=200001、商品コード=A0000001とします。 SALTBL(売上テーブル) お客様番号 売上年月 商品番号 単価 数量 金額 C […]
INSERTステートメントは、テーブルに登録するためのステートメントです。 以下は、売上テーブルにデータを登録する記述です。 登録するデータは、お客様番号=CUST03、売上年月=200002、 商品番号=C0000001、単価=1500、数量=1、金額=1500とします。 SALTBL(売上テーブル) お客様番号 売上年月 商品番号 単価 数量 金額 CUSTCD(6桁) SALYM(6桁) […]
【UPDATEステートメント】 UPDATEステートメントは、テーブルのデータを更新するためのステートメントです。 売上テーブルから任意のお客様番号、売上年月、商品コードをキーとして数量と金額を更新するSQLを記述してみます。 キーは、お客様番号=CUST01、売上年月=200001、商品コード=A0000001。 更新する列名と値は、数量=20、金額=20000とします。 SALTBL(売上テー […]
【READ/WRITEステートメント補足資料】 COBOLのREAD/WRITEステートメントを使用したコーディングサンプルを載せています。 READ/WRITE命令とファイルの定義、他の命令との関連が理解できると思います。 入力ファイルから単価と数量を入力し、金額を算出して出力ファイルへ出力するプログラムです。 単純な処理ですが、ほとんどのプログラムは、入力ファイルや出力ファイル […]