accept Insert (An_Item : in  Item) do Datum := An_Item; end Insert;