Package_html_media.mk | 7 + source/media/helpimg/sbasic/Input_statement.svg | 42 ++++++++ source/media/helpimg/sbasic/Line-Input_statement.svg | 35 +++++++ source/media/helpimg/sbasic/Reset_statement.svg | 32 ++++++ source/media/helpimg/sbasic/Seek_statement.svg | 38 ++++++++ source/media/helpimg/sbasic/Write_statement.svg | 42 ++++++++ source/text/sbasic/shared/03010103.xhp | 69 ++++++++------ source/text/sbasic/shared/03020104.xhp | 66 +++++++------ source/text/sbasic/shared/03020202.xhp | 90 +++++++++---------- source/text/sbasic/shared/03020203.xhp | 50 ++-------- source/text/sbasic/shared/03020204.xhp | 13 +- source/text/sbasic/shared/03020205.xhp | 68 ++++++++------ source/text/sbasic/shared/03020305.xhp | 36 ++++--- 13 files changed, 395 insertions(+), 193 deletions(-)
New commits: commit 7bb1ec81e997e270be39f5639073f5190dd3655e Author: Alain Romedenne <[email protected]> AuthorDate: Mon Aug 3 15:00:01 2020 +0200 Commit: Olivier Hallot <[email protected]> CommitDate: Tue Aug 4 19:37:54 2020 +0200 tdf131416 Basic syntax diagrams - Input, Line Input, Print, Put, Reset, Seek and Write statements Added comma|semicolon delimiter information Change-Id: I1ef994f1fe68db3d1b8f5d1a85d3764078ab33f3 Reviewed-on: https://gerrit.libreoffice.org/c/help/+/99925 Tested-by: Jenkins Reviewed-by: Olivier Hallot <[email protected]> diff --git a/Package_html_media.mk b/Package_html_media.mk index 1c755389d..a2a8641da 100644 --- a/Package_html_media.mk +++ b/Package_html_media.mk @@ -108,6 +108,7 @@ $(eval $(call gb_Package_add_files_with_dir,helpcontent2_html_media,$(LIBO_SHARE helpimg/smzb8.png \ helpimg/smzb9.png \ helpimg/sbasic/a_statement.svg \ + helpimg/sbasic/access_fragment.svg \ helpimg/sbasic/argument_fragment.svg \ helpimg/sbasic/array_fragment.svg \ helpimg/sbasic/char_fragment.svg \ @@ -129,12 +130,13 @@ $(eval $(call gb_Package_add_files_with_dir,helpcontent2_html_media,$(LIBO_SHARE helpimg/sbasic/Function_statement.svg \ helpimg/sbasic/Get_statement.svg \ helpimg/sbasic/If_statement.svg \ + helpimg/sbasic/Input_statement.svg \ helpimg/sbasic/LetSet_statement.svg \ + helpimg/sbasic/Line-Input_statement.svg \ helpimg/sbasic/On-Error_statement.svg \ helpimg/sbasic/On-GoSub-GoTo_statement.svg \ helpimg/sbasic/Option_statement.svg \ helpimg/sbasic/Open_statement.svg \ - helpimg/sbasic/access_fragment.svg \ helpimg/sbasic/locking_fragment.svg \ helpimg/sbasic/Print_statement.svg \ helpimg/sbasic/Property-Get_statement.svg \ @@ -142,10 +144,13 @@ $(eval $(call gb_Package_add_files_with_dir,helpcontent2_html_media,$(LIBO_SHARE helpimg/sbasic/Put_statement.svg \ helpimg/sbasic/ReDim_statement.svg \ helpimg/sbasic/Resume_statement.svg \ + helpimg/sbasic/Reset_statement.svg \ + helpimg/sbasic/Seek_statement.svg \ helpimg/sbasic/Select-Case_statement.svg \ helpimg/sbasic/Sub_statement.svg \ helpimg/sbasic/Type_statement.svg \ helpimg/sbasic/While_statement.svg \ + helpimg/sbasic/Write_statement.svg \ helpimg/scalc/coordinates-to-polar-01.svg \ helpimg/starmath/harpoon.svg \ helpimg/starmath/wideharpoon.svg \ diff --git a/source/media/helpimg/sbasic/Input_statement.svg b/source/media/helpimg/sbasic/Input_statement.svg new file mode 100644 index 000000000..1c4b27035 --- /dev/null +++ b/source/media/helpimg/sbasic/Input_statement.svg @@ -0,0 +1,42 @@ +<svg class="railroad-diagram" height="124" viewBox="0 0 534.5 124" width="534.5" xmlns="http://www.w3.org/2000/svg";> +<g transform="translate(.5 .5)"> +<style>/* <![CDATA[ */ + svg.railroad-diagram { + background-color:transparent; + } + svg.railroad-diagram path { + stroke-width:1; + stroke:black; + fill:rgba(0,0,0,0); + } + svg.railroad-diagram text { + font:bold 14px monospace; + font-family: Verdana, sans-serif; + text-anchor:middle; + } + svg.railroad-diagram text.label{ + text-anchor:start; + } + svg.railroad-diagram text.comment{ + font:italic 12px monospace; + } + svg.railroad-diagram rect{ + stroke-width:1; + stroke:black; + fill:transparent; + } + +/* ]]> */ +</style><g> +<path d="M20 41v20m10 -20v20m-10 -10h20"></path></g><path d="M40 51h10"></path><g class="terminal"> +<path d="M50 51h0.0"></path><path d="M112.5 51h0.0"></path><rect height="22" rx="10" ry="10" width="62.5" x="50.0" y="40"></rect><text x="81.25" y="55">Input</text></g><path d="M112.5 51h10"></path><g> +<path d="M122.5 51h0.0"></path><path d="M211.0 51h0.0"></path><path d="M122.5 51a15 15 0 0 0 15 -15v-1a15 15 0 0 1 15 -15"></path><g> +<path d="M152.5 20h28.5"></path></g><path d="M181.0 20a15 15 0 0 1 15 15v1a15 15 0 0 0 15 15"></path><path d="M122.5 51h30"></path><g class="terminal"> +<path d="M152.5 51h0.0"></path><path d="M181.0 51h0.0"></path><rect height="22" rx="10" ry="10" width="28.5" x="152.5" y="40"></rect><text x="166.75" y="55">#</text></g><path d="M181.0 51h30"></path></g><path d="M211.0 51h10"></path><g class="terminal"> +<path d="M221.0 51h0.0"></path><path d="M300.5 51h0.0"></path><rect height="22" rx="10" ry="10" width="79.5" x="221.0" y="40"></rect><text x="260.75" y="55">fileNum</text></g><path d="M300.5 51h10"></path><g> +<path d="M310.5 51h0.0"></path><path d="M399.0 51h0.0"></path><path d="M310.5 51h30"></path><g class="terminal"> +<path d="M340.5 51h0.0"></path><path d="M369.0 51h0.0"></path><rect height="22" rx="10" ry="10" width="28.5" x="340.5" y="40"></rect><text x="354.75" y="55">,</text></g><path d="M369.0 51h30"></path><path d="M310.5 51a15 15 0 0 1 15 15v12a15 15 0 0 0 15 15"></path><g class="terminal"> +<path d="M340.5 93h0.0"></path><path d="M369.0 93h0.0"></path><rect height="22" rx="10" ry="10" width="28.5" x="340.5" y="82"></rect><text x="354.75" y="97">;</text></g><path d="M369.0 93a15 15 0 0 0 15 -15v-12a15 15 0 0 1 15 -15"></path></g><path d="M399.0 51h10"></path><g> +<path d="M409.0 51h0.0"></path><path d="M484.5 51h0.0"></path><path d="M409.0 51h15"></path><g class="terminal"> +<path d="M424.0 51h0.0"></path><path d="M469.5 51h0.0"></path><rect height="22" rx="10" ry="10" width="45.5" x="424.0" y="40"></rect><text x="446.75" y="55">var</text></g><path d="M469.5 51h15"></path><path d="M424.0 51a15 15 0 0 0 -15 15v12a15 15 0 0 0 15 15"></path><g class="terminal"> +<path d="M424.0 93h8.5"></path><path d="M461.0 93h8.5"></path><rect height="22" rx="10" ry="10" width="28.5" x="432.5" y="82"></rect><text x="446.75" y="97">,</text></g><path d="M469.5 93a15 15 0 0 0 15 -15v-12a15 15 0 0 0 -15 -15"></path></g><path d="M484.5 51h10"></path><path d="M 494.5 51 h 20 m -10 -10 v 20 m 10 -20 v 20"></path></g></svg> \ No newline at end of file diff --git a/source/media/helpimg/sbasic/Line-Input_statement.svg b/source/media/helpimg/sbasic/Line-Input_statement.svg new file mode 100644 index 000000000..8d6479967 --- /dev/null +++ b/source/media/helpimg/sbasic/Line-Input_statement.svg @@ -0,0 +1,35 @@ +<svg class="railroad-diagram" height="62" viewBox="0 0 469.5 62" width="469.5" xmlns="http://www.w3.org/2000/svg";> +<g transform="translate(.5 .5)"> +<style>/* <![CDATA[ */ + svg.railroad-diagram { + background-color:transparent; + } + svg.railroad-diagram path { + stroke-width:1; + stroke:black; + fill:rgba(0,0,0,0); + } + svg.railroad-diagram text { + font:bold 14px monospace; + font-family: Verdana, sans-serif; + text-anchor:middle; + } + svg.railroad-diagram text.label{ + text-anchor:start; + } + svg.railroad-diagram text.comment{ + font:italic 12px monospace; + } + svg.railroad-diagram rect{ + stroke-width:1; + stroke:black; + fill:transparent; + } + +/* ]]> */ +</style><g> +<path d="M20 21v20m10 -20v20m-10 -10h20"></path></g><path d="M40 31h10"></path><g class="terminal"> +<path d="M50 31h0.0"></path><path d="M155.0 31h0.0"></path><rect height="22" rx="10" ry="10" width="105.0" x="50.0" y="20"></rect><text x="102.5" y="35">Line Input</text></g><path d="M155.0 31h10"></path><path d="M165.0 31h10"></path><g class="terminal"> +<path d="M175.0 31h0.0"></path><path d="M263.0 31h0.0"></path><rect height="22" rx="10" ry="10" width="88.0" x="175.0" y="20"></rect><text x="219.0" y="35">#fileNum</text></g><path d="M263.0 31h10"></path><path d="M273.0 31h10"></path><g class="terminal"> +<path d="M283.0 31h0.0"></path><path d="M311.5 31h0.0"></path><rect height="22" rx="10" ry="10" width="28.5" x="283.0" y="20"></rect><text x="297.25" y="35">,</text></g><path d="M311.5 31h10"></path><path d="M321.5 31h10"></path><g class="terminal"> +<path d="M331.5 31h0.0"></path><path d="M419.5 31h0.0"></path><rect height="22" rx="10" ry="10" width="88.0" x="331.5" y="20"></rect><text x="375.5" y="35">variable</text></g><path d="M419.5 31h10"></path><path d="M 429.5 31 h 20 m -10 -10 v 20 m 10 -20 v 20"></path></g></svg> \ No newline at end of file diff --git a/source/media/helpimg/sbasic/Reset_statement.svg b/source/media/helpimg/sbasic/Reset_statement.svg new file mode 100644 index 000000000..fbdb2eaff --- /dev/null +++ b/source/media/helpimg/sbasic/Reset_statement.svg @@ -0,0 +1,32 @@ +<svg class="railroad-diagram" height="62" viewBox="0 0 162.5 62" width="162.5" xmlns="http://www.w3.org/2000/svg";> +<g transform="translate(.5 .5)"> +<style>/* <![CDATA[ */ + svg.railroad-diagram { + background-color:transparent; + } + svg.railroad-diagram path { + stroke-width:1; + stroke:black; + fill:rgba(0,0,0,0); + } + svg.railroad-diagram text { + font:bold 14px monospace; + font-family: Verdana, sans-serif; + text-anchor:middle; + } + svg.railroad-diagram text.label{ + text-anchor:start; + } + svg.railroad-diagram text.comment{ + font:italic 12px monospace; + } + svg.railroad-diagram rect{ + stroke-width:1; + stroke:black; + fill:transparent; + } + +/* ]]> */ +</style><g> +<path d="M20 21v20m10 -20v20m-10 -10h20"></path></g><path d="M40 31h10"></path><g class="terminal"> +<path d="M50 31h0.0"></path><path d="M112.5 31h0.0"></path><rect height="22" rx="10" ry="10" width="62.5" x="50.0" y="20"></rect><text x="81.25" y="35">Reset</text></g><path d="M112.5 31h10"></path><path d="M 122.5 31 h 20 m -10 -10 v 20 m 10 -20 v 20"></path></g></svg> \ No newline at end of file diff --git a/source/media/helpimg/sbasic/Seek_statement.svg b/source/media/helpimg/sbasic/Seek_statement.svg new file mode 100644 index 000000000..fc47ad5be --- /dev/null +++ b/source/media/helpimg/sbasic/Seek_statement.svg @@ -0,0 +1,38 @@ +<svg class="railroad-diagram" height="124" viewBox="0 0 399.0 124" width="399.0" xmlns="http://www.w3.org/2000/svg";> +<g transform="translate(.5 .5)"> +<style>/* <![CDATA[ */ + svg.railroad-diagram { + background-color:transparent; + } + svg.railroad-diagram path { + stroke-width:1; + stroke:black; + fill:rgba(0,0,0,0); + } + svg.railroad-diagram text { + font:bold 14px monospace; + font-family: Verdana, sans-serif; + text-anchor:middle; + } + svg.railroad-diagram text.label{ + text-anchor:start; + } + svg.railroad-diagram text.comment{ + font:italic 12px monospace; + } + svg.railroad-diagram rect{ + stroke-width:1; + stroke:black; + fill:transparent; + } + +/* ]]> */ +</style><g> +<path d="M20 41v20m10 -20v20m-10 -10h20"></path></g><path d="M40 51h10"></path><g class="terminal"> +<path d="M50 51h0.0"></path><path d="M104.0 51h0.0"></path><rect height="22" rx="10" ry="10" width="54.0" x="50.0" y="40"></rect><text x="77.0" y="55">Seek</text></g><path d="M104.0 51h10"></path><g> +<path d="M114.0 51h0.0"></path><path d="M202.5 51h0.0"></path><path d="M114.0 51a15 15 0 0 0 15 -15v-1a15 15 0 0 1 15 -15"></path><g> +<path d="M144.0 20h28.5"></path></g><path d="M172.5 20a15 15 0 0 1 15 15v1a15 15 0 0 0 15 15"></path><path d="M114.0 51h30"></path><g class="terminal"> +<path d="M144.0 51h0.0"></path><path d="M172.5 51h0.0"></path><rect height="22" rx="10" ry="10" width="28.5" x="144.0" y="40"></rect><text x="158.25" y="55">#</text></g><path d="M172.5 51h30"></path></g><g> +<path d="M202.5 51h0.0"></path><path d="M359.0 51h0.0"></path><path d="M202.5 51h30"></path><g class="terminal"> +<path d="M232.5 51h8.5"></path><path d="M320.5 51h8.5"></path><rect height="22" rx="10" ry="10" width="79.5" x="241.0" y="40"></rect><text x="280.75" y="55">filePos</text></g><path d="M329.0 51h30"></path><path d="M202.5 51a15 15 0 0 1 15 15v12a15 15 0 0 0 15 15"></path><g class="terminal"> +<path d="M232.5 93h0.0"></path><path d="M329.0 93h0.0"></path><rect height="22" rx="10" ry="10" width="96.5" x="232.5" y="82"></rect><text x="280.75" y="97">recordNum</text></g><path d="M329.0 93a15 15 0 0 0 15 -15v-12a15 15 0 0 1 15 -15"></path></g><path d="M 359.0 51 h 20 m -10 -10 v 20 m 10 -20 v 20"></path></g></svg> \ No newline at end of file diff --git a/source/media/helpimg/sbasic/Write_statement.svg b/source/media/helpimg/sbasic/Write_statement.svg new file mode 100644 index 000000000..cf035a57c --- /dev/null +++ b/source/media/helpimg/sbasic/Write_statement.svg @@ -0,0 +1,42 @@ +<svg class="railroad-diagram" height="124" viewBox="0 0 594.0 124" width="594.0" xmlns="http://www.w3.org/2000/svg";> +<g transform="translate(.5 .5)"> +<style>/* <![CDATA[ */ + svg.railroad-diagram { + background-color:transparent; + } + svg.railroad-diagram path { + stroke-width:1; + stroke:black; + fill:rgba(0,0,0,0); + } + svg.railroad-diagram text { + font:bold 14px monospace; + font-family: Verdana, sans-serif; + text-anchor:middle; + } + svg.railroad-diagram text.label{ + text-anchor:start; + } + svg.railroad-diagram text.comment{ + font:italic 12px monospace; + } + svg.railroad-diagram rect{ + stroke-width:1; + stroke:black; + fill:transparent; + } + +/* ]]> */ +</style><g> +<path d="M20 41v20m10 -20v20m-10 -10h20"></path></g><path d="M40 51h10"></path><g class="terminal"> +<path d="M50 51h0.0"></path><path d="M112.5 51h0.0"></path><rect height="22" rx="10" ry="10" width="62.5" x="50.0" y="40"></rect><text x="81.25" y="55">Write</text></g><path d="M112.5 51h10"></path><g> +<path d="M122.5 51h0.0"></path><path d="M211.0 51h0.0"></path><path d="M122.5 51a15 15 0 0 0 15 -15v-1a15 15 0 0 1 15 -15"></path><g> +<path d="M152.5 20h28.5"></path></g><path d="M181.0 20a15 15 0 0 1 15 15v1a15 15 0 0 0 15 15"></path><path d="M122.5 51h30"></path><g class="terminal"> +<path d="M152.5 51h0.0"></path><path d="M181.0 51h0.0"></path><rect height="22" rx="10" ry="10" width="28.5" x="152.5" y="40"></rect><text x="166.75" y="55">#</text></g><path d="M181.0 51h30"></path></g><path d="M211.0 51h10"></path><g class="terminal"> +<path d="M221.0 51h0.0"></path><path d="M300.5 51h0.0"></path><rect height="22" rx="10" ry="10" width="79.5" x="221.0" y="40"></rect><text x="260.75" y="55">fileNum</text></g><path d="M300.5 51h10"></path><g> +<path d="M310.5 51h0.0"></path><path d="M399.0 51h0.0"></path><path d="M310.5 51h30"></path><g class="terminal"> +<path d="M340.5 51h0.0"></path><path d="M369.0 51h0.0"></path><rect height="22" rx="10" ry="10" width="28.5" x="340.5" y="40"></rect><text x="354.75" y="55">,</text></g><path d="M369.0 51h30"></path><path d="M310.5 51a15 15 0 0 1 15 15v12a15 15 0 0 0 15 15"></path><g class="terminal"> +<path d="M340.5 93h0.0"></path><path d="M369.0 93h0.0"></path><rect height="22" rx="10" ry="10" width="28.5" x="340.5" y="82"></rect><text x="354.75" y="97">;</text></g><path d="M369.0 93a15 15 0 0 0 15 -15v-12a15 15 0 0 1 15 -15"></path></g><path d="M399.0 51h10"></path><g> +<path d="M409.0 51h0.0"></path><path d="M544.0 51h0.0"></path><path d="M409.0 51h15"></path><g class="terminal"> +<path d="M424.0 51h0.0"></path><path d="M529.0 51h0.0"></path><rect height="22" rx="10" ry="10" width="105.0" x="424.0" y="40"></rect><text x="476.5" y="55">expression</text></g><path d="M529.0 51h15"></path><path d="M424.0 51a15 15 0 0 0 -15 15v12a15 15 0 0 0 15 15"></path><g class="terminal"> +<path d="M424.0 93h38.25"></path><path d="M490.75 93h38.25"></path><rect height="22" rx="10" ry="10" width="28.5" x="462.25" y="82"></rect><text x="476.5" y="97">,</text></g><path d="M529.0 93a15 15 0 0 0 15 -15v-12a15 15 0 0 0 -15 -15"></path></g><path d="M544.0 51h10"></path><path d="M 554.0 51 h 20 m -10 -10 v 20 m 10 -20 v 20"></path></g></svg> \ No newline at end of file diff --git a/source/text/sbasic/shared/03010103.xhp b/source/text/sbasic/shared/03010103.xhp index e49aabc4f..f1f0c287a 100644 --- a/source/text/sbasic/shared/03010103.xhp +++ b/source/text/sbasic/shared/03010103.xhp @@ -20,14 +20,13 @@ <meta> <topic id="textsbasicshared03010103xml" indexer="include" status="PUBLISH"> - <title id="tit" xml-lang="en-US">Print Statement</title> + <title id="tit" xml-lang="en-US">Print# Statement</title> <filename>/text/sbasic/shared/03010103.xhp</filename> </topic> </meta> <body> - <section id="print"> <bookmark xml-lang="en-US" branch="index" id="bm_id3147230"> <bookmark_value>Print statement</bookmark_value> @@ -37,54 +36,62 @@ <bookmark_value>Tab function; in Print statement</bookmark_value> </bookmark> - -<h1 id="hd_id3147230" xml-lang="en-US"><variable id="Print_h1"><link href="text/sbasic/shared/03010103.xhp" name="Print Statement">Print Statement</link></variable></h1> -<paragraph id="par_id3156281" role="paragraph" xml-lang="en-US">Outputs the specified strings or numeric expressions to a dialog or to a file.</paragraph> +<h1 id="hd_id3147230" xml-lang="en-US"><variable id="Print_h1"><link href="text/sbasic/shared/03010103.xhp" name="Print# Statement">Print# Statement</link></variable></h1> +<paragraph id="par_id3156281" role="paragraph" xml-lang="en-US">Outputs the specified strings or numeric expressions to the screen or to a sequential file.</paragraph> </section> +<tip id="par_id461596463969009">Use <link href="text/sbasic/shared/03020201.xhp">Put#</link> statement to write data to a binary or a random file. Use <link href="text/sbasic/shared/03020205.xhp">Write#</link> statement to write data to a sequential text file with delimiting characters.</tip> + <embed href="text/sbasic/shared/00000003.xhp#functsyntax"/> <paragraph role="image" id="par_id841588605629842"><image src="media/helpimg/sbasic/Print_statement.svg" id="img_id931588605629842"><alt id="alt_id931588605629842">Print syntax</alt></image></paragraph> <bascode> -<paragraph id="par_id3153188" role="bascode" xml-lang="en-US">Print [#filenum,] expression1[{;|,} [Spc(number As Integer);] [Tab(pos As Integer);] [expression2[...]] </paragraph> +<paragraph id="par_id3153188" role="bascode">Print [#filenum,] expression1[{;|,} [Spc(number As Integer);] [Tab(pos As Integer);] [expression2[...]] </paragraph> </bascode> <embed href="text/sbasic/shared/00000003.xhp#functparameters"/> - <paragraph id="par_id2508621" role="paragraph" xml-lang="en-US"> <emph>filenum:</emph> Any numeric expression that contains the file number that was set by the <literal>Open</literal> statement for the respective file.<comment>see i61758</comment></paragraph> -<paragraph id="par_id3163712" role="paragraph" xml-lang="en-US"> <emph>expression</emph>: Any numeric or string expression to be printed. Multiple expressions can be separated by a semicolon. If separated by a comma, the expressions are indented to the next tab stop. The tab stops cannot be adjusted.</paragraph> -<paragraph id="par_id3153092" role="paragraph" xml-lang="en-US"> <emph>number</emph>: Number of spaces to be inserted by the <emph>Spc</emph> function.</paragraph> -<paragraph id="par_id3145364" role="paragraph" xml-lang="en-US"> <emph>pos</emph>: Spaces are inserted until the specified position.</paragraph> -<paragraph id="par_id3154319" role="paragraph" xml-lang="en-US">If a semicolon or comma appears after the last expression to be printed, $[officename] Basic stores the text in an internal buffer and continues program execution without printing. When another Print statement without a semicolon or comma at the end is encountered, all text to be printed is printed at once.</paragraph> -<paragraph id="par_id3145272" role="paragraph" xml-lang="en-US">Positive numeric expressions are printed with a leading space. Negative expressions are printed with a leading minus sign. If a certain range is exceeded for floating-point values, the respective numeric expression is printed in exponential notation.</paragraph> -<paragraph id="par_id3154011" role="paragraph" xml-lang="en-US">If the expression to be printed exceeds a certain length, the display will automatically wrap to the next line.</paragraph> -<paragraph id="par_id3146969" role="note" xml-lang="en-US">You can insert the <emph>Tab</emph> function, enclosed by semicolons, between arguments to indent the output to a specific position, or you can use the <emph>Spc</emph> function to insert a specified number of spaces.</paragraph> +<paragraph id="par_id2508621" role="paragraph"> <emph>filenum:</emph> Any numeric expression that contains the file number that was set by the <literal>Open</literal> statement for the respective file.<comment>see i61758</comment></paragraph> +<paragraph id="par_id3163712" role="paragraph"> <emph>expression</emph>: Any numeric or string expression to be printed. Multiple expressions can be separated by a semicolon. If separated by a comma, the expressions are indented to the next tab stop. The tab stops cannot be adjusted.</paragraph> +<paragraph id="par_id3153092" role="paragraph"> <emph>number</emph>: Number of spaces to be inserted by the <emph>Spc</emph> function.</paragraph> +<paragraph id="par_id3145364" role="paragraph"> <emph>pos</emph>: Spaces are inserted until the specified position.</paragraph> +<paragraph id="par_id3154319" role="paragraph">If a semicolon or comma appears after the last expression to be printed, $[officename] Basic stores the text in an internal buffer and continues program execution without printing. When another Print statement without a semicolon or comma at the end is encountered, all text to be printed is printed at once.</paragraph> +<paragraph id="par_id3145272" role="paragraph">Positive numeric expressions are printed with a leading space. Negative expressions are printed with a leading minus sign. If a certain range is exceeded for floating-point values, the respective numeric expression is printed in exponential notation.</paragraph> +<paragraph id="par_id3154011" role="paragraph">If the expression to be printed exceeds a certain length, the display will automatically wrap to the next line.</paragraph> +<paragraph id="par_id3146969" role="note">You can insert the <emph>Tab</emph> function, enclosed by semicolons, between arguments to indent the output to a specific position, or you can use the <emph>Spc</emph> function to insert a specified number of spaces.</paragraph> <embed href="text/sbasic/shared/00000003.xhp#functexample"/> <switch select="sys"> <case select="WIN"> <bascode> -<paragraph id="par_idm1073161760" role="bascode" localize="false" xml-lang="en-US">Sub ExamplePrint</paragraph> -<paragraph id="par_idm1073160528" role="bascode" localize="false" xml-lang="en-US"> Print "ABC"</paragraph> -<paragraph id="par_idm1073159296" role="bascode" localize="false" xml-lang="en-US"> Print "ABC","123"</paragraph> -<paragraph id="par_idm1073129856" role="bascode" localize="false" xml-lang="en-US"> i = FreeFile()</paragraph> -<paragraph id="par_idm1073128624" role="bascode" localize="false" xml-lang="en-US"> Open "C:\Temp.txt" For Output As i</paragraph> -<paragraph id="par_idm1073127376" role="bascode" localize="false" xml-lang="en-US"> Print #i, "ABC"</paragraph> -<paragraph id="par_idm1073126144" role="bascode" localize="false" xml-lang="en-US"> Close #i</paragraph> -<paragraph id="par_idm1073124912" role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph> +<paragraph id="par_idm1073161760" role="bascode" localize="false">Sub ExamplePrint</paragraph> +<paragraph id="par_idm1073160528" role="bascode" localize="false"> Print "ABC"</paragraph> +<paragraph id="par_idm1073159296" role="bascode" localize="false"> Print "ABC","123"</paragraph> +<paragraph id="par_idm1073129856" role="bascode" localize="false"> i = FreeFile()</paragraph> +<paragraph id="par_idm1073128624" role="bascode" localize="false"> Open "C:\Temp.txt" For Output As i</paragraph> +<paragraph id="par_idm1073127376" role="bascode" localize="false"> Print #i, "ABC"</paragraph> +<paragraph id="par_idm1073126144" role="bascode" localize="false"> Close #i</paragraph> +<paragraph id="par_idm1073124912" role="bascode" localize="false">End Sub</paragraph> </bascode> </case> <default> <bascode> -<paragraph id="par_idm1073122912" role="bascode" localize="false" xml-lang="en-US">Sub ExamplePrint</paragraph> -<paragraph id="par_idm1073121680" role="bascode" localize="false" xml-lang="en-US"> Print "ABC"</paragraph> -<paragraph id="par_idm1073120448" role="bascode" localize="false" xml-lang="en-US"> Print "ABC","123"</paragraph> -<paragraph id="par_idm1073119216" role="bascode" localize="false" xml-lang="en-US"> i = FreeFile()</paragraph> -<paragraph id="par_idm1073117984" role="bascode" localize="false" xml-lang="en-US"> Open "~/temp.txt" For Output As i</paragraph> -<paragraph id="par_idm1073116736" role="bascode" localize="false" xml-lang="en-US"> Print #i, "ABC"</paragraph> -<paragraph id="par_idm1073115504" role="bascode" localize="false" xml-lang="en-US"> Close #i</paragraph> -<paragraph id="par_idm1073114272" role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph> +<paragraph id="par_idm1073122912" role="bascode" localize="false">Sub ExamplePrint</paragraph> +<paragraph id="par_idm1073121680" role="bascode" localize="false"> Print "ABC"</paragraph> +<paragraph id="par_idm1073120448" role="bascode" localize="false"> Print "ABC","123"</paragraph> +<paragraph id="par_idm1073119216" role="bascode" localize="false"> i = FreeFile()</paragraph> +<paragraph id="par_idm1073117984" role="bascode" localize="false"> Open "~/temp.txt" For Output As i</paragraph> +<paragraph id="par_idm1073116736" role="bascode" localize="false"> Print #i, "ABC"</paragraph> +<paragraph id="par_idm1073115504" role="bascode" localize="false"> Close #i</paragraph> +<paragraph id="par_idm1073114272" role="bascode" localize="false">End Sub</paragraph> </bascode> </default> </switch> -</body> +<section id="relatedtopics" > + <embed href="text/sbasic/shared/03020101.xhp#Close_h1"/> + <embed href="text/sbasic/shared/03020204.xhp#Put_h1"/> + <embed href="text/sbasic/shared/03020103.xhp#Open_h1"/> + <embed href="text/sbasic/shared/03020205.xhp#Write_h1"/> +</section> + +</body> </helpdocument> diff --git a/source/text/sbasic/shared/03020104.xhp b/source/text/sbasic/shared/03020104.xhp index d6d2074a9..45b65045f 100644 --- a/source/text/sbasic/shared/03020104.xhp +++ b/source/text/sbasic/shared/03020104.xhp @@ -27,50 +27,56 @@ <body> - <section id="reset"> <bookmark xml-lang="en-US" branch="index" id="bm_id3154141"> <bookmark_value>Reset statement</bookmark_value> </bookmark> - -<paragraph id="hd_id3154141" role="heading" level="1" xml-lang="en-US"><link href="text/sbasic/shared/03020104.xhp">Reset Statement</link></paragraph> +<h1 id="hd_id3154141"><variable id="Reset_h1"><link href="text/sbasic/shared/03020104.xhp">Reset Statement</link></variable></h1> <paragraph id="par_id3156423" role="paragraph" xml-lang="en-US">Closes all open files and writes the contents of all file buffers to the harddisk.</paragraph> </section> -<paragraph id="hd_id3154124" role="heading" level="2" xml-lang="en-US">Syntax:</paragraph> +<embed href="text/sbasic/shared/00000003.xhp#functsyntax"/> +<paragraph role="paragraph" id="par_id971587473488701"> + <image src="media/helpimg/sbasic/Reset_statement.svg" id="img_id4156296484514"><alt xml-lang="en-US" id="alt_id15152796484514">Reset Statement diagram</alt></image> +</paragraph> <bascode> -<paragraph id="par_idm1207263392" role="bascode" localize="false" xml-lang="en-US">Reset</paragraph> +<paragraph id="par_idm1207263392" role="bascode" localize="false">Reset</paragraph> </bascode> -<paragraph id="hd_id3161831" role="heading" level="2" xml-lang="en-US">Example:</paragraph> +<embed href="text/sbasic/shared/00000003.xhp#functexample"/> <bascode> -<paragraph id="par_idm1207260032" role="bascode" localize="false" xml-lang="en-US">Sub ExampleReset</paragraph> -<paragraph id="par_idm1207243568" role="bascode" localize="false" xml-lang="en-US">On Error GoTo ErrorHandler</paragraph> -<paragraph id="par_idm1207242464" role="bascode" localize="false" xml-lang="en-US">Dim iNumber As Integer</paragraph> -<paragraph id="par_idm1207241360" role="bascode" localize="false" xml-lang="en-US">Dim iCount As Integer</paragraph> -<paragraph id="par_idm1207240256" role="bascode" localize="false" xml-lang="en-US">Dim sLine As String</paragraph> -<paragraph id="par_idm1207239152" role="bascode" localize="false" xml-lang="en-US">Dim aFile As String</paragraph> -<paragraph id="par_idm1207238048" role="bascode" localize="false" xml-lang="en-US"> aFile = "c:\data.txt"</paragraph> -<paragraph id="par_idm1207236896" role="bascode" localize="false" xml-lang="en-US"> iNumber = Freefile</paragraph> -<paragraph id="par_idm1207235792" role="bascode" localize="false" xml-lang="en-US"> Open aFile For Output As #iNumber</paragraph> +<paragraph id="par_idm1207260032" role="bascode" localize="false">Sub ExampleReset</paragraph> +<paragraph id="par_idm1207243568" role="bascode" localize="false">On Error GoTo ErrorHandler</paragraph> +<paragraph id="par_idm1207242464" role="bascode" localize="false">Dim iNumber As Integer</paragraph> +<paragraph id="par_idm1207241360" role="bascode" localize="false">Dim iCount As Integer</paragraph> +<paragraph id="par_idm1207240256" role="bascode" localize="false">Dim sLine As String</paragraph> +<paragraph id="par_idm1207239152" role="bascode" localize="false">Dim aFile As String</paragraph> +<paragraph id="par_idm1207238048" role="bascode" localize="false"> aFile = "c:\data.txt"</paragraph> +<paragraph id="par_idm1207236896" role="bascode" localize="false"> iNumber = Freefile</paragraph> +<paragraph id="par_idm1207235792" role="bascode" localize="false"> Open aFile For Output As #iNumber</paragraph> <paragraph id="par_id3148455" role="bascode" xml-lang="en-US"> Print #iNumber, "This is a new line of text"</paragraph> -<paragraph id="par_idm1207232992" role="bascode" localize="false" xml-lang="en-US"> Close #iNumber</paragraph> -<paragraph id="par_idm1207231888" role="bascode" localize="false" xml-lang="en-US"> iNumber = Freefile</paragraph> -<paragraph id="par_idm1207230784" role="bascode" localize="false" xml-lang="en-US"> Open aFile For Input As iNumber</paragraph> -<paragraph id="par_idm1207229632" role="bascode" localize="false" xml-lang="en-US"> For iCount = 1 To 5</paragraph> -<paragraph id="par_idm1207228528" role="bascode" localize="false" xml-lang="en-US"> Line Input #iNumber, sLine</paragraph> -<paragraph id="par_idm1207227376" role="bascode" localize="false" xml-lang="en-US"> If sLine <>"" Then</paragraph> -<paragraph id="par_idm1207226224" role="bascode" localize="false" xml-lang="en-US"> Rem</paragraph> -<paragraph id="par_idm1207225120" role="bascode" localize="false" xml-lang="en-US"> End If</paragraph> -<paragraph id="par_idm1207224016" role="bascode" localize="false" xml-lang="en-US"> Next iCount</paragraph> -<paragraph id="par_idm1207222912" role="bascode" localize="false" xml-lang="en-US"> Close #iNumber</paragraph> -<paragraph id="par_idm1207221808" role="bascode" localize="false" xml-lang="en-US"> Exit Sub</paragraph> -<paragraph id="par_idm1207220704" role="bascode" localize="false" xml-lang="en-US">ErrorHandler:</paragraph> -<paragraph id="par_idm1207219600" role="bascode" localize="false" xml-lang="en-US"> Reset</paragraph> +<paragraph id="par_idm1207232992" role="bascode" localize="false"> Close #iNumber</paragraph> +<paragraph id="par_idm1207231888" role="bascode" localize="false"> iNumber = Freefile</paragraph> +<paragraph id="par_idm1207230784" role="bascode" localize="false"> Open aFile For Input As iNumber</paragraph> +<paragraph id="par_idm1207229632" role="bascode" localize="false"> For iCount = 1 To 5</paragraph> +<paragraph id="par_idm1207228528" role="bascode" localize="false"> Line Input #iNumber, sLine</paragraph> +<paragraph id="par_idm1207227376" role="bascode" localize="false"> If sLine <>"" Then</paragraph> +<paragraph id="par_idm1207226224" role="bascode" localize="false"> Rem</paragraph> +<paragraph id="par_idm1207225120" role="bascode" localize="false"> End If</paragraph> +<paragraph id="par_idm1207224016" role="bascode" localize="false"> Next iCount</paragraph> +<paragraph id="par_idm1207222912" role="bascode" localize="false"> Close #iNumber</paragraph> +<paragraph id="par_idm1207221808" role="bascode" localize="false"> Exit Sub</paragraph> +<paragraph id="par_idm1207220704" role="bascode" localize="false">ErrorHandler:</paragraph> +<paragraph id="par_idm1207219600" role="bascode" localize="false"> Reset</paragraph> <paragraph id="par_id3163805" role="bascode" xml-lang="en-US"> MsgBox "All files will be closed",0,"Error"</paragraph> -<paragraph id="par_idm1207216848" role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph> +<paragraph id="par_idm1207216848" role="bascode" localize="false">End Sub</paragraph> </bascode> -</body> +<section id="relatedtopics" > + <embed href="text/sbasic/shared/03020101.xhp#Close_h1"/> + <embed href="text/sbasic/shared/03020103.xhp#Open_h1"/> +</section> + +</body> </helpdocument> \ No newline at end of file diff --git a/source/text/sbasic/shared/03020202.xhp b/source/text/sbasic/shared/03020202.xhp index b84c2dc82..17e20c0fb 100644 --- a/source/text/sbasic/shared/03020202.xhp +++ b/source/text/sbasic/shared/03020202.xhp @@ -27,64 +27,62 @@ <body> - <section id="input"> <bookmark xml-lang="en-US" branch="index" id="bm_id3154908"> <bookmark_value>Input statement</bookmark_value> </bookmark> - <paragraph id="hd_id3154908" role="heading" level="1" xml-lang="en-US"><link href="text/sbasic/shared/03020202.xhp" name="Input# Statement">Input# Statement</link></paragraph> <paragraph id="par_id3156424" role="paragraph" xml-lang="en-US">Reads data from an open sequential file.</paragraph> </section> -<paragraph id="hd_id3125863" role="heading" level="2" xml-lang="en-US">Syntax:</paragraph> -<paragraph id="par_id3150440" role="code" xml-lang="en-US">Input #FileNumber As Integer; var1[, var2[, var3[,...]]]</paragraph> +<embed href="text/sbasic/shared/00000003.xhp#functsyntax"/> +<paragraph role="paragraph" id="par_id971587473488701"> + <image src="media/helpimg/sbasic/Input_statement.svg" id="img_id4156296484514"><alt xml-lang="en-US" id="alt_id15152796484514">Input Statement diagram</alt></image> +</paragraph> +<bascode> +<paragraph id="par_id3150440" role="bascode" xml-lang="en-US">Input #fileNum {,|;} var1 [, var2 [, ...]]</paragraph> +</bascode> -<paragraph id="hd_id3146121" role="heading" level="2" xml-lang="en-US">Parameters:</paragraph> -<paragraph id="par_id3145749" role="paragraph" xml-lang="en-US"> <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 id="par_id3150011" role="paragraph" xml-lang="en-US"> <emph>var:</emph> A numeric or string variable that you assign the values read from the opened file to.</paragraph> -<paragraph id="par_id3159153" role="paragraph" xml-lang="en-US">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 id="par_id3146984" role="paragraph" xml-lang="en-US">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 id="par_id3156442" role="paragraph" xml-lang="en-US">Records that are separated by 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 id="par_id3147349" role="paragraph" xml-lang="en-US">If the end of the file is reached while reading a data element, an error occurs and the process is aborted.</paragraph> +<embed href="text/sbasic/shared/00000003.xhp#functparameters"/> +<paragraph id="par_id3145749" role="paragraph"> <emph>fileNum</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 id="par_id3150011" role="paragraph"> <emph>var</emph>: A numeric or string variable that you assign the values read from the opened file to.</paragraph> +<paragraph id="par_id3159153" role="paragraph">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 id="par_id3146984" role="paragraph">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 id="par_id3156442" role="paragraph">Records that are separated by 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 id="par_id3147349" role="paragraph">If the end of the file is reached while reading a data element, an error occurs and the process is aborted.</paragraph> -<paragraph id="hd_id3152578" role="heading" level="2" xml-lang="en-US">Example:</paragraph> +<embed href="text/sbasic/shared/00000003.xhp#functexample"/> <bascode> -<paragraph id="par_idm871097888" role="bascode" localize="false" xml-lang="en-US">Sub ExampleWorkWithAFile</paragraph> -<paragraph id="par_idm871096912" role="bascode" localize="false" xml-lang="en-US">Dim iCount As Integer</paragraph> -<paragraph id="par_idm871095952" role="bascode" localize="false" xml-lang="en-US">Dim sName As String</paragraph> -<paragraph id="par_idm871094992" role="bascode" localize="false" xml-lang="en-US">Dim sValue As Integer</paragraph> -<paragraph id="par_idm871094032" role="bascode" localize="false" xml-lang="en-US">Dim sFileName As String</paragraph> -<paragraph id="par_idm871093072" role="bascode" localize="false" xml-lang="en-US"> </paragraph> -<paragraph id="par_idm871092096" role="bascode" localize="false" xml-lang="en-US">sFileName = "c:\data.txt"</paragraph> -<paragraph id="par_idm871091120" role="bascode" localize="false" xml-lang="en-US">iCount = Freefile</paragraph> -<paragraph id="par_idm871090160" role="bascode" localize="false" xml-lang="en-US"> </paragraph> -<paragraph id="par_id4144765" role="bascode" xml-lang="en-US">' Write data ( which we will read later with Input ) to file</paragraph> -<paragraph id="par_idm871087952" role="bascode" localize="false" xml-lang="en-US">Open sFileName For Output As iCount</paragraph> -<paragraph id="par_idm871086976" role="bascode" localize="false" xml-lang="en-US">sName = "Hamburg"</paragraph> -<paragraph id="par_idm871086016" role="bascode" localize="false" xml-lang="en-US">sValue = 200</paragraph> -<paragraph id="par_idm871085056" role="bascode" localize="false" xml-lang="en-US">Write #iCount, sName, sValue</paragraph> -<paragraph id="par_idm871084080" role="bascode" localize="false" xml-lang="en-US">sName = "New York"</paragraph> -<paragraph id="par_idm871083120" role="bascode" localize="false" xml-lang="en-US">sValue = 300</paragraph> -<paragraph id="par_idm871082160" role="bascode" localize="false" xml-lang="en-US">Write #iCount, sName, sValue</paragraph> -<paragraph id="par_idm871081184" role="bascode" localize="false" xml-lang="en-US">sName = "Miami"</paragraph> -<paragraph id="par_idm871080224" role="bascode" localize="false" xml-lang="en-US">sValue = 459</paragraph> -<paragraph id="par_idm871079264" role="bascode" localize="false" xml-lang="en-US">Write #iCount, sName, sValue</paragraph> -<paragraph id="par_idm871078288" role="bascode" localize="false" xml-lang="en-US">Close #iCount</paragraph> -<paragraph id="par_idm871077328" role="bascode" localize="false" xml-lang="en-US"> </paragraph> -<paragraph id="par_idm871076400" role="bascode" localize="false" xml-lang="en-US">iCount = Freefile</paragraph> -<paragraph id="par_id4144766" role="bascode" xml-lang="en-US">' Read data file using Input</paragraph> -<paragraph id="par_idm871074192" role="bascode" localize="false" xml-lang="en-US">Open sFileName For Input As iCount</paragraph> -<paragraph id="par_idm871073216" role="bascode" localize="false" xml-lang="en-US">Input #iCount; sName, sValue</paragraph> -<paragraph id="par_idm871072240" role="bascode" localize="false" xml-lang="en-US">MsgBox sName & " " & sValue</paragraph> -<paragraph id="par_idm871071264" role="bascode" localize="false" xml-lang="en-US">Input #iCount; sName, sValue</paragraph> -<paragraph id="par_idm871070288" role="bascode" localize="false" xml-lang="en-US">MsgBox sName & " " & sValue</paragraph> -<paragraph id="par_idm871069312" role="bascode" localize="false" xml-lang="en-US">Input #iCount; sName, sValue</paragraph> -<paragraph id="par_idm871068336" role="bascode" localize="false" xml-lang="en-US">MsgBox sName & " " & sValue</paragraph> -<paragraph id="par_idm871067360" role="bascode" localize="false" xml-lang="en-US">Close #iCount</paragraph> -<paragraph id="par_idm871066400" role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph> +<paragraph id="par_idm871097888" role="bascode" localize="false">Sub ExampleWorkWithAFile</paragraph> +<paragraph id="par_idm871096912" role="bascode" localize="false">Dim iCount As Integer, sFileName As String</paragraph> +<paragraph id="par_idm871095952" role="bascode" localize="false">Dim sName As String, sValue As Integer</paragraph> +<paragraph id="par_idm871093072" role="bascode" localize="false"> </paragraph> +<paragraph id="par_idm871092096" role="bascode" localize="false"> sFileName = "C:\data.txt"</paragraph> +<paragraph id="par_idm871091120" role="bascode" localize="false"> iCount = Freefile</paragraph> +<paragraph id="par_idm871090160" role="bascode" localize="false"> </paragraph> +<paragraph id="par_id4144765" role="bascode" xml-lang="en-US"> ' Write data ( which we will read later with Input ) to file</paragraph> +<paragraph id="par_idm871087952" role="bascode" localize="false"> Open sFileName For Output As iCount</paragraph> +<paragraph id="par_idm871086976" role="bascode" localize="false"> sName = "Hamburg" : sValue = 200</paragraph> +<paragraph id="par_idm871085056" role="bascode" localize="false"> Write #iCount, sName, sValue</paragraph> +<paragraph id="par_idm871084080" role="bascode" localize="false"> sName = "New York" : sValue = 300</paragraph> +<paragraph id="par_idm871082160" role="bascode" localize="false"> Write #iCount; sName, sValue</paragraph> +<paragraph id="par_idm871081184" role="bascode" localize="false"> sName = "Miami" : sValue = 459</paragraph> +<paragraph id="par_idm871079264" role="bascode" localize="false"> Write #iCount, sName, sValue</paragraph> +<paragraph id="par_idm871078288" role="bascode" localize="false"> Close #iCount</paragraph> +<paragraph id="par_idm871077328" role="bascode" localize="false"> </paragraph> +<paragraph id="par_idm871076400" role="bascode" localize="false"> iCount = Freefile</paragraph> +<paragraph id="par_id4144766" role="bascode" xml-lang="en-US"> ' Read data file using Input</paragraph> +<paragraph id="par_idm871074192" role="bascode" localize="false"> Open sFileName For Input As iCount</paragraph> +<paragraph id="par_idm871073216" role="bascode" localize="false"> Input #iCount, sName, sValue</paragraph> +<paragraph id="par_idm871072240" role="bascode" localize="false"> MsgBox sName & " " & sValue</paragraph> +<paragraph id="par_idm871071264" role="bascode" localize="false"> Input #iCount; sName, sValue</paragraph> +<paragraph id="par_idm871070288" role="bascode" localize="false"> MsgBox sName & " " & sValue</paragraph> +<paragraph id="par_idm871069312" role="bascode" localize="false"> Input #iCount, sName, sValue</paragraph> +<paragraph id="par_idm871068336" role="bascode" localize="false"> MsgBox sName & " " & sValue</paragraph> +<paragraph id="par_idm871067360" role="bascode" localize="false"> Close #iCount</paragraph> +<paragraph id="par_idm871066400" role="bascode" localize="false">End Sub</paragraph> </bascode> -</body> +</body> </helpdocument> \ No newline at end of file diff --git a/source/text/sbasic/shared/03020203.xhp b/source/text/sbasic/shared/03020203.xhp index 2bb424393..79143d2a0 100644 --- a/source/text/sbasic/shared/03020203.xhp +++ b/source/text/sbasic/shared/03020203.xhp @@ -20,59 +20,37 @@ <meta> <topic id="textsbasicshared03020203xml" indexer="include" status="PUBLISH"> - <title id="tit" xml-lang="en-US">Line Input # Statement</title> + <title id="tit" xml-lang="en-US">Line Input# Statement</title> <filename>/text/sbasic/shared/03020203.xhp</filename> </topic> </meta> <body> - <section id="lineinput"> <bookmark xml-lang="en-US" branch="index" id="bm_id3153361"> <bookmark_value>Line Input statement</bookmark_value> </bookmark> - -<paragraph id="hd_id3153361" role="heading" level="1" xml-lang="en-US"><link href="text/sbasic/shared/03020203.xhp" name="Line Input # Statement">Line Input # Statement</link></paragraph> -<paragraph id="par_id3156280" role="paragraph" xml-lang="en-US">Reads strings from a sequential file into a variable.</paragraph> +<h1 id="hd_id3153361"><variable id="LineInput_h1"><link href="text/sbasic/shared/03020203.xhp" name="Line Input# Statement">Line Input# Statement</link></variable></h1> +<paragraph id="par_id3156280" role="paragraph" xml-lang="en-US">Reads a line from a sequential file into a variable.</paragraph> </section> -<paragraph id="hd_id3150447" role="heading" level="2" xml-lang="en-US">Syntax:</paragraph> +<embed href="text/sbasic/shared/00000003.xhp#functsyntax"/> +<paragraph role="paragraph" id="par_id971587473488701"> + <image src="media/helpimg/sbasic/Line-Input_statement.svg" id="img_id4156296484514"><alt xml-lang="en-US" id="alt_id15152796484514">Line Input Statement diagram</alt></image> +</paragraph> <bascode> -<paragraph id="par_id3147229" role="bascode" xml-lang="en-US">Line Input #FileNumber As Integer, Var As String </paragraph> +<paragraph id="par_id3147229" role="bascode" localize="false">Line Input #fileNum, variable</paragraph> </bascode> -<paragraph id="hd_id3145173" role="heading" level="2" xml-lang="en-US">Parameters:</paragraph> -<paragraph id="par_id3161832" role="paragraph" xml-lang="en-US"> <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 INPUT.</paragraph> -<paragraph id="par_id3151119" role="paragraph" xml-lang="en-US"> <emph>var:</emph> The name of the variable that stores the result.</paragraph> +<embed href="text/sbasic/shared/00000003.xhp#functparameters"/> +<paragraph id="par_id3161832" role="paragraph" xml-lang="en-US"> <emph>fileNum</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 INPUT.</paragraph> +<paragraph id="par_id3151119" role="paragraph" xml-lang="en-US"> <emph>variable</emph>: The name of the variable that stores the result.</paragraph> <paragraph id="par_id3150010" role="paragraph" xml-lang="en-US">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 id="hd_id3163711" role="heading" level="2" xml-lang="en-US">Example:</paragraph> -<bascode> -<paragraph id="par_idm1340596256" role="bascode" localize="false" xml-lang="en-US">Sub ExampleWorkWithAFile</paragraph> -<paragraph id="par_idm1340595008" role="bascode" localize="false" xml-lang="en-US">Dim iNumber As Integer</paragraph> -<paragraph id="par_idm1340593776" role="bascode" localize="false" xml-lang="en-US">Dim sLine As String</paragraph> -<paragraph id="par_idm1340592544" role="bascode" localize="false" xml-lang="en-US">Dim aFile As String</paragraph> -<paragraph id="par_idm1340591312" role="bascode" localize="false" xml-lang="en-US">Dim sMsg As String</paragraph> -<paragraph id="par_idm1340590080" role="bascode" localize="false" xml-lang="en-US"> aFile = "c:\data.txt"</paragraph> -<paragraph id="par_idm1340588832" role="bascode" localize="false" xml-lang="en-US"> iNumber = Freefile</paragraph> -<paragraph id="par_idm1340587600" role="bascode" localize="false" xml-lang="en-US"> Open aFile For Output As #iNumber</paragraph> -<paragraph id="par_id3147124" role="bascode" xml-lang="en-US"> Print #iNumber, "This is a line of text"</paragraph> -<paragraph id="par_id3153415" role="bascode" xml-lang="en-US"> Print #iNumber, "This is another line of text"</paragraph> -<paragraph id="par_idm1340582816" role="bascode" localize="false" xml-lang="en-US"> Close #iNumber</paragraph> -<paragraph id="par_idm1340581584" role="bascode" localize="false" xml-lang="en-US"> iNumber = Freefile</paragraph> -<paragraph id="par_idm1340580352" role="bascode" localize="false" xml-lang="en-US"> Open aFile For Input As iNumber</paragraph> -<paragraph id="par_idm1340579104" role="bascode" localize="false" xml-lang="en-US"> While Not EOF(iNumber)</paragraph> -<paragraph id="par_idm1340577856" role="bascode" localize="false" xml-lang="en-US"> Line Input #iNumber, sLine</paragraph> -<paragraph id="par_idm1340576608" role="bascode" localize="false" xml-lang="en-US"> If sLine <>"" Then</paragraph> -<paragraph id="par_idm1340575360" role="bascode" localize="false" xml-lang="en-US"> sMsg = sMsg & sLine & chr(13)</paragraph> -<paragraph id="par_idm1340574096" role="bascode" localize="false" xml-lang="en-US"> End If</paragraph> -<paragraph id="par_idm1340572864" role="bascode" localize="false" xml-lang="en-US"> Wend</paragraph> -<paragraph id="par_idm1340571632" role="bascode" localize="false" xml-lang="en-US"> Close #iNumber</paragraph> -<paragraph id="par_idm1340570400" role="bascode" localize="false" xml-lang="en-US"> MsgBox sMsg</paragraph> -<paragraph id="par_idm1340569168" role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph> -</bascode> -</body> +<embed href="text/sbasic/shared/00000003.xhp#functexample"/> +<embed href="text/sbasic/shared/03020103.xhp#FileExample"/> +</body> </helpdocument> \ No newline at end of file diff --git a/source/text/sbasic/shared/03020204.xhp b/source/text/sbasic/shared/03020204.xhp index 754925637..c8b6bd14f 100644 --- a/source/text/sbasic/shared/03020204.xhp +++ b/source/text/sbasic/shared/03020204.xhp @@ -20,7 +20,7 @@ <meta> <topic id="textsbasicshared03020204xml" indexer="include" status="PUBLISH"> - <title id="tit" xml-lang="en-US">Put Statement</title> + <title id="tit" xml-lang="en-US">Put# Statement</title> <filename>/text/sbasic/shared/03020204.xhp</filename> </topic> </meta> @@ -31,10 +31,11 @@ <bookmark_value>Put statement</bookmark_value> </bookmark> -<h1 id="hd_id3150360"><variable id="Put_h1"><link href="text/sbasic/shared/03020204.xhp" name="Put Statement">Put Statement</link></variable></h1> +<h1 id="hd_id3150360"><variable id="Put_h1"><link href="text/sbasic/shared/03020204.xhp" name="Put Statement">Put# Statement</link></variable></h1> <paragraph id="par_id3154909" role="paragraph" xml-lang="en-US">Writes a record to a relative file or a sequence of bytes to a binary file.</paragraph> </section> -<paragraph id="par_id3156281" role="paragraph" xml-lang="en-US">See also: <link href="text/sbasic/shared/03020201.xhp" name="Get"><item type="literal">Get</item></link> statement</paragraph> + +<tip id="par_id461596463969009">Use <link href="text/sbasic/shared/03010103.xhp">Print#</link> statement to print data to a sequential text file. Use <link href="text/sbasic/shared/03020205.xhp">Write#</link> statement to write data to a sequential text file with delimiting characters.</tip> <embed href="text/sbasic/shared/00000003.xhp#functsyntax"/> <paragraph role="paragraph" id="par_id971587473488701"> @@ -45,10 +46,10 @@ </bascode> <embed href="text/sbasic/shared/00000003.xhp#functparameters"/> -<paragraph id="par_id3146120" role="paragraph" xml-lang="en-US"> <emph>fileNum:</emph> Any integer expression that defines the file that you want to write to.</paragraph> -<paragraph id="par_id3155411" role="paragraph" xml-lang="en-US"> <emph>recordNum, filePos: </emph>For relative files (random access files), the number of the record that you want to write.</paragraph> +<paragraph id="par_id3146120" role="paragraph" xml-lang="en-US"> <emph>fileNum</emph>: Any integer expression that defines the file that you want to write to.</paragraph> +<paragraph id="par_id3155411" role="paragraph" xml-lang="en-US"> <emph>recordNum, filePos</emph>: For relative files (random access files), the number of the record that you want to write.</paragraph> <paragraph id="par_id3148576" role="paragraph" xml-lang="en-US">For binary files (binary access), the position of the byte in the file where you want to start writing.</paragraph> -<paragraph id="par_id3153729" role="paragraph" xml-lang="en-US"> <emph>variable:</emph> Name of the variable that you want to write to the file.</paragraph> +<paragraph id="par_id3153729" role="paragraph" xml-lang="en-US"> <emph>variable</emph>: Name of the variable that you want to write to the file.</paragraph> <paragraph id="par_id3146974" role="paragraph" xml-lang="en-US">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 id="par_id3155855" role="paragraph" xml-lang="en-US">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> diff --git a/source/text/sbasic/shared/03020205.xhp b/source/text/sbasic/shared/03020205.xhp index e40f57bb7..608395b6b 100644 --- a/source/text/sbasic/shared/03020205.xhp +++ b/source/text/sbasic/shared/03020205.xhp @@ -27,47 +27,57 @@ <body> - <section id="write"> <bookmark xml-lang="en-US" branch="index" id="bm_id3147229"> <bookmark_value>Write statement</bookmark_value> </bookmark> - -<paragraph id="hd_id3147229" role="heading" level="1" xml-lang="en-US"><link href="text/sbasic/shared/03020205.xhp" name="Write Statement">Write Statement</link></paragraph> -<paragraph id="par_id3154685" role="paragraph" xml-lang="en-US">Writes data to a sequential file.</paragraph> +<h1 id="hd_id3147229"><variable id="Write_h1"><link href="text/sbasic/shared/03020205.xhp" name="Write# Statement">Write# Statement</link></variable></h1> +<paragraph id="par_id3154685" role="paragraph" xml-lang="en-US">Writes data to a sequential text file with delimiting characters.</paragraph> </section> -<paragraph id="hd_id3150449" role="heading" level="2" xml-lang="en-US">Syntax:</paragraph> +<tip id="par_id461596463969009">Use <link href="text/sbasic/shared/03010103.xhp">Print#</link> statement to print data to a sequential text file. Use <link href="text/sbasic/shared/03020201.xhp">Put#</link> statement to write data to a binary or a random file.</tip> + +<embed href="text/sbasic/shared/00000003.xhp#functsyntax"/> +<paragraph role="paragraph" id="par_id971587473488701"> + <image src="media/helpimg/sbasic/Write_statement.svg" id="img_id4156296484514"><alt xml-lang="en-US" id="alt_id15152796484514">Write Statement diagram</alt></image> +</paragraph> <bascode> -<paragraph id="par_id3145785" role="bascode" xml-lang="en-US">Write [#FileName], [Expressionlist]<comment>see i61248</comment></paragraph> +<paragraph id="par_id3145785" role="bascode" localize="false">Write [#fileNum] {,|;} expression [, …]</paragraph> </bascode> -<paragraph id="hd_id3151116" role="heading" level="2" xml-lang="en-US">Parameters:</paragraph> -<paragraph id="par_id3153728" role="paragraph" xml-lang="en-US"> <emph>FileName:</emph> Any numeric expression that contains the file number that was set by the Open statement for the respective file.</paragraph> -<paragraph id="par_id3146120" role="paragraph" xml-lang="en-US"> <emph>Expressionlist:</emph> Variables or expressions that you want to enter in a file, separated by commas.</paragraph> -<paragraph id="par_id3150010" role="paragraph" xml-lang="en-US">If the expression list is omitted, the <emph>Write</emph> statement appends an empty line to the file.</paragraph> -<paragraph id="par_id3163713" role="paragraph" xml-lang="en-US">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 id="par_id3147428" role="paragraph" xml-lang="en-US">Strings that you write are enclosed by quotation marks and separated by commas. You do not need to enter these delimiters in the expression list.</paragraph> -<paragraph id="par_id1002838" role="paragraph" xml-lang="en-US">Each <emph>Write</emph> statement outputs a line end symbol as last entry.</paragraph> -<paragraph id="par_id6618854" role="paragraph" xml-lang="en-US">Numbers with decimal delimiters are converted according to the locale settings.</paragraph> +<embed href="text/sbasic/shared/00000003.xhp#functparameters"/> +<paragraph id="par_id3153728" role="paragraph"> <emph>fileNum</emph>: Any numeric expression that contains the file number that was set by the Open statement for the respective file.</paragraph> +<paragraph id="par_id3146120" role="paragraph"> <emph>expression</emph> list: Variables or expressions that you want to enter in a file, separated by commas.</paragraph> +<paragraph id="par_id3150010" role="paragraph">If the expression list is omitted, the <emph>Write</emph> statement appends an empty line to the file.</paragraph> +<paragraph id="par_id3163713" role="paragraph">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 id="par_id3147428" role="paragraph">Strings that you write are enclosed by quotation marks and separated by commas. You do not need to enter these delimiters in the expression list.</paragraph> +<paragraph id="par_id1002838" role="paragraph">Each <emph>Write</emph> statement outputs a line end symbol as last entry.</paragraph> +<paragraph id="par_id6618854" role="paragraph">Numbers with decimal delimiters are converted according to the locale settings.</paragraph> -<paragraph id="hd_id3151073" role="heading" level="2" xml-lang="en-US">Example:</paragraph> +<embed href="text/sbasic/shared/00000003.xhp#functexample"/> <bascode> -<paragraph id="par_idm1340911536" role="bascode" localize="false" xml-lang="en-US">Sub ExampleWrite</paragraph> -<paragraph id="par_idm1340910304" role="bascode" localize="false" xml-lang="en-US">Dim iCount As Integer</paragraph> -<paragraph id="par_idm1340909072" role="bascode" localize="false" xml-lang="en-US">Dim sValue As String</paragraph> -<paragraph id="par_idm1340907840" role="bascode" localize="false" xml-lang="en-US"> iCount = Freefile</paragraph> -<paragraph id="par_idm1340906608" role="bascode" localize="false" xml-lang="en-US"> Open "C:\data.txt" For Output As iCount</paragraph> -<paragraph id="par_idm1340905344" role="bascode" localize="false" xml-lang="en-US"> sValue = "Hamburg"</paragraph> -<paragraph id="par_idm1340904112" role="bascode" localize="false" xml-lang="en-US"> Write #iCount,sValue,200</paragraph> -<paragraph id="par_idm1340902864" role="bascode" localize="false" xml-lang="en-US"> sValue = "New York"</paragraph> -<paragraph id="par_idm1340901632" role="bascode" localize="false" xml-lang="en-US"> Write #iCount,sValue,300</paragraph> -<paragraph id="par_idm1340900384" role="bascode" localize="false" xml-lang="en-US"> sValue = "Miami"</paragraph> -<paragraph id="par_idm1340899152" role="bascode" localize="false" xml-lang="en-US"> Write #iCount,sValue,450</paragraph> -<paragraph id="par_idm1340897904" role="bascode" localize="false" xml-lang="en-US"> Close #iCount</paragraph> -<paragraph id="par_idm1340896672" role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph> +<paragraph id="par_idm1340911536" role="bascode" localize="false">Sub ExampleWrite</paragraph> +<paragraph id="par_idm1340910304" role="bascode" localize="false"> Dim iCount As Integer</paragraph> +<paragraph id="par_idm1340909072" role="bascode" localize="false"> Dim sValue As String</paragraph> +<paragraph id="par_idm1340907840" role="bascode" localize="false"> iCount = Freefile</paragraph> +<paragraph id="par_idm1340906608" role="bascode" localize="false"> Open "C:\data.txt" For Output As iCount</paragraph> +<paragraph id="par_idm1340905344" role="bascode" localize="false"> sValue = "Hamburg"</paragraph> +<paragraph id="par_idm1340904112" role="bascode" localize="false"> Write #iCount,sValue,200</paragraph> +<paragraph id="par_idm1340902864" role="bascode" localize="false"> sValue = "New York"</paragraph> +<paragraph id="par_idm1340901632" role="bascode" localize="false"> Write #iCount,sValue,300</paragraph> +<paragraph id="par_idm1340900384" role="bascode" localize="false"> sValue = "Miami"</paragraph> +<paragraph id="par_idm1340899152" role="bascode" localize="false"> Write #iCount,sValue,450</paragraph> +<paragraph id="par_idm1340897904" role="bascode" localize="false"> Close #iCount</paragraph> +<paragraph id="par_idm1340896672" role="bascode" localize="false">End Sub</paragraph> </bascode> -</body> +<section id="relatedtopics" > + <embed href="text/sbasic/shared/03020103.xhp#Open_h1"/> + <embed href="text/sbasic/shared/03010103.xhp#Print_h1"/> + <embed href="text/sbasic/shared/03020204.xhp#Put_h1"/> + <embed href="text/sbasic/shared/03020101.xhp#Close_h1"/> +</section> + +</body> </helpdocument> \ No newline at end of file diff --git a/source/text/sbasic/shared/03020305.xhp b/source/text/sbasic/shared/03020305.xhp index 32424a100..9ff8727fd 100644 --- a/source/text/sbasic/shared/03020305.xhp +++ b/source/text/sbasic/shared/03020305.xhp @@ -1,6 +1,4 @@ <?xml version="1.0" encoding="UTF-8"?> - - <!-- * This file is part of the LibreOffice project. * @@ -18,11 +16,11 @@ * except in compliance with the License. You may obtain a copy of * the License at http://www.apache.org/licenses/LICENSE-2.0 . --> - + <helpdocument version="1.0"> <meta> <topic id="textsbasicshared03020305xml" indexer="include" status="PUBLISH"> -<title id="tit" xml-lang="en-US">Seek Statement</title> +<title id="tit" xml-lang="en-US">Seek# Statement</title> <filename>/text/sbasic/shared/03020305.xhp</filename> </topic> <history> @@ -32,22 +30,32 @@ <body> <bookmark xml-lang="en-US" branch="index" id="bm_id3159413"><bookmark_value>Seek statement</bookmark_value> </bookmark> -<paragraph role="heading" id="hd_id3159413" xml-lang="en-US" level="1"><link href="text/sbasic/shared/03020305.xhp" name="Seek Statement">Seek Statement</link></paragraph> -<paragraph role="paragraph" id="par_id3153381" xml-lang="en-US">Sets the position for the next writing or reading in a file that was opened with the Open statement.<comment>see #61751</comment></paragraph> -<paragraph role="paragraph" id="par_id2100589" xml-lang="en-US">For random access files, the Seek statement sets the number of the next record to be accessed.</paragraph> -<paragraph role="paragraph" id="par_id5444807" xml-lang="en-US">For all other files, the Seek statement sets the byte position at which the next operation is to occur.</paragraph> -<paragraph role="paragraph" id="par_id3156280" xml-lang="en-US">See also: <link href="text/sbasic/shared/03020103.xhp" name="Open">Open</link>, <link href="text/sbasic/shared/03020304.xhp" name="Seek">Seek</link>.</paragraph> -<paragraph role="heading" id="hd_id3145785" xml-lang="en-US" level="2">Syntax:</paragraph> +<h1 id="hd_id3159413"><link href="text/sbasic/shared/03020305.xhp" name="Seek# Statement">Seek Statement</link></h1> +<paragraph role="paragraph" id="par_id3153381">Sets the position for the next writing or reading in a file that was opened with the Open statement.<comment>see #61751</comment></paragraph> +<paragraph role="paragraph" id="par_id2100589">For random access files, the Seek statement sets the number of the next record to be accessed.</paragraph> +<paragraph role="paragraph" id="par_id5444807">For all other files, the Seek statement sets the byte position at which the next operation is to occur.</paragraph> + +<embed href="text/sbasic/shared/00000003.xhp#functsyntax"/> +<paragraph role="paragraph" id="par_id971587473488701"> + <image src="media/helpimg/sbasic/Seek_statement.svg" id="img_id4156296484514"><alt xml-lang="en-US" id="alt_id15152796484514">Seek Statement diagram</alt></image> +</paragraph> <bascode> -<paragraph role="bascode" id="par_id3145273" xml-lang="en-US">Seek[#FileNumber], Position (As Long)</paragraph> +<paragraph role="bascode" id="par_id3145273" xml-lang="en-US">Seek [#]filePos, {filePos|recordNum}</paragraph> </bascode> -<paragraph role="heading" id="hd_id3154321" xml-lang="en-US" level="2">Parameters:</paragraph> + +<paragraph id="hd_id3153379" role="heading" level="2" xml-lang="en-US">Parameters:</paragraph> <paragraph role="paragraph" id="par_id3153952" xml-lang="en-US"> -<emph>FileNumber: </emph>The data channel number used in the Open statement.</paragraph> +<emph>fileNum</emph>: The data channel number used in the Open statement.</paragraph> <paragraph role="paragraph" id="par_id3145366" xml-lang="en-US"> -<emph>Position: </emph>Position for the next writing or reading. Position can be a number between 1 and 2,147,483,647. According to the file type, the position indicates the number of the record (files in the Random mode) or the byte position (files in the Binary, Output, Append or Input mode). The first byte in a file is position 1, the second byte is position 2, and so on.</paragraph> +<emph>filePos, recordNum</emph>: Position for the next writing or reading. Position can be a number between 1 and 2,147,483,647. According to the file type, the position indicates the number of the record (files in the Random mode) or the byte position (files in the Binary, Output, Append or Input mode). The first byte in a file is position 1, the second byte is position 2, and so on.</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"/> + +<section id="relatedtopics" > + <embed href="text/sbasic/shared/03020103.xhp#Open_h1"/> + <paragraph role="paragraph" id="par_id491596468328575"><link href="text/sbasic/shared/03020304.xhp" name="Seek">Seek</link> function</paragraph> +</section> + </body> </helpdocument> _______________________________________________ Libreoffice-commits mailing list [email protected] https://lists.freedesktop.org/mailman/listinfo/libreoffice-commits
