Focal Point
[Solved] IN FOCUS (not WebFOCUS) creating 2 tab EXCEL output

This topic can be found at:
https://forums.informationbuilders.com/eve/forums/a/tpc/f/7971057331/m/5267038395

November 17, 2010, 11:59 AM
Sandy Weller
[Solved] IN FOCUS (not WebFOCUS) creating 2 tab EXCEL output
My client is a MF FOCUS shop. So ALL solutions must be FOCUS 7.2.2 compatible – not WebFOCUS.

I would like to be able to create, using 2 steps if needed, an EXCEL file with 2 unrelated tabs. That is not as the result of a BY.

While I can use EXL2K they prefer I don't but if that's what it takes I'll do it.


Thanks

This message has been edited. Last edited by: Sandy Weller,


Signature changes from project to project
November 17, 2010, 12:40 PM
Francis Mariani
Using MF FOCUS or WebFOCUS code, you cannot create a multi-tab EXCEL file - you can do this only with EXL2K. You may be able to do something with Visual Basic macros, but how you call those in a MF fex I don't know.


Francis


Give me code, or give me retirement. In FOCUS since 1991

Production: WF 7.7.05M, Dev Studio, BID, MRE, WebSphere, DB2 / Test: WF 8.1.05M, App Studio, BI Portal, Report Caster, jQuery, HighCharts, Apache Tomcat, MS SQL Server
November 17, 2010, 12:49 PM
Tom Flynn
As Francis states, EXL2K is the only way for compound reports.

If you use EXL2K, then try the OPEN/CLOSE technique:

  
TABLE FILE CAR
SUM
  DEALER_COST/P13.2M AS 'Dealer Cost'
  RETAIL_COST/P13.2M AS 'Retail Cost'
    COMPUTE PROFIT/P13.2M = RETAIL_COST-DEALER_COST; AS 'Profit'
  SALES/P13.2M AS 'Sales'
BY COUNTRY AS 'Country'
BY CAR AS 'Car'
BY MODEL AS 'Model'
ON COUNTRY SUBFOOT
" "
ON TABLE SET PAGE-NUM OFF
ON TABLE SET HTMLCSS ON
ON TABLE PCHOLD FORMAT EXL2K OPEN
ON TABLE SET STYLE *
     UNITS=IN,
     PAGESIZE='Letter',
     LEFTMARGIN=0.400000,
     RIGHTMARGIN=0.050000,
     TOPMARGIN=0.000000,
     BOTTOMMARGIN=0.000000,
     ORIENTATION=LANDSCAPE,
     SQUEEZE=ON,
$
TYPE=TITLE,
  STYLE=BOLD, SIZE=10, FONT=VERDANA,
$
TYPE=REPORT, TITLETEXT='Report 1',$
ENDSTYLE
END
-RUN
TABLE FILE CAR
SUM
  DEALER_COST/P13.2M AS 'Dealer Cost'
  RETAIL_COST/P13.2M AS 'Retail Cost'
    COMPUTE PROFIT/P13.2M = RETAIL_COST-DEALER_COST; AS 'Profit'
  SALES/P13.2M AS 'Sales'
  SEATS AS 'Seats'
BY COUNTRY AS 'Country'
BY CAR AS 'Car'
BY MODEL AS 'Model'
BY BODYTYPE AS 'Body Style'
ON COUNTRY SUBFOOT
" "
ON TABLE SET PAGE-NUM OFF
ON TABLE SET HTMLCSS ON
ON TABLE PCHOLD FORMAT EXL2K CLOSE
ON TABLE SET STYLE *
     UNITS=IN,
     PAGESIZE='Letter',
     LEFTMARGIN=0.400000,
     RIGHTMARGIN=0.050000,
     TOPMARGIN=0.000000,
     BOTTOMMARGIN=0.000000,
     ORIENTATION=LANDSCAPE,
     SQUEEZE=ON,
$
TYPE=TITLE,
  STYLE=BOLD, SIZE=10, FONT=VERDANA,
$
TYPE=REPORT, TITLETEXT='Report 2',$
ENDSTYLE
END
-RUN
-EXIT


hth


Tom Flynn
WebFOCUS 8.1.05 - PROD/QA
DB2 - AS400 - Mainframe
November 17, 2010, 01:25 PM
Sandy Weller
OK. Now I get it. MF FOCUS 7.2 does not support OPEN and CLOSE.

ON TABLE PCHOLD AS TEST1 FORMAT EXL2K OPEN
(FOC002) A WORD IS NOT RECOGNIZED: OPEN
(FOC009) INCOMPLETE REQUEST STATEMENT

Thanks for ALL the help.


Signature changes from project to project
November 17, 2010, 10:51 PM
Francis Mariani
It looks like Compound reports in EXL2K format are not available in Mainframe FOCUS. I checked the v7.3 documentation and Compound reports are available for PDF and PS formats only.


Francis


Give me code, or give me retirement. In FOCUS since 1991

Production: WF 7.7.05M, Dev Studio, BID, MRE, WebSphere, DB2 / Test: WF 8.1.05M, App Studio, BI Portal, Report Caster, jQuery, HighCharts, Apache Tomcat, MS SQL Server
November 21, 2010, 11:56 AM
Baillecl
Bonjour,
I think that Focus 7.6."Idon't remember which" is the first version of Focus MF that plays Compound Reports (7.6.11 does. I know because I've been waiting this feature for years. And I still have problem of EBCDIC -> Ascii conversion to actually have it working, but Focus does his job, (Personal worthless advice)
For Old Timers ; The Problems of Conversion :
More over, I'm French and &ecute; (é) and &eInolongerknow (è) are important for us ...
//*-------------------------------------------------------------------- 
//*                                                                     
//* EBCDIC -> ASCII conversion that Excel would appreciate !!!                           
//*     X'15'    -->   X'0A'    ( POUR BOUNDARY ETC ... COMPOUND REPORT)
//*     X'C0'    -->   X'7B'    ( POUR {                                
//*     X'D0'    -->   X'7D'      POUR } (  COMPUTE )  MAIS é, è !!!    
//*                                                                     
//* => ON RENONCE AU COMPUTE ET ON PRIVILéGIE LES ACCENTS ...           
//*     X'C0'    -->   X'E9'    ( POUR é                                
//*     X'D0'    -->   X'E8'      POUR è (  MAIS COMPUTE {, } !!!)  )   
//*                                                                     
//*--------------------------------------------------------------------  

Cordially and Focusely


Focus Mainframe 7.6.11
Dev Studio 7.6.11 and !!!
PC Focus, Focus for OS/2, FFW Six, MSO
November 23, 2010, 02:30 PM
Sandy Weller
As I noted above. The issue is the versio of FOCUS. Compound is not available.

Sandy