平成28年秋期試験午前問題 午後問10

問10 ソフトウェア開発(COBOL)

次のCOBOLプログラムの説明及びプログラムを読んで,設問1,2に答えよ。

〔プログラムの説明〕
 Z社では,毎年実施している従業員の健康診断を今年も実施した。健康診断の結果は,過去10回分が健康診断マスタファイルに記録されている。このプログラムは,今回の健康診断の結果が記録された結果ファイルを読み込み,健康診断マスタファイルに反映する。
  • 健康診断マスタファイルは,図1に示すレコード様式の順ファイルである。
    pm10_1.gif
    1. 全ての従業員に対するレコードが,従業員番号の昇順に格納される。
    2. 結果履歴には,当該従業員の過去10回分の健康診断の結果が,受診日の降順に格納される。受診回数が10回に満たない場合,残りの結果履歴には全てゼロが設定される。
    3. 受診日には,年,月,日が,それぞれ4桁,2桁,2桁の西暦で格納される。
    4. 身長(cm),体重(kg),最高血圧(mmHg),最低血圧(mmHg)には,それぞれの数値が格納される。身長と体重は小数点以下1桁までが格納される。胸部X線には,所見がない場合は0が,所見がある場合は1が格納される。
  • 結果ファイルは,図2に示すレコード様式の順ファイルである。
    pm10_2.gif
    1. 結果ファイルの先頭レコードとして,様式1のレコードが1件だけ格納される。受診日には,年,月,日が,それぞれ4桁,2桁,2桁の西暦で格納される。受診日は,健康診断マスタファイルに記録されているどの受診日よりも新しい。
    2. 2件目以降のレコードとして,受診した従業員の様式2のレコードが順不同で格納される。受診していない従業員に対するレコードは存在しない。
  • pm10_3.gif

設問1

プログラム中の に入れる正しい答えを,解答群の中から選べ。
a,b に関する解答群
  • MOVE RSLT-DATE TO NEW-DATE
  • MOVE ZERO TO CNT
  • MOVE ZERO TO NEW-DATE
  • PERFORM RET-PROC
  • RELEASE SORT-REC
  • RELEASE SORT-REC FROM RSLT-REC
c に関する解答群
  • MST-NO = SORT-NO
  • MST-NO > SORT-NO
  • MST-NO < SORT-NO
  • MST-NO NOT = SORT-NO
d に関する解答群
  • FROM 0 BY 1
  • FROM 9 BY -1
  • FROM 10 BY -1
  • FROM CNT BY 1
解答選択欄
  • a:
  • b:
  • c:
  • d:
  • a=
  • b=
  • c=
  • d=

解説

この設問の解説はまだありません。

設問2

プログラムを変更して,健康診断の結果を健康診断マスタファイルに反映するときに,全ての従業員の確認結果を図3に示すように表示する。表1中の に入れる正しい答えを,解答群の中から選べ。
pm10_4.gif
〔確認結果の表示についての説明〕
 次に該当する従業員は,従業員番号に続けて該当する文字列を表示する。なお,複数該当する場合は,その全てを表示する。
  1. 今回受診していない場合はNO-DATA
  2. 今回と前回の体重を比較して,4kg以上の増減がある場合はWEIGHT
  3. 今回の最高血圧が140mmHg以上(高血圧症状),又は90mmHg以下(低血圧症状)である場合はBLOOD-PRESSURE
  4. 今回の胸部X線の診断で所見がある場合はXRAY
pm10_5.gif
e に関する解答群
  • 行番号34と35の間
  • 行番号45と46の間
  • 行番号51と52の間
  • 行番号52と53の間
f に関する解答群
  • MOVE 1 TO CNT
  • MOVE 10 TO CNT
  • MOVE MST-DATE(1) TO NEW-DATE
  • MOVE ZERO TO NEW-DATE
g に関する解答群
  • MST-WEIGHT(1) >= MST-WEIGHT(2) + 4 OR
    MST-WEIGHT(1) <= MST-WEIGHT(2) - 4
  • MST-WEIGHT(1) >= MST-WEIGHT(CNT) + 4 OR
    MST-WEIGHT(1) <= MST-WEIGHT(CNT) - 4
  • MST-WEIGHT(10) >= MST-WEIGHT(9) + 4 OR
    MST-WEIGHT(10) <= MST-WEIGHT(9) - 4
  • MST-WEIGHT(10) >= MST-WEIGHT(CNT) + 4 OR
    MST-WEIGHT(10) <= MST-WEIGHT(CNT) - 4
解答選択欄
  • e:
  • f:
  • g:
  • e=
  • f=
  • g=

解説

この設問の解説はまだありません。

Pagetop