begin
FOR
Select
a.Out_WIPDirection as WIPDirection,
a.Out_ValueType as ValueType,
a.Out_LocalAmount as LocalAmount,
D.Name as Division_Name,
O.Name as busorder_Name,
T.NAme as bustransaction_Name,
BP.Name as busproject_Name,
SM.name as INPUTSTORECARD_Name,
SV.Name as OUTPUTSTORECARD_Name,
M.FirstName || ' ' || M.LastName as WORKER_NAME,
WP.Name as WORKPLACE_NAME,
a.Out_DOCDISPLAYNAME as DOCDISPLAYNAME,
a.Out_Source_DocDN as Source_DOCDN,
a.Out_acc_record as ACC_RECORD,
F.Name As Firm_Name,
a.Out_Acc_Date as Acc_date,
a.Out_Doc_date as Doc_date
from
PLMFlowByDateWIP1(:ADateTo) A
left join divisions D on D.id = a.Out_Division_ID
left join BusOrders O On O.ID = a.Out_BusOrder_ID
left join BusTransactions T On T.ID = a.Out_BusTransaction_ID
left join BusProjects BP On BP.ID = a.Out_BusProject_ID
left join StoreCards SM On SM.ID= a.Out_InputStoreCard_ID
left join StoreCards SV On SV.ID = a.Out_OutputStoreCard_ID
join Firms F On F.ID = a.Out_Firm_ID
left join PLMWorkers W On W.ID = a.Out_Worker_ID
left join Persons M on W.Person_ID = M.ID
left join PLMWorkPlaces WP On WP.ID = a.Out_WorkPlace_ID
Into
Out_WIPDIrection,
Out_ValueType,
Out_LocalAmount,
Out_Division_Name,
Out_BusOrder_Name,
Out_BusTransaction_Name,
Out_BusProject_Name,
Out_InputStoreCard_Name,
Out_OutputStoreCard_Name,
Out_Worker_Name,
Out_WorkPlace_Name,
Out_DocDisplayName,
Out_Source_DocDN,
Out_Acc_Record,
Out_Firm_Name,
Out_Acc_Date,
Out_Doc_Date
Do
Begin
Suspend;
end
end