To comment on the following update, log in, then open the issue: http://www.openoffice.org/issues/show_bug.cgi?id=99067 Issue #|99067 Summary|Put statement failing for large Binary or Random acces |s files. Component|Spreadsheet Version|OOo 3.0 Platform|PC URL| OS/Version|Windows XP Status|UNCONFIRMED Status whiteboard| Keywords| Resolution| Issue type|DEFECT Priority|P3 Subcomponent|programming Assigned to|spreadsheet Reported by|bjoennungen
------- Additional comments from [email protected] Tue Feb 10 07:18:46 +0000 2009 ------- I am trying to make a file of binary values that is calculated in calc using ooo basic. It is a large number of samples, 62400. It works fine for some samples and it fails and stop writing to the file. I view the file using BinView, and I see that even though it runs the complete For...Next loop below, only the first ~14000 samples opening the file in "Random" (each sample is a total of 4 bytes). I tried opening the file for "Binary" as well, but then it stop after around 90 samples. In both cases it finishes the file correctly; it adds the "}" at the end of the file (after the For Next loop, see below) Basic macro: ...... OutputLine = "{WAVEFORM-" + NumberOfSampleBytes + ": #" Open Filename For Random As #Fn Put #Fn,,Outputline For RowNumber= 9 To (8+NumberOfSamples) CellI = Sheet.getCellByPosition(8,RowNumber) CellQ = Sheet.getCellByPosition(10,RowNumber) IchMSBValue = CellI.getValue QchMSBValue = CellQ.getValue CellI = Sheet.getCellByPosition(9,RowNumber) CellQ = Sheet.getCellByPosition(11,RowNumber) IchLSBValue = CellI.getValue QchLSBValue = CellQ.getValue bbuf=CByte(IchMSBValue) Put #Fn,,bbuf bbuf=CByte(IchLSBValue) Put #Fn,,bbuf bbuf=CByte(QchMSBValue) Put #Fn,,bbuf bbuf=CByte(QchLSBValue) Put #Fn,,bbuf Next RowNumber Put #Fn,, "}" Close #Fn ...... --------------------------------------------------------------------- Please do not reply to this automatically generated notification from Issue Tracker. Please log onto the website and enter your comments. http://qa.openoffice.org/issue_handling/project_issues.html#notification --------------------------------------------------------------------- To unsubscribe, e-mail: [email protected] For additional commands, e-mail: [email protected] --------------------------------------------------------------------- To unsubscribe, e-mail: [email protected] For additional commands, e-mail: [email protected]
