PL/IとDB2の出会い：SQLCAって結局何なの？メインフレームの入り口で迷わないためのガイド
こんにちは。メインフレームの深淵へようこそ。
普段、JavaやC#といったモダンな言語に慣れていると、IBMメインフレームの世界はまるで「古代の巨大な図書館」のように見えるかもしれません。特にPL/I（ピーエル・アイ）という言語は、自由奔放で、かつては「科学計算から事務処理まで何でもござれ」を目指した、非常に懐の深い言語です。
今回は、PL/IでDB2を扱う際に避けては通れない「SQLCA」という存在について、肩の力を抜いてお話ししますね。
—
PL/Iの「自由さ」は、時に少しだけ怖い？
Javaなどの言語には「予約語（Keyword）」が厳格に決まっていますよね。例えば `class` や `public` といった単語をそのまま変数名に使うことはできません。
しかし、PL/Iは少し違います。実は、PL/Iには「絶対的な予約語」がほとんど存在しません。
`IF` や `THEN` といった構文要素でさえ、文脈次第では変数名として使えてしまうという、恐ろしくも便利な（そして書き間違えると地獄を見る）仕様なのです。
「じゃあ、コンパイラはどうやって区別しているの？」という疑問が湧きますよね。コンパイラは、その単語が置かれた「場所（コンテキスト）」を見て判断しています。長年の経験から言うと、この自由さは「ナイフ」と同じです。正しく使えば非常に強力ですが、命名規則をいい加減にすると、コードの可読性が一気に崩壊します。
—
SQLCA：DB2からの「通信簿」を受け取る場所
さて、本題の「SQLCA（SQL Communication Area）」です。
プログラムの中に `EXEC SQL INCLUDE SQLCA;` という呪文を書いたことはありませんか？
これは、DB2というデータベース管理システムと、私たちの書いたPL/Iプログラムとの間で、「さっきのSQL、成功した？それとも怒られた？」という会話をするための共通語彙集だと考えてください。
なぜこれが必要なのか？
Javaなら例外（Exception）を投げたりしますが、PL/IのDB2埋め込みSQLでは、SQLが実行されるたびにDB2がこのSQLCAというメモリ領域を書き換えます。「エラーならここをチェックしてね」という約束事です。
—
実装パターン：こう書けば怖くない！
では、実際のコードを見てみましょう。SQLCAをインクルードし、SQLCODEを確認する標準的な実装パターンです。
/i
/ — DB2 SQLCAの取り込み — /
/ プリコンパイラが自動的に構造体（DECLARE 構造）を展開してくれます /
EXEC SQL INCLUDE SQLCA;
/ プログラムのメイン処理の一部 /
DCL SQLCODE FIXED BIN(31); / SQLの実行結果コード /
/ 例：従業員テーブルからの取得 /
EXEC SQL SELECT NAME INTO :EMP_NAME
FROM EMP_TABLE
WHERE EMP_ID = :INPUT_ID;
/ ここでDB2からの「通信簿」をチェック /
IF SQLCODE = 0 THEN
DO;
/ 成功！次の処理へ /
PUT SKIP LIST(‘データ取得成功: ‘ || EMP_NAME);
END;
ELSE IF SQLCODE = 100 THEN
DO;
/ データが見つからなかった（Not Found） /
PUT SKIP LIST(‘対象データはありませんでした’);
END;
ELSE
DO;
/ 予期せぬエラー！SQLCAの中身を見てログに出力 /
PUT SKIP LIST(‘致命的なエラー発生！SQLCODE: ‘ || SQLCODE);
END;
ここがポイント！
1. `SQLCODE` の確認: 0 なら大成功。100 は「対象なし」。それ以外は「何かが起きた」というサインです。最近はより詳細な `SQLSTATE` を使うのが主流ですが、まずは `SQLCODE` で流れを掴むのが定石です。
2. プリコンパイラの魔法: `EXEC SQL INCLUDE SQLCA;` を書くと、プリコンパイラが「あ、ここにはSQL用の領域が必要なんだな」と判断し、コンパイル時にメモリレイアウトを自動生成してくれます。私たちが自分で `DCL` する必要はありません。
—
初学者の方へ伝えたいこと
メインフレームのコードは一見すると「大文字ばかりで無機質」に見えるかもしれません。でも、PL/Iは非常に論理的で、一度コツを掴めば、まるでパズルを解くような楽しさがあります。
「予約語がない」というPL/Iの仕様も、最初は戸惑うでしょう。しかし、それは「あなたの書き方を尊重する」という言語設計者のメッセージでもあります。
もしエラーにぶつかったら、まずは `SQLCODE` を疑ってください。そして、SQLCAが何を語っているか、耳を傾けてみてください。それが、メインフレームの世界で長く生き残る「熟練の勘」を養う第一歩です。
何か分からないことがあれば、いつでもまた聞きに来てくださいね。一つずつ、紐解いていきましょう。
