SELECT Money.Autonumber AS ID, Date, Summa, Currency, 
    DSumma, CurrencyFact, Payer
FROM Money
UNION ALL
SELECT Waybill.IDWaybill, Date, Summa, Currency,  0 ,  1 , 
    Seller
FROM Waybill
WHERE Waybill.Shipment =  1 
UNION ALL
SELECT Markdown.IDMarkdown, MarkDown.Date, 
    MarkDown.MarkDownSumma, Waybill.Currency,  0 ,  1 , 
    Waybill.Seller
FROM MarkDown INNER JOIN
    WaybillDetail ON 
    Markdown.WD = WaybillDetail.IDWD INNER JOIN
    Waybill ON WaybillDetail.IDWaybill = Waybill.IDWaybill

SELECT IDWaybill, Waybill, Date, Consignee, Summa, Currency, 
    DSumma =  0 , CurrencyFact =  0 
FROM Waybill
WHERE Waybill.Shipment =  1 
UNION ALL
SELECT Autonumber, NumDoc, Date, Receiver, Summa, Currency, 
    DSumma, CurrencyFact
FROM Money

begin
Update Waybill
set PaymentDate = (select min(Prihod.Date) from Prihod
	Where 
	 -- Сумма расходов до текущей накладной
 
	isnull((select sum(Rashod.Summa) 
	from Rashod Where Rashod.Date<Inserted.Date and 
	Rashod.Currency =  1  and Rashod.Consignee = Inserted.Consignee), 0 )+	
	 -- Сумма расходов в день отгрузки текущей накладной
 
	isnull((select sum(Rashod.Summa) 
	from Rashod Where Rashod.Date=Inserted.Date and Rashod.IDWaybill<=Inserted.IDWaybill and 
	Rashod.Currency =  1  and Rashod.Consignee = Inserted.Consignee), 0 )+

	isnull((select sum(Rashod.DSumma) 
	from Rashod Where Rashod.Date<Inserted.Date and 
	Rashod.CurrencyFact =  1  and Rashod.Consignee = Inserted.Consignee), 0 )+	
	isnull((select sum(Rashod.DSumma) 
	from Rashod Where Rashod.Date=Inserted.Date and Rashod.IDWaybill<=Inserted.IDWaybill and 
	Rashod.CurrencyFact =  1  and Rashod.Consignee = Inserted.Consignee), 0 )
<=
	 -- Сумма приходов (деньги + накладные + уценки)
 
	isnull((select sum(P.Summa) from Prihod P
	Where P.Date<= Prihod.Date and 
	P.Payer = Inserted.Consignee and P.Currency= 1 ), 0 )+
	isnull((select sum(P.DSumma) from Prihod P
	Where P.Date<= Prihod.Date and 
	P.Payer = Inserted.Consignee and P.CurrencyFact= 1 ), 0 )

and Prihod.Payer = Inserted.Consignee  and Inserted.Currency =  1 
)
from Waybill inner join Inserted on
Waybill.IDWaybill = Inserted.IDWaybill
end