& ersstartdate(1),
& ersstartdate(2)
& ersstartdate,
integer ersstartdate(4)
call COST_SLA_READ( ersfile, ersstartdate, ersperiod,
& ersstartdate, mythid )