procedure AA is
begin
null;
end AA;