1
|
USE [gAMSPro_BVB_v3]
|
2
|
GO
|
3
|
/****** Object: StoredProcedure [dbo].[PAY_ENTRIES_POST_SetApp] Script Date: 05-Apr-22 2:21:53 PM ******/
|
4
|
SET ANSI_NULLS ON
|
5
|
GO
|
6
|
SET QUOTED_IDENTIFIER ON
|
7
|
GO
|
8
|
-- =============================================
|
9
|
-- Author: <Author,,Name>
|
10
|
-- Create date: <Create Date,,>
|
11
|
-- Description: <Description,,>
|
12
|
-- =============================================
|
13
|
ALTER PROCEDURE [dbo].[PAY_ENTRIES_POST_SetApp]
|
14
|
-- Add the parameters for the stored procedure here
|
15
|
@p_TRN_ID varchar(15) = NULL,
|
16
|
@p_MAKER_ID varchar(15) = NULL,
|
17
|
@p_CHECKER_ID varchar(15) = NULL,
|
18
|
@RESULT NVARCHAR(500) OUT
|
19
|
AS
|
20
|
SET NOCOUNT ON
|
21
|
SET XACT_ABORT ON
|
22
|
BEGIN TRANSACTION
|
23
|
|
24
|
|
25
|
DECLARE @DO_BRN VARCHAR(20) = (SELECT TLSUBBRID FROM TL_USER WHERE TLNANME = @p_CHECKER_ID)
|
26
|
DECLARE @PREFIX VARCHAR(15), @INDEX Numeric = 100
|
27
|
--PHAT SINH SO LUONG ID
|
28
|
SET @INDEX = (SELECT COUNT(1) FROM TR_REQ_PAY_ENTRIES A WHERE A.REQ_PAY_ID = @p_TRN_ID)
|
29
|
--GEN ID 1 LAN CHO NHIEU DONG
|
30
|
EXEC SYS_CodeMasters_Gen_Mult 'PAY_ENTRIES_POST',@INDEX, @PREFIX OUT, @INDEX OUT
|
31
|
|
32
|
INSERT INTO PAY_ENTRIES_POST ([ET_ID], [REF_NO], [TRN_ID], [REF_ID], [TRN_TYPE], [ENTRY_PAIR],
|
33
|
[DO_BRN], [DRCR], [ACCT], [BRN_ID], [DEPT_ID],
|
34
|
[AMT], [CURRENCY], [EXC_RATE], [EXP_TO_CORE], [TRN_DATE], [TRN_DESC], [MAKER_ID], [CHECKER_ID])
|
35
|
SELECT (@PREFIX + RIGHT('000000000000' + convert(varchar(20),@INDEX + (ROW_NUMBER() OVER(ORDER BY A.REQ_PAY_ID))- 1), 15 - len(@PREFIX))), NULL,
|
36
|
A.REQ_PAY_ID, A.REQ_PAY_DT_ID, A.TRN_TYPE, A.ENTRY_PAIR, @DO_BRN,A.DR_CR, A.ACCT, A.BRANCH_ID, A.DEP_ID,
|
37
|
A.AMT, A.CURRENCY, 1, '1',GETDATE(),A.TRN_DESC,@p_MAKER_ID,@p_CHECKER_ID
|
38
|
FROM TR_REQ_PAY_ENTRIES A WHERE A.REQ_PAY_ID = @p_TRN_ID
|
39
|
|
40
|
SET @RESULT = '0'
|
41
|
COMMIT TRANSACTION
|
42
|
RETURN 0
|
43
|
ABORT:
|
44
|
BEGIN
|
45
|
ROLLBACK TRANSACTION
|
46
|
SET @RESULT = '[PAY_ENTRIES_POST_Insert] ' + ERROR_MESSAGE();
|
47
|
RETURN -1
|
48
|
END
|