Guardar usando store procedure

[ronimaxh]

Código Delphi [-]
--a este store procedure es que estoy haciendo llamada.
USE [db_simotesis]
GO
/****** Object:  StoredProcedure [dbo].[SP_guarda_tipo_persona]    Script Date: 12/02/2011 17:50:47 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
-- =============================================
-- Author:  Miguel Garcia
-- Create date: 28/11/2011
-- Description:  Guarda Tipo Persona
-- =============================================
Create Procedure SP_guarda_tipo_persona
  -- Add the parameters for the stored procedure here
    @desc_tipo varchar(50)
AS
BEGIN
  -- SET NOCOUNT ON added to prevent extra result sets from
  -- interfering with SELECT statements.
  SET NOCOUNT ON;

    -- Insert statements for procedure here
  insert into tb_tipo_persona_m (descripcion_tipo)values(@desc_tipo)
END