次の COBOL プログラムの説明及びプログラムを読んで，設問１〜３に答えよ。

〔プログラム１の説明〕

　Ｇ社では，セキュリティ対策のため，入退室時の ID カード操作によって資格保有者以外の 立入りを禁止し，かつ，入室者の入退室日時を記録しておくセキュリティルームを設置した。 プログラム１は，セキュリティルームを管理するシステムのサブプログラムであり， 処理コードと従業員番号を受け取って，結果コードを返す。

(1) パラメタの形式は，図１のとおりである。

(4) セキュリティルーム内に同時に在室できる人員は 99 名までとする。

(5) 入室者の入退室日時を記録する入退室ログファイルは，図３に示すレコード様式の順ファイルである。

(6) このプログラムは，最初に呼び出されたときを除き，CANCEL 文などによって 初期状態になることはない。

(7) セキュリティルームには，本人の ID カードを使って１人ずつ入退室する。 セキュリティルームの入退室はすべて記録される。

〔プログラム１〕

DATA DIVISION. 
FILE SECTION.
FD  EMPLOYEE.
01  EMP-REC.
    02  EMP-KEY.
        03  EMP-NO     PIC 9(8).
    02  EMP-CLASS      PIC 9(1).
    02  EMP-QUAL       PIC 9(1).
FD  LOG-FILE.
01  LOG-REC.
    02  LOG-EMP        PIC 9(8).
    02  LOG-CD         PIC 9(1).
    02  LOG-TIME       PIC X(14).

WORKING-STORAGE SECTION.
01  CNT                PIC 9(3) VALUE ZERO.
LINKAGE SECTION.
01  PRM.
    02  PRM-CD         PIC 9(1).
        88 CD-ENTER      VALUE 1.
        88 CD-EXIT       VALUE 2.
    02  PRM-EMP        PIC 9(8).
    02  PRM-RTN        PIC 9(1).
PROCEDURE DIVISION  USING PRM.
CTL-PROC SECTION. 
    MOVE ZERO TO PRM-RTN.
    EVALUATE TRUE
       WHEN CD-ENTER PERFORM QUAL-CHECK
       WHEN CD-EXIT  PERFORM REC-LOG
                     SUBTRACT 1 FROM CNT
       WHEN OTHER    MOVE 1 TO PRM-RTN
    END-EVALUATE.
    EXIT PROGRAM.
QUAL-CHECK SECTION.
    OPEN INPUT EMPLOYEE.
    MOVE PRM-EMP TO EMP-NO.
    READ EMPLOYEE
       INVALID KEY
          MOVE 2 TO PRM-RTN
       NOT INVALID KEY
          EVALUATE TRUE
             WHEN 
                MOVE 3 TO PRM-RTN
             WHEN CNT >= 99
                MOVE 4 TO PRM-RTN
             WHEN OTHER
                PERFORM REC-LOG
               
          END-EVALUATE
    END-READ.
    CLOSE EMPLOYEE.
REC-LOG SECTION.
    OPEN EXTEND LOG-FILE.
    MOVE PRM-EMP TO LOG-EMP.
    MOVE PRM-CD  TO LOG-CD.
    MOVE FUNCTION CURRENT-DATE TO LOG-TIME.
    WRITE LOG-REC.
    CLOSE LOG-FILE.

設問１　プログラム中の に入れる正しい答えを， 解答群の中から選べ。

a に関する解答群

b に関する解答群

基本情報技術者試験

解答群

基本情報技術者試験

〔プログラム２〕

DATA  DIVISION.
FILE SECTION.
FD  LOG-FILE.
01  LOG-REC.
    02  L0G-EMP         PIC 9(8).
    02  LOG-CD          PIC 9(1).
        88  CD-ENTER      VALUE 1.
        88  CD-EXIT       VALUE 2.
    02  LOG-TIME        PIC X(14).
WORKING-STORAGE SECTION.
77  CNT                 PIC 9(3).
77  SRCH-FLAG           PIC X(1).
    88 SRCH-END           VALUE "E".
01  STAY-ROOM.
    02  EMP-NO          PIC 9(8) OCCURS 99.
LINKAGE SECTION.
01  PRM-TIME        PIC X(14).
PROCEDURE DIVISION  USING PRM-TIME.
MAIN-PROC SECTION.
    MOVE SPACE TO SRCH-FLAG.
    PERFORM VARYING CNT FROM 1 BY 1 UNTIL CNT > 99
       MOVE ZERO TO EMP-NO(CNT)
    END-PERFORM.
    OPEN INPUT LOG-FILE.
    READ LOG-FILE AT END SET SRCH-END TO TRUE.
    PERFORM UNTIL SRCH-END
       IF  THEN
          PERFORM PROC-DISP
          SET SRCH-END TO TRUE
       ELSE
          EVALUATE TRUE
             WHEN CD-ENTER PERFORM PROC-ENTER
             WHEN CD-EXIT  PERFORM PROC-EXIT
          END-EVALUATE
          READ LOG-FILE AT END SET SRCH-END TO TRUE
       END-IF
    END-PERFORM.
    CLOSE LOG-FILE.
    EXIT PROGRAM.
PROC-ENTER SECTION.
    PERFORM VARYING CNT FROM 1 BY 1 UNTIL 
       CONTINUE
    END-PERFORM.
    MOVE LOG-EMP  TO EMP-NO(CNT).
PROC-EXIT SECTION.
    PERFORM VARYING CNT FROM 1 BY 1 UNTIL 
       CONTINUE
    END-PERFORM.
    MOVE ZERO TO EMP-NO(CNT).
PROC-DISP SECTION.
    PERFORM VARYING CNT FROM 1 BY 1 UNTIL 
       IF EMP-NO(CNT) NOT = ZERO THEN
          DISPLAY EMP-NO(CNT)
       END-IF
    END-PERFORM.

d 〜 f に関する解答群