SET QUOTED_IDENTIFIER ON
GO
SET ANSI_NULLS ON
GO
/****** Objet : procédure stockée U_AIG.PR_AIG_ADD_XML_INPUT Date du script : 08/02/2007 10:35:45 ******/
if exists (select * from dbo.sysobjects where id = object_id(N'[U_AIG].[PR_AIG_ADD_XML_INPUT]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure [U_AIG].[PR_AIG_ADD_XML_INPUT]
GO
CREATE
PROCEDURE [U_AIG].[PR_AIG_ADD_XML_INPUT]
@sender varchar(20),
@xml_type numeric(3,0),
@xml_data varchar(max)
AS
DECLARE @return_value int,
@sequence_value numeric(38, 0)
BEGIN
EXEC @return_value = [U_REF].[PR_REF_GET_NEXT_SEQUENCE_VALUE]
@schema_name = N'U_AIG',
@sequence_name = N'S_AIG_INPUT_EVTSUIVI',
@sequence_value = @sequence_value OUTPUT
INSERT INTO U_AIG.T_AIG_INPUT
(
U_AIG.T_AIG_INPUT.AIG_INPUT_VC_SENDER,
U_AIG.T_AIG_INPUT.AIG_INPUT_DT_POSTAGE,
U_AIG.T_AIG_INPUT.AIG_INPUT_NB_TRAITE,
U_AIG.T_AIG_INPUT.AIG_INPUT_CL_XMLDATA,
U_AIG.T_AIG_INPUT.AIG_INPUT_NB_TYPEXML,
U_AIG.T_AIG_INPUT.AIG_INPUT_NB_EVTSUIVI
)
VALUES
(
@sender,
getdate(),
0,
@xml_data,
@xml_type,
@sequence_value
)
IF (@@TRANCOUNT > 0)
COMMIT WORK
return @sequence_value
END
GO
SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=14&topic_id=4929&post_id=20394