method GetAllData

Description

get all session data

Parameters

tDataItems	output	temp-table
tFilterVariable	output	temp-table
tSharedSets	output	temp-table
tCompanyCurrencies	output	temp-table
oiReturnStatus	output	integer	Return status of the method.

Internal usage

unused

program code (program1/session.p)

<M-49 run CreateFilterVariables  (output viFcReturnSuper (oiReturnStatus)) in Session>

empty temp-table tSharedSets.
<Q-47 run LookupSharedSetForCompany (all) (Read) (NoCache)
   (input viCompanyId, (CompanyId)
    input '', (SharedSetType)
    output dataset tqSharedSetForCompany) in BCompany >
for each tqSharedSetForCompany on error undo, throw:
    create tSharedSets.
    assign tSharedSets.tcSharedSetTypeCode = tqSharedSetForCompany.tcSharedSetTypeCode
           tSharedSets.tiSharedSet_ID      = tqSharedSetForCompany.tiSharedSet_ID.
end.

empty temp-table tCompanyCurrencies.
<M-94 run GetCompanyCurrency
   (output tCompanyCurrencies (tCompanyCurrencies), 
    output viFcReturnSuper (oiReturnStatus)) in Session>