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

〔プログラムの説明〕
　ある駐車場では，自動精算システムを導入している。利用者は，入庫時に利用番号と入庫時刻が記録された駐車券を受け取り，出庫時に駐車券を精算機に投入して駐車料金を支払う。連続した複数日にまたがる駐車も可能である。プログラム1は入庫時に入庫時刻を精算ファイルに記録するサブプログラムであり，プログラム2は出庫時に駐車料金を計算して出庫時刻とともに精算ファイルに記録し，駐車料金の値を呼出し元に返すサブプログラムである。

• 精算ファイルは，図1に示すレコード様式の索引ファイルであり，プログラムの実行時に既に存在する。主キーは利用番号である。ファイルの排他制御は適切に行われるものとする。
  
  1. 利用番号には，入庫時に発券される駐車券ごとに1ずつ増える8桁の数字が格納される。
  2. 入庫時刻及び出庫時刻には，西暦の年，月，日と，24時間表記の時(0～23)，分(0～59)が，それぞれ4桁，2桁，2桁，2桁，2桁で格納される。
• プログラム1のパラメータの様式は，図2のとおりである。呼出し元プログラムから利用番号と入庫時刻を受け取る。
  
• プログラム2のパラメータの様式は，図3のとおりである。呼出し元プログラムから利用番号と出庫時刻を受け取り，駐車料金の値を返す。
  
• 駐車料金は，入庫時刻を基準に駐車時間を1時間単位に区切って算出する。この単位を課金単位と呼び，1課金単位当たり300円を課金する。各課金単位の開始時刻の"分"は，入庫時刻と同じ"分"とする。各課金単位の開始時刻から1分以上が経過すると課金対象になる。例えば，10時30分に入庫して，11時30分に出庫した場合，課金単位は1で，駐車料金は300円である。10時30分に入庫して，11時31分に出庫した場合，2時間目の課金単位の開始時刻である11時30分から1分が経過しているので，課金単位は2となり，駐車料金は600円になる。駐車料金が999,999円を超えることはない。
• プログラム2の中で使用している組込み関数 INTEGER-OF-DATE は，引数に指定された日付を西暦1601年1月1日からの通算の日数に変換して返す。