169 похожих чатов

Добрый день. Не подскажете в чём проблема? Msg 3902, Level 16,

State 1, Procedure dbo.ExecuteOperation, Line 60 [Batch Start Line 2]
The COMMIT TRANSACTION request has no corresponding BEGIN TRANSACTION.
USE [SeaphonServer]
GO
/****** Object: StoredProcedure [dbo].[ExecuteOperation] Script Date: 5/22/2022 12:57:29 PM ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
ALTER PROCEDURE [dbo].[ExecuteOperation]
@AccountTo nvarchar(17) = NULL,
@AccountFrom nvarchar(17) = NULL,
@OperationType int = NULL,
@Cash money = NULL,
@ActionID int = NULL
AS
DECLARE @AccountFromID int
DECLARE @AccountToID int
DECLARE @FromCash Money
DECLARE @ToCash Money
DECLARE @FF NVARCHAR

BEGIN TRANSACTION

SET @AccountFromID = (SELECT dbo.Accounts.ID
FROM dbo.Accounts INNER JOIN dbo.Operations ON dbo.Accounts.AccountID = dbo.Operations.AccountFrom)

SET @AccountToID = (SELECT dbo.Accounts.ID
FROM dbo.Accounts INNER JOIN dbo.Operations ON dbo.Accounts.AccountID = dbo.Operations.AccountTo)

SET @FromCash = (SELECT dbo.Accounts.Cash
FROM dbo.Accounts INNER JOIN dbo.Operations ON dbo.Accounts.AccountID = dbo.Operations.AccountFrom)

SET @ToCash = (SELECT dbo.Accounts.Cash
FROM dbo.Accounts INNER JOIN dbo.Operations ON dbo.Accounts.AccountID = dbo.Operations.AccountTo)

SET @FF = (SELECT FullName
FROM dbo.Accounts INNER JOIN dbo.Operations ON dbo.Accounts.AccountID = dbo.Operations.ID)

IF (@FF IS NOT NULL)
BEGIN
IF (@AccountTo is NOT NULL AND @AccountFrom is NOT NULL) AND (@FromCash >= @ToCash)
BEGIN
UPDATE Accounts SET Cash = @FromCash - @ToCash WHERE ID = @AccountFromID;
UPDATE Accounts SET Cash = @ToCash + @FromCash WHERE ID = @AccountToID;
END
ELSE
BEGIN
ROLLBACK
END
END
ELSE
BEGIN
IF (@ActionID = 1) AND (@FromCash >= @Cash) AND (@ToCash >= @Cash)
BEGIN
UPDATE Accounts SET Cash = @FromCash - @Cash WHERE ID = @AccountFromID;
UPDATE Accounts SET Cash = @ToCash - @Cash WHERE ID = @AccountToID;
END
ELSE
BEGIN
ROLLBACK
END
IF (@ActionID = 2)
BEGIN
UPDATE Accounts SET Cash = @FromCash + @Cash WHERE ID = @AccountFromID;
UPDATE Accounts SET Cash = @FromCash + @Cash WHERE ID = @AccountToID;
END
END
COMMIT TRANSACTION

INSERT INTO Operations(AccountFrom, AccountTo, OperationType, OperationDate, OperationTime, Cash)
VALUES (@AccountFromID, @AccountToID, @OperationType, CONVERT(date, CURRENT_TIMESTAMP), CONVERT(time, CURRENT_TIMESTAMP), @Cash)

3 ответов

20 просмотров

вот это SET @AccountFromID = (SELECT dbo.Accounts.ID FROM dbo.Accounts INNER JOIN dbo.Operations ON dbo.Accounts.AccountID = dbo.Operations.AccountFrom) SET @AccountToID = (SELECT dbo.Accounts.ID FROM dbo.Accounts INNER JOIN dbo.Operations ON dbo.Accounts.AccountID = dbo.Operations.AccountTo) SET @FromCash = (SELECT dbo.Accounts.Cash FROM dbo.Accounts INNER JOIN dbo.Operations ON dbo.Accounts.AccountID = dbo.Operations.AccountFrom) SET @ToCash = (SELECT dbo.Accounts.Cash FROM dbo.Accounts INNER JOIN dbo.Operations ON dbo.Accounts.AccountID = dbo.Operations.AccountTo) SET @FF = (SELECT FullName FROM dbo.Accounts INNER JOIN dbo.Operations ON dbo.Accounts.AccountID = dbo.Operations.ID) очень плохо, записей может быть более одной

Владимир
вот это SET @AccountFromID = (SELECT dbo.Accounts...

И.. Вот ещё. А как можно упростить такое количество подзапросов?

Похожие вопросы

Обсуждают сегодня

Мужики и девушки, привет) в Вelphi xe7 в настройках во вкладке "Editor Options" далее " Color" есть список: "Elements", открыв который мы можем настраивать отображение разных...
Kraszx
14
Добрый вечер. Есть вопрос, а может и предложение. Был у меня диалог в другой группе о делфи и я задался вопросом: "А нельзя ли в делфи цвет //коментария и {комментария} сде...
Kraszx
24
Я вот подумал. SSE выполняет операции максимум с 64-битной точностью. А FPU - всегда с 80-битной. Разве не должно быть FPU точнее тогда?
The Bird of Hermes
13
как быть с принтером? такой подход прокатит?
zamtmn
12
Мдя, прикол, боевая сборка запускается (именно под отладчиком) после F9 примерно полторы минуты (97 секунд если быть точным). Начал копать - проблема детектится сразу - зависа...
Александр (Rouse_) Багель
38
Всем привет! Подскажи, пожалуйста, как передать в TComboBox сразу значение и id записи. На Delphi я делал так: ComboBox1.Items.AddObject('Какое-то значение', Pointer(id запис...
Евгений
13
Здравствуйте, вопрос по структурам данных. Были у вас случаи, когда пришлось писать деревья или двунаправленные списки?
/ /
50
Я не понимаю, это троллинг или что? Швабрика поддерживают, который буквально пишет на ассемблере взаимодействия с винапи. Я это ещё написал загрузчик и хоть что-то изучаю в о...
Shadow Akira
6
А вот это что за конструкция? Вернее, она тут нафига?
Serjone
10
Привет. Подскажите, как правильно сматчить лист фиксированного размера, чтобы компилятор не говорил мне о неполном паттерне? Допустим что-то такое [x', y'] = sort [x, y]?
Arseny
8
Карта сайта