-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
 

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.10
  

Pilot: WebFOCUS 8.2.06 Test: WebFOCUS 8.1.05M Prod: WebFOCUS 8.1.05M Server: Windows Server 2016/Tomcat Standalone Workstation: Windows 10/IE11+Edge Database: Oracle 12c, Netezza, & MS SQL Server 2019 Output: AHTML/XLSX/HTML/PDF/JSCHART Tools: WFDS, Repository Content, BI Portal Designer & ReportCaster

 
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.10