What is wrong with this

Posted by Percy on March 22, 2001 at 12:44:20:

procedure addRecord (regNo : String; initialMileage : integer;
initialFuelUsed : real);
{Assumes the address book is not full, and there is no
entry that already has Name as its name}
begin
Count := Count + 1;
with MyBook[Count] do
begin
TheReg := regNo;
Mileage := initialMileage;
Fuel := initialFuelUsed;
end;

It wont work say evrything is incompatible and I dont know how to change it????

Thanks