Problema con un parámetro de salida en un Stored Procedure

[taote]

Hola:

Lo que queria decir es que con un codigo tan simple como

Código SQL [-]
CREATE PROCEDURE PRUEBA 
RETURNS (
    CODIGO VARCHAR(10))
AS
begin
  CODIGO = '0000000001';
  suspend;
end

me falla el procedimiento al llamarlo desde Delphi. En Delphi está configurado tal y como se dice en el primer mensaje.
Venga, gracias por las respuestas.