diff options
| author | Rüdiger Timm <rt@openoffice.org> | 2004-11-26 13:50:14 +0000 |
|---|---|---|
| committer | Rüdiger Timm <rt@openoffice.org> | 2004-11-26 13:50:14 +0000 |
| commit | 7fc81eea6a91fca10c4e5b28601ebcf63fff2c03 (patch) | |
| tree | 8d23ec072d5abf909fac6cf95d9d94051202f4c1 | |
| parent | 087c64cd757fcd338261be1172c44511b6ac4700 (diff) | |
INTEGRATION: CWS helpcontentbeta (1.1.2); FILE MERGED
2004/09/16 11:45:16 fpe 1.1.2.1: Regular Update
| -rwxr-xr-x | helpcontent2/source/text/sbasic/shared/03020202.xhp | 112 | ||||
| -rwxr-xr-x | helpcontent2/source/text/sbasic/shared/03020203.xhp | 85 | ||||
| -rwxr-xr-x | helpcontent2/source/text/sbasic/shared/03020204.xhp | 101 | ||||
| -rwxr-xr-x | helpcontent2/source/text/sbasic/shared/03020205.xhp | 69 | ||||
| -rwxr-xr-x | helpcontent2/source/text/sbasic/shared/03020301.xhp | 92 | ||||
| -rwxr-xr-x | helpcontent2/source/text/sbasic/shared/03020302.xhp | 45 |
6 files changed, 267 insertions, 237 deletions
diff --git a/helpcontent2/source/text/sbasic/shared/03020202.xhp b/helpcontent2/source/text/sbasic/shared/03020202.xhp index b524fc9c3e..c25324c48d 100755 --- a/helpcontent2/source/text/sbasic/shared/03020202.xhp +++ b/helpcontent2/source/text/sbasic/shared/03020202.xhp @@ -52,58 +52,80 @@ * Contributor(s): _______________________________________ * * - ************************************************************************--><helpdocument version="1.0"> + ************************************************************************--> + +<helpdocument version="1.0"> <meta> <topic id="textsbasicshared03020202xml" indexer="include" status="PUBLISH"> -<title xml-lang="en-US" id="tit">Input# Statement [Runtime]</title> +<title id="tit" xml-lang="en-US">Input# Statement [Runtime]</title> <filename>/text/sbasic/shared/03020202.xhp</filename> </topic> <history> <created date="2003-10-31T00:00:00">Sun Microsystems, Inc.</created> -<lastedited date="2003-10-31T00:00:00">converted from old format - fpe</lastedited> +<lastedited date="2004-09-01T15:23:04">converted from old format - fpe</lastedited> </history> </meta> <body> - - - <section id="input"> - <bookmark xml-lang="en-US" branch="index" id="bm_id3154908"><bookmark_value>Input;function</bookmark_value></bookmark><paragraph id="hd_id3154908" role="heading" level="1" oldref="1" l10n="U" xml-lang="en-US"><link href="text/sbasic/shared/03020202.xhp" name="Input# Statement [Runtime]">Input# Statement [Runtime]</link></paragraph> - <paragraph role="paragraph" id="par_id3156424" l10n="U" xml-lang="en-US" oldref="2">Reads data from an open sequential file.</paragraph> - </section> - <paragraph role="heading" level="2" id="hd_id3125863" l10n="U" xml-lang="en-US" oldref="3">Syntax:</paragraph> - <paragraph role="paragraph" id="par_id3150440" l10n="U" xml-lang="en-US" oldref="4">Input #FileNumber As Integer; var1[, var2[, var3[,...]]]</paragraph> - <paragraph role="heading" level="2" id="hd_id3146121" l10n="U" xml-lang="en-US" oldref="5">Parameters:</paragraph> - <paragraph l10n="U" role="paragraph" id="par_id3145749" xml-lang="en-US" oldref="6"><emph>FileNumber:</emph> Number of the file that contains the data that you want to read. The file must be opened with the Open statement using the key word INPUT.</paragraph> - <paragraph l10n="U" role="paragraph" id="par_id3150011" xml-lang="en-US" oldref="7"><emph>var:</emph> A numeric or string variable that you assign the values read from the opened file to.</paragraph> - <paragraph xml-lang="en-US" role="paragraph" id="par_id3159153" l10n="U" oldref="8">The <emph>Input#</emph> statement reads numeric values or strings from an open file and assigns the data to one or more variables. A numeric variable is read up to the first carriage return (Asc=13), line feed (Asc=10), space, or comma. String variables are read to up to the first carriage return (Asc=13), line feed (Asc=10), or comma.</paragraph> - <paragraph role="paragraph" id="par_id3146984" l10n="U" xml-lang="en-US" oldref="9">Data and data types in the opened file must appear in the same order as the variables that are passed in the "var" parameter. If you assign non-numeric values to a numeric variable, "var" is assigned a value of "0".</paragraph> - <paragraph xml-lang="en-US" role="paragraph" id="par_id3156442" l10n="U" oldref="10">Records that are separated by commas, commas cannot be assigned to a string variable. Quotation marks (") in the file are disregarded as well. If you want to read these characters from the file, use the <emph>Line Input#</emph> statement to read pure text files (files containing only printable characters) line by line.</paragraph> - <paragraph role="paragraph" id="par_id3147349" l10n="U" xml-lang="en-US" oldref="11">If the end of the file is reached while reading a data element, an error occurs and the process is aborted.</paragraph> - <paragraph role="heading" level="2" id="hd_id3152578" l10n="U" xml-lang="en-US" oldref="12">Example:</paragraph> - <paragraph role="paragraph" id="par_id3144765" l10n="U" xml-lang="en-US" oldref="13">Sub ExampleWorkWithAFile</paragraph> - <paragraph role="paragraph" id="par_id3145799" l10n="U" xml-lang="en-US" oldref="14">Dim iNumber As Integer</paragraph> - <paragraph role="paragraph" id="par_id3145252" l10n="U" xml-lang="en-US" oldref="15">Dim sLine As String</paragraph> - <paragraph role="paragraph" id="par_id3149410" l10n="U" xml-lang="en-US" oldref="16">Dim aFile As String</paragraph> - <paragraph role="paragraph" id="par_id3149959" l10n="U" xml-lang="en-US" oldref="39">Dim sMsg as String</paragraph> - <paragraph role="paragraph" id="par_id3153417" l10n="U" xml-lang="en-US" oldref="17">aFile = "c:\data.txt"</paragraph> - - <paragraph role="paragraph" id="par_id3150752" l10n="U" xml-lang="en-US" oldref="19">iNumber = Freefile</paragraph> - <paragraph role="paragraph" id="par_id3153707" l10n="U" xml-lang="en-US" oldref="20">Open aFile For Output As #iNumber</paragraph> - <paragraph role="paragraph" id="par_id3150321" l10n="U" xml-lang="en-US" oldref="21">Print #iNumber, "This is a line of text"</paragraph> - <paragraph role="paragraph" id="par_id3154756" l10n="U" xml-lang="en-US" oldref="22">Print #iNumber, "This is another line of text"</paragraph> - <paragraph role="paragraph" id="par_id3148408" l10n="U" xml-lang="en-US" oldref="23">Close #iNumber</paragraph> - - <paragraph role="paragraph" id="par_id3155937" l10n="U" xml-lang="en-US" oldref="27">iNumber = Freefile</paragraph> - <paragraph role="paragraph" id="par_id3154702" l10n="U" xml-lang="en-US" oldref="28">Open aFile For Input As iNumber</paragraph> - <paragraph role="paragraph" id="par_id3155959" l10n="U" xml-lang="en-US" oldref="29">While not eof(iNumber)</paragraph> - <paragraph role="paragraph" id="par_id3145232" l10n="U" xml-lang="en-US" oldref="30">Line Input #iNumber, sLine</paragraph> - <paragraph role="paragraph" id="par_id3147345" l10n="U" xml-lang="en-US" oldref="31">If sLine <>"" then</paragraph> - <paragraph role="paragraph" id="par_id3150298" l10n="U" xml-lang="en-US" oldref="32">sMsg = sMsg & sLine & chr(13)</paragraph> - <paragraph role="paragraph" id="par_id3154021" l10n="U" xml-lang="en-US" oldref="34">end if</paragraph> - <paragraph role="paragraph" id="par_id3154665" l10n="U" xml-lang="en-US" oldref="35">wend</paragraph> - <paragraph role="paragraph" id="par_id3155607" l10n="U" xml-lang="en-US" oldref="36">Close #iNumber</paragraph> - <paragraph role="paragraph" id="par_id3153268" l10n="U" xml-lang="en-US" oldref="40">Msgbox sMsg</paragraph> - <paragraph role="paragraph" id="par_id3152584" l10n="U" xml-lang="en-US" oldref="37">End Sub</paragraph> - - </body> +<section id="input"> +<bookmark xml-lang="en-US" branch="index" id="bm_id3154908"><bookmark_value>Input statement</bookmark_value> +</bookmark> +<paragraph role="heading" id="hd_id3154908" xml-lang="en-US" level="1" l10n="U" oldref="1"><link href="text/sbasic/shared/03020202.xhp" name="Input# Statement [Runtime]">Input# Statement [Runtime]</link></paragraph> +<paragraph role="paragraph" id="par_id3156424" xml-lang="en-US" l10n="U" oldref="2">Reads data from an open sequential file.</paragraph> +</section> +<paragraph role="heading" id="hd_id3125863" xml-lang="en-US" level="2" l10n="U" oldref="3">Syntax:</paragraph> +<paragraph role="code" id="par_id3150440" xml-lang="en-US" l10n="U" oldref="4">Input #FileNumber As Integer; var1[, var2[, var3[,...]]]</paragraph> +<paragraph role="heading" id="hd_id3146121" xml-lang="en-US" level="2" l10n="U" oldref="5">Parameters:</paragraph> +<paragraph role="paragraph" id="par_id3145749" xml-lang="en-US" l10n="U" oldref="6"> +<emph>FileNumber:</emph> Number of the file that contains the data that you want to read. The file must be opened with the Open statement using the key word INPUT.</paragraph> +<paragraph role="paragraph" id="par_id3150011" xml-lang="en-US" l10n="U" oldref="7"> +<emph>var:</emph> A numeric or string variable that you assign the values read from the opened file to.</paragraph> +<paragraph role="paragraph" id="par_id3159153" xml-lang="en-US" l10n="U" oldref="8">The <emph>Input#</emph> statement reads numeric values or strings from an open file and assigns the data to one or more variables. A numeric variable is read up to the first carriage return (Asc=13), line feed (Asc=10), space, or comma. String variables are read to up to the first carriage return (Asc=13), line feed (Asc=10), or comma.</paragraph> +<paragraph role="paragraph" id="par_id3146984" xml-lang="en-US" l10n="U" oldref="9">Data and data types in the opened file must appear in the same order as the variables that are passed in the "var" parameter. If you assign non-numeric values to a numeric variable, "var" is assigned a value of "0".</paragraph> +<paragraph role="paragraph" id="par_id3156442" xml-lang="en-US" l10n="U" oldref="10">Records that are separated by commas, commas cannot be assigned to a string variable. Quotation marks (") in the file are disregarded as well. If you want to read these characters from the file, use the <emph>Line Input#</emph> statement to read pure text files (files containing only printable characters) line by line.</paragraph> +<paragraph role="paragraph" id="par_id3147349" xml-lang="en-US" l10n="U" oldref="11">If the end of the file is reached while reading a data element, an error occurs and the process is aborted.</paragraph> +<paragraph role="heading" id="hd_id3152578" xml-lang="en-US" level="2" l10n="U" oldref="12">Example:</paragraph> +<paragraph role="code" id="par_id3144765" xml-lang="en-US" l10n="U" oldref="13">Sub ExampleWorkWithAFile</paragraph> +<paragraph role="code" id="par_id3145799" xml-lang="en-US" l10n="U" oldref="14">Dim iNumber As Integer</paragraph> +<paragraph role="code" id="par_id3145252" xml-lang="en-US" l10n="U" oldref="15">Dim sLine As String</paragraph> +<paragraph role="code" id="par_id3149410" xml-lang="en-US" l10n="U" oldref="16">Dim aFile As String</paragraph> +<paragraph role="code" id="par_id3149959" xml-lang="en-US" l10n="U" oldref="39">Dim sMsg as String</paragraph> +<paragraph role="code" id="par_id3153417" xml-lang="en-US" l10n="U" oldref="17">aFile = "c:\data.txt"</paragraph> +<paragraph role="code" id="par_id3150752" xml-lang="en-US" l10n="U" oldref="19">iNumber = Freefile</paragraph> +<paragraph role="code" id="par_id3153707" xml-lang="en-US" l10n="U" oldref="20">Open aFile For Output As #iNumber</paragraph> +<paragraph role="code" id="par_id3150321" xml-lang="en-US" l10n="U" oldref="21">Print #iNumber, "This is a line of text"</paragraph> +<paragraph role="code" id="par_id3154756" xml-lang="en-US" l10n="U" oldref="22">Print #iNumber, "This is another line of text"</paragraph> +<paragraph role="code" id="par_id3148408" xml-lang="en-US" l10n="U" oldref="23">Close #iNumber</paragraph> +<paragraph role="code" id="par_id3155937" xml-lang="en-US" l10n="U" oldref="27">iNumber = Freefile</paragraph> +<paragraph role="code" id="par_id3154702" xml-lang="en-US" l10n="U" oldref="28">Open aFile For Input As iNumber</paragraph> +<paragraph role="code" id="par_id3155959" xml-lang="en-US" l10n="U" oldref="29">While not eof(iNumber)</paragraph> +<paragraph role="code" id="par_id3145232" xml-lang="en-US" l10n="U" oldref="30">Line Input #iNumber, sLine</paragraph> +<paragraph role="code" id="par_id3147345" xml-lang="en-US" l10n="U" oldref="31">If sLine <>"" then</paragraph> +<paragraph role="code" id="par_id3150298" xml-lang="en-US" l10n="U" oldref="32">sMsg = sMsg & sLine & chr(13)</paragraph> +<paragraph role="code" id="par_id3154021" xml-lang="en-US" l10n="U" oldref="34">end if</paragraph> +<paragraph role="code" id="par_id3154665" xml-lang="en-US" l10n="U" oldref="35">wend</paragraph> +<paragraph role="code" id="par_id3155607" xml-lang="en-US" l10n="U" oldref="36">Close #iNumber</paragraph> +<paragraph role="code" id="par_id3153268" xml-lang="en-US" l10n="U" oldref="40">Msgbox sMsg</paragraph> +<paragraph role="code" id="par_id3152584" xml-lang="en-US" l10n="U" oldref="37">End SubSub ExampleWorkWithAFile</paragraph> +<paragraph role="code" id="par_id3145799" xml-lang="en-US" l10n="U" oldref="14">Dim iNumber As Integer</paragraph> +<paragraph role="code" id="par_id3145252" xml-lang="en-US" l10n="U" oldref="15">Dim sLine As String</paragraph> +<paragraph role="code" id="par_id3149410" xml-lang="en-US" l10n="U" oldref="16">Dim aFile As String</paragraph> +<paragraph role="code" id="par_id3149959" xml-lang="en-US" l10n="U" oldref="39">Dim sMsg as String</paragraph> +<paragraph role="code" id="par_id3153417" xml-lang="en-US" l10n="U" oldref="17">aFile = "c:\data.txt"</paragraph> +<paragraph role="code" id="par_id3150752" xml-lang="en-US" l10n="U" oldref="19">iNumber = Freefile</paragraph> +<paragraph role="code" id="par_id3153707" xml-lang="en-US" l10n="U" oldref="20">Open aFile For Output As #iNumber</paragraph> +<paragraph role="code" id="par_id3150321" xml-lang="en-US" l10n="U" oldref="21">Print #iNumber, "This is a line of text"</paragraph> +<paragraph role="code" id="par_id3154756" xml-lang="en-US" l10n="U" oldref="22">Print #iNumber, "This is another line of text"</paragraph> +<paragraph role="code" id="par_id3148408" xml-lang="en-US" l10n="U" oldref="23">Close #iNumber</paragraph> +<paragraph role="code" id="par_id3155937" xml-lang="en-US" l10n="U" oldref="27">iNumber = Freefile</paragraph> +<paragraph role="code" id="par_id3154702" xml-lang="en-US" l10n="U" oldref="28">Open aFile For Input As iNumber</paragraph> +<paragraph role="code" id="par_id3155959" xml-lang="en-US" l10n="U" oldref="29">While not eof(iNumber)</paragraph> +<paragraph role="code" id="par_id3145232" xml-lang="en-US" l10n="U" oldref="30">Line Input #iNumber, sLine</paragraph> +<paragraph role="code" id="par_id3147345" xml-lang="en-US" l10n="U" oldref="31">If sLine <>"" then</paragraph> +<paragraph role="code" id="par_id3150298" xml-lang="en-US" l10n="U" oldref="32">sMsg = sMsg & sLine & chr(13)</paragraph> +<paragraph role="code" id="par_id3154021" xml-lang="en-US" l10n="U" oldref="34">end if</paragraph> +<paragraph role="code" id="par_id3154665" xml-lang="en-US" l10n="U" oldref="35">wend</paragraph> +<paragraph role="code" id="par_id3155607" xml-lang="en-US" l10n="U" oldref="36">Close #iNumber</paragraph> +<paragraph role="code" id="par_id3153268" xml-lang="en-US" l10n="U" oldref="40">Msgbox sMsg</paragraph> +<paragraph role="code" id="par_id3152584" xml-lang="en-US" l10n="U" oldref="37">End Sub</paragraph> +</body> </helpdocument> diff --git a/helpcontent2/source/text/sbasic/shared/03020203.xhp b/helpcontent2/source/text/sbasic/shared/03020203.xhp index 3a12b97e51..9971597f7f 100755 --- a/helpcontent2/source/text/sbasic/shared/03020203.xhp +++ b/helpcontent2/source/text/sbasic/shared/03020203.xhp @@ -52,55 +52,56 @@ * Contributor(s): _______________________________________ * * - ************************************************************************--><helpdocument version="1.0"> + ************************************************************************--> + +<helpdocument version="1.0"> <meta> <topic id="textsbasicshared03020203xml" indexer="include" status="PUBLISH"> -<title xml-lang="en-US" id="tit">Line Input # Statement [Runtime]</title> +<title id="tit" xml-lang="en-US">Line Input # Statement [Runtime]</title> <filename>/text/sbasic/shared/03020203.xhp</filename> </topic> <history> <created date="2003-10-31T00:00:00">Sun Microsystems, Inc.</created> -<lastedited date="2003-10-31T00:00:00">converted from old format - fpe</lastedited> +<lastedited date="2004-09-01T15:23:15">converted from old format - fpe</lastedited> </history> </meta> <body> - - - <section id="lineinput"> - <bookmark xml-lang="en-US" branch="index" id="bm_id3153361"><bookmark_value>Line;function</bookmark_value></bookmark><paragraph id="hd_id3153361" role="heading" level="1" oldref="1" l10n="U" xml-lang="en-US"><link href="text/sbasic/shared/03020203.xhp" name="Line Input # Statement [Runtime]">Line Input # Statement [Runtime]</link></paragraph> - <paragraph role="paragraph" id="par_id3156280" l10n="U" xml-lang="en-US" oldref="2">Reads strings from a sequential file into a variable.</paragraph> - </section> - <paragraph role="heading" level="2" id="hd_id3150447" l10n="U" xml-lang="en-US" oldref="3">Syntax:</paragraph> - <paragraph role="paragraph" id="par_id3147229" l10n="U" xml-lang="en-US" oldref="4">Line Input #FileNumber As Integer, Var As String </paragraph> - <paragraph role="heading" level="2" id="hd_id3145173" l10n="U" xml-lang="en-US" oldref="5">Parameters:</paragraph> - <paragraph l10n="U" role="paragraph" id="par_id3161832" xml-lang="en-US" oldref="6"><emph>FileNumber: </emph>Number of the file that contains the data that you want to read. The file must have been opened in advance with the Open statement using the key word READ.</paragraph> - <paragraph l10n="U" role="paragraph" id="par_id3151119" xml-lang="en-US" oldref="7"><emph>var:</emph> The name of the variable that stores the result.</paragraph> - <paragraph xml-lang="en-US" role="paragraph" id="par_id3150010" l10n="U" oldref="8">With the <emph>Line Input#</emph> statement, you can read strings from an open file into a variable. String variables are read line-by-line up to the first carriage return (Asc=13) or linefeed (Asc=10). Line end marks are not included in the resulting string.</paragraph> - <paragraph role="heading" level="2" id="hd_id3163711" l10n="U" xml-lang="en-US" oldref="9">Example:</paragraph> - <paragraph role="paragraph" id="par_id3145271" l10n="U" xml-lang="en-US" oldref="10">Sub ExampleWorkWithAFile</paragraph> - <paragraph role="paragraph" id="par_id3156444" l10n="U" xml-lang="en-US" oldref="11">Dim iNumber As Integer</paragraph> - <paragraph role="paragraph" id="par_id3147349" l10n="U" xml-lang="en-US" oldref="12">Dim sLine As String</paragraph> - <paragraph role="paragraph" id="par_id3149664" l10n="U" xml-lang="en-US" oldref="13">Dim aFile As String</paragraph> - <paragraph role="paragraph" id="par_id3147436" l10n="U" xml-lang="en-US" oldref="36">Dim sMsg as String</paragraph> - <paragraph role="paragraph" id="par_id3154730" l10n="U" xml-lang="en-US" oldref="14">aFile = "c:\data.txt"</paragraph> - - <paragraph role="paragraph" id="par_id3145647" l10n="U" xml-lang="en-US" oldref="16">iNumber = Freefile</paragraph> - <paragraph role="paragraph" id="par_id3149959" l10n="U" xml-lang="en-US" oldref="17">Open aFile For Output As #iNumber</paragraph> - <paragraph role="paragraph" id="par_id3147124" l10n="U" xml-lang="en-US" oldref="18">Print #iNumber, "This is a line of text"</paragraph> - <paragraph role="paragraph" id="par_id3153415" l10n="U" xml-lang="en-US" oldref="19">Print #iNumber, "This is another line of text"</paragraph> - <paragraph role="paragraph" id="par_id3146969" l10n="U" xml-lang="en-US" oldref="20">Close #iNumber</paragraph> - - <paragraph role="paragraph" id="par_id3154482" l10n="U" xml-lang="en-US" oldref="24">iNumber = Freefile</paragraph> - <paragraph role="paragraph" id="par_id3150321" l10n="U" xml-lang="en-US" oldref="25">Open aFile For Input As iNumber</paragraph> - <paragraph role="paragraph" id="par_id3155443" l10n="U" xml-lang="en-US" oldref="26">While not eof(iNumber)</paragraph> - <paragraph role="paragraph" id="par_id3155764" l10n="U" xml-lang="en-US" oldref="27">Line Input #iNumber, sLine</paragraph> - <paragraph role="paragraph" id="par_id3156382" l10n="U" xml-lang="en-US" oldref="28">If sLine <>"" then</paragraph> - <paragraph role="paragraph" id="par_id3147338" l10n="U" xml-lang="en-US" oldref="29">sMsg = sMsg & sLine & chr(13)</paragraph> - <paragraph role="paragraph" id="par_id3147362" l10n="U" xml-lang="en-US" oldref="31">end if</paragraph> - <paragraph role="paragraph" id="par_id3155333" l10n="U" xml-lang="en-US" oldref="32">wend</paragraph> - <paragraph role="paragraph" id="par_id3153965" l10n="U" xml-lang="en-US" oldref="33">Close #iNumber</paragraph> - <paragraph role="paragraph" id="par_id3147345" l10n="U" xml-lang="en-US" oldref="37">Msgbox sMsg</paragraph> - <paragraph role="paragraph" id="par_id3149257" l10n="U" xml-lang="en-US" oldref="34">End Sub</paragraph> - - </body> +<section id="lineinput"> +<bookmark xml-lang="en-US" branch="index" id="bm_id3153361"><bookmark_value>Line function</bookmark_value> +</bookmark> +<paragraph role="heading" id="hd_id3153361" xml-lang="en-US" level="1" l10n="U" oldref="1"><link href="text/sbasic/shared/03020203.xhp" name="Line Input # Statement [Runtime]">Line Input # Statement [Runtime]</link></paragraph> +<paragraph role="paragraph" id="par_id3156280" xml-lang="en-US" l10n="U" oldref="2">Reads strings from a sequential file into a variable.</paragraph> +</section> +<paragraph role="heading" id="hd_id3150447" xml-lang="en-US" level="2" l10n="U" oldref="3">Syntax:</paragraph> +<paragraph role="code" id="par_id3147229" xml-lang="en-US" l10n="U" oldref="4">Line Input #FileNumber As Integer, Var As String </paragraph> +<paragraph role="heading" id="hd_id3145173" xml-lang="en-US" level="2" l10n="U" oldref="5">Parameters:</paragraph> +<paragraph role="paragraph" id="par_id3161832" xml-lang="en-US" l10n="U" oldref="6"> +<emph>FileNumber: </emph>Number of the file that contains the data that you want to read. The file must have been opened in advance with the Open statement using the key word READ.</paragraph> +<paragraph role="paragraph" id="par_id3151119" xml-lang="en-US" l10n="U" oldref="7"> +<emph>var:</emph> The name of the variable that stores the result.</paragraph> +<paragraph role="paragraph" id="par_id3150010" xml-lang="en-US" l10n="U" oldref="8">With the <emph>Line Input#</emph> statement, you can read strings from an open file into a variable. String variables are read line-by-line up to the first carriage return (Asc=13) or linefeed (Asc=10). Line end marks are not included in the resulting string.</paragraph> +<paragraph role="heading" id="hd_id3163711" xml-lang="en-US" level="2" l10n="U" oldref="9">Example:</paragraph> +<paragraph role="code" id="par_id3145271" xml-lang="en-US" l10n="U" oldref="10">Sub ExampleWorkWithAFile</paragraph> +<paragraph role="code" id="par_id3156444" xml-lang="en-US" l10n="U" oldref="11">Dim iNumber As Integer</paragraph> +<paragraph role="code" id="par_id3147349" xml-lang="en-US" l10n="U" oldref="12">Dim sLine As String</paragraph> +<paragraph role="code" id="par_id3149664" xml-lang="en-US" l10n="U" oldref="13">Dim aFile As String</paragraph> +<paragraph role="code" id="par_id3147436" xml-lang="en-US" l10n="U" oldref="36">Dim sMsg as String</paragraph> +<paragraph role="code" id="par_id3154730" xml-lang="en-US" l10n="U" oldref="14">aFile = "c:\data.txt"</paragraph> +<paragraph role="code" id="par_id3145647" xml-lang="en-US" l10n="U" oldref="16">iNumber = Freefile</paragraph> +<paragraph role="code" id="par_id3149959" xml-lang="en-US" l10n="U" oldref="17">Open aFile For Output As #iNumber</paragraph> +<paragraph role="code" id="par_id3147124" xml-lang="en-US" l10n="U" oldref="18">Print #iNumber, "This is a line of text"</paragraph> +<paragraph role="code" id="par_id3153415" xml-lang="en-US" l10n="U" oldref="19">Print #iNumber, "This is another line of text"</paragraph> +<paragraph role="code" id="par_id3146969" xml-lang="en-US" l10n="U" oldref="20">Close #iNumber</paragraph> +<paragraph role="code" id="par_id3154482" xml-lang="en-US" l10n="U" oldref="24">iNumber = Freefile</paragraph> +<paragraph role="code" id="par_id3150321" xml-lang="en-US" l10n="U" oldref="25">Open aFile For Input As iNumber</paragraph> +<paragraph role="code" id="par_id3155443" xml-lang="en-US" l10n="U" oldref="26">While not eof(iNumber)</paragraph> +<paragraph role="code" id="par_id3155764" xml-lang="en-US" l10n="U" oldref="27">Line Input #iNumber, sLine</paragraph> +<paragraph role="code" id="par_id3156382" xml-lang="en-US" l10n="U" oldref="28">If sLine <>"" then</paragraph> +<paragraph role="code" id="par_id3147338" xml-lang="en-US" l10n="U" oldref="29">sMsg = sMsg & sLine & chr(13)</paragraph> +<paragraph role="code" id="par_id3147362" xml-lang="en-US" l10n="U" oldref="31">end if</paragraph> +<paragraph role="code" id="par_id3155333" xml-lang="en-US" l10n="U" oldref="32">wend</paragraph> +<paragraph role="code" id="par_id3153965" xml-lang="en-US" l10n="U" oldref="33">Close #iNumber</paragraph> +<paragraph role="code" id="par_id3147345" xml-lang="en-US" l10n="U" oldref="37">Msgbox sMsg</paragraph> +<paragraph role="code" id="par_id3149257" xml-lang="en-US" l10n="U" oldref="34">End Sub</paragraph> +</body> </helpdocument> diff --git a/helpcontent2/source/text/sbasic/shared/03020204.xhp b/helpcontent2/source/text/sbasic/shared/03020204.xhp index 4ef0a0efff..3fc9226de8 100755 --- a/helpcontent2/source/text/sbasic/shared/03020204.xhp +++ b/helpcontent2/source/text/sbasic/shared/03020204.xhp @@ -52,63 +52,64 @@ * Contributor(s): _______________________________________ * * - ************************************************************************--><helpdocument version="1.0"> + ************************************************************************--> + +<helpdocument version="1.0"> <meta> <topic id="textsbasicshared03020204xml" indexer="include" status="PUBLISH"> -<title xml-lang="en-US" id="tit">Put Statement [Runtime]</title> +<title id="tit" xml-lang="en-US">Put Statement [Runtime]</title> <filename>/text/sbasic/shared/03020204.xhp</filename> </topic> <history> <created date="2003-10-31T00:00:00">Sun Microsystems, Inc.</created> -<lastedited date="2003-10-31T00:00:00">converted from old format - fpe</lastedited> +<lastedited date="2004-09-01T15:23:39">converted from old format - fpe</lastedited> </history> </meta> <body> - - - <section id="put"> - <bookmark xml-lang="en-US" branch="index" id="bm_id3150360"><bookmark_value>Put;function</bookmark_value></bookmark><paragraph id="hd_id3150360" role="heading" level="1" oldref="1" l10n="U" xml-lang="en-US"><link href="text/sbasic/shared/03020204.xhp" name="Put Statement [Runtime]">Put Statement [Runtime]</link></paragraph> - <paragraph role="paragraph" id="par_id3154909" l10n="U" xml-lang="en-US" oldref="2">Writes a record to a relative file or a sequence of bytes to a binary file.</paragraph> - </section> - <paragraph xml-lang="en-US" role="paragraph" id="par_id3156281" l10n="U" oldref="3">See also: <link href="text/sbasic/shared/03020201.xhp" name="Get">Get</link> statement</paragraph> - <paragraph role="heading" level="2" id="hd_id3125863" l10n="U" xml-lang="en-US" oldref="4">Syntax:</paragraph> - <paragraph role="paragraph" id="par_id3155132" l10n="U" xml-lang="en-US" oldref="5">Put [#] FileNumber As Integer, [position], Variable</paragraph> - <paragraph role="heading" level="2" id="hd_id3153190" l10n="U" xml-lang="en-US" oldref="6">Parameters:</paragraph> - <paragraph l10n="U" role="paragraph" id="par_id3146120" xml-lang="en-US" oldref="7"><emph>FileNumber:</emph> Any integer expression that defines the file that you want to write to.</paragraph> - <paragraph l10n="U" role="paragraph" id="par_id3155411" xml-lang="en-US" oldref="8"><emph>Position: </emph>For relative files (random access files), the number of the record that you want to write.</paragraph> - <paragraph role="paragraph" id="par_id3148576" l10n="U" xml-lang="en-US" oldref="9">For binary files (binary access), the position of the byte in the file where you want to start writing.</paragraph> - <paragraph l10n="U" role="paragraph" id="par_id3153729" xml-lang="en-US" oldref="10"><emph>Variable:</emph> Name of the variable that you want to write to the file.</paragraph> - <paragraph xml-lang="en-US" oldref="11" role="paragraph" id="par_id3146974" l10n="U">Note for relative files: If the contents of this variable does not match the length of the record that is specified in the <emph>Len</emph> clause of the <emph>Open</emph> statement, the space between the end of the newly written record and the next record is padded with existing data from the file that you are writing to.</paragraph> - <paragraph role="paragraph" id="par_id3155855" l10n="U" xml-lang="en-US" oldref="12">Note for binary files: The contents of the variables are written to the specified position, and the file pointer is inserted directly after the last byte. No space is left between the records.</paragraph> - <paragraph role="heading" level="2" id="hd_id3154491" l10n="U" xml-lang="en-US" oldref="13">Example:</paragraph> - <paragraph role="paragraph" id="par_id3149410" l10n="U" xml-lang="en-US" oldref="14">Sub ExampleRandomAccess</paragraph> - <paragraph role="paragraph" id="par_id3149959" l10n="U" xml-lang="en-US" oldref="15">Dim iNumber As Integer</paragraph> - <paragraph role="paragraph" id="par_id3154729" l10n="U" xml-lang="en-US" oldref="16">Dim sText As Variant REM Must be a variant type</paragraph> - <paragraph role="paragraph" id="par_id3156286" l10n="U" xml-lang="en-US" oldref="17">Dim aFile As String</paragraph> - <paragraph role="paragraph" id="par_id3149400" l10n="U" xml-lang="en-US" oldref="18">aFile = "c:\data.txt"</paragraph> - - <paragraph role="paragraph" id="par_id3149124" l10n="U" xml-lang="en-US" oldref="20">iNumber = Freefile</paragraph> - <paragraph role="paragraph" id="par_id3150330" l10n="U" xml-lang="en-US" oldref="21">Open aFile For Random As #iNumber Len=32</paragraph> - <paragraph role="paragraph" id="par_id3156278" l10n="U" xml-lang="en-US" oldref="22">Seek #iNumber,1 REM Position to start writing</paragraph> - <paragraph role="paragraph" id="par_id3153711" l10n="U" xml-lang="en-US" oldref="23">Put #iNumber,, "This is the first line of text" REM Fill line with text</paragraph> - <paragraph role="paragraph" id="par_id3155446" l10n="U" xml-lang="en-US" oldref="24">Put #iNumber,, "This is the second line of text"</paragraph> - <paragraph role="paragraph" id="par_id3154255" l10n="U" xml-lang="en-US" oldref="25">Put #iNumber,, "This is the third line of text"</paragraph> - <paragraph role="paragraph" id="par_id3150045" l10n="U" xml-lang="en-US" oldref="26">Seek #iNumber,2</paragraph> - <paragraph role="paragraph" id="par_id3145149" l10n="U" xml-lang="en-US" oldref="27">Get #iNumber,,sText</paragraph> - <paragraph role="paragraph" id="par_id3147363" l10n="U" xml-lang="en-US" oldref="28">Print sText</paragraph> - <paragraph role="paragraph" id="par_id3163806" l10n="U" xml-lang="en-US" oldref="29">Close #iNumber</paragraph> - - <paragraph role="paragraph" id="par_id3149568" l10n="U" xml-lang="en-US" oldref="31">iNumber = Freefile</paragraph> - <paragraph role="paragraph" id="par_id3155607" l10n="U" xml-lang="en-US" oldref="32">Open aFile For Random As #iNumber Len=32</paragraph> - <paragraph role="paragraph" id="par_id3154022" l10n="U" xml-lang="en-US" oldref="33">Get #iNumber,2,sText</paragraph> - <paragraph role="paragraph" id="par_id3150940" l10n="U" xml-lang="en-US" oldref="34">Put #iNumber,,"This is new text"</paragraph> - <paragraph role="paragraph" id="par_id3146132" l10n="U" xml-lang="en-US" oldref="35">Get #iNumber,1,sText</paragraph> - <paragraph role="paragraph" id="par_id3154198" l10n="U" xml-lang="en-US" oldref="36">Get #iNumber,2,sText</paragraph> - <paragraph role="paragraph" id="par_id3159102" l10n="U" xml-lang="en-US" oldref="37">Put #iNumber,20,"This is the text in record 20"</paragraph> - <paragraph role="paragraph" id="par_id3153785" l10n="U" xml-lang="en-US" oldref="38">Print Lof(#iNumber)</paragraph> - <paragraph role="paragraph" id="par_id3151277" l10n="U" xml-lang="en-US" oldref="39">Close #iNumber</paragraph> - - <paragraph role="paragraph" id="par_id3150786" l10n="U" xml-lang="en-US" oldref="41">end sub</paragraph> - - </body> +<section id="put"> +<bookmark xml-lang="en-US" branch="index" id="bm_id3150360"><bookmark_value>Put statement</bookmark_value> +</bookmark> +<paragraph role="heading" id="hd_id3150360" xml-lang="en-US" level="1" l10n="U" oldref="1"><link href="text/sbasic/shared/03020204.xhp" name="Put Statement [Runtime]">Put Statement [Runtime]</link></paragraph> +<paragraph role="paragraph" id="par_id3154909" xml-lang="en-US" l10n="U" oldref="2">Writes a record to a relative file or a sequence of bytes to a binary file.</paragraph> +</section> +<paragraph role="paragraph" id="par_id3156281" xml-lang="en-US" l10n="U" oldref="3">See also: <link href="text/sbasic/shared/03020201.xhp" name="Get"><item type="literal">Get</item></link> statement</paragraph> +<paragraph role="heading" id="hd_id3125863" xml-lang="en-US" level="2" l10n="U" oldref="4">Syntax:</paragraph> +<paragraph role="code" id="par_id3155132" xml-lang="en-US" l10n="U" oldref="5">Put [#] FileNumber As Integer, [position], Variable</paragraph> +<paragraph role="heading" id="hd_id3153190" xml-lang="en-US" level="2" l10n="U" oldref="6">Parameters:</paragraph> +<paragraph role="paragraph" id="par_id3146120" xml-lang="en-US" l10n="U" oldref="7"> +<emph>FileNumber:</emph> Any integer expression that defines the file that you want to write to.</paragraph> +<paragraph role="paragraph" id="par_id3155411" xml-lang="en-US" l10n="U" oldref="8"> +<emph>Position: </emph>For relative files (random access files), the number of the record that you want to write.</paragraph> +<paragraph role="paragraph" id="par_id3148576" xml-lang="en-US" l10n="U" oldref="9">For binary files (binary access), the position of the byte in the file where you want to start writing.</paragraph> +<paragraph role="paragraph" id="par_id3153729" xml-lang="en-US" l10n="U" oldref="10"> +<emph>Variable:</emph> Name of the variable that you want to write to the file.</paragraph> +<paragraph role="paragraph" id="par_id3146974" xml-lang="en-US" l10n="U" oldref="11">Note for relative files: If the contents of this variable does not match the length of the record that is specified in the <emph>Len</emph> clause of the <emph>Open</emph> statement, the space between the end of the newly written record and the next record is padded with existing data from the file that you are writing to.</paragraph> +<paragraph role="paragraph" id="par_id3155855" xml-lang="en-US" l10n="U" oldref="12">Note for binary files: The contents of the variables are written to the specified position, and the file pointer is inserted directly after the last byte. No space is left between the records.</paragraph> +<paragraph role="heading" id="hd_id3154491" xml-lang="en-US" level="2" l10n="U" oldref="13">Example:</paragraph> +<paragraph role="code" id="par_id3149410" xml-lang="en-US" l10n="U" oldref="14">Sub ExampleRandomAccess</paragraph> +<paragraph role="code" id="par_id3149959" xml-lang="en-US" l10n="U" oldref="15">Dim iNumber As Integer</paragraph> +<paragraph role="code" id="par_id3154729" xml-lang="en-US" l10n="U" oldref="16">Dim sText As Variant REM Must be a variant type</paragraph> +<paragraph role="code" id="par_id3156286" xml-lang="en-US" l10n="U" oldref="17">Dim aFile As String</paragraph> +<paragraph role="code" id="par_id3149400" xml-lang="en-US" l10n="U" oldref="18">aFile = "c:\data.txt"</paragraph> +<paragraph role="code" id="par_id3149124" xml-lang="en-US" l10n="U" oldref="20">iNumber = Freefile</paragraph> +<paragraph role="code" id="par_id3150330" xml-lang="en-US" l10n="U" oldref="21">Open aFile For Random As #iNumber Len=32</paragraph> +<paragraph role="code" id="par_id3156278" xml-lang="en-US" l10n="U" oldref="22">Seek #iNumber,1 REM Position to start writing</paragraph> +<paragraph role="code" id="par_id3153711" xml-lang="en-US" l10n="U" oldref="23">Put #iNumber,, "This is the first line of text" REM Fill line with text</paragraph> +<paragraph role="code" id="par_id3155446" xml-lang="en-US" l10n="U" oldref="24">Put #iNumber,, "This is the second line of text"</paragraph> +<paragraph role="code" id="par_id3154255" xml-lang="en-US" l10n="U" oldref="25">Put #iNumber,, "This is the third line of text"</paragraph> +<paragraph role="code" id="par_id3150045" xml-lang="en-US" l10n="U" oldref="26">Seek #iNumber,2</paragraph> +<paragraph role="code" id="par_id3145149" xml-lang="en-US" l10n="U" oldref="27">Get #iNumber,,sText</paragraph> +<paragraph role="code" id="par_id3147363" xml-lang="en-US" l10n="U" oldref="28">Print sText</paragraph> +<paragraph role="code" id="par_id3163806" xml-lang="en-US" l10n="U" oldref="29">Close #iNumber</paragraph> +<paragraph role="code" id="par_id3149568" xml-lang="en-US" l10n="U" oldref="31">iNumber = Freefile</paragraph> +<paragraph role="code" id="par_id3155607" xml-lang="en-US" l10n="U" oldref="32">Open aFile For Random As #iNumber Len=32</paragraph> +<paragraph role="code" id="par_id3154022" xml-lang="en-US" l10n="U" oldref="33">Get #iNumber,2,sText</paragraph> +<paragraph role="code" id="par_id3150940" xml-lang="en-US" l10n="U" oldref="34">Put #iNumber,,"This is new text"</paragraph> +<paragraph role="code" id="par_id3146132" xml-lang="en-US" l10n="U" oldref="35">Get #iNumber,1,sText</paragraph> +<paragraph role="code" id="par_id3154198" xml-lang="en-US" l10n="U" oldref="36">Get #iNumber,2,sText</paragraph> +<paragraph role="code" id="par_id3159102" xml-lang="en-US" l10n="U" oldref="37">Put #iNumber,20,"This is the text in record 20"</paragraph> +<paragraph role="code" id="par_id3153785" xml-lang="en-US" l10n="U" oldref="38">Print Lof(#iNumber)</paragraph> +<paragraph role="code" id="par_id3151277" xml-lang="en-US" l10n="U" oldref="39">Close #iNumber</paragraph> +<paragraph role="code" id="par_id3150786" xml-lang="en-US" l10n="U" oldref="41">end sub</paragraph> +</body> </helpdocument> diff --git a/helpcontent2/source/text/sbasic/shared/03020205.xhp b/helpcontent2/source/text/sbasic/shared/03020205.xhp index 213f86f57f..734bfa62ce 100755 --- a/helpcontent2/source/text/sbasic/shared/03020205.xhp +++ b/helpcontent2/source/text/sbasic/shared/03020205.xhp @@ -52,46 +52,49 @@ * Contributor(s): _______________________________________ * * - ************************************************************************--><helpdocument version="1.0"> + ************************************************************************--> + +<helpdocument version="1.0"> <meta> <topic id="textsbasicshared03020205xml" indexer="include" status="PUBLISH"> -<title xml-lang="en-US" id="tit">Write Statement [Runtime]</title> +<title id="tit" xml-lang="en-US">Write Statement [Runtime]</title> <filename>/text/sbasic/shared/03020205.xhp</filename> </topic> <history> <created date="2003-10-31T00:00:00">Sun Microsystems, Inc.</created> -<lastedited date="2003-10-31T00:00:00">converted from old format - fpe</lastedited> +<lastedited date="2004-09-01T15:23:54">converted from old format - fpe</lastedited> </history> </meta> <body> - - - <section id="write"> - <bookmark xml-lang="en-US" branch="index" id="bm_id3147229"><bookmark_value>Write;function</bookmark_value></bookmark><paragraph id="hd_id3147229" role="heading" level="1" oldref="1" l10n="U" xml-lang="en-US"><link href="text/sbasic/shared/03020205.xhp" name="Write Statement [Runtime]">Write Statement [Runtime]</link></paragraph> - <paragraph role="paragraph" id="par_id3154685" l10n="U" xml-lang="en-US" oldref="2">Writes data to a sequential file.</paragraph> - </section> - <paragraph role="heading" level="2" id="hd_id3150449" l10n="U" xml-lang="en-US" oldref="3">Syntax:</paragraph> - <paragraph role="paragraph" id="par_id3145785" l10n="U" xml-lang="en-US" oldref="4">Write [#]FileName, [Expressionlist]</paragraph> - <paragraph role="heading" level="2" id="hd_id3151116" l10n="U" xml-lang="en-US" oldref="5">Parameters:</paragraph> - <paragraph l10n="U" role="paragraph" id="par_id3153728" xml-lang="en-US" oldref="6"><emph>FileName:</emph> Any numeric expression that contains the file number that was set by the Open statement for the respective file.</paragraph> - <paragraph l10n="U" role="paragraph" id="par_id3146120" xml-lang="en-US" oldref="7"><emph>Expressionlist:</emph> Variables or expressions that you want to enter in a file, separated by commas.</paragraph> - <paragraph xml-lang="en-US" role="paragraph" id="par_id3150010" l10n="U" oldref="8">If the expression list is omitted, the <emph>Write#</emph> statement appends an empty line to the file.</paragraph> - <paragraph xml-lang="en-US" oldref="9" role="paragraph" id="par_id3163713" l10n="U">To add an expression list to a new or an existing file, the file must be opened in the <emph> Output</emph> or <emph>Append</emph> mode.</paragraph> - <paragraph xml-lang="en-US" oldref="10" role="paragraph" id="par_id3147428" l10n="U">The <emph>Write#</emph> statement enters data that is enclosed by quotation marks and separated by commas into a file. You do not need to use delimiters in the list. The end of a file created with the <emph>Write#</emph> statement is indicated by a line end symbol.</paragraph> - <paragraph role="heading" level="2" id="hd_id3151073" l10n="U" xml-lang="en-US" oldref="11">Example:</paragraph> - <paragraph role="paragraph" id="par_id3145252" l10n="U" xml-lang="en-US" oldref="12">Sub ExampleWrite</paragraph> - <paragraph role="paragraph" id="par_id3149958" l10n="U" xml-lang="en-US" oldref="13">Dim iCount As Integer</paragraph> - <paragraph role="paragraph" id="par_id3156284" l10n="U" xml-lang="en-US" oldref="14">Dim sValue As String</paragraph> - <paragraph role="paragraph" id="par_id3145645" l10n="U" xml-lang="en-US" oldref="15">iCount = Freefile</paragraph> - <paragraph role="paragraph" id="par_id3153417" l10n="U" xml-lang="en-US" oldref="16">open "C:\data.txt" for OutPut as iCount</paragraph> - <paragraph role="paragraph" id="par_id3149401" l10n="U" xml-lang="en-US" oldref="17">sValue = "Hamburg"</paragraph> - <paragraph role="paragraph" id="par_id3156275" l10n="U" xml-lang="en-US" oldref="18">Write #iCount,sValue,200</paragraph> - <paragraph role="paragraph" id="par_id3146913" l10n="U" xml-lang="en-US" oldref="19">sValue = "New York"</paragraph> - <paragraph role="paragraph" id="par_id3155064" l10n="U" xml-lang="en-US" oldref="20">Write #iCount,sValue,300</paragraph> - <paragraph role="paragraph" id="par_id3150322" l10n="U" xml-lang="en-US" oldref="21">sValue = "Miami"</paragraph> - <paragraph role="paragraph" id="par_id3155766" l10n="U" xml-lang="en-US" oldref="22">Write #iCount,sValue,450</paragraph> - <paragraph role="paragraph" id="par_id3145643" l10n="U" xml-lang="en-US" oldref="23">close #iCount</paragraph> - <paragraph role="paragraph" id="par_id3150044" l10n="U" xml-lang="en-US" oldref="24">end sub</paragraph> - - </body> +<section id="write"> +<bookmark xml-lang="en-US" branch="index" id="bm_id3147229"><bookmark_value>Write function</bookmark_value> +</bookmark> +<paragraph role="heading" id="hd_id3147229" xml-lang="en-US" level="1" l10n="U" oldref="1"><link href="text/sbasic/shared/03020205.xhp" name="Write Statement [Runtime]">Write Statement [Runtime]</link></paragraph> +<paragraph role="paragraph" id="par_id3154685" xml-lang="en-US" l10n="U" oldref="2">Writes data to a sequential file.</paragraph> +</section> +<paragraph role="heading" id="hd_id3150449" xml-lang="en-US" level="2" l10n="U" oldref="3">Syntax:</paragraph> +<paragraph role="code" id="par_id3145785" xml-lang="en-US" l10n="U" oldref="4">Write [#]FileName, [Expressionlist]</paragraph> +<paragraph role="heading" id="hd_id3151116" xml-lang="en-US" level="2" l10n="U" oldref="5">Parameters:</paragraph> +<paragraph role="paragraph" id="par_id3153728" xml-lang="en-US" l10n="U" oldref="6"> +<emph>FileName:</emph> Any numeric expression that contains the file number that was set by the Open statement for the respective file.</paragraph> +<paragraph role="paragraph" id="par_id3146120" xml-lang="en-US" l10n="U" oldref="7"> +<emph>Expressionlist:</emph> Variables or expressions that you want to enter in a file, separated by commas.</paragraph> +<paragraph role="paragraph" id="par_id3150010" xml-lang="en-US" l10n="U" oldref="8">If the expression list is omitted, the <emph>Write#</emph> statement appends an empty line to the file.</paragraph> +<paragraph role="paragraph" id="par_id3163713" xml-lang="en-US" l10n="U" oldref="9">To add an expression list to a new or an existing file, the file must be opened in the <emph>Output</emph> or <emph>Append</emph> mode.</paragraph> +<paragraph role="paragraph" id="par_id3147428" xml-lang="en-US" l10n="U" oldref="10">The <emph>Write#</emph> statement enters data that is enclosed by quotation marks and separated by commas into a file. You do not need to use delimiters in the list. The end of a file created with the <emph>Write#</emph> statement is indicated by a line end symbol.</paragraph> +<paragraph role="heading" id="hd_id3151073" xml-lang="en-US" level="2" l10n="U" oldref="11">Example:</paragraph> +<paragraph role="code" id="par_id3145252" xml-lang="en-US" l10n="U" oldref="12">Sub ExampleWrite</paragraph> +<paragraph role="code" id="par_id3149958" xml-lang="en-US" l10n="U" oldref="13">Dim iCount As Integer</paragraph> +<paragraph role="code" id="par_id3156284" xml-lang="en-US" l10n="U" oldref="14">Dim sValue As String</paragraph> +<paragraph role="code" id="par_id3145645" xml-lang="en-US" l10n="U" oldref="15">iCount = Freefile</paragraph> +<paragraph role="code" id="par_id3153417" xml-lang="en-US" l10n="U" oldref="16">open "C:\data.txt" for OutPut as iCount</paragraph> +<paragraph role="code" id="par_id3149401" xml-lang="en-US" l10n="U" oldref="17">sValue = "Hamburg"</paragraph> +<paragraph role="code" id="par_id3156275" xml-lang="en-US" l10n="U" oldref="18">Write #iCount,sValue,200</paragraph> +<paragraph role="code" id="par_id3146913" xml-lang="en-US" l10n="U" oldref="19">sValue = "New York"</paragraph> +<paragraph role="code" id="par_id3155064" xml-lang="en-US" l10n="U" oldref="20">Write #iCount,sValue,300</paragraph> +<paragraph role="code" id="par_id3150322" xml-lang="en-US" l10n="U" oldref="21">sValue = "Miami"</paragraph> +<paragraph role="code" id="par_id3155766" xml-lang="en-US" l10n="U" oldref="22">Write #iCount,sValue,450</paragraph> +<paragraph role="code" id="par_id3145643" xml-lang="en-US" l10n="U" oldref="23">close #iCount</paragraph> +<paragraph role="code" id="par_id3150044" xml-lang="en-US" l10n="U" oldref="24">end sub</paragraph> +</body> </helpdocument> diff --git a/helpcontent2/source/text/sbasic/shared/03020301.xhp b/helpcontent2/source/text/sbasic/shared/03020301.xhp index ee4921ca87..81d85b9879 100755 --- a/helpcontent2/source/text/sbasic/shared/03020301.xhp +++ b/helpcontent2/source/text/sbasic/shared/03020301.xhp @@ -52,59 +52,59 @@ * Contributor(s): _______________________________________ * * - ************************************************************************--><helpdocument version="1.0"> + ************************************************************************--> + +<helpdocument version="1.0"> <meta> <topic id="textsbasicshared03020301xml" indexer="include" status="PUBLISH"> -<title xml-lang="en-US" id="tit">Eof Function [Runtime]</title> +<title id="tit" xml-lang="en-US">Eof Function [Runtime]</title> <filename>/text/sbasic/shared/03020301.xhp</filename> </topic> <history> <created date="2003-10-31T00:00:00">Sun Microsystems, Inc.</created> -<lastedited date="2003-10-31T00:00:00">converted from old format - fpe</lastedited> +<lastedited date="2004-09-01T15:24:39">converted from old format - fpe</lastedited> </history> </meta> <body> - - - <section id="eof"> - <bookmark xml-lang="en-US" branch="index" id="bm_id3154598"><bookmark_value>Eof; function</bookmark_value></bookmark><paragraph id="hd_id3154598" role="heading" level="1" oldref="1" l10n="U" xml-lang="en-US"><link href="text/sbasic/shared/03020301.xhp" name="Eof Function [Runtime]">Eof Function [Runtime]</link></paragraph> - <paragraph role="paragraph" id="par_id3147182" l10n="U" xml-lang="en-US" oldref="2">Determines if the file pointer has reached the end of a file.</paragraph> - </section> - <paragraph role="heading" level="2" id="hd_id3149119" l10n="U" xml-lang="en-US" oldref="3">Syntax:</paragraph> - <paragraph role="paragraph" id="par_id3147399" l10n="U" xml-lang="en-US" oldref="4">Eof (intexpression As Integer)</paragraph> - <paragraph role="heading" level="2" id="hd_id3153539" l10n="U" xml-lang="en-US" oldref="5">Return value:</paragraph> - <paragraph role="paragraph" id="par_id3156027" l10n="U" xml-lang="en-US" oldref="6">Bool</paragraph> - <paragraph role="heading" level="2" id="hd_id3152924" l10n="U" xml-lang="en-US" oldref="7">Parameters:</paragraph> - <paragraph l10n="U" role="paragraph" id="par_id3153990" xml-lang="en-US" oldref="8"><emph>Intexpression:</emph> Any integer expression that evaluates to the number of an open file.</paragraph> - <paragraph role="paragraph" id="par_id3153527" l10n="U" xml-lang="en-US" oldref="9">Use EOF to avoid errors when you attempt to get input past the end of a file. When you use the Input or Get statement to read from a file, the file pointer is advanced by the number of bytes read. When the end of a file is reached, EOF returns the value "True" (-1).</paragraph> - <embed href="text/sbasic/shared/00000003.xhp#errorcode"/> - <embed href="text/sbasic/shared/00000003.xhp#err5"/> - <embed href="text/sbasic/shared/00000003.xhp#err52"/> - <paragraph role="heading" level="2" id="hd_id3154046" l10n="U" xml-lang="en-US" oldref="10">Example:</paragraph> - <paragraph role="paragraph" id="par_id3143270" l10n="U" xml-lang="en-US" oldref="11">Sub ExampleWorkWithAFile</paragraph> - <paragraph role="paragraph" id="par_id3150670" l10n="U" xml-lang="en-US" oldref="12">Dim iNumber As Integer</paragraph> - <paragraph role="paragraph" id="par_id3154143" l10n="U" xml-lang="en-US" oldref="13">Dim sLine As String</paragraph> - <paragraph role="paragraph" id="par_id3148943" l10n="U" xml-lang="en-US" oldref="14">Dim aFile As String</paragraph> - <paragraph role="paragraph" id="par_id3153897" l10n="U" xml-lang="en-US" oldref="37">Dim sMsg as String</paragraph> - <paragraph role="paragraph" id="par_id3156344" l10n="U" xml-lang="en-US" oldref="15">aFile = "c:\data.txt"</paragraph> - - <paragraph role="paragraph" id="par_id3148663" l10n="U" xml-lang="en-US" oldref="17">iNumber = Freefile</paragraph> - <paragraph role="paragraph" id="par_id3153379" l10n="U" xml-lang="en-US" oldref="18">Open aFile For Output As #iNumber</paragraph> - <paragraph role="paragraph" id="par_id3153360" l10n="U" xml-lang="en-US" oldref="19">Print #iNumber, "First line of text"</paragraph> - <paragraph role="paragraph" id="par_id3148797" l10n="U" xml-lang="en-US" oldref="20">Print #iNumber, "Another line of text"</paragraph> - <paragraph role="paragraph" id="par_id3154684" l10n="U" xml-lang="en-US" oldref="21">Close #iNumber</paragraph> - - <paragraph role="paragraph" id="par_id3153104" l10n="U" xml-lang="en-US" oldref="25">iNumber = Freefile</paragraph> - <paragraph role="paragraph" id="par_id3144761" l10n="U" xml-lang="en-US" oldref="26">Open aFile For Input As iNumber</paragraph> - <paragraph role="paragraph" id="par_id3153193" l10n="U" xml-lang="en-US" oldref="27">While not eof(iNumber)</paragraph> - <paragraph role="paragraph" id="par_id3158408" l10n="U" xml-lang="en-US" oldref="28">Line Input #iNumber, sLine</paragraph> - <paragraph role="paragraph" id="par_id3149203" l10n="U" xml-lang="en-US" oldref="29">If sLine <>"" then</paragraph> - <paragraph role="paragraph" id="par_id3153770" l10n="U" xml-lang="en-US" oldref="30">sMsg = sMsg & sLine & chr(13)</paragraph> - <paragraph role="paragraph" id="par_id3153367" l10n="U" xml-lang="en-US" oldref="32">end if</paragraph> - <paragraph role="paragraph" id="par_id3147318" l10n="U" xml-lang="en-US" oldref="33">wend</paragraph> - <paragraph role="paragraph" id="par_id3152939" l10n="U" xml-lang="en-US" oldref="34">Close #iNumber</paragraph> - <paragraph role="paragraph" id="par_id3153726" l10n="U" xml-lang="en-US" oldref="38">Msgbox sMsg</paragraph> - <paragraph role="paragraph" id="par_id3153092" l10n="U" xml-lang="en-US" oldref="35">End Sub</paragraph> - - </body> +<section id="eof"> +<bookmark xml-lang="en-US" branch="index" id="bm_id3154598"><bookmark_value>Eof function</bookmark_value> +</bookmark> +<paragraph role="heading" id="hd_id3154598" xml-lang="en-US" level="1" l10n="U" oldref="1"><link href="text/sbasic/shared/03020301.xhp" name="Eof Function [Runtime]">Eof Function [Runtime]</link></paragraph> +<paragraph role="paragraph" id="par_id3147182" xml-lang="en-US" l10n="U" oldref="2">Determines if the file pointer has reached the end of a file.</paragraph> +</section> +<paragraph role="heading" id="hd_id3149119" xml-lang="en-US" level="2" l10n="U" oldref="3">Syntax:</paragraph> +<paragraph role="code" id="par_id3147399" xml-lang="en-US" l10n="U" oldref="4">Eof (intexpression As Integer)</paragraph> +<paragraph role="heading" id="hd_id3153539" xml-lang="en-US" level="2" l10n="U" oldref="5">Return value:</paragraph> +<paragraph role="paragraph" id="par_id3156027" xml-lang="en-US" l10n="U" oldref="6">Bool</paragraph> +<paragraph role="heading" id="hd_id3152924" xml-lang="en-US" level="2" l10n="U" oldref="7">Parameters:</paragraph> +<paragraph role="paragraph" id="par_id3153990" xml-lang="en-US" l10n="U" oldref="8"> +<emph>Intexpression:</emph> Any integer expression that evaluates to the number of an open file.</paragraph> +<paragraph role="paragraph" id="par_id3153527" xml-lang="en-US" l10n="U" oldref="9">Use EOF to avoid errors when you attempt to get input past the end of a file. When you use the Input or Get statement to read from a file, the file pointer is advanced by the number of bytes read. When the end of a file is reached, EOF returns the value "True" (-1).</paragraph> +<embed href="text/sbasic/shared/00000003.xhp#errorcode"/> +<embed href="text/sbasic/shared/00000003.xhp#err5"/> +<embed href="text/sbasic/shared/00000003.xhp#err52"/> +<paragraph role="heading" id="hd_id3154046" xml-lang="en-US" level="2" l10n="U" oldref="10">Example:</paragraph> +<paragraph role="code" id="par_id3143270" xml-lang="en-US" l10n="U" oldref="11">Sub ExampleWorkWithAFile</paragraph> +<paragraph role="code" id="par_id3150670" xml-lang="en-US" l10n="U" oldref="12">Dim iNumber As Integer</paragraph> +<paragraph role="code" id="par_id3154143" xml-lang="en-US" l10n="U" oldref="13">Dim sLine As String</paragraph> +<paragraph role="code" id="par_id3148943" xml-lang="en-US" l10n="U" oldref="14">Dim aFile As String</paragraph> +<paragraph role="code" id="par_id3153897" xml-lang="en-US" l10n="U" oldref="37">Dim sMsg as String</paragraph> +<paragraph role="code" id="par_id3156344" xml-lang="en-US" l10n="U" oldref="15">aFile = "c:\data.txt"</paragraph> +<paragraph role="code" id="par_id3148663" xml-lang="en-US" l10n="U" oldref="17">iNumber = Freefile</paragraph> +<paragraph role="code" id="par_id3153379" xml-lang="en-US" l10n="U" oldref="18">Open aFile For Output As #iNumber</paragraph> +<paragraph role="code" id="par_id3153360" xml-lang="en-US" l10n="U" oldref="19">Print #iNumber, "First line of text"</paragraph> +<paragraph role="code" id="par_id3148797" xml-lang="en-US" l10n="U" oldref="20">Print #iNumber, "Another line of text"</paragraph> +<paragraph role="code" id="par_id3154684" xml-lang="en-US" l10n="U" oldref="21">Close #iNumber</paragraph> +<paragraph role="code" id="par_id3153104" xml-lang="en-US" l10n="U" oldref="25">iNumber = Freefile</paragraph> +<paragraph role="code" id="par_id3144761" xml-lang="en-US" l10n="U" oldref="26">Open aFile For Input As iNumber</paragraph> +<paragraph role="code" id="par_id3153193" xml-lang="en-US" l10n="U" oldref="27">While not eof(iNumber)</paragraph> +<paragraph role="code" id="par_id3158408" xml-lang="en-US" l10n="U" oldref="28">Line Input #iNumber, sLine</paragraph> +<paragraph role="code" id="par_id3149203" xml-lang="en-US" l10n="U" oldref="29">If sLine <>"" then</paragraph> +<paragraph role="code" id="par_id3153770" xml-lang="en-US" l10n="U" oldref="30">sMsg = sMsg & sLine & chr(13)</paragraph> +<paragraph role="code" id="par_id3153367" xml-lang="en-US" l10n="U" oldref="32">end if</paragraph> +<paragraph role="code" id="par_id3147318" xml-lang="en-US" l10n="U" oldref="33">wend</paragraph> +<paragraph role="code" id="par_id3152939" xml-lang="en-US" l10n="U" oldref="34">Close #iNumber</paragraph> +<paragraph role="code" id="par_id3153726" xml-lang="en-US" l10n="U" oldref="38">Msgbox sMsg</paragraph> +<paragraph role="code" id="par_id3153092" xml-lang="en-US" l10n="U" oldref="35">End Sub</paragraph> +</body> </helpdocument> diff --git a/helpcontent2/source/text/sbasic/shared/03020302.xhp b/helpcontent2/source/text/sbasic/shared/03020302.xhp index 731b329d90..83252036ac 100755 --- a/helpcontent2/source/text/sbasic/shared/03020302.xhp +++ b/helpcontent2/source/text/sbasic/shared/03020302.xhp @@ -52,34 +52,37 @@ * Contributor(s): _______________________________________ * * - ************************************************************************--><helpdocument version="1.0"> + ************************************************************************--> + +<helpdocument version="1.0"> <meta> <topic id="textsbasicshared03020302xml" indexer="include" status="PUBLISH"> -<title xml-lang="en-US" id="tit">Loc Function [Runtime]</title> +<title id="tit" xml-lang="en-US">Loc Function [Runtime]</title> <filename>/text/sbasic/shared/03020302.xhp</filename> </topic> <history> <created date="2003-10-31T00:00:00">Sun Microsystems, Inc.</created> -<lastedited date="2003-10-31T00:00:00">converted from old format - fpe</lastedited> +<lastedited date="2004-09-01T15:25:02">converted from old format - fpe</lastedited> </history> </meta> <body> - - - <section id="loc"> - <bookmark xml-lang="en-US" branch="index" id="bm_id3148663"><bookmark_value>Loc;function</bookmark_value></bookmark><paragraph id="hd_id3148663" role="heading" level="1" oldref="1" l10n="U" xml-lang="en-US"><link href="text/sbasic/shared/03020302.xhp" name="Loc Function [Runtime]">Loc Function [Runtime]</link></paragraph> - <paragraph role="paragraph" id="par_id3154138" l10n="U" xml-lang="en-US" oldref="2">Returns the current position in an open file.</paragraph> - </section> - <paragraph role="heading" level="2" id="hd_id3156422" l10n="U" xml-lang="en-US" oldref="3">Syntax:</paragraph> - <paragraph role="paragraph" id="par_id3150768" l10n="U" xml-lang="en-US" oldref="4">Loc (FileNumber)</paragraph> - <paragraph role="heading" level="2" id="hd_id3150440" l10n="U" xml-lang="en-US" oldref="5">Return value:</paragraph> - <paragraph role="paragraph" id="par_id3152578" l10n="U" xml-lang="en-US" oldref="6">Long</paragraph> - <paragraph role="heading" level="2" id="hd_id3152462" l10n="U" xml-lang="en-US" oldref="7">Parameters:</paragraph> - <paragraph l10n="U" role="paragraph" id="par_id3153363" xml-lang="en-US" oldref="8"><emph>FileNumber:</emph> Any numeric expression that contains the file number that is set by the Open statement for the respective file.</paragraph> - <paragraph role="paragraph" id="par_id3154320" l10n="U" xml-lang="en-US" oldref="9">If the Loc function is used for an open random access file, it returns the number of the last record that was last read or written.</paragraph> - <paragraph role="paragraph" id="par_id3151115" l10n="U" xml-lang="en-US" oldref="10">For a sequential file, the Loc function returns the position in a file divided by 128. For binary files, the position of the last read or written byte is returned.</paragraph> - <embed href="text/sbasic/shared/00000003.xhp#errorcode"/> - <embed href="text/sbasic/shared/00000003.xhp#err5"/> - <embed href="text/sbasic/shared/00000003.xhp#err52"/> - </body> +<section id="loc"> +<bookmark xml-lang="en-US" branch="index" id="bm_id3148663"><bookmark_value>Loc function</bookmark_value> +</bookmark> +<paragraph role="heading" id="hd_id3148663" xml-lang="en-US" level="1" l10n="U" oldref="1"><link href="text/sbasic/shared/03020302.xhp" name="Loc Function [Runtime]">Loc Function [Runtime]</link></paragraph> +<paragraph role="paragraph" id="par_id3154138" xml-lang="en-US" l10n="U" oldref="2">Returns the current position in an open file.</paragraph> +</section> +<paragraph role="heading" id="hd_id3156422" xml-lang="en-US" level="2" l10n="U" oldref="3">Syntax:</paragraph> +<paragraph role="code" id="par_id3150768" xml-lang="en-US" l10n="U" oldref="4">Loc(FileNumber)</paragraph> +<paragraph role="heading" id="hd_id3150440" xml-lang="en-US" level="2" l10n="U" oldref="5">Return value:</paragraph> +<paragraph role="paragraph" id="par_id3152578" xml-lang="en-US" l10n="U" oldref="6">Long</paragraph> +<paragraph role="heading" id="hd_id3152462" xml-lang="en-US" level="2" l10n="U" oldref="7">Parameters:</paragraph> +<paragraph role="paragraph" id="par_id3153363" xml-lang="en-US" l10n="U" oldref="8"> +<emph>FileNumber:</emph> Any numeric expression that contains the file number that is set by the Open statement for the respective file.</paragraph> +<paragraph role="paragraph" id="par_id3154320" xml-lang="en-US" l10n="U" oldref="9">If the Loc function is used for an open random access file, it returns the number of the last record that was last read or written.</paragraph> +<paragraph role="paragraph" id="par_id3151115" xml-lang="en-US" l10n="U" oldref="10">For a sequential file, the Loc function returns the position in a file divided by 128. For binary files, the position of the last read or written byte is returned.</paragraph> +<embed href="text/sbasic/shared/00000003.xhp#errorcode"/> +<embed href="text/sbasic/shared/00000003.xhp#err5"/> +<embed href="text/sbasic/shared/00000003.xhp#err52"/> +</body> </helpdocument> |