В Визуальном Foxpro 9 I пытаюсь записать sql со столбцом "промежуточного итога" продукта и "общим" столбцом отчета.
Код SQL, который работы следующим образом, но когда я вставляю прокомментированный код "Случая", я получаю ошибки, которые, кажется, увеличиваются, поскольку я исправляю предыдущую ошибку.
Кто-либо может сказать мне, в которое место я должен вставить "случай" и что не так с кодом?
SELECT qItemSaleLines.ItemID, ;
qItems.ItemID, ;
qItemSaleLines.SaleID, ;
qSales.SaleID, ;
qSales.CardRecordID, ;
qCustomers.CardRecordID, ;
qItems.ItemNumber AS ProdCODE, ;
qItems.ItemName AS StkNAME, ;
qCustomers.LastName AS CUSTOMER, ;
qSales.InvoiceNumber AS SaleINVNo, ;
qSales.InvoiceDate AS SaleDATE, ;
qItemSaleLines.Quantity AS SaleQTY, ;
qItemSaleLines.TaxExclusiveTotal AS SALE, ;
qItemSaleLines.CostOfGoodsSoldAmount AS COGS, ;
qItemSaleLines.TaxExclusiveTotal - qItemSaleLines.CostOfGoodsSoldAmount AS MARGIN, ;
(qItemSaleLines.TaxExclusiveTotal - qItemSaleLines.CostOfGoodsSoldAmount) * / qItemSaleLines.TaxExclusiveTotal AS MPERCENT ;
FROM qItemSaleLines, qItems, qSales, qCustomers ;
WHERE qSales.CardRecordID = qCustomers.CardRecordID AND qItemSaleLines.SaleID = qSales.SaleID AND ;
qItemSaleLines.ItemID = qItems.ItemID AND qSales.InvoiceDate > {^2009-06-30} ;
ORDER BY qItems.ItemNumber, qSales.InvoiceDate ;
*!* (SELECT qItems.ItemID, qItemSaleLines.ItemID, qItemSaleLines.TaxExclusiveTotal, ;
*!* CASE WHEN qItems.ItemID = (SELECT TOP 1 qItems.ItemID FROM qItems.ItemID, ;
*!* WHERE qItems.ItemID = qItemSaleLines.ItemID, ;
*!* ORDER BY qItems.ItemID desc), ;
*!* THEN (SELECT SUM(qItemSaleLines.TaxExclusiveTotal) FROM qItemSaleLines.TaxExclusiveTotal,;
*!* WHERE qItems.ItemID <= qItemSaleLines.ItemID AND qItems.ItemID = qItemSaleLines.ItemID, ;
*!* ELSE ' ' END AS 'PROD-SALE'), ;
*!* CASE WHEN qItems.ItemID = (SELECT TOP 1 qItems.ItemID FROM qItems.ItemID, ;
*!* ORDER BY qItems.ItemID desc), ;
*!* THEN (SELECT SUM(qItemSaleLines.TaxExclusiveTotal) FROM qItemSaleLines.TaxExclusiveTotal, ;
*!* ELSE ' ' END AS 'Grand Total') ;
Кроме того, если вам нужны только итоги как столбцы в таблице, вы можете сделать что-то вроде
select ;
Tbl.YourColumns,;
PerItem.TotalPerItem,;
RptTotal.TotalPerAll;
from ;
YourOtherTables Tbl,;
( select YourSalesTable.ItemID,;
sum( CalculatedSales ) as TotalPerItem;
From;
YourSalesTable;
Group by ;
ItemID ) PerItem,;
( select sum( CalculatedSales ) as TotalPerAll;
From ;
YourTalesTable ) RptTotal;
where ;
YourOtherJoinConditions;
AND YourOtherTables.ItemID = PerItem.ItemID;
order by ;
whatever;
into ;
cursor YourReportResults
Выполнив SQL-Select как ваши последние 2 таблицы (одна группировка по itemID) создаст итог для каждого элемента. Если в последнем where присоединиться только к ItemID псевдонизированного PerItem, вы получите все, что было в столбцах. Однако, поскольку НЕТ соединения с псевдонимом RptTotal, вы получите декартово соединение... но поскольку в нем всегда 1 запись, каждая строка будет иметь то же значение, что и ее столбец "TotalPerAll".
Надеюсь, эти два решения подойдут для ваших нужд.
Во-первых, VFP не поддерживает конструкцию case-when на уровне поля. Кроме того, ваш подвыбор на уровне поля имеет запятую после таблицы from и перед where и после предложения where, перед порядком ... например,
select * from MyTable, where SomeCondition, Order by ...
Если вы выполняете отчет VFP, вам не нужно вручную добавьте строки в группы в необработанные данные, что должно быть выполнено в самом отчете путем группировки данных, и добавьте свой ItemID в качестве основы для группы. Затем скопируйте / вставьте «суммируемые» столбцы в группу нижнего колонтитула отчета для каждого элемента. Дважды щелкните поле и для расчета укажите sum () и сбросить в конце каждой группы (например, ItemID). Затем включите полосу сводки отчета. Это печатается один раз для всего отчета ... Подобно элементам сводки на уровне элемента, скопируйте / вставьте еще раз, но поместите в полосу сводки отчета. Дважды щелкните эти элементы для суммирования () и сброса в КОНЦЕ ОТЧЕТА.
Однако, поскольку вы работаете в VFP9, и вы, возможно, захотите выгрузить данные со строками, уже включенными в их соответствующие позиции, я бы разбил на отдельные запросы и объединил результаты вместе, как я пробовал ниже. Предварительно извлеките то, что будет поддержкой отдельных позиций для данных отчета без каких-либо необходимых агрегатов.
SELECT ;
qItemSaleLines.ItemID, ;
qItemSaleLines.SaleID, ;
qCustomers.CardRecordID, ;
qItems.ItemNumber AS ProdCODE, ;
qItems.ItemName AS StkNAME, ;
qCustomers.LastName AS CUSTOMER, ;
qSales.InvoiceNumber AS SaleINVNo, ;
qSales.InvoiceDate AS SaleDATE, ;
qItemSaleLines.Quantity AS SaleQTY, ;
qItemSaleLines.TaxExclusiveTotal AS SALE, ;
qItemSaleLines.CostOfGoodsSoldAmount AS COGS, ;
qItemSaleLines.TaxExclusiveTotal - qItemSaleLines.CostOfGoodsSoldAmount AS MARGIN, ;
(qItemSaleLines.TaxExclusiveTotal - qItemSaleLines.CostOfGoodsSoldAmount) / qItemSaleLines.TaxExclusiveTotal AS MPERCENT, ;
"1" as TierLevel,;
"1" as SubTier,;
SPACE(50) as GroupCaption;
FROM ;
qSales, ;
qCustomers, ;
qItemSaleLines, ;
qItems, ;
WHERE ;
qSales.CardRecordID = qCustomers.CardRecordID ;
AND qSales.SaleID = qItemSaleLines.SaleID ;
AND qItemSaleLines.ItemID = qItems.ItemID ;
AND qSales.InvoiceDate > {^2009-06-30} ;
ORDER BY ;
qItems.ItemNumber, ;
qSales.InvoiceDate ;
INTO ;
CURSOR C_TmpAllLineItemResults READWRITE
*/ NOW, get your individual "ITEM GROUP" totals from ABOVE results...
SELECT ;
TR.ItemID, ;
TR.ItemNumber AS ProdCODE, ;
TR.ItemName AS StkNAME, ;
"1" as TierLevel,;
"2" as SubTier,;
"Subtotal by " + TR.ItemNumber as GroupCaption;
SUM( TR.SaleQty ) as SaleQty,;
SUM( TR.Sale ) as Sale,;
FROM ;
C_TmpAllLineItemResults TR;
GROUP BY ;
1, 2, 3, 4, 5, 6;
ORDER BY ;
1;
INTO ;
CURSOR C_SubTotalPerItem READWRITE
*/ NOW, get your REPORT totals from ABOVE results...
SELECT ;
"2" as TierLevel,;
"Report Totals " as GroupCaption;
SUM( STBI.SaleQty ) as SaleQty,;
SUM( STBI.Sale ) as Sale,;
FROM ;
C_SubTotalPerItem STBI;
GROUP BY ;
1, 2;
INTO ;
CURSOR C_ReportTotals READWRITE
*/ Finally, merge them together... since the append from will add records with matching columns,
*/ even though a subtotal cursor doesn't have all the same columns, VFP doesn't care, just
*/ adds for columns that DO match the table its going into.
SELECT C_TmpAllLineItemResults
APPEND FROM DBF( "C_SubTotalPerItem" )
APPEND FROM DBF( "C_ReportTotals" )
*/ Now, they are all merged... Finally, build an index for your report
INDEX on TierLevel + ItemID + SubTier TAG RptOrder
*/ Now, browse / review the order and adjust as needed...