begin
for
select
max(PD2.ID),
max(pd2.objversion),
max(PD.posshift_id),
pd2.store_id,
sum(pd2.quantity),
sum(pd2.tamount),
sum(pd2.documentdiscount+pd2.rowdiscount+pd2.actiondiscount+pd2.dealerdiscount+pd2.financialdocumentdiscount)
from
posdocuments2 pd2
join posdocuments PD on pd.id=pd2.parent_id
join stores St on St.id=pd2.store_id
where
PD.posshift_id=:objid and
PD.opened = 'N'
group by
pd2.store_id,
st.code
order by
st.code
into
:id,
:objversion,
:parent_id,
:store_id,
:Quantity,
:Amount,
:Discount
do
suspend;
end