Hi,

I am trying to fetch two reports in WORKSHEET 1 and 2 in Excel.

I am getting the following error. Could anyone help me.

(FOC3290) TEMPLATE FILE must be in "Single File Web Page" format

I have created a MHT file in baseapp.

Hello Vinay,
when you save the EXL2K File as an *.mht you can chose in the save as properties "whole work folder" or Range "table". i think you have chosen Range "table". I had the same problem some days ago!!

Christian

Christian,

Are you talking about below properties?

Vinay,
yes!!!! i use a german windows version and was not sure abaout the right translation. you have to chose entire workbook!!

Christian

Christian,

From the beginning i have been using the same settings, still i am getting the same error.

Any other solution?

Vinay,

which Excel Version are you using to build the .mht file. I used 2003, because with 2007 it did not work!!

Christian

I am using 2003 version only!

Vinay,
Can you post your code (or part of it)? Thanks

L

Hi,

Could any one tell me how to do this in mainframe focus?

Excel 2000 doesn't support "Web Archive file format"? Is that true?

Multiple workbooks in Excel

Below code has worked on mainframe focus.

  
TABLE FILE File1                             
PRINT Field1                                    
  ON TABLE HOLD AS OUTPUT1 FORMAT EXL2K OPEN 
  ON TABLE SET STYLE     
  TYPE=REPORT, TITLETEXT='REPORT 1', $             
  TYPE=HEADING, SIZE=18, $               
ENDSTYLE
END                                              
TABLE FILE File2
  PRINT Field2                               
  ON TABLE HOLD AS OUTPUT1 FORMAT EXL2K CLOSE
  ON TABLE SET STYLE 
  TYPE=REPORT, TITLETEXT='REPORT 2', $             
  TYPE=HEADING, SIZE=18, $                         
ENDSTYLE
END                                  
FIN  

Make sure your mht file has at least 2 sheets WITH CONTENTS, or you will get that error.

quote:

Originally posted by N.Selph:
Make sure your mht file has at least 2 sheets WITH CONTENTS, or you will get that error.

With Contents?
You mean to say there should be some data in mht file before executing the procedure?

I recently used Excel Templates and ran into the same error.

N.Selph is correct, you need two worksheets. One where the data (produced by WebFOCUS/FOCUS)will be loaded. The other worksheet will be the formatted end-result that you want the user to see.

On the "formatted" worksheet include some content. Column headers, alternate row colors, etc. Also you will need to reference the cells of the data sheet on the formatted sheet. Something like =Data!A14

Hope this helps.

Hi all,

FYI, info from our internals: The code you are running on the mainframe should also work from WebFOCUS. The ON TABLE SET STYLE needs an ‘*’ after it and I would also change the HOLD to PCHOLD to display the output.

All the comments about having an Excel workbook with 2 sheets with contents is absolutely correct when using Excel Templates. I believe this case is strictly a 2 worksheet compound document and should not need templates.


Cheers,

Kerry

Kerry & Redapple,

sorry, still i haven't understood what you guys meant by content in excel sheet.

Could any one place a screen shot here.

Hi Vinay,

From our internals: This is not an Excel TEMPLATE issue, so don’t worry about the comments regarding the requirements of using Excel Templates until you plan to go that direction.

This code will give you want you are looking for – an excel workbook with 2 worksheets called Report 1 and Report 2.

TABLE FILE CAR                             
PRINT COUNTRY                                    
  ON TABLE PCHOLD AS OUTPUT1 FORMAT EXL2K OPEN 
  ON TABLE SET STYLE *
  TYPE=REPORT, TITLETEXT='REPORT 1', $             
  TYPE=HEADING, SIZE=18, $               
ENDSTYLE
END                                              
TABLE FILE EMPDATA
  PRINT PIN                               
  ON TABLE PCHOLD AS OUTPUT1 FORMAT EXL2K CLOSE
  ON TABLE SET STYLE *
  TYPE=REPORT, TITLETEXT='REPORT 2', $             
  TYPE=HEADING, SIZE=18, $                         
ENDSTYLE
END

Cheers,

Kerry

I already tried that code and it worked for me.

Anyways Thanks Kerry!!

Records: 1 million

How to break the workbook (In Excel) after reaching the max records i.e 65K.

Output:
Workbook 1: 65K records
Workbook 2: 65K records
and so on.

Could any one help me!

Hi Vinay,
TABLE FILE CAR
PRINT *
COMPUTE LINENUM/I9 = LINENUM + 1;
ON TABLE SET ASNAMES ON AND HOLDLIST PRINTONLY
ON TABLE HOLD AS HDFNL
END
-RUN
-SET &LINES_C = &LINES;
-SET &MAXROWS=65000;

-SET &CMPND = IF &LINES_C EQ 0 THEN 'CLOSE' ELSE 'OPEN';
-SET &LOOPNUM = IF &LINES_C GT &MAXROWS THEN 2 ELSE 1;
-REPEAT ENDAIR FOR &CT FROM 1 TO &LOOPNUM
-SET &STDWHERE = IF &CT EQ &LOOPNUM AND &LOOPNUM NE 1 THEN 'WHERE LINENUM GT &MAXROWS.EVAL' ELSE 'WHERE LINENUM LE &MAXROWS.EVAL';
-SET &SHEETNAME = IF &CT EQ &LOOPNUM AND &LOOPNUM NE 1 THEN 'SHEET 2' ELSE 'SHEET 1';
-SET &CMPND = IF &CT NE &LOOPNUM THEN 'OPEN'
-ELSE IF &CT EQ &LOOPNUM AND &CMPND EQ 'CLOSE' THEN 'CLOSE'
-ELSE 'OPEN';
SET COMPOUND = &CMPND.EVAL
TABLE FILE HDFNL
PRINT
*
BY LINENUM NOPRINT
&STDWHERE.EVAL
ON TABLE SET ONLINE-FMT EXL2K
ON TABLE SET STYLE *
TYPE=REPORT, FONT=ARIAL, SIZE=8, TITLETEXT='&SHEETNAME.EVAL',$
TYPE=TITLE, STYLE=BOLD, JUSTIFY=CENTER,$
TYPE=DATA, COLUMN=STMT_DT, JUSTIFY=RIGHT,$
TYPE=DATA, COLUMN=TRANS_DT, JUSTIFY=RIGHT,$
TYPE=DATA, COLUMN=TKT_ISS_DT1, JUSTIFY=RIGHT,$
TYPE=DATA, COLUMN=TRAV_DPRT_DT, JUSTIFY=RIGHT,$
ENDSTYLE
END
-RUN
-ENDAIR

Thanks Shakila! I shall test and let you know! BTW have you tried it?

The contents in the 2 worksheets don't need to be anything more than a label like
"Data will go here" in cell A1 in one sheet, and " " (space) in cell A1 in a second sheet.

Thanks Selph!