IF EXISTS (SELECT NAME FROM SYSOBJECTS WHERE NAME='PROC_拷貝采購單' AND TYPE='P')
DROP PROC PROC_拷貝采購單
GO
CREATE PROC PROC_拷貝采購單
@源采購單 INT,
@到采購單 INT,
@AS_REN CHAR(1) OUTPUT---'0'-->成功;'1'---源采購單不存在;'2'---目標(biāo)采購單存在;
AS
BEGIN
DECLARE @LI_COUNT INTEGER
SELECT @LI_COUNT=COUNT(*) FROM 采購訂單明細(xì)表 WHERE 采購單號=@源采購單  
IF ISNULL(@LI_COUNT,0)=0
BEGIN
SELECT @AS_REN='1'
RETURN
END
SELECT @LI_COUNT=COUNT(*) FROM 采購訂單明細(xì)表 WHERE 采購單號=@到采購單  
IF ISNULL(@LI_COUNT,0)>0
BEGIN
SELECT @AS_REN='2'
RETURN
END
SELECT @LI_COUNT=COUNT(*) FROM 采購訂單明細(xì)表 WHERE 采購單號=@到采購單  
IF ISNULL(@LI_COUNT,0)=0
BEGIN
INSERT INTO  采購訂單明細(xì)表(采購單號,行, 供應(yīng)商編碼,物料編碼,訂購數(shù)量,計量單位,到期日期,狀態(tài),增值稅碼,貨幣碼,單位材料成本)SELECT  @到采購單,行, 供應(yīng)商編碼,物料編碼,訂購數(shù)量,計量單位,到期日期,狀態(tài),增值稅碼,貨幣碼,材料成本   FROM 采購訂單明細(xì)表 WHERE 采購單號=@源采購單  
INSERT INTO 采購單主表 (采購單號,日期,狀態(tài),供應(yīng)商編碼,采購員,發(fā)貨途徑,倉庫,貨幣,信用條款,上次發(fā)票日期,聯(lián)系人,電話,郵編,傳真,增值稅碼,預(yù)付金額)SELECT @到采購單,日期,狀態(tài),供應(yīng)商編碼,采購員,發(fā)貨途徑,倉庫,貨幣,信用條款,上次發(fā)票日期,聯(lián)系人,電話,郵編,傳真,增值稅碼,預(yù)付金額 FROM 采購單主表 WHERE 采購單號=@源采購單

SELECT @AS_REN='0'
END
END

SELECT *FROM 采購單主表
SELECT *FROM 采購訂單明細(xì)表
-- EXEC PROC_拷貝采購單 1,6,'0'