ALTER PROCEDURE [dbo].[ASS_ADDNEW_KT_BVB_Appr] @p_ADDNEW_ID VARCHAR(15) = NULL, @p_CHECKER_ID varchar(15) = NULL, @p_APPROVE_DT VARCHAR(20) = NULL AS DECLARE @l_SUP_ID varchar(15) DECLARE @l_BUY_DATE datetime = NULL DECLARE @l_TYPE_ID varchar(15) = NULL DECLARE @l_GROUP_ID varchar(15) = NULL DECLARE @l_ASSET_NAME nvarchar(1000) = NULL DECLARE @l_ASSET_SERIAL_NO nvarchar(max) = NULL DECLARE @l_ASSET_DESC nvarchar(max) = NULL DECLARE @l_BRANCH_ID varchar(15) = NULL DECLARE @l_DEPT_ID varchar(15) = NULL DECLARE @l_EMP_ID varchar(15) = NULL DECLARE @l_DIVISION_ID varchar(15) = NULL DECLARE @l_BUY_PRICE decimal(18) = NULL DECLARE @l_AMORT_AMT decimal(18) = NULL DECLARE @l_AMORT_MONTH decimal(18,2) = NULL DECLARE @l_AMORT_RATE decimal(18,2) = NULL DECLARE @l_IS_MULTIPLE varchar(1) = NULL DECLARE @l_QTY int = NULL DECLARE @l_PO_ID varchar(15) = NULL DECLARE @l_PD_ID varchar(15) = NULL DECLARE @l_REF_ASSET_ID varchar(15) = NULL DECLARE @l_REF_AMORTIZED_AMT decimal(18) = NULL DECLARE @l_WARRANTY_MONTHS int = NULL DECLARE @l_NOTES nvarchar(1000) = NULL DECLARE @l_CORE_NOTE nvarchar(500) = NULL declare @l_ENTRY_BOOKED varchar(1) = null DECLARE @l_MAKER_ID varchar(15) DECLARE @l_AUTH_STATUS_KT varchar(1) declare @l_DO_BRANCH_ID varchar(15) DECLARE @l_CONSTRUCT_ID varchar(15) = NULL DECLARE @l_USE_DATE_KT DATETIME = NULL DECLARE @l_AMORTIZED_AMT DECIMAL = 0 DECLARE @l_AMORTIZED_MONTH DECIMAL = 0 DECLARE @l_AMORT_STATUS nvarchar(20) DECLARE @l_AMORT_START_DATE datetime, @l_AMORT_END_DATE datetime DECLARE @l_FIRST_AMORT_AMT numeric(18,0) DECLARE @l_MONTHLY_AMT numeric(18,0) DECLARE @l_HO_BRN_ID varchar(15) DECLARE @l_WAH_ID varchar(15) DECLARE @sToday varchar(10) = convert(varchar(10), getdate(), 103) DECLARE @l_USE_DATE varchar(15) DECLARE @l_AMORTDT_ID VARCHAR(15) = NULL DECLARE @l_ASS_TYPE varchar(1) = '1' declare @l_TRN_REF_NO varchar(20) DECLARE @l_ET_ID varchar(15) DECLARE @l_VALUE_ID varchar(15) DECLARE @l_ASSET_ID varchar(15) DECLARE @l_ASSET_CODE nvarchar(100) DECLARE @l_WAHDT_ID varchar(15) DECLARE @l_LOCHIST_ID varchar(15) DECLARE @PRICE_NONE_VAT DECIMAL(18,0) DECLARE @PRICE_VAT DECIMAL(18,0) DECLARE @l_SUPPEND_GL varchar(50) DECLARE @l_ASSET_GL varchar(50) declare @l_ASSET_VALUE decimal(18,0) DECLARE @l_EXP_ACCTNO varchar(50)--TK CHI PHI DECLARE @l_AMORT_ACCTNO varchar(50)--TK CHO PHAN BO DECLARE @l_DR_BRANCH VARCHAR(15) -- DV GHI NO DECLARE @ERRORSYS NVARCHAR(15) = '' DECLARE @ACCOUNT_GL VARCHAR(50), @ACCOUNT_VAT VARCHAR(50) DECLARE @i INT, @l_USE_DATE_CUR DATETIME = NULL DECLARE @l_CURR_AMORT_AMT DECIMAL(18,0) = 0 DECLARE @sExecDT DATETIME DECLARE @l_AMORT_TERM VARCHAR(500), @l_AMORT_DESC VARCHAR(500) DECLARE @l_OLD_QT INT, @l_CUR_QT INT -- 26/12/2014 THIEUVQ DECLARE @l_IS_AMORT_WR VARCHAR(1) = '1' --THIEUVQ 27/07/2015 THEM DIEU KIEN KIEM TRA KHI NAO GHI NHAN KHAU HAO DECLARE @l_BRANCH_CREATE VARCHAR(15), @BRN_TYPE_TRN VARCHAR(15), @BRN_TYPE_REC VARCHAR(15), @TCCT_TRN_ACCTNO VARCHAR(50), @TCCT_REC_ACCTNO VARCHAR(50) DECLARE @l_VAT DECIMAL(18,0), @ERROR NVARCHAR(500) = '' DECLARE @l_DEP_CODE VARCHAR(15) DECLARE @l_COST_MASTER_ID VARCHAR(15) DECLARE @l_COSTDT_ID VARCHAR(15) DECLARE @CUR_DATE DATETIME = GETDATE() --lay thong tin giao dich SELECT @l_BUY_DATE = BUY_DATE, @l_TYPE_ID = A.[TYPE_ID], @l_GROUP_ID = A.GROUP_ID, @l_ASSET_NAME = ASSET_NAME, @l_ASSET_SERIAL_NO = ASSET_SERIAL_NO, @l_ASSET_DESC = ASSET_DESC, @l_CONSTRUCT_ID = CONSTRUCT_ID, @l_BRANCH_ID = BRANCH_ID, @l_DEPT_ID = DEPT_ID, @l_EMP_ID = EMP_ID, @l_DIVISION_ID = DIVISION_ID, @l_BUY_PRICE = BUY_PRICE, @l_AMORT_AMT = AMORT_AMT, @l_AMORT_START_DATE = AMORT_START_DATE, @l_AMORT_MONTH = A.AMORT_MONTH, --@l_AMORT_MONTH = CASE WHEN G.AMORT_MONTH<>0 THEN G.AMORT_MONTH ELSE A.AMORT_MONTH END, @l_AMORT_RATE = A.AMORT_RATE, @l_CORE_NOTE = A.CORE_NOTE, @l_IS_MULTIPLE = IS_MULTIPLE, @l_QTY = QTY, @l_PO_ID = PO_ID,@l_PD_ID=PD_ID, @l_REF_ASSET_ID = REF_ASSET_ID, @l_REF_AMORTIZED_AMT = REF_AMORTIZED_AMT, @l_WARRANTY_MONTHS = WARRANTY_MONTHS, @l_NOTES = A.NOTES, @l_ENTRY_BOOKED = ENTRY_BOOKED, @l_MAKER_ID = A.MAKER_ID_KT, @l_AUTH_STATUS_KT = A.AUTH_STATUS_KT, @ACCOUNT_GL = A.ACCOUNT_GL, @PRICE_VAT = A.PRICE_VAT,@l_BRANCH_CREATE= A.BRANCH_CREATE, @l_VAT = A.VAT FROM ASS_ADDNEW A INNER JOIN ASS_GROUP G on G.GROUP_ID = A.GROUP_ID WHERE ADDNEW_ID = @p_ADDNEW_ID IF @@Error <> 0 GOTO ABORT ------LUCTV: 21-12-2018KIEM TRA NEU TINH TRANG DANG LA 'R' THI KHONG CHO PHEP DUYET----- IF(EXISTS(SELECT * FROM ASS_ADDNEW WHERE AUTH_STATUS_KT ='R' AND ADDNEW_ID =@p_ADDNEW_ID)) BEGIN --ROLLBACK TRANSACTION SELECT '-1' as Result, '' ADDNEW_ID, N'Thông tin nhập mới tài sản đang bị trả về. Vui lòng cập nhật lại thông tin trước khi duyệt' ErrorDesc RETURN '-1' END ------PHONGNT: 26-08-2022 KIEM TRA NEU GDV CHUA CAP NHAT PHIEU THI KHONG CHO PHEP DUYET----- IF((SELECT MAKER_ID_KT FROM ASS_ADDNEW WHERE ADDNEW_ID =@p_ADDNEW_ID) IS NULL) BEGIN --ROLLBACK TRANSACTION SELECT '-1' as Result, '' ADDNEW_ID, N'Thông tin nhập mới tài sản chưa được GDV cập nhật. Vui lòng cập nhật thông tin trước khi duyệt' ErrorDesc RETURN '-1' END /*******DIEN GIAI PHAN BO CHI PHI ***********/ SET @l_AMORT_DESC = 'PHAN BO CHI PHI CCLD KY ' + convert(varchar(10),month(getdate())) + ' ' + convert(varchar(10),year(getdate())) /********** chekc vadilation ************/ IF (@l_AUTH_STATUS_KT = 'A') SET @ERRORSYS = 'ASS-99998' /*********** Kiem tra gia tri khau hao voi gia tri 30Tr **************/ SELECT @l_ASSET_VALUE = CONVERT(decimal(18,0), ParaValue) FROM SYS_PARAMETERS WHERE ParaKey = 'ASSET_VALUE' IF (@l_TYPE_ID = 'CCLD' AND @l_AMORT_AMT >= @l_ASSET_VALUE) SET @ERRORSYS = 'ASS-00011' --IF @l_AMORT_MONTH < 1 AND @l_AMORT_MONTH IS NOT NULL AND @l_AMORT_MONTH <> '' --BEGIN -- SET @ERRORSYS = 'ASS-00020' --END --IF (@l_ASS_TYPE = 'TSCD' AND @l_AMORT_AMT < @l_ASSET_VALUE) -- SET @ERRORSYS = 'ASS-00012' /************ Xuat tai san thi phai hach toan tang tai sai ****************/ --IF (@l_ENTRY_BOOKED = 'N' AND (@l_BRANCH_ID IS NOT NULL OR @l_BRANCH_ID <>'')) -- SET @ERRORSYS = 'ASS-00013' /*************** Doi voi CCLD phai khau hao het trong nam tai chinh ***********/ --Tinh ngay ket thuc khau hao SET @l_AMORT_END_DATE = DATEADD(MONTH, @l_AMORT_MONTH, @l_AMORT_START_DATE) - 1 IF @ERRORSYS <> '' BEGIN SELECT ErrorCode Result, ErrorDesc ErrorDesc FROM SYS_ERROR WHERE ErrorCode = @ERRORSYS RETURN '0' END --Lay thong tin nha cung cap SELECT @l_SUP_ID = SUP_ID FROM TR_PO_MASTER A WHERE A.PO_ID = @l_PO_ID --BRN_ID HOI SO SELECT @l_HO_BRN_ID = BRANCH_ID FROM CM_BRANCH A WHERE A.BRANCH_TYPE = 'HS' --Lay thong tin kho mac dinh --SELECT @l_WAH_ID = P.ParaValue FROM SYS_PARAMETERS P WHERE P.ParaKey='ASSET_WAREHOUSE' SET @l_WAH_ID = @l_BRANCH_CREATE --Lay suppend GL - THIEUVQ 26092016 - GHI NHAN THEO TAI KHOAN NHAP TU PHAN MEM --SET @l_SUPPEND_GL = UPPER(@ACCOUNT_GL) + 'XXXX' SELECT @l_SUPPEND_GL = A.ParaValue FROM SYS_PARAMETERS A WHERE A.ParaKey='ASSET_SUPPEND_GL' --SELECT * FROM SYS_PARAMETERS A WHERE A.ParaKey='ASSET_SUPPEND_GL' ----THIEUVQ - 30/05/2014 DOI VOI CCLD THI GHI NHAN TAI DON VI --SET @l_SUPPEND_GL = SUBSTRING(@l_SUPPEND_GL,1,LEN(@l_SUPPEND_GL) - 4) + 'XXXX' --TAI KHOAN HACH TOAN VAT SET @ACCOUNT_VAT = (SELECT A.ParaValue FROM SYS_PARAMETERS A WHERE A.ParaKey='ASSET_VAT') --ASSET_GL SELECT @l_ASSET_GL = ASSET_ACCTNO, @l_EXP_ACCTNO = EXP_ACCTNO, @l_AMORT_ACCTNO = AMORT_ACCTNO FROM ASS_GROUP A WHERE A.GROUP_ID = @l_GROUP_ID --Lay branch_id cua user duyet select @l_DO_BRANCH_ID = a.TLSUBBRID from TL_USER a where a.TLNANME = @P_CHECKER_ID --Trang thai khau hao IF (@l_BRANCH_ID IS NULL OR @l_BRANCH_ID = '') --Chua xuat su dung BEGIN SET @l_AMORT_STATUS = 'VNM' SET @l_AMORT_START_DATE = NULL SET @l_AMORT_END_DATE = NULL SET @l_MONTHLY_AMT = NULL SET @l_FIRST_AMORT_AMT = NULL SET @l_USE_DATE = NULL END ELSE IF @l_AMORT_MONTH = 0 OR @l_AMORT_START_DATE IS NULL OR @l_AMORT_START_DATE = '' BEGIN SET @l_AMORT_STATUS = 'KKH' SET @l_AMORT_START_DATE = NULL SET @l_AMORT_END_DATE = NULL SET @l_MONTHLY_AMT = 0 SET @l_FIRST_AMORT_AMT = 0 SET @l_USE_DATE = @sToday SET @l_USE_DATE_KT = CONVERT(DATETIME, @sToday, 103) END ELSE BEGIN SET @l_AMORT_STATUS = 'CKH' SET @l_USE_DATE = @sToday SET @l_USE_DATE_KT = CONVERT(DATETIME, @sToday, 103) --Ngay bat dau khau hao mac dinh la ngay hien tai IF(@l_AMORT_START_DATE IS NULL) ---THIEUVQ MOI THEM BEGIN SET @l_AMORT_START_DATE = GETDATE() END --Tinh so tien khau hao thang dau tien va so tien khau hao hang thang SET @l_MONTHLY_AMT = ROUND(@l_AMORT_AMT / @l_AMORT_MONTH, 0) SET @l_FIRST_AMORT_AMT = @l_MONTHLY_AMT --SET @l_FIRST_AMORT_AMT = ROUND(@l_MONTHLY_AMT/dbo.[FN_GetDaysInMonth](@l_AMORT_START_DATE) * (DATEDIFF(day,@l_AMORT_START_DATE, dbo.FN_GetLastDayOfMonth(@l_AMORT_START_DATE)) + 1), -3) END BEGIN TRANSACTION --UPDATE GIAO DICH ADDNEW UPDATE ASS_ADDNEW SET AUTH_STATUS_KT = 'A', CHECKER_ID_KT = @p_CHECKER_ID, APPROVE_DT_KT = CONVERT(DATETIME, @p_APPROVE_DT, 103) , POSTED_STATUS = 'Y' WHERE ADDNEW_ID = @p_ADDNEW_ID IF @@Error <> 0 GOTO ABORT IF (@l_IS_MULTIPLE = '0') --nhap tai san don le BEGIN --luctv:Begin --Phat sinh Asset_ID EXEC SYS_CodeMasters_Gen 'ASS_MASTER', @l_ASSET_ID out IF @l_ASSET_ID='' OR @l_ASSET_ID IS NULL GOTO ABORT --Phat sinh ma tai san EXEC ASS_CODE_Gen @l_BRANCH_CREATE,@l_TYPE_ID, @l_GROUP_ID, @l_ASSET_CODE OUT IF @l_ASSET_CODE='' OR @l_ASSET_CODE IS NULL GOTO ABORT --Insert bang ASS_MASTER INSERT INTO ASS_MASTER ( [ASSET_ID], [TYPE_ID], [GROUP_ID], [ASSET_CODE], [ASSET_NAME], [ASSET_SERIAL_NO], [ASSET_DESC], [SUP_ID], [BUY_PRICE], [AMORT_AMT], [ASS_TYPE], [BRANCH_ID], [DEPT_ID], [EMP_ID], [DIVISION_ID], [BUY_DATE], [USE_DATE], [SPECIAL_ASS], [AMORT_MONTH], [AMORT_RATE], [AMORT_START_DATE], [AMORT_END_DATE], [FIRST_AMORT_AMT], [MONTHLY_AMORT_AMT], [AMORTIZED_MONTH], [AMORTIZED_AMT], [PO_ID], [PD_ID], [WAREHOUSE_ID], [LOCATION], [REF_ASSET_ID], [REF_AMORTIZED_AMT], [WARRANTY_MONTHS], [NOTES], [AMORT_STATUS], [ASS_STATUS], [ASS_STATUS_DESC], [ENTRY_BOOKED], [RECORD_STATUS], [AUTH_STATUS], [MAKER_ID], [CREATE_DT], [CHECKER_ID], [APPROVE_DT], [CONSTRUCT_ID], [USE_STATUS], [BRANCH_CREATE], [ACCOUNT_GL], VAT,PRICE_VAT, [BUY_DATE_KT], [USE_DATE_KT] ) VALUES ( @l_ASSET_ID, @l_TYPE_ID , @l_GROUP_ID, @l_ASSET_CODE, @l_ASSET_NAME, @l_ASSET_SERIAL_NO, @l_ASSET_DESC, @l_SUP_ID, @l_BUY_PRICE, @l_AMORT_AMT, @l_ASS_TYPE, @l_BRANCH_ID, @l_DEPT_ID, @l_EMP_ID, @l_DIVISION_ID, CONVERT(DATETIME, @l_BUY_DATE, 103), CONVERT(DATETIME, @l_USE_DATE, 103), '0', @l_AMORT_MONTH, @l_AMORT_RATE, @l_AMORT_START_DATE, @l_AMORT_END_DATE, @l_FIRST_AMORT_AMT, @l_MONTHLY_AMT, 0, 0, @l_PO_ID, @l_PD_ID, NULL, NULL, @l_REF_ASSET_ID, @l_REF_AMORTIZED_AMT, @l_WARRANTY_MONTHS, @l_NOTES, @l_AMORT_STATUS, '1', --Mac dinh moi insert vao tinh trang tai san la binh thuong N'', @l_ENTRY_BOOKED, '1', 'A', @l_MAKER_ID, CONVERT(DATETIME, @sToday, 103), @p_CHECKER_ID, CONVERT(DATETIME, @p_APPROVE_DT, 103) , @l_CONSTRUCT_ID, 'BT', @l_BRANCH_CREATE, @ACCOUNT_GL, @l_VAT,@PRICE_VAT, CONVERT(DATETIME, @sToday, 103), @l_USE_DATE_KT ) IF @@Error <> 0 GOTO ABORT --INSERT CHI TIET TAI SAN INSERT INTO ASS_MASTER_PO SELECT @l_ASSET_ID, POAD.PO_ID, GDDT.TRPO_ID,CONVERT(DATETIME, @sToday, 103) FROM ASS_ADDNEW_PO POAD LEFT JOIN ASS_ADDNEW_GD GDDT ON GDDT.PO_ID = POAD.PO_ID AND GDDT.ADDNEW_ID = @p_ADDNEW_ID WHERE POAD.ADDNEW_ID = @p_ADDNEW_ID --Insert bang ASS_WARRANTY_DET tu bang ASS_ADDNEW_DT insert into ASS_WARRANTY_DT(ASSET_ID, WAR_DT, WAR_CONTENT) select @l_ASSET_ID, A.WAR_DT, MAX(A.WAR_CONTENT) from ASS_ADDNEW_DT A WHERE A.ADDNEW_ID= @p_ADDNEW_ID GROUP BY A.WAR_DT IF @@Error <> 0 GOTO ABORT --INSERT VAO BANG ASS_TRANSACTIONS INSERT INTO ASS_TRANSACTIONS(ASSET_ID, TRN_ID, TRN_TYPE, TRN_DATE, RECORD_STATUS, AUTH_STATUS, [MAKER_ID], [CREATE_DT], [CHECKER_ID], [APPROVE_DT] )VALUES ( @l_ASSET_ID, @p_ADDNEW_ID, 'ADD_NEW', CONVERT(DATETIME, @sToday, 103), '1', 'A', @l_MAKER_ID, CONVERT(DATETIME, @sToday, 103), @p_CHECKER_ID, CONVERT(DATETIME, @p_APPROVE_DT, 103) ) IF @@Error <> 0 GOTO ABORT --IF (@l_ENTRY_BOOKED = 'Y') --Neu nhap TS va hach toan tang tai san IF (@l_ENTRY_BOOKED = 'Y' ) --Neu nhap TS va hach toan tang tai san thieuvq 15/04/2014 BEGIN --insert dbo.ASS_VALUES EXEC SYS_CodeMasters_Gen 'ASS_VALUES', @l_VALUE_ID out IF @l_VALUE_ID='' OR @l_VALUE_ID IS NULL GOTO ABORT INSERT INTO ASS_VALUES ( VALUE_ID, ASSET_ID, BRANCH_ID, TRN_DT, CRDR, ASSET_AMT, [DESCRIPTION], TRN_ID, TRN_TYPE, RECORD_STATUS, AUTH_STATUS, MAKER_ID, CREATE_DT, CHECKER_ID, APPROVE_DT, AMORT_AMT ) VALUES ( @l_VALUE_ID, @l_ASSET_ID, @l_BRANCH_CREATE, CONVERT(datetime, @sToday, 103), 'C', @l_BUY_PRICE, N'NHAP MOI TSCD/CCLD', @p_ADDNEW_ID, 'ASS_ADDNEW', '1','A',@l_MAKER_ID, CONVERT(datetime, @sToday, 103), @p_CHECKER_ID, CONVERT(datetime, @sToday, 103), @l_AMORT_AMT ) IF @@Error <> 0 GOTO ABORT /**THIEUVQ 211118 - DIEU CHINH GOM LAI 1 BUT TOAN - NEU NHAP VA XUAT THI GOM LAI 1 BUT TOAN**/ IF (@l_BRANCH_ID IS NULL OR @l_BRANCH_ID = '') --AND @l_TYPE_ID = 'TSCD' BEGIN --Insert vao bang dbo.ASS_ENTRIES_POST EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_NEW', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @l_SUPPEND_GL, @l_BRANCH_CREATE, @l_ASSET_GL, @l_BRANCH_CREATE, @l_BUY_PRICE, 'Y', @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' @ERROR OUT IF @ERROR <> '0' GOTO ABORT END ELSE IF @l_TYPE_ID = 'TSCD' BEGIN --Insert vao bang dbo.ASS_ENTRIES_POST EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_NEW', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @l_SUPPEND_GL, @l_BRANCH_CREATE, @l_ASSET_GL, @l_BRANCH_CREATE, @l_BUY_PRICE, 'Y', @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' @ERROR OUT IF @ERROR <> '0' GOTO ABORT END END --Insert nhap kho EXEC SYS_CodeMasters_Gen 'ASS_WAREHOUSE_DT', @l_WAHDT_ID out IF @l_WAHDT_ID='' OR @l_WAHDT_ID IS NULL GOTO ABORT INSERT INTO ASS_WAREHOUSE_DT(WAHDT_ID, WAH_ID, ASSET_ID, IN_DATE, OUT_DATE, STATUS) VALUES(@l_WAHDT_ID, @l_WAH_ID, @l_ASSET_ID, GETDATE(), NULL, 'I') IF @@Error <> 0 GOTO ABORT IF @l_BRANCH_ID IS NOT NULL AND @l_BRANCH_ID <> '' BEGIN PRINT 'A' UPDATE ASS_WAREHOUSE_DT SET OUT_DATE = GETDATE(), STATUS = 'O' WHERE WAHDT_ID = @l_WAHDT_ID IF @@Error <> 0 GOTO ABORT --Insert bang ASS_LOCATION_HIST EXEC SYS_CodeMasters_Gen 'ASS_LOCATION_HIST', @l_LOCHIST_ID out IF @l_LOCHIST_ID='' OR @l_LOCHIST_ID IS NULL GOTO ABORT INSERT INTO ASS_LOCATION_HIST ( LOCHIST_ID, ASSET_ID, USE_START_DT, USE_END_DT, BRANCH_ID, DEPT_ID, EMP_ID, LOCATION, ISLEAF, PARENT_ID ) VALUES ( @l_LOCHIST_ID, @l_ASSET_ID, GETDATE(), NULL, @l_BRANCH_ID, @l_DEPT_ID, @l_EMP_ID, '', 'Y', NULL ) IF @@Error <> 0 GOTO ABORT ---THIEUVQ 101018 NEU XUAT KHAC DON VI THI HACH TOAN --BEGIN --Insert vao bang dbo.ASS_ENTRIES_POST IF @l_BRANCH_CREATE <> @l_BRANCH_ID BEGIN IF @l_TYPE_ID = 'TSCD' BEGIN SELECT @BRN_TYPE_TRN = BRANCH_TYPE,@TCCT_TRN_ACCTNO = DAO_CODE FROM CM_BRANCH WHERE BRANCH_ID = @l_BRANCH_CREATE SELECT @BRN_TYPE_REC = BRANCH_TYPE, @TCCT_REC_ACCTNO = DAO_CODE FROM CM_BRANCH WHERE BRANCH_ID = @l_BRANCH_ID /*****THIEUVQ 211118 - CHAU XAC NHAN KHONG HACH TOAN QUA TK TRUNG GIAN NUA*******/ ----NEU CN XUAT CHO PGD THI KHONG HACH TOAN THONG QUA TK TRUNG GIAN TCCT --IF @BRN_TYPE_TRN = 'CN' AND @BRN_TYPE_REC = 'PGD' --BEGIN EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_USE', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @l_ASSET_GL, @l_BRANCH_CREATE, @l_ASSET_GL, @l_BRANCH_ID, @l_BUY_PRICE, 'Y', @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' @ERROR OUT IF @ERROR <> '0' GOTO ABORT --END --ELSE --BEGIN -- ---BUT TOAN DON VI CHUYEN -- EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_USE', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @l_ASSET_GL, @l_BRANCH_CREATE, @TCCT_TRN_ACCTNO, @l_BRANCH_CREATE, @l_BUY_PRICE, 'Y', -- @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' -- @ERROR OUT -- IF @ERROR <> '0' GOTO ABORT -- ---BUT TOAN DON VI NHAN -- EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_USE', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @TCCT_REC_ACCTNO, @l_BRANCH_ID, @l_ASSET_GL, @l_BRANCH_ID, @l_BUY_PRICE, 'Y', -- @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' -- @ERROR OUT -- IF @ERROR <> '0' GOTO ABORT --END END ELSE ---CCLD BEGIN SELECT @BRN_TYPE_TRN = BRANCH_TYPE,@TCCT_TRN_ACCTNO = DAO_CODE FROM CM_BRANCH WHERE BRANCH_ID = @l_BRANCH_CREATE SELECT @BRN_TYPE_REC = BRANCH_TYPE, @TCCT_REC_ACCTNO = DAO_CODE FROM CM_BRANCH WHERE BRANCH_ID = @l_BRANCH_ID EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_NEW', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @l_SUPPEND_GL, @l_BRANCH_CREATE, @l_AMORT_ACCTNO, @l_BRANCH_ID, @l_BUY_PRICE, 'Y', @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' @ERROR OUT IF @ERROR <> '0' GOTO ABORT /*****THIEUVQ 211118 - CHAU XAC NHAN KHONG HACH TOAN QUA TK TRUNG GIAN NUA*******/ ----NEU CN XUAT CHO PGD THI KHONG HACH TOAN THONG QUA TK TRUNG GIAN TCCT ----CO TK TAI SAN - NO TK KHAU HAO --IF @BRN_TYPE_TRN = 'CN' AND @BRN_TYPE_REC = 'PGD' --BEGIN --EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_USE', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @l_ASSET_GL, @l_BRANCH_CREATE, @l_AMORT_ACCTNO, @l_BRANCH_ID, @l_BUY_PRICE, 'Y', -- @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' -- @ERROR OUT --IF @ERROR <> '0' GOTO ABORT --END --ELSE --BEGIN -- ---BUT TOAN DON VI CHUYEN -- EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_USE', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @l_ASSET_GL, @l_BRANCH_CREATE, @TCCT_TRN_ACCTNO, @l_BRANCH_CREATE, @l_BUY_PRICE, 'Y', -- @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' -- @ERROR OUT -- IF @ERROR <> '0' GOTO ABORT -- ---BUT TOAN DON VI NHAN -- EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_USE', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @TCCT_REC_ACCTNO, @l_BRANCH_ID, @l_ASSET_GL, @l_BRANCH_ID, @l_BUY_PRICE, 'Y', -- @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' -- @ERROR OUT -- IF @ERROR <> '0' GOTO ABORT --END END END ELSE IF @l_TYPE_ID = 'CCLD' --NEU LA CCLD KHI XUAT CUNG DON VI VAN HACH TOAN BEGIN EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_NEW', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @l_SUPPEND_GL, @l_BRANCH_CREATE, @l_AMORT_ACCTNO, @l_BRANCH_ID, @l_BUY_PRICE, 'Y', @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' @ERROR OUT IF @ERROR <> '0' GOTO ABORT END --END ---THIEUVQ BO DOAN NAY VI KHAU HAO LUI CHAY CHUNG KY KHAU HAO THANG 211218 -----Phong added 17/6/2018: xu ly khao hao ngay qua khu :: starts --IF @l_BRANCH_ID IS NOT NULL AND @l_BRANCH_ID <> '' AND @l_TYPE_ID = 'TSCD' AND EXISTS( -- SELECT 1 -- FROM ASS_AMORT -- WHERE PROCESS_STATUS = 'S' -- AND BRANCH_ID = @l_BRANCH_ID -- AND ASSET_TYPE = @l_ASS_TYPE -- AND EXECUTE_DT >= @l_AMORT_START_DATE --) --BEGIN -- EXEC [dbo].[ASS_AMORT_BACKDATED] @l_ASSET_ID, @l_BRANCH_ID, @l_ASS_TYPE --END ---Phong added 17/6/2018: xu ly khao hao ngay qua khu :: ends /***********PHAN BO HOI SO CHIU CHI PHI -- BEGIN 201218**************/ SET @l_DEP_CODE = (SELECT A.DEP_CODE FROM CM_DEPARTMENT A WHERE A.DEP_ID = @l_DEPT_ID) IF @l_DEP_CODE IS NOT NULL AND @l_DEP_CODE <> '' BEGIN IF @l_BRANCH_ID <> @l_HO_BRN_ID AND LEFT(@l_DEP_CODE,3) = '069' ------CN NHAP NHUNG HOI SO CHIU CHI PHI BEGIN --LAY PHONG BAN CUA HOI SO TUONG UNG MA PHONG BAN CN SET @l_DEPT_ID = (SELECT DEP_ID FROM CM_DEPARTMENT A WHERE A.DEP_CODE = @l_DEP_CODE AND BRANCH_ID = @l_HO_BRN_ID) IF @l_DEPT_ID IS NOT NULL AND @l_DEPT_ID <> '' BEGIN -----THEM VAO BANG ASS_COST_ALLOCATION EXEC SYS_CodeMasters_Gen 'ASS_COST_ALLOCATION', @l_COST_MASTER_ID out INSERT INTO ASS_COST_ALLOCATION (COS_ID,ASSET_ID,NOTE,TRN_DATE,[RECORD_STATUS],[AUTH_STATUS],[MAKER_ID],[CREATE_DT],EDITOR_ID, EDITOR_DT,[CHECKER_ID],[APPROVE_DT],BRANCH_CREATE,XML_TEMP,SECURE_01,SERCURE_01) VALUES(@l_COST_MASTER_ID,@l_ASSET_ID,'AUTO',@CUR_DATE,'1' ,'A',@l_MAKER_ID , @CUR_DATE ,NULL, NULL,@p_CHECKER_ID, @CUR_DATE,@l_HO_BRN_ID,NULL,NULL,NULL) -----THEM BANG CHI TIET ASS_COST_ALLOC_DT 100% SO TIEN PHAN BO THANG EXEC SYS_CodeMasters_Gen 'ASS_COST_ALLOC_DT', @l_COSTDT_ID out INSERT INTO ASS_COST_ALLOC_DT VALUES(@l_COSTDT_ID,@l_COST_MASTER_ID,@l_HO_BRN_ID,@l_DEPT_ID,@l_MONTHLY_AMT,'100',@l_AMORT_MONTH,@CUR_DATE, @l_AMORT_END_DATE,0,0,@l_EXP_ACCTNO,'','1' ,'A' ,@l_MAKER_ID , @CUR_DATE ,NULL, NULL,@p_CHECKER_ID,@CUR_DATE) END END END /**************************************************** END 201218************/ END --Luctv:End --CAP NHAT LOCATION_HIST - THIEUVQ 11112015 UPDATE ASS_LOCATION_HIST SET BRANCH_ID = @l_BRANCH_ID, DEPT_ID = @l_DEPT_ID WHERE ASSET_ID = @l_ASSET_ID IF @@Error <> 0 GOTO ABORT --END END ELSE BEGIN --thieuvq 14/10/2014 nhap seri theo lo DECLARE @l_LSTSERI TABLE ( [ID] [int] IDENTITY(1,1) NOT NULL, [VALUE] [NVARCHAR](MAX) NULL) DECLARE @l_SERI VARCHAR(MAX) --LAY THONG TIN SO SERI --INSERT INTO @l_LSTSERI SELECT ROW_NUMBER() OVER (ORDER BY VALUE), VALUE FROM WSISPLIT(@l_ASSET_SERIAL_NO,',') INSERT INTO @l_LSTSERI SELECT VALUE FROM WSISPLIT(@l_ASSET_SERIAL_NO,',') DECLARE @TBTEMP TABLE(PO_ID VARCHAR(15),PD_ID VARCHAR(15),CREATE_DATE DATETIME) --INSERT CHI TIET TAI SAN INSERT INTO @TBTEMP SELECT POAD.PO_ID, GDDT.TRPO_ID,CONVERT(DATETIME, @sToday, 103) FROM ASS_ADDNEW_PO POAD LEFT JOIN ASS_ADDNEW_GD GDDT ON GDDT.PO_ID = POAD.PO_ID AND GDDT.ADDNEW_ID = @p_ADDNEW_ID WHERE POAD.ADDNEW_ID = @p_ADDNEW_ID -- SET @i = 1 SELECT @BRN_TYPE_TRN = BRANCH_TYPE,@TCCT_TRN_ACCTNO = DAO_CODE FROM CM_BRANCH WHERE BRANCH_ID = @l_BRANCH_CREATE SELECT @BRN_TYPE_REC = BRANCH_TYPE, @TCCT_REC_ACCTNO = DAO_CODE FROM CM_BRANCH WHERE BRANCH_ID = @l_BRANCH_ID --luctv :begin WHILE (@i <= @l_QTY) BEGIN --Phat sinh Asset_ID EXEC SYS_CodeMasters_Gen 'ASS_MASTER', @l_ASSET_ID out IF @l_ASSET_ID='' OR @l_ASSET_ID IS NULL GOTO ABORT --Phat sinh ma tai san EXEC ASS_CODE_Gen @l_BRANCH_CREATE, @l_TYPE_ID, @l_GROUP_ID, @l_ASSET_CODE OUT IF @l_ASSET_CODE='' OR @l_ASSET_CODE IS NULL GOTO ABORT --THIEUVQ 14/10/2014 LAY SO SERI SET @l_SERI = (SELECT VALUE FROM @l_LSTSERI WHERE ID = @i) --Insert bang ASS_MASTER INSERT INTO ASS_MASTER ( [ASSET_ID], [TYPE_ID], [GROUP_ID], [ASSET_CODE], [ASSET_NAME], [ASSET_SERIAL_NO], [ASSET_DESC], [SUP_ID], [BUY_PRICE], [AMORT_AMT], [ASS_TYPE], [BRANCH_ID], [DEPT_ID], [EMP_ID], [DIVISION_ID], [BUY_DATE], [USE_DATE], [SPECIAL_ASS], [AMORT_MONTH], [AMORT_RATE], [AMORT_START_DATE], [AMORT_END_DATE], [FIRST_AMORT_AMT], [MONTHLY_AMORT_AMT], [AMORTIZED_MONTH], [AMORTIZED_AMT], [PO_ID], [PD_ID], [WAREHOUSE_ID], [LOCATION], [REF_ASSET_ID], [REF_AMORTIZED_AMT], [WARRANTY_MONTHS], [NOTES], [AMORT_STATUS], [ASS_STATUS], [ASS_STATUS_DESC], [ENTRY_BOOKED], [RECORD_STATUS], [AUTH_STATUS], [MAKER_ID], [CREATE_DT], [CHECKER_ID], [APPROVE_DT], [CONSTRUCT_ID], [USE_STATUS], [BRANCH_CREATE],[ACCOUNT_GL], VAT,PRICE_VAT,[BUY_DATE_KT], [USE_DATE_KT] ) VALUES ( @l_ASSET_ID, @l_TYPE_ID , @l_GROUP_ID, @l_ASSET_CODE, @l_ASSET_NAME, @l_SERI, --@l_ASSET_SERIAL_NO, @l_ASSET_DESC, @l_SUP_ID, @l_BUY_PRICE, @l_AMORT_AMT, @l_ASS_TYPE, @l_BRANCH_ID, @l_DEPT_ID, @l_EMP_ID, @l_DIVISION_ID, CONVERT(DATETIME, @l_BUY_DATE, 103), CONVERT(DATETIME, @l_USE_DATE, 103), '0', @l_AMORT_MONTH, @l_AMORT_RATE, @l_AMORT_START_DATE, @l_AMORT_END_DATE, @l_FIRST_AMORT_AMT, @l_MONTHLY_AMT, 0, 0, @l_PO_ID, @l_PD_ID, NULL, NULL, @l_REF_ASSET_ID, @l_REF_AMORTIZED_AMT, @l_WARRANTY_MONTHS, @l_NOTES, @l_AMORT_STATUS, '1', --Mac dinh moi insert vao tinh trang tai san la binh thuong N'', @l_ENTRY_BOOKED, '1', 'A', @l_MAKER_ID, CONVERT(DATETIME, @sToday, 103), @p_CHECKER_ID, CONVERT(DATETIME, @p_APPROVE_DT, 103), @l_CONSTRUCT_ID , 'BT', @l_BRANCH_CREATE,@ACCOUNT_GL, @l_VAT,@PRICE_VAT,CONVERT(DATETIME, @sToday, 103), @l_USE_DATE_KT ) IF @@Error <> 0 GOTO ABORT --INSERT CHI TIET TAI SAN INSERT INTO ASS_MASTER_PO SELECT @l_ASSET_ID, * FROM @TBTEMP --SELECT * FROM ASS_ADDNEW_DT --SELECT * FROM ASS_WARRANTY_DT --Insert bang ASS_WARRANTY_DET tu bang ASS_ADDNEW_DT -LUCTV BO SUNG insert into ASS_WARRANTY_DT(ASSET_ID, WAR_DT, WAR_CONTENT) select @l_ASSET_ID, A.WAR_DT, MAX(A.WAR_CONTENT) from ASS_ADDNEW_DT A WHERE A.ADDNEW_ID= @p_ADDNEW_ID GROUP BY A.WAR_DT IF @@Error <> 0 GOTO ABORT --INSERT VAO BANG ASS_TRANSACTIONS INSERT INTO ASS_TRANSACTIONS(ASSET_ID, TRN_ID, TRN_TYPE, TRN_DATE, RECORD_STATUS, AUTH_STATUS, [MAKER_ID], [CREATE_DT], [CHECKER_ID], [APPROVE_DT] )VALUES ( @l_ASSET_ID, @p_ADDNEW_ID, 'ADD_NEW', CONVERT(DATETIME, @sToday, 103), '1', 'A', @l_MAKER_ID, CONVERT(DATETIME, @sToday, 103), @p_CHECKER_ID, CONVERT(DATETIME, @p_APPROVE_DT, 103) ) IF @@Error <> 0 GOTO ABORT --IF (@l_ENTRY_BOOKED = 'Y') --Neu nhap TS va hach toan tang tai san IF (@l_ENTRY_BOOKED = 'Y' ) --Neu nhap TS va hach toan tang tai san thieuvq 15/04/2014 BEGIN --insert dbo.ASS_VALUES EXEC SYS_CodeMasters_Gen 'ASS_VALUES', @l_VALUE_ID out IF @l_VALUE_ID='' OR @l_VALUE_ID IS NULL GOTO ABORT INSERT INTO ASS_VALUES ( VALUE_ID, ASSET_ID, BRANCH_ID, TRN_DT, CRDR, ASSET_AMT, [DESCRIPTION], TRN_ID, TRN_TYPE, RECORD_STATUS, AUTH_STATUS, MAKER_ID, CREATE_DT, CHECKER_ID, APPROVE_DT, AMORT_AMT ) VALUES ( @l_VALUE_ID, @l_ASSET_ID, @l_BRANCH_CREATE, CONVERT(datetime, @sToday, 103), 'C', @l_BUY_PRICE, N'NHAP MOI TSCD/CCLD', @p_ADDNEW_ID, 'ASS_ADDNEW', '1','A',@l_MAKER_ID, CONVERT(datetime, @sToday, 103), @p_CHECKER_ID, CONVERT(datetime, @sToday, 103),@l_AMORT_AMT ) IF @@Error <> 0 GOTO ABORT /**THIEUVQ 211118 - DIEU CHINH GOM LAI 1 BUT TOAN - NEU NHAP VA XUAT THI GOM LAI 1 BUT TOAN**/ IF (@l_BRANCH_ID IS NULL OR @l_BRANCH_ID = '')-- AND @l_TYPE_ID = 'TSCD' BEGIN --Insert vao bang dbo.ASS_ENTRIES_POST EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_NEW', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @l_SUPPEND_GL, @l_BRANCH_CREATE, @l_ASSET_GL, @l_BRANCH_CREATE, @l_BUY_PRICE, 'Y', @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' @ERROR OUT IF @ERROR <> '0' GOTO ABORT END ELSE IF @l_TYPE_ID = 'TSCD' BEGIN --Insert vao bang dbo.ASS_ENTRIES_POST EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_NEW', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @l_SUPPEND_GL, @l_BRANCH_CREATE, @l_ASSET_GL, @l_BRANCH_CREATE, @l_BUY_PRICE, 'Y', @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' @ERROR OUT IF @ERROR <> '0' GOTO ABORT END END --Insert nhap kho EXEC SYS_CodeMasters_Gen 'ASS_WAREHOUSE_DT', @l_WAHDT_ID out IF @l_WAHDT_ID='' OR @l_WAHDT_ID IS NULL GOTO ABORT INSERT INTO ASS_WAREHOUSE_DT(WAHDT_ID, WAH_ID, ASSET_ID, IN_DATE, OUT_DATE, STATUS) VALUES(@l_WAHDT_ID, @l_WAH_ID, @l_ASSET_ID, GETDATE(), NULL, 'I') IF @@Error <> 0 GOTO ABORT select * from ASS_WAREHOUSE_DT IF @l_BRANCH_ID IS NOT NULL AND @l_BRANCH_ID <> '' BEGIN UPDATE ASS_WAREHOUSE_DT SET OUT_DATE = GETDATE(), STATUS = 'O' WHERE WAHDT_ID = @l_WAHDT_ID IF @@Error <> 0 GOTO ABORT --Insert bang ASS_LOCATION_HIST EXEC SYS_CodeMasters_Gen 'ASS_LOCATION_HIST', @l_LOCHIST_ID out IF @l_LOCHIST_ID='' OR @l_LOCHIST_ID IS NULL GOTO ABORT INSERT INTO ASS_LOCATION_HIST ( LOCHIST_ID, ASSET_ID, USE_START_DT, USE_END_DT, BRANCH_ID, DEPT_ID, EMP_ID, LOCATION, ISLEAF, PARENT_ID ) VALUES ( @l_LOCHIST_ID, @l_ASSET_ID, GETDATE(), NULL, @l_BRANCH_ID, @l_DEPT_ID, @l_EMP_ID, '', 'Y', NULL ) IF @@Error <> 0 GOTO ABORT PRINT 'B' ---THIEUVQ 101018 NEU XUAT KHAC DON VI THI HACH TOAN --BEGIN --Insert vao bang dbo.ASS_ENTRIES_POST IF @l_BRANCH_CREATE <> @l_BRANCH_ID BEGIN PRINT 'C' IF @l_TYPE_ID = 'TSCD' BEGIN PRINT 'D' SELECT @BRN_TYPE_TRN = BRANCH_TYPE,@TCCT_TRN_ACCTNO = DAO_CODE FROM CM_BRANCH WHERE BRANCH_ID = @l_BRANCH_CREATE SELECT @BRN_TYPE_REC = BRANCH_TYPE, @TCCT_REC_ACCTNO = DAO_CODE FROM CM_BRANCH WHERE BRANCH_ID = @l_BRANCH_ID /*****THIEUVQ 211118 - CHAU XAC NHAN KHONG HACH TOAN QUA TK TRUNG GIAN NUA*******/ ----NEU CN XUAT CHO PGD THI KHONG HACH TOAN THONG QUA TK TRUNG GIAN TCCT --IF @BRN_TYPE_TRN = 'CN' AND @BRN_TYPE_REC = 'PGD' --BEGIN EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_USE', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @l_ASSET_GL, @l_BRANCH_CREATE, @l_ASSET_GL, @l_BRANCH_ID, @l_BUY_PRICE, 'Y', @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID,@p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' @ERROR OUT IF @ERROR <> '0' GOTO ABORT --END --ELSE --BEGIN -- ---BUT TOAN DON VI CHUYEN -- EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_USE', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @l_ASSET_GL, @l_BRANCH_CREATE, @TCCT_TRN_ACCTNO, @l_BRANCH_CREATE, @l_BUY_PRICE, 'Y', -- @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID,@p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' -- @ERROR OUT -- IF @ERROR <> '0' GOTO ABORT -- ---BUT TOAN DON VI NHAN -- EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_USE', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @TCCT_REC_ACCTNO, @l_BRANCH_ID, @l_ASSET_GL, @l_BRANCH_ID, @l_BUY_PRICE, 'Y', -- @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID,@p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' -- @ERROR OUT -- IF @ERROR <> '0' GOTO ABORT --END PRINT 'D END' END ELSE ---CCLD BEGIN SELECT @BRN_TYPE_TRN = BRANCH_TYPE,@TCCT_TRN_ACCTNO = DAO_CODE FROM CM_BRANCH WHERE BRANCH_ID = @l_BRANCH_CREATE SELECT @BRN_TYPE_REC = BRANCH_TYPE, @TCCT_REC_ACCTNO = DAO_CODE FROM CM_BRANCH WHERE BRANCH_ID = @l_BRANCH_ID EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_NEW', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @l_SUPPEND_GL, @l_BRANCH_CREATE, @l_AMORT_ACCTNO, @l_BRANCH_ID, @l_BUY_PRICE, 'Y', @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' @ERROR OUT IF @ERROR <> '0' GOTO ABORT /*****THIEUVQ 211118 - CHAU XAC NHAN KHONG HACH TOAN QUA TK TRUNG GIAN NUA*******/ ----NEU CN XUAT CHO PGD THI KHONG HACH TOAN THONG QUA TK TRUNG GIAN TCCT ----CO TK TAI SAN - NO TK KHAU HAO --IF @BRN_TYPE_TRN = 'CN' AND @BRN_TYPE_REC = 'PGD' --BEGIN --EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_USE', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @l_ASSET_GL, @l_BRANCH_CREATE, @l_AMORT_ACCTNO, @l_BRANCH_ID, @l_BUY_PRICE, 'Y', -- @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID,@p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' -- @ERROR OUT --IF @ERROR <> '0' GOTO ABORT --END --ELSE --BEGIN -- ---BUT TOAN DON VI CHUYEN -- EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_USE', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @l_ASSET_GL, @l_BRANCH_CREATE, @TCCT_TRN_ACCTNO, @l_BRANCH_CREATE, @l_BUY_PRICE, 'Y', -- @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID,@p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' -- @ERROR OUT -- IF @ERROR <> '0' GOTO ABORT -- ---BUT TOAN DON VI NHAN -- EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_USE', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @TCCT_REC_ACCTNO, @l_BRANCH_ID, @l_ASSET_GL, @l_BRANCH_ID, @l_BUY_PRICE, 'Y', -- @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID,@p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' -- @ERROR OUT -- IF @ERROR <> '0' GOTO ABORT --END END END ELSE IF @l_TYPE_ID = 'CCLD' --NEU LA CCLD KHI XUAT CUNG DON VI VAN HACH TOAN BEGIN PRINT 'C' EXEC [dbo].[ASS_ENTRIES_POST_Insert] @l_TYPE_ID, @l_ASSET_ID, 'ADD_NEW', @p_ADDNEW_ID, @l_DO_BRANCH_ID, @l_SUPPEND_GL, @l_BRANCH_CREATE, @l_AMORT_ACCTNO, @l_BRANCH_ID, @l_BUY_PRICE, 'Y', @sToday, @l_CORE_NOTE, @l_MAKER_ID, @p_CHECKER_ID, @p_ADDNEW_ID,--N'NHAP MOI TSCD/CCLD' @ERROR OUT IF @ERROR <> '0' GOTO ABORT END --END ----THIEUVQ BO DOAN NAY VI KHAU HAO LUI CHAY CHUNG KY KHAU HAO -----Phong added 17/6/2018: xu ly khao hao ngay qua khu :: starts --IF @l_BRANCH_ID IS NOT NULL AND @l_BRANCH_ID <> '' AND @l_TYPE_ID = 'TSCD' AND EXISTS( -- SELECT 1 -- FROM ASS_AMORT -- WHERE PROCESS_STATUS = 'S' -- AND BRANCH_ID = @l_BRANCH_ID -- AND ASSET_TYPE = @l_ASS_TYPE -- AND EXECUTE_DT >= @l_AMORT_START_DATE --) --BEGIN -- EXEC [dbo].[ASS_AMORT_BACKDATED] @l_ASSET_ID, @l_BRANCH_ID, @l_ASS_TYPE --END ---Phong added 17/6/2018: xu ly khao hao ngay qua khu :: ends --Luctv:End /***********PHAN BO HOI SO CHIU CHI PHI -- BEGIN 201218**************/ SET @l_DEP_CODE = (SELECT A.DEP_CODE FROM CM_DEPARTMENT A WHERE A.DEP_ID = @l_DEPT_ID) IF @l_DEP_CODE IS NOT NULL AND @l_DEP_CODE <> '' BEGIN IF @l_BRANCH_ID <> @l_HO_BRN_ID AND LEFT(@l_DEP_CODE,3) = '069' ------CN NHAP NHUNG HOI SO CHIU CHI PHI BEGIN --LAY PHONG BAN CUA HOI SO TUONG UNG MA PHONG BAN CN SET @l_DEPT_ID = (SELECT DEP_ID FROM CM_DEPARTMENT A WHERE A.DEP_CODE = @l_DEP_CODE AND BRANCH_ID = @l_HO_BRN_ID) IF @l_DEPT_ID IS NOT NULL AND @l_DEPT_ID <> '' BEGIN -----THEM VAO BANG ASS_COST_ALLOCATION EXEC SYS_CodeMasters_Gen 'ASS_COST_ALLOCATION', @l_COST_MASTER_ID out INSERT INTO ASS_COST_ALLOCATION (COS_ID,ASSET_ID,NOTE,TRN_DATE,[RECORD_STATUS],[AUTH_STATUS],[MAKER_ID],[CREATE_DT],EDITOR_ID, EDITOR_DT,[CHECKER_ID],[APPROVE_DT],BRANCH_CREATE,XML_TEMP,SECURE_01,SERCURE_01) VALUES(@l_COST_MASTER_ID,@l_ASSET_ID,'AUTO',@CUR_DATE,'1' ,'A',@l_MAKER_ID , @CUR_DATE ,NULL, NULL,@p_CHECKER_ID, @CUR_DATE,@l_HO_BRN_ID,NULL,NULL,NULL) -----THEM BANG CHI TIET ASS_COST_ALLOC_DT 100% SO TIEN PHAN BO THANG EXEC SYS_CodeMasters_Gen 'ASS_COST_ALLOC_DT', @l_COSTDT_ID out INSERT INTO ASS_COST_ALLOC_DT VALUES(@l_COSTDT_ID,@l_COST_MASTER_ID,@l_HO_BRN_ID,@l_DEPT_ID,@l_MONTHLY_AMT,'100',@l_AMORT_MONTH,@CUR_DATE, @l_AMORT_END_DATE,0,0,@l_EXP_ACCTNO,'','1' ,'A' ,@l_MAKER_ID , @CUR_DATE ,NULL, NULL,@p_CHECKER_ID,@CUR_DATE) END END END /**************************************************** END 201218************/ END --CAP NHAT LOCATION_HIST - THIEUVQ 11112015 UPDATE ASS_LOCATION_HIST SET BRANCH_ID = @l_BRANCH_ID, DEPT_ID = @l_DEPT_ID WHERE ASSET_ID = @l_ASSET_ID IF @@Error <> 0 GOTO ABORT SET @i = @i + 1 END --luctv:end END -- HUYHT 06/05/2022 THAY ĐỔI TRẠNG THÁI UPDATE CŨ THÀNH UPDATE_HC UPDATE dbo.PL_PROCESS SET PROCESS_ID = 'UPDATE_KT' WHERE REQ_ID = @p_ADDNEW_ID AND PROCESS_ID = 'UPDATE' -- GIANT Insert to table PL_PROCESS INSERT INTO dbo.PL_PROCESS ( REQ_ID, PROCESS_ID, CHECKER_ID, APPROVE_DT, PROCESS_DESC, NOTES ) VALUES ( @p_ADDNEW_ID, 'APPROVE', @p_CHECKER_ID, GETDATE(), N'Kiểm soát viên phê duyệt hoàn tất' , N'Kiểm soát viên phê duyệt' ) COMMIT TRANSACTION SELECT '0' as Result, @p_ADDNEW_ID ADDNEW_ID, '' ErrorDesc RETURN '0' ABORT: BEGIN ROLLBACK TRANSACTION --CLOSE pCur --DEALLOCATE pCur SELECT '-1' as Result, '' ADDNEW_ID, @ERROR ErrorDesc RETURN '-1' End