Код

BEGIN TRAN

SET NOCOUNT ON
SET LOCK_TIMEOUT 500
DECLARE @РезБло smallint
SELECT @РезБло = 1
FROM dbo._1SBKTTLC AS ТабБло WITH (TABLOCKX, HOLDLOCK)
IF @РезБло <> 1
ROLLBACK TRAN
DECLARE @DATE_Ins DATETIME
DECLARE @ACCDTID_Ins CHAR(9)
DECLARE @ACCKTID_Ins CHAR(9)
DECLARE @CURRID_Ins CHAR(9)
DECLARE @KIND_Ins CHAR(1)
DECLARE @OB1_Ins NUMERIC(14, 4)
DECLARE @OB2_Ins NUMERIC(14, 4)
DECLARE @OB3_Ins NUMERIC(14, 4)
DECLARE @DTFLAGS_Ins TINYINT
DECLARE @KTFLAGS_Ins TINYINT
DECLARE TabCur CURSOR FOR
	SELECT
		DATE
		, ACCDTID
		, ACCKTID
		, CURRID
		, KIND
		, SUM(OB1) AS OB1
		, SUM(OB2) AS OB2
		, SUM(OB3) AS OB3
		, DTFLAGS
		, KTFLAGS
	FROM dbo._1SBKTTLC_Ins AS _1SBKTTLC_Ins WITH (TABLOCKX, HOLDLOCK)
	GROUP BY
		DATE
		, ACCDTID
		, ACCKTID
		, CURRID
		, KIND
		, DTFLAGS
		, KTFLAGS
	HAVING
		(SUM(OB1) <> 0) OR
        (SUM(OB2) <> 0) OR
        (SUM(OB3) <> 0)
OPEN TabCur
WHILE @@FETCH_STATUS = 0
BEGIN
	FETCH NEXT FROM TabCur INTO
	@DATE_Ins
	, @ACCDTID_Ins
	, @ACCKTID_Ins
	, @CURRID_Ins
	, @KIND_Ins
	, @OB1_Ins
	, @OB2_Ins
	, @OB3_Ins
	, @DTFLAGS_Ins
	, @KTFLAGS_Ins
	UPDATE dbo._1SBKTTLC
		SET
			OB1 = OB1 + @OB1_Ins,
			OB2 = OB2 + @OB2_Ins,
			OB3 = OB3 + @OB3_Ins,
			DTFLAGS = @DTFLAGS_Ins,
			KTFLAGS = @KTFLAGS_Ins
		WHERE
			(DATE = @DATE_Ins) AND
			(KIND = @KIND_Ins) AND
			(ACCKTID = @ACCKTID_Ins) AND
			(ACCDTID = @ACCDTID_Ins) AND
			(CURRID = @CURRID_Ins)
	IF @@ROWCOUNT = 0 BEGIN
		INSERT INTO dbo._1SBKTTLC VALUES
		(
			@DATE_Ins, @ACCDTID_Ins, @ACCKTID_Ins, @CURRID_Ins, @KIND_Ins, @OB1_Ins, @OB2_Ins, @OB3_Ins, @DTFLAGS_Ins, @KTFLAGS_Ins
		)
	END
END
CLOSE TabCur
DEALLOCATE TabCur
DELETE FROM dbo._1SBKTTLC_Ins
COMMIT TRAN
SET NOCOUNT OFF
 

Код

SELECT @РезБло = 1
FROM dbo._1SBKTTLC AS ТабБло WITH (TABLOCKX, HOLDLOCK)
 

Код

IF @РезБло <> 1
ROLLBACK TRAN
 

Код

[PERIOD] ASC,
[SP1] ASC,
[SP2] ASC,
... 

Код

[PERIOD] ASC,
[SP1] ASC,
[SP2] ASC,
...
[ROW_ID] ASC 

Код

	Зн = Регистр.ОстаткиТоваров.Остаток(Товар,СтрокаСклад,СклЯчейка,"ОстатокТовара");
	Сообщить("Товар = " + "'" + Глоб_meta.ЗначениеВСтрокуБД(Товар)  + "'");
	Сообщить("СтрокаСклад = " + "'" + Глоб_meta.ЗначениеВСтрокуБД(СтрокаСклад)  + "'");
	Сообщить("СклЯчейка = " + "'" + Глоб_meta.ЗначениеВСтрокуБД(СклЯчейка)  + "'");
	Сообщить("Зн = " + Зн);
 

Код

declare @P1 int
set @P1=180150017
declare @P2 int
set @P2=8
declare @P3 int
set @P3=1
declare @P4 int
set @P4=1
exec sp_cursoropen @P1 output, N'select  RG####.SP1..., sum(RG####.SP#...),...
from  RG####(NOLOCK)
where PERIOD = ''20...''  and ...
group by RG####.SP1,... ', @P2 output, @P3 output, @P4 output
select @P1, @P2, @P3, @P4