Prenos prometa sa nekog dokumenta na POS blagajnu

set nocount on

declare @kljuc char (15), @poz int

select top 1 @kljuc=kljuc from rGlava where syn = 'N' and kupac like 'Anonimni%' and pot = 'T' and datum = DATEADD(day, DATEDIFF(day, 0, GETDATE()), 0) order by adTimeIns desc
select @poz = (select max(poz) from rPozicije where kljuc = @kljuc)

if @poz is null
begin
set @poz = 1
end

if @kljuc is not null and @kljuc not like ''
begin
BEGIN TRY
BEGIN TRANSACTION;
insert into rPozicije (kljuc, poz, ident, naziv, kolicina, mpc, rabat, mpv, rmpc, realMPC, acTarSt)
select @kljuc as kljuc, row_number () over (order by ident) + @poz as poz, ident, naziv, kolicina, mpc, rabat, mpv, rmpc, realMPC, acTarSt
from rPozicije where kljuc like '19-6200%' or kljuc like '19-0000%'

update rGlava set napomena = 'Na racun dodan promet od neki dan, zbog greske na blagajni!' where kljuc = @kljuc

delete rPozicije where kljuc like '19-6200%' or kljuc like '19-0000%'
COMMIT;
print '*** PRENOS IZVRSEN ***'
end try
BEGIN CATCH
IF @@TRANCOUNT > 0
ROLLBACK TRAN;

print 'Error: Greska kod prenosa!'
end CATCH
end else
begin
print 'Prenos nije bio moguc!, pokusaj naredni dan.'
end