Allocations Check 2, Sql Server

Language: Layout:

--Sql Server 2014 Express Edition
--Batches are separated by 'go'

create table CrTran(
  Refr int not null primary key,
  Source varchar(2) not null,
  TrxType varchar(2) not null,
  YearNo int,
  Period int,
  FNett money,
  FVat money
)
go
create table Allocations(
     Id int identity(1,1) not null primary key,
    BankRefr int,
    BankType varchar(2),
    BankAlloc money,
    YearNo int,
    Period int,
    NomCode varchar(10),
    Allocated money
)
go
Create procedure ReconcileCreditorPayments(
  @YearNo int,
  @Period int
)
As
Begin
  Create table #RecTable(
    BankRefr int,
    BankType varchar(2),
    PaymentAmount money,
    AllocatedAmount money
  )

/* Add payments */
  insert into #RecTable(BankRefr, BankType, PaymentAmount, AllocatedAmount)
  select Refr, TrxType, ABS(FNett+FVat), 0
  from CrTran
  where Source = 'BN' and YearNo = @YearNo and Period = @Period;
  
  /* Add lines */
  update a
  set a.AllocatedAmount = b.AllocatedAmount
  from #RecTable a inner join (select BankRefr, BankType, abs(sum(Allocated)) [AllocatedAmount]
  from Allocations
  where YearNo = @YearNo and Period = @Period
  group by BankRefr, BankType) b
  on(a.BankRefr = b.BankRefr and a.BankType collate DATABASE_DEFAULT = b.BankType collate DATABASE_DEFAULT);
  
  select *
  from #RecTable
  order by BankType, BankRefr;
  
  drop table #RecTable;

End
go
insert into CrTran(Refr, Source, TrxType, YearNo, Period, FNett, FVat) select 1, 'BN', 'PY', 1, 1, -100, 0
insert into CrTran(Refr, Source, TrxType, YearNo, Period, FNett, FVat) select 2, 'BN', 'PY', 1, 1, -200, 0
insert into CrTran(Refr, Source, TrxType, YearNo, Period, FNett, FVat) select 3, 'BN', 'PY', 1, 1, -300, 0
go
insert into Allocations(BankRefr, BankType, BankAlloc, YearNo, Period, Nomcode, Allocated)
select 1, 'PY', 100, 1, 1, '1000', -50
UNION
select 1, 'PY', 100, 1, 1, '2000', -40
union
select 2, 'PY', 100, 1, 1, '1000', 50
UNION
select 2, 'PY', 100, 1, 1, '2000', 50;
go

Exec ReconcileCreditorPayments 1, 1

View schema
Execution time: 0,05 sec, rows selected: 3, rows affected: 12, absolute service time: 0,2 sec