-SET &ECHO=ALL; SET EMPTYREPORT = ON -*=============================================================================================================================================================================================== DEFINE FILE X_FI_PORTFOLIO_CASH_126 receipt_amt/P20.2B=IF X_FI_PORTFOLIO_CASH_126.ANSWERSET1.AMOUNT GT 0 THEN X_FI_PORTFOLIO_CASH_126.ANSWERSET1.AMOUNT ELSE 0; payment_amt/P20.2B=IF X_FI_PORTFOLIO_CASH_126.ANSWERSET1.AMOUNT LT 0 THEN X_FI_PORTFOLIO_CASH_126.ANSWERSET1.AMOUNT ELSE 0; END -*=============================================================================================================================================================================================== TABLE FILE X_FI_PORTFOLIO_CASH_126 PRINT X_FI_PORTFOLIO_CASH_126.ANSWERSET1.payment_dt_MDYY AS 'Cash Flow,Date' X_FI_PORTFOLIO_CASH_126.ANSWERSET1.LEG_ID AS 'Instrument,' X_FI_PORTFOLIO_CASH_126.ANSWERSET1.CP_CLIENT_ID AS 'Cpty' X_FI_PORTFOLIO_CASH_126.ANSWERSET1.STANDARD_ID AS 'Security,Identifier' X_FI_PORTFOLIO_CASH_126.ANSWERSET1.TARGET_TRANSACTION_ID AS 'Transaction,#' X_FI_PORTFOLIO_CASH_126.ANSWERSET1.type AS 'Type' X_FI_PORTFOLIO_CASH_126.ANSWERSET1.STATE_ID AS 'Transaction,Sate' COMPUTE opening_bal/D20.2S = IF X_FI_PORTFOLIO_CASH_126.ANSWERSET1.OPENING_BALANCE EQ LAST X_FI_PORTFOLIO_CASH_126.ANSWERSET1.OPENING_BALANCE THEN 0 ELSE X_FI_PORTFOLIO_CASH_126.ANSWERSET1.OPENING_BALANCE; AS 'Opening,Balance' X_FI_PORTFOLIO_CASH_126.ANSWERSET1.receipt_amt/P20.2B AS 'Receipt,Amount' X_FI_PORTFOLIO_CASH_126.ANSWERSET1.payment_amt/P20.2B AS 'Payment,Amount' COMPUTE closing_bal/D20.2S = IF X_FI_PORTFOLIO_CASH_126.ANSWERSET1.CLOSING_BALANCE EQ LAST X_FI_PORTFOLIO_CASH_126.ANSWERSET1.CLOSING_BALANCE THEN 0 ELSE X_FI_PORTFOLIO_CASH_126.ANSWERSET1.CLOSING_BALANCE; AS 'Closing,Balance' BY X_FI_PORTFOLIO_CASH_126.ANSWERSET1.PORTFOLIO_ID AS 'Portfolio' BY X_FI_PORTFOLIO_CASH_126.ANSWERSET1.report_dt AS 'Report,Date' BY HIGHEST X_FI_PORTFOLIO_CASH_126.ANSWERSET1.receipt_amt NOPRINT BY LOWEST X_FI_PORTFOLIO_CASH_126.ANSWERSET1.payment_amt NOPRINT WHERE ( X_FI_PORTFOLIO_CASH_126.INPUT.I_INSTANCE EQ '&ENV_VAR' ) AND ( X_FI_PORTFOLIO_CASH_126.INPUT.I_TAG EQ '&TAG' ) AND ( X_FI_PORTFOLIO_CASH_126.INPUT.I_TAG2 EQ '&TAG2' ) AND ( X_FI_PORTFOLIO_CASH_126.INPUT.I_PORTFOLIO_ID EQ '&PORTFOLIO' ) AND ( X_FI_PORTFOLIO_CASH_126.INPUT.I_CURRENCY_ID EQ '&CCY' ) AND ( X_FI_PORTFOLIO_CASH_126.INPUT.I_FROM_DATE EQ DT(&FROM_VALUE_DATE.PLEASE ENTER THE FROM DATE.) ) AND ( X_FI_PORTFOLIO_CASH_126.INPUT.I_TO_DATE EQ DT(&TO_VALUE_DATE.PLEASE ENTER THE TO DATE.) ); ON TABLE SET PAGE-NUM NOLEAD ON TABLE NOTOTAL ON TABLE HOLD AS &TEMP_HOLD_NAME FORMAT &WFFMT ON TABLE SET HTMLCSS ON ON TABLE SET STYLE * INCLUDE = gtms_sty, $ PAGESIZE='A3', SQUEEZE=ON, ORIENTATION=LANDSCAPE, $ ENDSTYLE END
In Focus since 1979///7706m/5 ;wintel 2008/64;OAM security; Oracle db, ///MRE/BID |
DEFINE FILE CAR DC_123/D20.2 = 12345.6; RC_123/D20.2 = 67890.1; END TABLE FILE CAR PRINT CAR.ORIGIN.COUNTRY CAR.COMP.CAR COMPUTE DC/D20.2S = IF DC_123 EQ LAST DC_123 THEN 0 ELSE DC_123; COMPUTE RC/D20.2S = IF RC_123 EQ LAST RC_123 THEN 0 ELSE RC_123; BY CAR.ORIGIN.COUNTRY WHERE CAR.ORIGIN.COUNTRY EQ 'ENGLAND'; ON TABLE NOTOTAL ON TABLE SET STYLE * $ ENDSTYLE END
quote:My users want to see the value of RC in the spot corresponding to ENGLAND/TRIUMPH instead of ENGLAND/JAGUAR.
SET WIDTH = 200, PANEL=200 DEFINE FILE CAR DC_123/D20.2 = 12345.6; RC_123/D20.2 = 67890.1; END TABLE FILE CAR SUM CNT.CAR NOPRINT BY COUNTRY NOPRINT -* PRINT COUNTRY CAR COMPUTE ROWNUM = IF COUNTRY EQ LAST COUNTRY THEN ROWNUM + 1 ELSE 1; NOPRINT COMPUTE DC/D12.2S = IF C1 EQ ROWNUM THEN DC_123 ELSE 0; COMPUTE RC/D12.2S = IF C1 EQ ROWNUM THEN RC_123 ELSE 0; BY COUNTRY NOPRINT BY CAR NOPRINT -* WHERE COUNTRY EQ 'ENGLAND'; ON TABLE NOTOTAL ON TABLE SET ONLINE-FMT STANDARD END
1 PAGE 1 COUNTRY CAR DC RC ------- --- -- -- ENGLAND JAGUAR ENGLAND JENSEN ENGLAND TRIUMPH 12,345.60 67,890.10This message has been edited. Last edited by: David Briars,
TABLE FILE CAR PRINT CAR.COMP.CAR COMPUTE CAR_COUNTER/I9 = IF CAR.ORIGIN.COUNTRY EQ LAST CAR.ORIGIN.COUNTRY THEN CAR_COUNTER + 1 ELSE 0; BY CAR.ORIGIN.COUNTRY ON TABLE HOLD AS HOLD1 END -RUN TABLE FILE CAR SUM CNT.CAR.COMP.CAR BY CAR.ORIGIN.COUNTRY ON TABLE HOLD AS HOLD2 END -RUN JOIN LEFT_OUTER HOLD1.HOLD1.COUNTRY IN HOLD1 TO UNIQUE HOLD2.HOLD2.COUNTRY IN HOLD2 TAG J0 AS J0 END TABLE FILE HOLD1 PRINT HOLD1.HOLD1.COUNTRY HOLD1.HOLD1.CAR COMPUTE DC/D20.2S = IF HOLD1.HOLD1.CAR_COUNTER EQ 0 THEN 12345.6 ELSE 0; COMPUTE RC/D20.2S = IF HOLD1.HOLD1.CAR_COUNTER EQ J0.HOLD2.CAR-1 THEN 67890.1 ELSE 0; ON TABLE SET PAGE-NUM NOLEAD ON TABLE NOTOTAL ON TABLE PCHOLD FORMAT HTML ON TABLE SET HTMLCSS ON ON TABLE SET STYLE * INCLUDE = endeflt, $ ENDSTYLE END
quote:DC is still at the top
SET WIDTH = 200, PANEL=200 DEFINE FILE CAR DC_123/D20.2 = 12345.6; RC_123/D20.2 = 67890.1; END TABLE FILE CAR SUM CNT.CAR NOPRINT BY COUNTRY NOPRINT -* PRINT COUNTRY CAR COMPUTE ROWNUM = IF COUNTRY EQ LAST COUNTRY THEN ROWNUM + 1 ELSE 1; NOPRINT COMPUTE DC/D12.2S = IF ROWNUM EQ 1 THEN DC_123 ELSE 0; COMPUTE RC/D12.2S = IF C1 EQ ROWNUM THEN RC_123 ELSE 0; BY COUNTRY NOPRINT BY CAR NOPRINT -* WHERE COUNTRY EQ 'ENGLAND'; ON TABLE NOTOTAL ON TABLE SET ONLINE-FMT STANDARD END
1 PAGE 1 COUNTRY CAR DC RC ------- --- -- -- ENGLAND JAGUAR 12,345.60 ENGLAND JENSEN ENGLAND TRIUMPH 67,890.10This message has been edited. Last edited by: David Briars,