To comment on the following update, log in, then open the issue:
http://www.openoffice.org/issues/show_bug.cgi?id=61389
                  Issue #:|61389
                  Summary:|Basic put statement writes wrong, if used with
                          |literals
                Component:|framework
                  Version:|OOo 2.0.1
                 Platform:|PC
                      URL:|
               OS/Version:|Windows XP
                   Status:|UNCONFIRMED
        Status whiteboard:|
                 Keywords:|
               Resolution:|
               Issue type:|DEFECT
                 Priority:|P3
             Subcomponent:|code
              Assigned to:|tm
              Reported by:|regina





------- Additional comments from [EMAIL PROTECTED] Mon Jan 30 11:23:42 -0800 
2006 -------
Compare the macros
(1)
Dim iNumber as integer
Dim iwert as integer
Dim sfile as string
sFile="c:\daten.txt"
iNumber=FreeFile
open sfile For Random As iNumber len=2
iwert=234
Put #iNumber,1,iwert
close #iNumber

(2)
Dim iNumber as integer
Dim iwert as integer
Dim sfile as string
sFile="c:\daten.txt"
iNumber=FreeFile
open sfile For Random As iNumber len=2
Put #iNumber,1,234  rem also wrong with Cint(234)
close #iNumber

Macro (1) creates a file with EA 00, Macro (2) creates 02 00 EA 00, which has
two additional bytes.

The same error occurs, if you use strings. Put-statement with constant "ab"
creates 08 00 02 00 61 61, which are two additional bytes, compared with using a
variable with value "ab" which gives 02 00 61 62.

The behavior of (1) is correct and can be read back with get.

---------------------------------------------------------------------
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]

Reply via email to