Re: MIDRANGE-L Digest, Vol 5, Issue 1093

Peter:

You coded:

...
1340.00 D wwFile          s                   like(jFileOutputStream)
...
1346.00     wwFile  = new_FileInputStream(wwStr); 

Is it possible that your problem is that
     FileInputStream
is incompatible with
     FileOutputStream
?

Dave Schnee
Barsa Consulting Group

- - - - - - -   Peter Dow wrote  - - - - - - -

From: "Peter Dow (ML)" <maillist@xxxxxxxxxxxxxxx>
To: "Midrange Systems Technical Discussion" <midrange-l@xxxxxxxxxxxx>
Sent: 26. maj 2006 23:06
Subject: STRDBG/ENDDBG required to prevent Java open exception


> Hi Everyone,
> 
> When running an RPGLE program that uses POI HSSF via Scott Klement's 
> service program HSSFR4 (thanks Scott!) I get the following:
> 
> Cause . . . . . : RPG procedure HSSF_OPEN in program POI.HSSF/HSSFR4 
> received Java exception "java.io.IOException:" when calling method 
> "<init>" with signature "(Ljava.io.InputStream;)V" in class 
> "org.apache.poi.poifs.filesystem.POIFSFileSystem".
> 
> I didn't find anything in the archives about it, but I did see this 
> recent (03/27/2006 - 04/05/2006) thread 
> (http://www.iseriesnetwork.com/isnetforums/showthread.php?t=43986) which 

> ended with Scott K indicating he was unable to pin down the problem. 
> I'm using the workaround of STRDBG/ENDDBG before running the RPGLE 
> program, but that just seems...what's the word?...kludgy?
> 
> Since I only saw this at iSeriesNetwork, I figured it might be worth 
> posting over here to see if anyone can shed some light on the problem.
> 
> I did notice that it occurs at stmt 1346.00 in the HSSFR4 service 
program:
> 
> 1314.00 D new_FileInputStream... 
> 1315.00 D                 pr              O   extproc(*JAVA 
> 1316.00 D                                     :'java.io.FileInputStream'
> 1317.00 D                                     : *CONSTRUCTOR) 
> 1318.00 D  filename                           like(jString) const 
> ...
> 1339.00 D wwStr           s                   like(jString) 
> 1340.00 D wwFile          s                   like(jFileOutputStream)
> 1341.00 D wwPOIFS         s                   like(POIFSFileSystem) 
> 1342.00 D wwBook          s                   like(HSSFWorkbook) 
> 1343.00 
> 1344.00  /free 
> 1345.00     wwStr   = new_String(peFilename); 
> 1346.00     wwFile  = new_FileInputStream(wwStr); 
> 1347.00     wwPOIFS = new_POIFSFileSystem(wwFile); 
> 1348.00     wwBook  = new_HSSFWorkbookFromPOIFS(wwPOIFS); 
> 
> The workaround seems pretty reliable, but not very elegant.
> 
> *Peter Dow* /