IF EXISTS (SELECT name
FROM sysobjects
WHERE name = N'taPOLineWrapper'
AND type = 'P')
DROP PROCEDURE taPOLineWrapper
GO
CREATE PROCEDURE taPOLineWrapper
-- taPOLineWrapper '1','PO0001','NORTH','4/12/2027','ADVANCED0001','PHON-ATT-53BK',2
@POTYPE int,
@PONUMBER varchar(20),
@LOCNCODE varchar(15),
@DOCDATE date,
@VENDORID varchar(15),
@ITEMNMBR varchar(15),
@QUANTITY NUMERIC(19,5)
AS
set transaction isolation level read uncommitted
DECLARE @O_iErrorState INT,
@oErrString VARCHAR(256),
@ErrorDesc VARCHAR(256)
SELECT @O_iErrorState = 0,
@O_iErrorState = ''
EXEC taPOLine
@I_vPOTYPE = @POTYPE,
@I_vPONUMBER = @PONUMBER,
@I_vDOCDATE = @DOCDATE,
@I_vVENDORID = @VENDORID,
@I_vITEMNMBR = @ITEMNMBR,
@I_vLOCNCODE = @LOCNCODE,
@I_vQUANTITY = @QUANTITY,
@I_vUpdateIfExists = 1,
@O_iErrorState = @O_iErrorState OUT,
@oErrString = @oErrString OUT
IF @O_iErrorState > 0 BEGIN
SELECT @ErrorDesc = tec.ErrorDesc
FROM dynamics..taErrorCode tec
WHERE tec.ErrorCode = @O_iErrorState
END ELSE BEGIN
SELECT @ErrorDesc = ''
end
SELECT @O_iErrorState AS ErrorState, @oErrString AS ErrString, @ErrorDesc AS ErrorDesc
SELECT * FROM POP10110 WHERE PONUMBER = @PONUMBER
GO
grant exec on taPOLineWrapper to public