TECH.RegisteredObject,TECH.Iterator AXimpl.Controle.Order.Ax.AxOrderLijnConverter 1 TECH.ResultSet 1 AXimpl.SqlQueryConnection 1 VanafDatum:%Date,SqlQueryConnection:AXimpl.SqlQueryConnection 1 1 %Status 1 VanafDatum:%Date="" 1 '' and kenmerk.Partition=sl.Partition " _" where sl.Dataareaid='vhbe' and sl.Partition='5637144576' " _" and ResProductMaster.ADUCALCTECHNOLOGYBOMBOL = 2" Set SqlStatement = "select " _" case isnull(ResProductMaster.ADUCALCTECHNOLOGYBOMBOL,0) WHEN 3 THEN sl.ITEMID WHEN 0 THEN sl.ITEMID ELSE case InventTable.STANDARDCONFIGID when dim.CONFIGID then InventTable.ITEMID else ResProduct.DISPLAYPRODUCTNUMBER end END as ProductID," _" sl.InventDimID," _" Inventtable.VHProductGroup as Familie, " _" AdminProductNummer," _" sl.INVENTTRANSID as InventTransID" _" FROM SalesLine sl" _" join InventTable " _" on InventTable.ITEMID = sl.ITEMID and InventTable.DataAreaId = sl.DataAreaId and inventtable.PARTITION = sl.PARTITION" _" join INVENTDIM dim " _" on dim.DATAAREAID = sl.DATAAREAID and dim.INVENTDIMID = sl.INVENTDIMID and dim.Partition=sl.PARTITION" _" left outer join INVENTDIM dimbase " _" on dimbase.DATAAREAID = dim.DATAAREAID and dimbase.Partition=dim.PARTITION and dim.ConfigID =dimbase.configid and dimbase.WMSLOCATIONID='' and dimbase.inventlocationid ='' and dimbase.inventsiteid='' and dimbase.inventbatchid='' and dimbase.inventsizeid='' and dimbase.recversion=dim.recversion" _" left outer join INVENTDIMCOMBINATION as Idc " _" on Idc.DATAAREAID= sl.DATAAREAID and Idc.ITEMID=sl.ITEMID and Idc.INVENTDIMID=DimBase.INVENTDIMID and idc.PARTITION = sl.PARTITION " _" left outer join ECORESPRODUCT ResProduct " _" on idc.DISTINCTPRODUCTVARIANT= ResProduct.RecID and ResProduct.PARTITION = sl.PARTITION " _" left outer join ECORESPRODUCT ResProductMaster " _" on ResProductMaster.RecID= isnull(ResProduct.ProductMaster,ResProduct.RecID) and ResProduct.PARTITION = sl.PARTITION " _" left outer join ADUEcoResAttributeCombination as Kenmerk " _" on dim.ConfigId=Kenmerk.ConfigId and sl.ITEMID=Kenmerk.ITEMID and dim.ConfigId<>'' and Kenmerk.PARTITION=sl.PARTITION " _" where sl.Dataareaid='vhbe' " _" and sl.Partition='5637144576' " _" and isnull(ResProductMaster.ADUCALCTECHNOLOGYBOMBOL,0)=2 " If VanafDatum { Set SqlStatement=SqlStatement_" and sl.CREATEDDATETIME >= '"_$zd(VanafDatum,3)_"'" } Set ..ResultSet = ..SqlQueryConnection.GetResultSet(SqlStatement) ]]> %Boolean 0) ]]> %List 1 1 %Status 1