September 13, 2012, 05:25 PM
Dan SatchellThis example may give you some helpful ideas:
TABLE FILE CAR
SUM RETAIL_COST/D8C AS 'Revenue'
OVER DEALER_COST/D8C AS 'Expense'
BY CAR
ON CAR RECAP NET/D8C = RETAIL_COST - DEALER_COST ;
ON CAR SUBFOOT
" <+0>Net<+0><NET"
" "
ON TABLE SET STYLE *
-INCLUDE ENDEFLT.STY
TYPE=REPORT, HEADALIGN=BODY, GRID=OFF, $
TYPE=SUBFOOT, OBJECT=FIELD, JUSTIFY=RIGHT, $
ENDSTYLE
END
September 13, 2012, 05:26 PM
David BriarsIn sounds like you have an accounting file, which suggests you have an identifier for what is a revenue item and what is an expense item.
Further, it sounds like you have a requirement to perform inter-row calculations.
If so, you might want to consider Financial Modeling Language (FML):
APP PREPENDPATH IBISAMP
-RUN
TABLE FILE LEDGER
SUM AMOUNT AS 'Amount'
FOR ACCOUNT
1000 TO 1099 AS 'Revenue' OVER
1100 TO 1199 AS 'Expense' OVER
BAR OVER
RECAP NET = R1 - R2; AS 'Net'
END
PAGE 1
Amount
Revenue 21,239
Expense 18,829
------
Net 2,410
September 13, 2012, 11:09 PM
VirThank you all for your suggestions.
Recap works. Just need formatting now. Thanks again for quick response.