How to To Uppercase in Ada - Code Snippet

-- Task: To Uppercase
-- Language: Ada

procedure to_uppercase() is begin
    -- Implementation for To Uppercase
    -- TODO: Implement core logic here
    -- Step 1: Prepare data
    -- Step 2: Process To Uppercase
    Put_Line("Done");
end;