Date[].put

SUB put ( Value AS Date , Index AS Integer )