IF EXISTS (SELECT name
FROM sysobjects
WHERE name = N'taPOHdrWrapper'
AND type = 'P')
DROP PROCEDURE taPOHdrWrapper
GO
CREATE PROCEDURE taPOHdrWrapper
-- taPOHdrWrapper '1','PO0001','4/12/2027','ADVANCED0001'
@POTYPE int,
@PONUMBER varchar(20),
@DOCDATE date,
@VENDORID varchar(15)
AS
set transaction isolation level read uncommitted
DECLARE @O_iErrorState INT,
@oErrString VARCHAR(256),
@ErrorDesc VARCHAR(256)
SELECT @O_iErrorState = 0,
@O_iErrorState = ''
EXEC taPOHdr
@I_vPOTYPE = @POTYPE,
@I_vPONUMBER = @PONUMBER,
@I_vDOCDATE = @DOCDATE,
@I_vVENDORID = @VENDORID,
@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 POP10100 WHERE PONUMBER = @PONUMBER
GO
grant exec on taPOHdrWrapper to public