diff options
6 files changed, 189 insertions, 183 deletions
diff --git a/helpcontent2/source/text/sbasic/shared/03030302.xhp b/helpcontent2/source/text/sbasic/shared/03030302.xhp index a76c306843..7287193ae7 100755 --- a/helpcontent2/source/text/sbasic/shared/03030302.xhp +++ b/helpcontent2/source/text/sbasic/shared/03030302.xhp @@ -62,12 +62,12 @@ </topic> <history> <created date="2003-10-31T00:00:00">Sun Microsystems, Inc.</created> -<lastedited date="2004-05-12T14:35:13">converted from old format - fpe</lastedited> +<lastedited date="2004-08-24T14:39:12">converted from old format - fpe</lastedited> </history> </meta> <body> <section id="time"> -<bookmark xml-lang="en-US" branch="index" id="bm_id3145090"><bookmark_value>Time;function</bookmark_value> +<bookmark xml-lang="en-US" branch="index" id="bm_id3145090"><bookmark_value>Time statement</bookmark_value> </bookmark> <paragraph role="heading" id="hd_id3145090" xml-lang="en-US" level="1" l10n="U" oldref="1"><link href="text/sbasic/shared/03030302.xhp">Time Statement [Runtime]</link></paragraph> <paragraph role="paragraph" id="par_id3150984" xml-lang="en-US" l10n="U" oldref="2">This function returns the current system time as a string in the format "HH:MM:SS".</paragraph> diff --git a/helpcontent2/source/text/sbasic/shared/03030303.xhp b/helpcontent2/source/text/sbasic/shared/03030303.xhp index 62f81a92dd..2b9b09c54a 100644 --- a/helpcontent2/source/text/sbasic/shared/03030303.xhp +++ b/helpcontent2/source/text/sbasic/shared/03030303.xhp @@ -53,40 +53,40 @@ * * ************************************************************************--> + <helpdocument version="1.0"> <meta> <topic id="textsbasicshared03030303xml" indexer="include" status="PUBLISH"> -<title xml-lang="en-US" id="tit">Timer Function [Runtime]</title> +<title id="tit" xml-lang="en-US">Timer Function [Runtime]</title> <filename>/text/sbasic/shared/03030303.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-08-24T14:39:41">converted from old format - fpe</lastedited> </history> </meta> <body> - - - <section id="timer"> - <bookmark xml-lang="en-US" branch="index" id="bm_id3149346"><bookmark_value>Timer;function</bookmark_value></bookmark><paragraph id="hd_id3149346" role="heading" level="1" oldref="1" l10n="U" xml-lang="en-US"><link href="text/sbasic/shared/03030303.xhp" name="Timer Function [Runtime]">Timer Function [Runtime]</link></paragraph> - <paragraph role="paragraph" id="par_id3156023" l10n="U" xml-lang="en-US" oldref="2">Returns a value that specifies the number of seconds that have elapsed since midnight.</paragraph> - </section> - <paragraph role="note" id="par_id3156212" l10n="U" xml-lang="en-US" oldref="3">You must first declare a variable to call the Timer function and assign it the "Long " data type, otherwise a Date value is returned.</paragraph> - <paragraph role="heading" level="2" id="hd_id3153768" l10n="U" xml-lang="en-US" oldref="4">Syntax:</paragraph> - <paragraph role="paragraph" id="par_id3161831" l10n="U" xml-lang="en-US" oldref="5">Timer</paragraph> - <paragraph role="heading" level="2" id="hd_id3146975" l10n="U" xml-lang="en-US" oldref="6">Return value:</paragraph> - <paragraph role="paragraph" id="par_id3146984" l10n="U" xml-lang="en-US" oldref="7">Date</paragraph> - <paragraph role="heading" level="2" id="hd_id3156442" l10n="U" xml-lang="en-US" oldref="8">Example:</paragraph> - <paragraph role="paragraph" id="par_id3153951" l10n="U" xml-lang="en-US" oldref="9">Sub ExampleTimer</paragraph> - <paragraph role="paragraph" id="par_id3147427" l10n="U" xml-lang="en-US" oldref="10">Dim lSec as long,lMin as long,lHour as long</paragraph> - <paragraph role="paragraph" id="par_id3153092" l10n="U" xml-lang="en-US" oldref="11">lSec = Timer</paragraph> - <paragraph role="paragraph" id="par_id3145748" l10n="U" xml-lang="en-US" oldref="12">MsgBox lSec,0,"Seconds since midnight"</paragraph> - <paragraph role="paragraph" id="par_id3149260" l10n="U" xml-lang="en-US" oldref="13">lMin = lSec / 60</paragraph> - <paragraph role="paragraph" id="par_id3148646" l10n="U" xml-lang="en-US" oldref="14">lSec = lSec Mod 60</paragraph> - <paragraph role="paragraph" id="par_id3148575" l10n="U" xml-lang="en-US" oldref="15">lHour = lMin / 60</paragraph> - <paragraph role="paragraph" id="par_id3150418" l10n="U" xml-lang="en-US" oldref="16">lMin = lMin Mod 60</paragraph> - <paragraph role="paragraph" id="par_id3156283" l10n="U" xml-lang="en-US" oldref="17">MsgBox Right("00" & lHour , 2) & ":"& Right("00" & lMin , 2) & ":" & Right("00" & lSec , 2) ,0,"The time is"</paragraph> - <paragraph role="paragraph" id="par_id3153158" l10n="U" xml-lang="en-US" oldref="18">end sub</paragraph> - - </body> +<section id="timer"> +<bookmark xml-lang="en-US" branch="index" id="bm_id3149346"><bookmark_value>Timer function</bookmark_value> +</bookmark> +<paragraph role="heading" id="hd_id3149346" xml-lang="en-US" level="1" l10n="U" oldref="1"><link href="text/sbasic/shared/03030303.xhp" name="Timer Function [Runtime]">Timer Function [Runtime]</link></paragraph> +<paragraph role="paragraph" id="par_id3156023" xml-lang="en-US" l10n="U" oldref="2">Returns a value that specifies the number of seconds that have elapsed since midnight.</paragraph> +</section> +<paragraph role="note" id="par_id3156212" xml-lang="en-US" l10n="U" oldref="3">You must first declare a variable to call the Timer function and assign it the "Long " data type, otherwise a Date value is returned.</paragraph> +<paragraph role="heading" id="hd_id3153768" xml-lang="en-US" level="2" l10n="U" oldref="4">Syntax:</paragraph> +<paragraph role="paragraph" id="par_id3161831" xml-lang="en-US" l10n="U" oldref="5">Timer</paragraph> +<paragraph role="heading" id="hd_id3146975" xml-lang="en-US" level="2" l10n="U" oldref="6">Return value:</paragraph> +<paragraph role="paragraph" id="par_id3146984" xml-lang="en-US" l10n="U" oldref="7">Date</paragraph> +<paragraph role="heading" id="hd_id3156442" xml-lang="en-US" level="2" l10n="U" oldref="8">Example:</paragraph> +<paragraph role="paragraph" id="par_id3153951" xml-lang="en-US" l10n="U" oldref="9">Sub ExampleTimer</paragraph> +<paragraph role="paragraph" id="par_id3147427" xml-lang="en-US" l10n="U" oldref="10">Dim lSec as long,lMin as long,lHour as long</paragraph> +<paragraph role="paragraph" id="par_id3153092" xml-lang="en-US" l10n="U" oldref="11">lSec = Timer</paragraph> +<paragraph role="paragraph" id="par_id3145748" xml-lang="en-US" l10n="U" oldref="12">MsgBox lSec,0,"Seconds since midnight"</paragraph> +<paragraph role="paragraph" id="par_id3149260" xml-lang="en-US" l10n="U" oldref="13">lMin = lSec / 60</paragraph> +<paragraph role="paragraph" id="par_id3148646" xml-lang="en-US" l10n="U" oldref="14">lSec = lSec Mod 60</paragraph> +<paragraph role="paragraph" id="par_id3148575" xml-lang="en-US" l10n="U" oldref="15">lHour = lMin / 60</paragraph> +<paragraph role="paragraph" id="par_id3150418" xml-lang="en-US" l10n="U" oldref="16">lMin = lMin Mod 60</paragraph> +<paragraph role="paragraph" id="par_id3156283" xml-lang="en-US" l10n="U" oldref="17">MsgBox Right("00" & lHour , 2) & ":"& Right("00" & lMin , 2) & ":" & Right("00" & lSec , 2) ,0,"The time is"</paragraph> +<paragraph role="paragraph" id="par_id3153158" xml-lang="en-US" l10n="U" oldref="18">end sub</paragraph> +</body> </helpdocument> diff --git a/helpcontent2/source/text/sbasic/shared/03050100.xhp b/helpcontent2/source/text/sbasic/shared/03050100.xhp index ad8f97728b..5ef711cd92 100644 --- a/helpcontent2/source/text/sbasic/shared/03050100.xhp +++ b/helpcontent2/source/text/sbasic/shared/03050100.xhp @@ -1,4 +1,4 @@ -<?xml version="1.0" encoding="UTF-8"?>
+<?xml version="1.0" encoding="UTF-8"?> <!--*********************************************************************** * * The Contents of this file are made available subject to the terms of @@ -52,46 +52,46 @@ * Contributor(s): _______________________________________ * * - ************************************************************************-->
-
-<helpdocument version="1.0">
-<meta>
-<topic id="textsbasicshared03050100xml" indexer="include" status="PUBLISH">
-<title id="tit" xml-lang="en-US">Erl Function [Runtime]</title>
-<filename>/text/sbasic/shared/03050100.xhp</filename>
-</topic>
-<history>
-<created date="2003-10-31T00:00:00">Sun Microsystems, Inc.</created>
-<lastedited date="2004-06-24T14:15:55">converted from old format - fpe
-dedr: fixed #i30425#</lastedited>
-</history>
-</meta>
-<body>
+ ************************************************************************--> + +<helpdocument version="1.0"> +<meta> +<topic id="textsbasicshared03050100xml" indexer="include" status="PUBLISH"> +<title id="tit" xml-lang="en-US">Erl Function [Runtime]</title> +<filename>/text/sbasic/shared/03050100.xhp</filename> +</topic> +<history> +<created date="2003-10-31T00:00:00">Sun Microsystems, Inc.</created> +<lastedited date="2004-08-24T11:37:22">converted from old format - fpe +dedr: fixed #i30425#</lastedited> +</history> +</meta> +<body> <section id="erl"> -<bookmark xml-lang="en-US" branch="index" id="bm_id3157896"><bookmark_value>Erl;function</bookmark_value> -</bookmark>
-<paragraph role="heading" id="hd_id3157896" xml-lang="en-US" level="1" l10n="U" oldref="1"><link href="text/sbasic/shared/03050100.xhp" name="Erl Function [Runtime]">Erl Function [Runtime]</link></paragraph>
-<paragraph role="paragraph" id="par_id3153394" xml-lang="en-US" l10n="U" oldref="2">Returns the line number where an error occurred during program execution.</paragraph>
-</section>
-<paragraph role="heading" id="hd_id3147574" xml-lang="en-US" level="2" l10n="U" oldref="3">Syntax:</paragraph>
-<paragraph role="paragraph" id="par_id3146795" xml-lang="en-US" l10n="U" oldref="4">Erl</paragraph>
-<paragraph role="heading" id="hd_id3147265" xml-lang="en-US" level="2" l10n="U" oldref="5">Return value:</paragraph>
-<paragraph role="paragraph" id="par_id3154924" xml-lang="en-US" l10n="U" oldref="6">Integer</paragraph>
-<paragraph role="heading" id="hd_id3150792" xml-lang="en-US" level="2" l10n="U" oldref="7">Parameters:</paragraph>
-<paragraph role="note" id="par_id3153771" xml-lang="en-US" l10n="U" oldref="8">The Erl function only returns a line number, and not a line label.</paragraph>
-<paragraph role="heading" id="hd_id3146921" xml-lang="en-US" level="2" l10n="U" oldref="9">Example:</paragraph>
-<paragraph role="paragraph" id="par_id3146975" xml-lang="en-US" l10n="U" oldref="10">sub ExampleError</paragraph>
-<paragraph role="paragraph" id="par_id3150010" xml-lang="en-US" l10n="U" oldref="11">on error goto ErrorHandler REM Set up error handler</paragraph>
-<paragraph role="paragraph" id="par_id3155308" xml-lang="en-US" l10n="U" oldref="12">Dim iVar as Integer</paragraph>
-<paragraph role="paragraph" id="par_id3149482" xml-lang="en-US" l10n="U" oldref="13">Dim sVar As String</paragraph>
-<paragraph role="paragraph" id="par_id3153188" xml-lang="en-US" l10n="U" oldref="14">REM Error caused by non-existent file</paragraph>
-<paragraph role="paragraph" id="par_id3159155" xml-lang="en-US" l10n="U" oldref="15">iVar = Freefile</paragraph>
-<paragraph role="paragraph" id="par_id3146120" xml-lang="en-US" l10n="U" oldref="16">Open "\file9879.txt" for Input as #iVar</paragraph>
-<paragraph role="paragraph" id="par_id3147349" xml-lang="en-US" l10n="U" oldref="17">Line Input #iVar, sVar</paragraph>
-<paragraph role="paragraph" id="par_id3151073" xml-lang="en-US" l10n="U" oldref="18">Close #iVar</paragraph>
-<paragraph role="paragraph" id="par_id3148456" xml-lang="en-US" l10n="U" oldref="19">exit sub</paragraph>
-<paragraph role="paragraph" id="par_id3147394" xml-lang="en-US" l10n="U" oldref="20">ErrorHandler:</paragraph>
-<paragraph role="paragraph" id="par_id3155416" xml-lang="en-US" l10n="U" oldref="21">MsgBox "Error " & err & ": " & error$ + chr(13) + "In line : " + Erl + chr(13) + Now , 16 ,"An error occurred"</paragraph>
-<paragraph role="paragraph" id="par_id3153878" xml-lang="en-US" l10n="U" oldref="22">end sub</paragraph>
-</body>
-</helpdocument>
+<bookmark xml-lang="en-US" branch="index" id="bm_id3157896"><bookmark_value>Erl function</bookmark_value> +</bookmark> +<paragraph role="heading" id="hd_id3157896" xml-lang="en-US" level="1" l10n="U" oldref="1"><link href="text/sbasic/shared/03050100.xhp" name="Erl Function [Runtime]">Erl Function [Runtime]</link></paragraph> +<paragraph role="paragraph" id="par_id3153394" xml-lang="en-US" l10n="U" oldref="2">Returns the line number where an error occurred during program execution.</paragraph> +</section> +<paragraph role="heading" id="hd_id3147574" xml-lang="en-US" level="2" l10n="U" oldref="3">Syntax:</paragraph> +<paragraph role="paragraph" id="par_id3146795" xml-lang="en-US" l10n="U" oldref="4">Erl</paragraph> +<paragraph role="heading" id="hd_id3147265" xml-lang="en-US" level="2" l10n="U" oldref="5">Return value:</paragraph> +<paragraph role="paragraph" id="par_id3154924" xml-lang="en-US" l10n="U" oldref="6">Integer</paragraph> +<paragraph role="heading" id="hd_id3150792" xml-lang="en-US" level="2" l10n="U" oldref="7">Parameters:</paragraph> +<paragraph role="note" id="par_id3153771" xml-lang="en-US" l10n="U" oldref="8">The Erl function only returns a line number, and not a line label.</paragraph> +<paragraph role="heading" id="hd_id3146921" xml-lang="en-US" level="2" l10n="U" oldref="9">Example:</paragraph> +<paragraph role="paragraph" id="par_id3146975" xml-lang="en-US" l10n="U" oldref="10">sub ExampleError</paragraph> +<paragraph role="paragraph" id="par_id3150010" xml-lang="en-US" l10n="U" oldref="11">on error goto ErrorHandler REM Set up error handler</paragraph> +<paragraph role="paragraph" id="par_id3155308" xml-lang="en-US" l10n="U" oldref="12">Dim iVar as Integer</paragraph> +<paragraph role="paragraph" id="par_id3149482" xml-lang="en-US" l10n="U" oldref="13">Dim sVar As String</paragraph> +<paragraph role="paragraph" id="par_id3153188" xml-lang="en-US" l10n="U" oldref="14">REM Error caused by non-existent file</paragraph> +<paragraph role="paragraph" id="par_id3159155" xml-lang="en-US" l10n="U" oldref="15">iVar = Freefile</paragraph> +<paragraph role="paragraph" id="par_id3146120" xml-lang="en-US" l10n="U" oldref="16">Open "\file9879.txt" for Input as #iVar</paragraph> +<paragraph role="paragraph" id="par_id3147349" xml-lang="en-US" l10n="U" oldref="17">Line Input #iVar, sVar</paragraph> +<paragraph role="paragraph" id="par_id3151073" xml-lang="en-US" l10n="U" oldref="18">Close #iVar</paragraph> +<paragraph role="paragraph" id="par_id3148456" xml-lang="en-US" l10n="U" oldref="19">exit sub</paragraph> +<paragraph role="paragraph" id="par_id3147394" xml-lang="en-US" l10n="U" oldref="20">ErrorHandler:</paragraph> +<paragraph role="paragraph" id="par_id3155416" xml-lang="en-US" l10n="U" oldref="21">MsgBox "Error " & err & ": " & error$ + chr(13) + "In line : " + Erl + chr(13) + Now , 16 ,"An error occurred"</paragraph> +<paragraph role="paragraph" id="par_id3153878" xml-lang="en-US" l10n="U" oldref="22">end sub</paragraph> +</body> +</helpdocument> diff --git a/helpcontent2/source/text/sbasic/shared/03050200.xhp b/helpcontent2/source/text/sbasic/shared/03050200.xhp index 97b73b0532..96315ed46d 100755 --- a/helpcontent2/source/text/sbasic/shared/03050200.xhp +++ b/helpcontent2/source/text/sbasic/shared/03050200.xhp @@ -52,45 +52,45 @@ * Contributor(s): _______________________________________ * * - ************************************************************************--><helpdocument version="1.0"> + ************************************************************************--> + +<helpdocument version="1.0"> <meta> <topic id="textsbasicshared03050200xml" indexer="include" status="PUBLISH"> -<title xml-lang="en-US" id="tit">Err Function [Runtime]</title> +<title id="tit" xml-lang="en-US">Err Function [Runtime]</title> <filename>/text/sbasic/shared/03050200.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-08-24T11:37:52">converted from old format - fpe</lastedited> </history> </meta> <body> - - - <section id="err"> - <bookmark xml-lang="en-US" branch="index" id="bm_id3156343"><bookmark_value>Err;function</bookmark_value></bookmark><paragraph id="hd_id3156343" role="heading" level="1" oldref="1" l10n="U" xml-lang="en-US"><link href="text/sbasic/shared/03050200.xhp" name="Err Function [Runtime]">Err Function [Runtime]</link></paragraph> - <paragraph role="paragraph" id="par_id3150541" l10n="U" xml-lang="en-US" oldref="2">Returns an error code that identifies the error that occurred during program execution.</paragraph> - </section> - <paragraph role="heading" level="2" id="hd_id3149656" l10n="U" xml-lang="en-US" oldref="3">Syntax:</paragraph> - <paragraph role="paragraph" id="par_id3154123" l10n="U" xml-lang="en-US" oldref="4">Err</paragraph> - <paragraph role="heading" level="2" id="hd_id3147229" l10n="U" xml-lang="en-US" oldref="5">Return value:</paragraph> - <paragraph role="paragraph" id="par_id3150869" l10n="U" xml-lang="en-US" oldref="6">Integer</paragraph> - <paragraph role="heading" level="2" id="hd_id3153193" l10n="U" xml-lang="en-US" oldref="7">Parameters:</paragraph> - <paragraph role="paragraph" id="par_id3149561" l10n="U" xml-lang="en-US" oldref="8">The Err function is used in error-handling routines to determine the error and the corrective action.</paragraph> - <paragraph role="heading" level="2" id="hd_id3147317" l10n="U" xml-lang="en-US" oldref="9">Example:</paragraph> - <paragraph role="paragraph" id="par_id3153727" l10n="U" xml-lang="en-US" oldref="10">sub ExampleError</paragraph> - <paragraph role="paragraph" id="par_id3147426" l10n="U" xml-lang="en-US" oldref="11">on error goto ErrorHandler REM Set up error handler</paragraph> - <paragraph role="paragraph" id="par_id3163710" l10n="U" xml-lang="en-US" oldref="12">Dim iVar as Integer</paragraph> - <paragraph role="paragraph" id="par_id3153093" l10n="U" xml-lang="en-US" oldref="13">Dim sVar As String</paragraph> - <paragraph role="paragraph" id="par_id3149481" l10n="U" xml-lang="en-US" oldref="14">REM Error occurs due to non-existent file</paragraph> - <paragraph role="paragraph" id="par_id3153190" l10n="U" xml-lang="en-US" oldref="15">iVar = Freefile</paragraph> - <paragraph role="paragraph" id="par_id3146120" l10n="U" xml-lang="en-US" oldref="16">Open "\file9879.txt" for Input as #iVar</paragraph> - <paragraph role="paragraph" id="par_id3155308" l10n="U" xml-lang="en-US" oldref="17">Line Input #iVar, sVar</paragraph> - <paragraph role="paragraph" id="par_id3153142" l10n="U" xml-lang="en-US" oldref="18">Close #iVar</paragraph> - <paragraph role="paragraph" id="par_id3149665" l10n="U" xml-lang="en-US" oldref="19">exit sub</paragraph> - <paragraph role="paragraph" id="par_id3154942" l10n="U" xml-lang="en-US" oldref="20">ErrorHandler:</paragraph> - <paragraph role="paragraph" id="par_id3145646" l10n="U" xml-lang="en-US" oldref="21">MsgBox "Error " & Err & ": " & Error$ + chr(13) + "At line : " + Erl + chr(13) + Now , 16 ,"an error occurred"</paragraph> - <paragraph role="paragraph" id="par_id3155418" l10n="U" xml-lang="en-US" oldref="22">end sub</paragraph> - - - </body> +<section id="err"> +<bookmark xml-lang="en-US" branch="index" id="bm_id3156343"><bookmark_value>Err function</bookmark_value> +</bookmark> +<paragraph role="heading" id="hd_id3156343" xml-lang="en-US" level="1" l10n="U" oldref="1"><link href="text/sbasic/shared/03050200.xhp" name="Err Function [Runtime]">Err Function [Runtime]</link></paragraph> +<paragraph role="paragraph" id="par_id3150541" xml-lang="en-US" l10n="U" oldref="2">Returns an error code that identifies the error that occurred during program execution.</paragraph> +</section> +<paragraph role="heading" id="hd_id3149656" xml-lang="en-US" level="2" l10n="U" oldref="3">Syntax:</paragraph> +<paragraph role="paragraph" id="par_id3154123" xml-lang="en-US" l10n="U" oldref="4">Err</paragraph> +<paragraph role="heading" id="hd_id3147229" xml-lang="en-US" level="2" l10n="U" oldref="5">Return value:</paragraph> +<paragraph role="paragraph" id="par_id3150869" xml-lang="en-US" l10n="U" oldref="6">Integer</paragraph> +<paragraph role="heading" id="hd_id3153193" xml-lang="en-US" level="2" l10n="U" oldref="7">Parameters:</paragraph> +<paragraph role="paragraph" id="par_id3149561" xml-lang="en-US" l10n="U" oldref="8">The Err function is used in error-handling routines to determine the error and the corrective action.</paragraph> +<paragraph role="heading" id="hd_id3147317" xml-lang="en-US" level="2" l10n="U" oldref="9">Example:</paragraph> +<paragraph role="paragraph" id="par_id3153727" xml-lang="en-US" l10n="U" oldref="10">sub ExampleError</paragraph> +<paragraph role="paragraph" id="par_id3147426" xml-lang="en-US" l10n="U" oldref="11">on error goto ErrorHandler REM Set up error handler</paragraph> +<paragraph role="paragraph" id="par_id3163710" xml-lang="en-US" l10n="U" oldref="12">Dim iVar as Integer</paragraph> +<paragraph role="paragraph" id="par_id3153093" xml-lang="en-US" l10n="U" oldref="13">Dim sVar As String</paragraph> +<paragraph role="paragraph" id="par_id3149481" xml-lang="en-US" l10n="U" oldref="14">REM Error occurs due to non-existent file</paragraph> +<paragraph role="paragraph" id="par_id3153190" xml-lang="en-US" l10n="U" oldref="15">iVar = Freefile</paragraph> +<paragraph role="paragraph" id="par_id3146120" xml-lang="en-US" l10n="U" oldref="16">Open "\file9879.txt" for Input as #iVar</paragraph> +<paragraph role="paragraph" id="par_id3155308" xml-lang="en-US" l10n="U" oldref="17">Line Input #iVar, sVar</paragraph> +<paragraph role="paragraph" id="par_id3153142" xml-lang="en-US" l10n="U" oldref="18">Close #iVar</paragraph> +<paragraph role="paragraph" id="par_id3149665" xml-lang="en-US" l10n="U" oldref="19">exit sub</paragraph> +<paragraph role="paragraph" id="par_id3154942" xml-lang="en-US" l10n="U" oldref="20">ErrorHandler:</paragraph> +<paragraph role="paragraph" id="par_id3145646" xml-lang="en-US" l10n="U" oldref="21">MsgBox "Error " & Err & ": " & Error$ + chr(13) + "At line : " + Erl + chr(13) + Now , 16 ,"an error occurred"</paragraph> +<paragraph role="paragraph" id="par_id3155418" xml-lang="en-US" l10n="U" oldref="22">end sub</paragraph> +</body> </helpdocument> diff --git a/helpcontent2/source/text/sbasic/shared/03050300.xhp b/helpcontent2/source/text/sbasic/shared/03050300.xhp index 039e17dcfc..8bf8f72866 100755 --- a/helpcontent2/source/text/sbasic/shared/03050300.xhp +++ b/helpcontent2/source/text/sbasic/shared/03050300.xhp @@ -52,48 +52,50 @@ * Contributor(s): _______________________________________ * * - ************************************************************************--><helpdocument version="1.0"> + ************************************************************************--> + +<helpdocument version="1.0"> <meta> <topic id="textsbasicshared03050300xml" indexer="include" status="PUBLISH"> -<title xml-lang="en-US" id="tit">Error Function [Runtime]</title> +<title id="tit" xml-lang="en-US">Error Function [Runtime]</title> <filename>/text/sbasic/shared/03050300.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-08-24T11:40:07">converted from old format - fpe</lastedited> </history> </meta> <body> - - - <section id="errorf"> - <bookmark xml-lang="en-US" branch="index" id="bm_id3159413"><bookmark_value>Error function;function</bookmark_value></bookmark><paragraph id="hd_id3159413" role="heading" level="1" oldref="1" l10n="U" xml-lang="en-US"><link href="text/sbasic/shared/03050300.xhp" name="Error Function [Runtime]">Error Function [Runtime]</link></paragraph> - <paragraph role="paragraph" id="par_id3148663" l10n="U" xml-lang="en-US" oldref="2">Returns the error message that corresponds to a given error code.</paragraph> - </section> - <paragraph role="heading" level="2" id="hd_id3153379" l10n="U" xml-lang="en-US" oldref="3">Syntax:</paragraph> - <paragraph role="paragraph" id="par_id3154366" l10n="U" xml-lang="en-US" oldref="4">Error (Expression)</paragraph> - <paragraph role="heading" level="2" id="hd_id3145173" l10n="U" xml-lang="en-US" oldref="5">Return value:</paragraph> - <paragraph role="paragraph" id="par_id3154125" l10n="U" xml-lang="en-US" oldref="6">String</paragraph> - <paragraph role="heading" level="2" id="hd_id3150869" l10n="U" xml-lang="en-US" oldref="7">Parameters:</paragraph> - <paragraph l10n="U" role="paragraph" id="par_id3153193" xml-lang="en-US" oldref="8"><emph>Expression:</emph> Any numeric expression that contains the error code of the error message that you want to return.</paragraph> - <paragraph role="paragraph" id="par_id3159254" l10n="U" xml-lang="en-US" oldref="9">If no parameters are passed, the Error function returns the error message of the most recent error that occurred during program execution.</paragraph> - <embed href="text/sbasic/shared/00000003.xhp#errorcode"/> - <embed href="text/sbasic/shared/00000003.xhp#err51"/> - <embed href="text/sbasic/shared/00000003.xhp#err13"/> - <paragraph role="heading" level="2" id="hd_id3151116" l10n="U" xml-lang="en-US" oldref="10">Example:</paragraph> - <paragraph role="paragraph" id="par_id3163712" l10n="U" xml-lang="en-US" oldref="11">sub ExampleError</paragraph> - <paragraph role="paragraph" id="par_id3149481" l10n="U" xml-lang="en-US" oldref="12">on error goto ErrorHandler REM Set up error handler</paragraph> - <paragraph role="paragraph" id="par_id3152598" l10n="U" xml-lang="en-US" oldref="13">Dim iVar as Integer</paragraph> - <paragraph role="paragraph" id="par_id3146975" l10n="U" xml-lang="en-US" oldref="14">Dim sVar As String</paragraph> - <paragraph role="paragraph" id="par_id3149665" l10n="U" xml-lang="en-US" oldref="15">REM An error occurs due to non-existent file</paragraph> - <paragraph role="paragraph" id="par_id3153092" l10n="U" xml-lang="en-US" oldref="16">iVar = Freefile</paragraph> - <paragraph role="paragraph" id="par_id3153142" l10n="U" xml-lang="en-US" oldref="17">Open "\file9879.txt" for Input as #iVar</paragraph> - <paragraph role="paragraph" id="par_id3147126" l10n="U" xml-lang="en-US" oldref="18">Line Input #iVar, sVar</paragraph> - <paragraph role="paragraph" id="par_id3145646" l10n="U" xml-lang="en-US" oldref="19">Close #iVar</paragraph> - <paragraph role="paragraph" id="par_id3149410" l10n="U" xml-lang="en-US" oldref="20">exit sub</paragraph> - <paragraph role="paragraph" id="par_id3145252" l10n="U" xml-lang="en-US" oldref="21">ErrorHandler:</paragraph> - <paragraph role="paragraph" id="par_id3156284" l10n="U" xml-lang="en-US" oldref="22">MsgBox "Error " & err & ": " & error$ + chr(13) + "In line : " + Erl + chr(13) + Now , 16 ,"error occurred"</paragraph> - <paragraph role="paragraph" id="par_id3144766" l10n="U" xml-lang="en-US" oldref="23">end sub</paragraph> - - </body> +<section id="errorf"> +<bookmark xml-lang="en-US" branch="index" id="bm_id3159413"><bookmark_value>Error function</bookmark_value> +</bookmark> +<paragraph role="heading" id="hd_id3159413" xml-lang="en-US" level="1" l10n="U" oldref="1"><link href="text/sbasic/shared/03050300.xhp" name="Error Function [Runtime]">Error Function [Runtime]</link></paragraph> +<paragraph role="paragraph" id="par_id3148663" xml-lang="en-US" l10n="U" oldref="2">Returns the error message that corresponds to a given error code.</paragraph> +</section> +<paragraph role="heading" id="hd_id3153379" xml-lang="en-US" level="2" l10n="U" oldref="3">Syntax:</paragraph> +<paragraph role="paragraph" id="par_id3154366" xml-lang="en-US" l10n="U" oldref="4">Error (Expression)</paragraph> +<paragraph role="heading" id="hd_id3145173" xml-lang="en-US" level="2" l10n="U" oldref="5">Return value:</paragraph> +<paragraph role="paragraph" id="par_id3154125" xml-lang="en-US" l10n="U" oldref="6">String</paragraph> +<paragraph role="heading" id="hd_id3150869" xml-lang="en-US" level="2" l10n="U" oldref="7">Parameters:</paragraph> +<paragraph role="paragraph" id="par_id3153193" xml-lang="en-US" l10n="U" oldref="8"> +<emph>Expression:</emph> Any numeric expression that contains the error code of the error message that you want to return.</paragraph> +<paragraph role="paragraph" id="par_id3159254" xml-lang="en-US" l10n="U" oldref="9">If no parameters are passed, the Error function returns the error message of the most recent error that occurred during program execution.</paragraph> +<embed href="text/sbasic/shared/00000003.xhp#errorcode"/> +<embed href="text/sbasic/shared/00000003.xhp#err51"/> +<embed href="text/sbasic/shared/00000003.xhp#err13"/> +<paragraph role="heading" id="hd_id3151116" xml-lang="en-US" level="2" l10n="U" oldref="10">Example:</paragraph> +<paragraph role="paragraph" id="par_id3163712" xml-lang="en-US" l10n="U" oldref="11">sub ExampleError</paragraph> +<paragraph role="paragraph" id="par_id3149481" xml-lang="en-US" l10n="U" oldref="12">on error goto ErrorHandler REM Set up error handler</paragraph> +<paragraph role="paragraph" id="par_id3152598" xml-lang="en-US" l10n="U" oldref="13">Dim iVar as Integer</paragraph> +<paragraph role="paragraph" id="par_id3146975" xml-lang="en-US" l10n="U" oldref="14">Dim sVar As String</paragraph> +<paragraph role="paragraph" id="par_id3149665" xml-lang="en-US" l10n="U" oldref="15">REM An error occurs due to non-existent file</paragraph> +<paragraph role="paragraph" id="par_id3153092" xml-lang="en-US" l10n="U" oldref="16">iVar = Freefile</paragraph> +<paragraph role="paragraph" id="par_id3153142" xml-lang="en-US" l10n="U" oldref="17">Open "\file9879.txt" for Input as #iVar</paragraph> +<paragraph role="paragraph" id="par_id3147126" xml-lang="en-US" l10n="U" oldref="18">Line Input #iVar, sVar</paragraph> +<paragraph role="paragraph" id="par_id3145646" xml-lang="en-US" l10n="U" oldref="19">Close #iVar</paragraph> +<paragraph role="paragraph" id="par_id3149410" xml-lang="en-US" l10n="U" oldref="20">exit sub</paragraph> +<paragraph role="paragraph" id="par_id3145252" xml-lang="en-US" l10n="U" oldref="21">ErrorHandler:</paragraph> +<paragraph role="paragraph" id="par_id3156284" xml-lang="en-US" l10n="U" oldref="22">MsgBox "Error " & err & ": " & error$ + chr(13) + "In line : " + Erl + chr(13) + Now , 16 ,"error occurred"</paragraph> +<paragraph role="paragraph" id="par_id3144766" xml-lang="en-US" l10n="U" oldref="23">end sub</paragraph> +</body> </helpdocument> diff --git a/helpcontent2/source/text/sbasic/shared/03050500.xhp b/helpcontent2/source/text/sbasic/shared/03050500.xhp index 65cac7d95b..2daf5e4e82 100755 --- a/helpcontent2/source/text/sbasic/shared/03050500.xhp +++ b/helpcontent2/source/text/sbasic/shared/03050500.xhp @@ -52,58 +52,62 @@ * Contributor(s): _______________________________________ * * - ************************************************************************--><helpdocument version="1.0"> + ************************************************************************--> + +<helpdocument version="1.0"> <meta> <topic id="textsbasicshared03050500xml" indexer="include" status="PUBLISH"> -<title xml-lang="en-US" id="tit">On Error GoTo ... Resume Statement [Runtime]</title> +<title id="tit" xml-lang="en-US">On Error GoTo ... Resume Statement [Runtime]</title> <filename>/text/sbasic/shared/03050500.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-08-24T14:11:12">converted from old format - fpe</lastedited> </history> </meta> <body> - - - <section id="onerrorgotoresume"> - <bookmark branch="index" xml-lang="en-US" id="bm_id3146795"><bookmark_value>function;Resume Next</bookmark_value><bookmark_value>Resume Next;function</bookmark_value><bookmark_value>On Error GoTo ... Resume;function</bookmark_value></bookmark><paragraph id="hd_id3146795" role="heading" level="1" oldref="1" l10n="U" xml-lang="en-US"><link href="text/sbasic/shared/03050500.xhp" name="On Error GoTo ... Resume Statement [Runtime]">On Error GoTo ... Resume Statement [Runtime]</link></paragraph> - <paragraph role="paragraph" id="par_id3150358" l10n="U" xml-lang="en-US" oldref="2">Enables an error-handling routine after an error occurs, or resumes program execution.</paragraph> - </section> - <paragraph role="heading" level="2" id="hd_id3151212" l10n="U" xml-lang="en-US" oldref="3">Syntax:</paragraph> - <paragraph role="paragraph" id="par_id3145173" l10n="U" xml-lang="en-US" oldref="4">On {Error GoTo Labelname | GoTo 0 | Resume Next}</paragraph> - <paragraph role="heading" level="2" id="hd_id3154125" l10n="U" xml-lang="en-US" oldref="5">Parameters:</paragraph> - <paragraph l10n="U" role="paragraph" id="par_id3150869" xml-lang="en-US" oldref="7"><emph>GoTo Labelname:</emph> If an error occurs, enables the error-handling routine that starts at the line "Labelname".</paragraph> - <paragraph l10n="U" role="paragraph" id="par_id3150439" xml-lang="en-US" oldref="8"><emph>Resume Next:</emph> If an error occurs, program execution continues with the statement that follows the statement in which the error occurred.</paragraph> - <paragraph l10n="U" role="paragraph" id="par_id3149482" xml-lang="en-US" oldref="9"><emph>GoTo 0: </emph>Disables the error handler in the current procedure.</paragraph> - <paragraph role="paragraph" id="par_id3148619" l10n="U" xml-lang="en-US" oldref="10">The On Error GoTo statement is used to react to errors that occur in a macro. The statement must be inserted at the start of a procedure (in a local error-handling routine) or at the start of a module.</paragraph> - <paragraph role="heading" level="2" id="hd_id3146985" l10n="U" xml-lang="en-US" oldref="11">Example:</paragraph> - <paragraph role="paragraph" id="par_id3152460" l10n="U" xml-lang="en-US" oldref="42">Sub ExampleReset</paragraph> - <paragraph role="paragraph" id="par_id3163712" l10n="U" xml-lang="en-US" oldref="43">On Error Goto ErrorHandler</paragraph> - <paragraph role="paragraph" id="par_id3146119" l10n="U" xml-lang="en-US" oldref="44">Dim iNumber As Integer</paragraph> - <paragraph role="paragraph" id="par_id3145749" l10n="U" xml-lang="en-US" oldref="45">Dim iCount As Integer</paragraph> - <paragraph role="paragraph" id="par_id3153091" l10n="U" xml-lang="en-US" oldref="46">Dim sLine As String</paragraph> - <paragraph role="paragraph" id="par_id3148576" l10n="U" xml-lang="en-US" oldref="47">Dim aFile As String</paragraph> - <paragraph role="paragraph" id="par_id3147348" l10n="U" xml-lang="en-US" oldref="48">aFile = "c:\data.txt"</paragraph> - - <paragraph role="paragraph" id="par_id3154944" l10n="U" xml-lang="en-US" oldref="50">iNumber = Freefile</paragraph> - <paragraph role="paragraph" id="par_id3153158" l10n="U" xml-lang="en-US" oldref="51">Open aFile For Output As #iNumber</paragraph> - <paragraph role="paragraph" id="par_id3153876" l10n="U" xml-lang="en-US" oldref="52">Print #iNumber, "This is a line of text"</paragraph> - <paragraph role="paragraph" id="par_id3149581" l10n="U" xml-lang="en-US" oldref="53">Close #iNumber</paragraph> - - <paragraph role="paragraph" id="par_id3155602" l10n="U" xml-lang="en-US" oldref="55">iNumber = Freefile</paragraph> - <paragraph role="paragraph" id="par_id3153415" l10n="U" xml-lang="en-US" oldref="56">Open aFile For Input As iNumber</paragraph> - <paragraph role="paragraph" id="par_id3146970" l10n="U" xml-lang="en-US" oldref="57">For iCount = 1 to 5</paragraph> - <paragraph role="paragraph" id="par_id3153707" l10n="U" xml-lang="en-US" oldref="58">Line Input #iNumber, sLine</paragraph> - <paragraph role="paragraph" id="par_id3156276" l10n="U" xml-lang="en-US" oldref="59">If sLine <>"" then</paragraph> - <paragraph role="paragraph" id="par_id3148993" l10n="U" xml-lang="en-US" oldref="60">rem</paragraph> - <paragraph role="paragraph" id="par_id3153764" l10n="U" xml-lang="en-US" oldref="61">end if</paragraph> - <paragraph role="paragraph" id="par_id3154754" l10n="U" xml-lang="en-US" oldref="62">Next iCount</paragraph> - <paragraph role="paragraph" id="par_id3159264" l10n="U" xml-lang="en-US" oldref="63">Close #iNumber</paragraph> - <paragraph role="paragraph" id="par_id3150042" l10n="U" xml-lang="en-US" oldref="64">Exit Sub</paragraph> - <paragraph role="paragraph" id="par_id3151251" l10n="U" xml-lang="en-US" oldref="65">ErrorHandler:</paragraph> - <paragraph role="paragraph" id="par_id3149106" l10n="U" xml-lang="en-US" oldref="66">Reset</paragraph> - <paragraph role="paragraph" id="par_id3146916" l10n="U" xml-lang="en-US" oldref="67">MsgBox "All files will be closed",0,"Error"</paragraph> - <paragraph role="paragraph" id="par_id3149568" l10n="U" xml-lang="en-US" oldref="68">End Sub</paragraph> - </body> +<section id="onerrorgotoresume"> +<bookmark xml-lang="en-US" branch="index" id="bm_id3146795"><bookmark_value>Resume Next parameter</bookmark_value> +<bookmark_value>On Error GoTo ... Resume statement</bookmark_value> +</bookmark> +<paragraph role="heading" id="hd_id3146795" xml-lang="en-US" level="1" l10n="U" oldref="1"><link href="text/sbasic/shared/03050500.xhp" name="On Error GoTo ... Resume Statement [Runtime]">On Error GoTo ... Resume Statement [Runtime]</link></paragraph> +<paragraph role="paragraph" id="par_id3150358" xml-lang="en-US" l10n="U" oldref="2">Enables an error-handling routine after an error occurs, or resumes program execution.</paragraph> +</section> +<paragraph role="heading" id="hd_id3151212" xml-lang="en-US" level="2" l10n="U" oldref="3">Syntax:</paragraph> +<paragraph role="paragraph" id="par_id3145173" xml-lang="en-US" l10n="U" oldref="4">On {Error GoTo Labelname | GoTo 0 | Resume Next}</paragraph> +<paragraph role="heading" id="hd_id3154125" xml-lang="en-US" level="2" l10n="U" oldref="5">Parameters:</paragraph> +<paragraph role="paragraph" id="par_id3150869" xml-lang="en-US" l10n="U" oldref="7"> +<emph>GoTo Labelname:</emph> If an error occurs, enables the error-handling routine that starts at the line "Labelname".</paragraph> +<paragraph role="paragraph" id="par_id3150439" xml-lang="en-US" l10n="U" oldref="8"> +<emph>Resume Next:</emph> If an error occurs, program execution continues with the statement that follows the statement in which the error occurred.</paragraph> +<paragraph role="paragraph" id="par_id3149482" xml-lang="en-US" l10n="U" oldref="9"> +<emph>GoTo 0: </emph>Disables the error handler in the current procedure.</paragraph> +<paragraph role="paragraph" id="par_id3148619" xml-lang="en-US" l10n="U" oldref="10">The On Error GoTo statement is used to react to errors that occur in a macro. The statement must be inserted at the start of a procedure (in a local error-handling routine) or at the start of a module.</paragraph> +<paragraph role="heading" id="hd_id3146985" xml-lang="en-US" level="2" l10n="U" oldref="11">Example:</paragraph> +<paragraph role="paragraph" id="par_id3152460" xml-lang="en-US" l10n="U" oldref="42">Sub ExampleReset</paragraph> +<paragraph role="paragraph" id="par_id3163712" xml-lang="en-US" l10n="U" oldref="43">On Error Goto ErrorHandler</paragraph> +<paragraph role="paragraph" id="par_id3146119" xml-lang="en-US" l10n="U" oldref="44">Dim iNumber As Integer</paragraph> +<paragraph role="paragraph" id="par_id3145749" xml-lang="en-US" l10n="U" oldref="45">Dim iCount As Integer</paragraph> +<paragraph role="paragraph" id="par_id3153091" xml-lang="en-US" l10n="U" oldref="46">Dim sLine As String</paragraph> +<paragraph role="paragraph" id="par_id3148576" xml-lang="en-US" l10n="U" oldref="47">Dim aFile As String</paragraph> +<paragraph role="paragraph" id="par_id3147348" xml-lang="en-US" l10n="U" oldref="48">aFile = "c:\data.txt"</paragraph> +<paragraph role="paragraph" id="par_id3154944" xml-lang="en-US" l10n="U" oldref="50">iNumber = Freefile</paragraph> +<paragraph role="paragraph" id="par_id3153158" xml-lang="en-US" l10n="U" oldref="51">Open aFile For Output As #iNumber</paragraph> +<paragraph role="paragraph" id="par_id3153876" xml-lang="en-US" l10n="U" oldref="52">Print #iNumber, "This is a line of text"</paragraph> +<paragraph role="paragraph" id="par_id3149581" xml-lang="en-US" l10n="U" oldref="53">Close #iNumber</paragraph> +<paragraph role="paragraph" id="par_id3155602" xml-lang="en-US" l10n="U" oldref="55">iNumber = Freefile</paragraph> +<paragraph role="paragraph" id="par_id3153415" xml-lang="en-US" l10n="U" oldref="56">Open aFile For Input As iNumber</paragraph> +<paragraph role="paragraph" id="par_id3146970" xml-lang="en-US" l10n="U" oldref="57">For iCount = 1 to 5</paragraph> +<paragraph role="paragraph" id="par_id3153707" xml-lang="en-US" l10n="U" oldref="58">Line Input #iNumber, sLine</paragraph> +<paragraph role="paragraph" id="par_id3156276" xml-lang="en-US" l10n="U" oldref="59">If sLine <>"" then</paragraph> +<paragraph role="paragraph" id="par_id3148993" xml-lang="en-US" l10n="U" oldref="60">rem</paragraph> +<paragraph role="paragraph" id="par_id3153764" xml-lang="en-US" l10n="U" oldref="61">end if</paragraph> +<paragraph role="paragraph" id="par_id3154754" xml-lang="en-US" l10n="U" oldref="62">Next iCount</paragraph> +<paragraph role="paragraph" id="par_id3159264" xml-lang="en-US" l10n="U" oldref="63">Close #iNumber</paragraph> +<paragraph role="paragraph" id="par_id3150042" xml-lang="en-US" l10n="U" oldref="64">Exit Sub</paragraph> +<paragraph role="paragraph" id="par_id3151251" xml-lang="en-US" l10n="U" oldref="65">ErrorHandler:</paragraph> +<paragraph role="paragraph" id="par_id3149106" xml-lang="en-US" l10n="U" oldref="66">Reset</paragraph> +<paragraph role="paragraph" id="par_id3146916" xml-lang="en-US" l10n="U" oldref="67">MsgBox "All files will be closed",0,"Error"</paragraph> +<paragraph role="paragraph" id="par_id3149568" xml-lang="en-US" l10n="U" oldref="68">End Sub</paragraph> +</body> </helpdocument> |