「標準COBOLプログラミング(第1刷)」訂正一覧
頁/訂正 訂正前 訂正後 更新日
v 末尾 - ※誤字等,その他ご連絡事項がありましたら,本書末尾の著者紹介に記載されていますURL,E-Mailまでお願いします。 11/04
vi 2 the COnference on DAta SYstems Languages the COnference on DAta SYstems Languages 11/04
vii 10 第1章〜第11章 第1章〜第9章,第15章,第17章 11/04
vii 17 第3章〜第14章 第4章〜第17章 11/04
vii 24 第4章〜第18章 第5章〜第14章,第16章〜第18章 11/05
viii〜x 全般 - ●の次行は本来揃っていなければなりませんが,字空けしてしまっています 11/04
viii 14 02/29
viii 20 (例) BLANK WHEN ZERO (例) BLANK WHEN ZERO 11/04
viii 26 (例) SELECT [OPTIONAL] ファイル名 (例) SELECT [OPTIONAL] ファイル名 11/04
viii 27 コーダー プログラム作成者 11/04
viii 28 「文」,「条件」等,より大きな文法単位を示す場合 この行を削除して下さい 11/04
ix 8 11/04
ix 30〜末尾 - 予約語のフォントが違っています 11/04
x 2〜4 - 予約語のフォントが違っています 11/04
x 15〜17 - 予約語等のフォントが違っています 11/04
x 27 大文字のみ許されていました 大文字でした 11/04
x 31 廃要素は「廃」と記述しています。 廃要素は「」と記述しています。 11/04
x 34 読者の読みやすさを考慮して 読者の読みやすさを考慮して 11/04
XI 2 - 編者序文・・・・・iii 11/04
XI 第4-4章 ■■■ ■■ 11/05
2 8 プログラムを プログラム 03/14
2 8 とも言います)。 とも言います)です 03/14
2 表1-1 原案 仕様開発 11/04
3 まめ典 「、」5箇所 11/04
3 まめ典 合併吸収 吸収合併 11/04
4 末尾2行 - インデント取り消し 11/04
8 16 ログラム名段落 ログラム名段落 02/11
10 1 - 形式中の下線が薄い 11/04
11 図2-3 - ←(3箇所)が揃っていません 11/04
11 図2-3 ←省略が可能です これは「END PROGRAM OYA.」を指すべきであり,その位置がずれています 11/04
12 (6)の説明 [データ記述項] インデントがずれています。[レベル指示語]と同じインデントであるべきです 11/04
12 (6)の説明 [ ]の説明 インデントがずれています(2文字分右へインデント) 11/04
15 末尾 (6) (6) ※括弧は半角です 07/20
17 3 基本項目をいくつか集めたデータ インデントがずれています。1行前の「これ以上〜」と同じインデントであるべきです 11/05
19 3 - この行を削除して下さい 07/20
19 表3-3 末行の「-」 中央寄せにします 07/20
20 表3-4 PICTURE文字「B」の下罫線 削除して「B」を中央配置します 07/20
20 表3-4 PICTURE文字列「9.99」 .99 ※半角にすべきです 07/20
21 浮動挿入の説明 「+」,「-」〜 フォントサイズが違っています 07/20
21 浮動挿入の説明 「+」,「-」を 「+」,「-」の3文字 07/20
23 (1)の例 数値1 数値 ※全角にすべきです 02/11
24 18 格納値が「+3456」のとき,〜 字空けは必要ありません 11/05
24 24 このことより,〜 字空けは必要ありません 11/05
26 末尾から4行目 いくるかの いくかの 07/20
26 第3-3章(1)修飾の説明 利用者の階層系列〜連続3行 字空けが必要です 11/05
28 - フォントが違っています 02/11
28 17 この他に,原文名の修飾〜 字空けが必要です 11/05
29 3〜4 VALUE句以降 2行目のVALUE句と同じインデントであるべきです 11/05
32 確認問題3-1-2(10),(11) (3)〜(9) (3)(9) ※括弧は半角です 11/05
38 例題プログラム4-1 STOP RUN. インデントがずれています 11/05
39 9 MOVE N"世界"TO 転記先3. MOVE N"世界" TO 転記先3. ※空白が抜けています 11/05
43 2〜3 - フォントが違っています 11/05
46 2 この指定により,〜 字空けが必要です 11/05
47 例題プログラム4-3 DATA DIVISION. DIVISIONのインデントがずれています 11/05
47 末尾から5行目 OF 在庫 OF 会社 OF 在庫 07/20
47 末尾から4行目 (Fの「在庫」は無関係) この文字列を削除して下さい 07/20
47 末尾 OF 在庫 OF 会社 OF 在庫 07/20
48 6 OF 在庫 OF 会社 OF 在庫 07/20
47 例題プログラム4-3 ・・・ヲ」ケウアカサ インデントがずれています 11/05
48 12 句の〜 字空けが必要です 11/05
49 末尾3行 - インデントがずれています 11/05
51 (4)の説明 - インデントがずれています 11/05
53 2〜3,11 - 字空けは必要ありません 11/05
55 10,13,16,18,19,22 - 字空けは必要ありません 11/05
56 9 - 字空けは必要ありません 11/05
56 末尾 - インデントがずれています 11/05
57 5 (無理数) この文字列を削除して下さい 07/20
57 6 - この行を削除して「→桁あふれ条件成立」を5行目に移動して下さい 07/20
57 7〜10,29,33 - インデントがずれています 11/05
57 22 数値データ + 12345 - 700 数値データ + 12345 - 700 11/05
58 2 - インデントがずれています 11/05
59 確認問題4-1-1 DATA DIVISION. DIVISIONのインデントがずれています 11/05
61 練習問題4-2-1 トラックと自家用車の〜 メーカーと自家用車の〜 07/20
61 練習問題4-2-1 DATA DIVISION. DIVISIONのインデントがずれています 11/05
61 練習問題4-2-2 JUSTIFIED,SIGN,BALNK以降 インデントがずれています(SIGNは字空けは必要ありません) 11/05
62 全設問の括弧 - 半角にすべきです 07/20
67 10 NEXT SENTENCEを〜 字空けは必要ありません 11/06
70 11 ELSE CONTINUE 間隔を広げるべきです 07/20
71 IF文とEVALUATE文の例 - フォントが違っています 07/20
71 A説明3行目 個数は一致していなければなりません 個数は一致していなければなりません 11/06
72 末尾の表 90〜100 91〜100 07/20
78 18 END−IF END-IF ※半角にすべきです 07/20
83 例題プログラム5-8 末尾3行 インデントがずれています 11/06
89 6〜8 - 予約語のフォントが違っています 11/06
90 表5-4の7行4列 純条件,) 純条件,) 11/06
91 8 (A < B) OR 〜 (A > B) OR 〜 07/20
91 10 A > B OR < C AND X = Y OR Z (A > B OR < C) AND (X = Y OR Z) 07/20
91 17 NOTは(A = B)に〜 字空けは必要ありません 11/06
100 例題プログラム6-1 「・・・ファイル名」及び「・・・レコード名」 インデントがずれています 11/06
109 4 コーダー プログラム作成者 11/09
112 14 index−name index-name ※半角にすべきです 07/20
113 例題プログラム7-1 末尾 「以下省略」のフォントが違っています 11/09
114 形式1 指標名1」,「一意名1 下線は不要です 11/09
119 例題プログラム7-3 - 「X(26)」と「VALUE」の間に空白が必要です 07/20
120 16 氏名(<クラスの1>,<氏名の1>)説明の「よい」 インデントがずれています。1行前の「カンマの後の〜」と同じインデントであるべきです 11/09
121 例題プログラム7-5 DATA DIVISION. DIVISIONのインデントがずれています 11/09
121 例題プログラム7-5 15 氏名 PIC N(10). N(10)のインデントがずれています 11/09
123 21 ×の説明 インデントがずれています 11/09
127 10 この本を閉じて この本を閉じて 11/09
128 例題プログラム7-6 IF 数学(K) >= 90 IF 数学(K) >= 90 ※半角であるべきです 11/09
131 10 ●無条件文1を実行する。 ●無条件文2を実行する。 07/20
133 例題プログラム7-8の末尾から10行目 DISPLAY N"数学の得点が90点以上の生徒はいません" ; これを「CONTINUE ;」に変更 07/20
143 末尾 END−IF END-IF ※半角にすべきです 07/20
147 例6の四角内 「検査」2箇所 検査対象 11/09
150 9 01 置換 PIC X(5). 01 置換対象 PIC X(5). 11/09
156 13 END−STRING END-STRING ※半角にすべきです 07/20
156 20 01 転記先 PIC X(20) VALUE ALL "#". 01 転先 PIC X(20) VALUE ALL "#". 11/09
156 例1四角内 INTO 転記先 INTO 転 11/09
156 例1四角内 END−STRING END-STRING ※半角にすべきです 07/20
157 7 1番目に転記先1が転記先に転記されます。 1番目に転記先1が転先に転記されます。 11/09
157 末端四角内 INTO 転記先 INTO 転 11/09
157 末端四角内 END−STRING END-STRING ※半角にすべきです 07/20
158 例2四角内 INTO 転記先 INTO 転 11/09
157 例2四角内 END−STRING END-STRING ※半角にすべきです 07/20
158 末尾から6行目 ("ABC")が転記元へ転記されます。 ("ABC")が転送先へ転記されます。 11/09
159 3 (例2) (例3) 11/09
159 例3四角内 INTO 転記先 INTO 転 11/09
159 例3四角内 END−STRING END-STRING ※半角にすべきです 07/20
160 末尾2行 - インデントがずれています 11/09
162 先頭 END−UNSTRING END-UNSTRING ※半角にすべきです 07/20
162 例1四角内 END−UNSTRING END-UNSTRING ※半角にすべきです 07/20
164 末尾から3行目 分解元の第1文字目空白の場合にも, 分解元の第1文字目空白の場合にも, 11/09
165 例2四角内 END−UNSTRING END-UNSTRING ※半角にすべきです 07/20
170 練習問題8-2-3(1) "DAT=a.dat"となった。 "DATE=a.dat"となった。 11/09
171 応用問題8-3-1 END−UNSTRING END-UNSTRING ※半角にすべきです 07/20
177 例の四角内 INPUT−OUTPUT INPUT-OUTPUT ※半角にすべきです 07/20
177 例の四角内 FILE−CONTROL FILE-CONTROL ※半角にすべきです 07/20
182 先頭四角内 END−IF END-IF ※半角にすべきです 07/20
183 3 END−READ END-READ ※半角にすべきです 07/20
186 5 END−WRITE END-WRITE ※半角にすべきです 07/20
188 8 [NOT AT END−OF−PAGE] [NOT AT END-OF-PAGE] ※ハイフンを半角にすべきです 11/10
194 末尾四角内 WORKING−STORAGE WORKING-STORAGE ※半角にすべきです 07/20
196 1 出席番号(01,03) 出席番号(01,02) 11/10
196 19〜20 HIGH−VALUE HIGH-VALUE ※半角にすべきです 07/20
196 結果の列 中央寄せにすべきです 07/20
198 10 → 在庫マスタ.DATにコピーする → 在庫マスタ.DATにコピーする ※ピリオドを半角にすべきです 11/10
201 14 END−WRITE END-WRITE ※半角にすべきです 07/20
201 末尾 END−REWRITE END-REWRITE ※半角にすべきです 07/20
209 例の四角内 INPUT−OUTPUT INPUT-OUTPUT ※半角にすべきです 07/20
209 例の四角内 FILE−CONTROL FILE-CONTROL ※半角にすべきです 07/20
210 表10-1 2列の列題 中央に配置すべきです 11/11
213 Aの四角内 END−READ END-READ ※半角にすべきです 07/20
214 9 もう予想が〜 この行を削除して下さい(B説明内) 11/11
214 形式 [NOT INVALID KEY 無条件文2] [NOT INVALID KEY 無条件文2] 11/11
214 形式 END−START END-START ※半角にすべきです 07/20
215 9 END−START END-START ※半角にすべきです 07/20
215 Fの四角内 END−START END-START ※半角にすべきです 07/20
216 18 - PERFORMのフォントが違っています 11/11
217 形式3 END−WRITE END-WRITE ※半角にすべきです 07/20
218 5 END−WRITE END-WRITE ※半角にすべきです 07/20
218 7〜20 - インデントがずれています 11/11
218 27〜28 (例)の文 インデントがずれています 11/11
219 形式1 END−REWRITE END-REWRITE ※半角にすべきです 07/20
219 形式1 END−DELETE END-DELETE ※半角にすべきです 07/20
219 末尾から6行目 END−DELETE END-DELETE ※半角にすべきです 07/20
220 形式1 END−READ END-READ ※半角にすべきです 07/20
221 1 END−READ END-READ ※半角にすべきです 07/20
221 7 HIGH−VALUE HIGH-VALUE ※半角にすべきです 07/20
221 上部四角内 END−READ END-READ ※半角にすべきです 07/20
221 下部四角内(2箇所) END−READ END-READ ※半角にすべきです 07/20
222 Aの四角内 END−WRITE END-WRITE ※半角にすべきです 07/20
224 形式2 END−REWRITE END-REWRITE ※半角にすべきです 07/20
224 形式2 END−DELETE END-DELETE ※半角にすべきです 07/20
224 末尾から3行目 乱呼出し法〜 インデントがずれています 11/11
225 5 WRITE文(形式1) WRITE文(形式 11/11
225 表10-4 2列の列題 /乱 11/11
225 表10-4 4列の列題 「/形式2」を削除して下さい 11/11
225 表10-4 2行4列 形式(NEXT指定) 11/11
225 表10-4 7行4列 形式(NEXT指定) 11/11
231 14 「データ名2」は,項類が〜 インデントがずれています 11/11
231 例の四角内 INPUT−OUTPUT INPUT-OUTPUT ※半角にすべきです 07/20
231 例の四角内 FILE−CONTROL FILE-CONTROL ※半角にすべきです 07/20
235 @の説明内(2箇所) LOW−VALUE LOW-VALUE ※半角にすべきです 07/20
235 Aの四角内 END−READ END-READ ※半角にすべきです 07/20
236 16 - STARTのフォントが違っています 11/11
236 Cの四角内 END−START END-START ※半角にすべきです 07/20
237 15 この後,読み込んむと, この後,読み込むと, ※「ん」を削除して下さい 11/11
238 四角内3〜4行目 - インデントがずれています 11/11
238 四角内 END−READ END-READ ※半角にすべきです 07/20
239 2 形式はOUTPUT指定と同じです。 形式は順呼出し法のOUTPUT指定と同じです。 11/11
243 四角内 END−READ END-READ ※半角にすべきです 07/20
244 練習問題10-2-1 例題プログラム10−1の〜 例題プログラム10-1の〜 ※半角にすべきです 11/11
249 四角内 - SECTIONのインデントがずれています 11/12
250 四角内 - SECTIONのインデントがずれています 11/12
263 1〜7 - 応用問題3-1が重複しているため削除して下さい 11/12
268 2 「報告書1」とします。 「報告書1」とします。 11/16
268 16 - [整数1,2,3,4,5]のインデントがずれています 11/16
274 (3)の印刷例 10/2 10/ 2 ※「2」の前に半角空白が必要です 02/11
274 (3)の印刷例 1019 10/19 02/11
274 (3)の印刷例 ージ59 ページ59 02/11
278 1 (5) (5) ※括弧は半角です 11/16
283 印刷イメージ図 - イメージ図ですので全角/半角/カラム等は曖昧です 07/20
283 印刷イメージ図 点線3箇所 フォントが違っているため点線が途中で切れているように見えています。「金額」右端より5つ分まで引かれるべきです 11/16
283 印刷イメージ図 8/2 先頭と「2」の前に空白が必要です 07/20
283 印刷イメージ図 8/15 先頭に空白が必要です 07/20
283 印刷イメージ図 12/2 「2」の前に空白が必要です 07/20
284 下部四角内 N"[" N"" ※全角にすべきです 07/20
285 下部四角内 ALL "−" ALL"-" ※半角にすべきです 07/20
293 末尾 AUTO−SKIP AUTO-SKIP ※半角にすべきです 07/20
296 表13-2 ERASE 「EOL」と「EOS」まとめてERASEの説明です。行線が不要です 11/16
296 表13-2 FOREGROUND−COLOR FOREGROUND-COLOR ※半角にすべきです 07/20
297 2 AUTO−SKIP AUTO-SKIP ※半角にすべきです 07/20
318 表14-2 WHENEVERの説明 埋込み例外宣言 11/17
319 例題プログラム14-1 プログラム名の「SAMPLE-O」 PRO1401」に変更 11/17
331 図15-1 - PRO200から伸びている点線は,1行後のCALL "PRO777"から伸びるべきです 11/17
332 行末の(例) CALL "PRO777" 〜 "PRO777"に下線(呼ばれるプログラム側のPRO777と同じもの)が引かれるべきです 11/17
332 行末の(例) 引数2の下線 パラメタ2の下線と同じであるべきです(二重線) 11/17
332 行末の(例) 引数3の下線 パラメタ3の下線と同じであるべきです(点線) 11/17
332 行末の(例) 引数2の「PIC」 インデントがずれています 11/17
333 1 引数3の下線 332ページのパラメタ3と同じ下線であるべきです(点線下線ですが点線間の幅が違っています) 11/17
335 例題プログラム15-1 BY REFERENCE 税込 インデントがずれています(BYを揃えるべきです) 11/17
335 例題プログラム15-1 DISPLAY N"副プログラムの呼出しに失敗しました。" ; インデントがずれています(2行後のDISPLAYと揃えるべきです) 11/17
335 例題プログラム15-1 END-CALL インデントがずれています(MOVE文やCALL文と同じであるべきです) 11/17
335 例題プログラム15-1 ELSE インデントがずれています(THENと同じであるべきです) 11/17
335 例題プログラム15-1 CONTINUE ; インデントがずれています(MOVE文やCALL文と同じであるべきです) 11/17
337 第15-2章4行目 多くは,〜 字空けが必要です 11/17
347 17 [ハードウェア依存の調査] 行空けが必要です 11/17
351 表16-2 5行2列「DIS-PLAY」 「DIS-」を次行に移し,DISPLAYと連続させます 11/17
352 表16-3 2行2列「PRO-GRAM」 「PRO-」を次行に移し,PROGRAMと連続させます 11/17
353 表16-3 2行2列「EXCEP-TION」 「EXCEP-」を次行に移し,EXCEPTIONと連続させます 11/17
353 表16-3 順ファイル ファイル ※全角にすべきです 07/20
353 表16-3 6行2列「AS-CENDING」 「AS-」を次行に移し,ASCENDINGと連続させます 11/17
359 四角内 文字列(1:4) 文字列(4:1) 11/17
360 データ領域の図 「データ領域」及び「FILLER」 実線の後ろに点線が見えていますので点線枠を削除して下さい 11/17
361 データ領域の図 「遊び」 実線の後ろに点線が見えていますので点線枠を削除して下さい 11/17
361 末尾から2行目 COPPY文 COPY文 ※「P」を削除して下さい 11/17
362 末尾 RE- 次ページの「PLACING」と連結してREPLACINGとします 11/17
363 2番目の四角内 下線 1行ずつずれています 11/17
363 末尾から7行目 「S9(9)」2箇所 S9(9) ※括弧は半角です 11/17
363 末尾から7行目 S9(9) SYNC 「S9(9)」と「SYNC」の間隔が広すぎます 11/17
366 (参考) できます インデントがずれています(ACCEPTと同じであるべきです) 11/17
370 確認問題17-1-1 PROCEDURE DIIVSION. PROCEDURE DIVISION. 11/17
375 (7)の説明 利用者が〜 字空けは必要ありません 11/17
377 解答全体 - 「−」を「-」の半角にすべき箇所が多数あります 07/20
378 解答3-1-2(11) S,V,. 」   ※カンマを表現するために「」付きで表しています 11/05
383 (3)の解答の中 UNTIL カウンタ > 100. UNTIL カウンタ >= 100. 07/20
386 解答7-1-4(2) PIC N(2) PIC N(12) 11/09
392 解答17-1-1 PROCEDURE DIIVSION. PROCEDURE DIVISION. 11/17
418 解答6-3-1※ RE-PLACING 「RE-」を次行に移し,REPLACINGと連続させます 11/06
418 解答6-3-1※ INIRIAL句がなければ,〜 INITIAL句がなければ,〜 11/06
420 6 7-3-2 7-3-3 11/09
420 29 7-3-3 7-3-4 11/09
422 解答9-3-1 解答番号 フォントサイズ及びボールドされていません 11/10
431 末尾から6行目 N"]" N"" ※全角にすべきです 07/20
432 13 N"[" N"" ※全角にすべきです 07/20
432 16 N"]" N"" ※全角にすべきです 07/20
432 29 ALL "−" ALL"-" ※半角にすべきです 07/20
434 解答13-3-1 解答番号 14-3-1 11/17

(お詫び)
校正時の内容が反映されていない個所が相当数あり,読者のみなさまにはご迷惑をおかけいたしました。
赤字は訂正,青字は追加,黒字は説明です。

すべての訂正を掲載しています。

先頭