0LASubrConvertSplitNumber < Main

Tags: view all tags
---+ .CONVERT SPLIT NUMBER

_This subroutine splits a number into its whole number and fractional parts._

<br />%TOC%
---++ Usage:
<pre>    PASS        &lt;whole_number&gt;            FIELD           SHARE? Y
    PASS        &lt;fractional_part&gt;         FIELD           SHARE? Y
    PASS        &lt;number_to_split&gt;         FIELD           SHARE? N
    GOSUB   --- .CONVERT SPLIT NUMBER
     *       check for errors
    IF      --- .CONVERT SPLIT NUMBER     NE
</pre>
---++ Description:

This subroutine splits a number into its whole number and fractional parts. All parameters are required, if any are missing the subroutine will CANCEL.

&lt;whole_number&gt; returns the whole number part &lt;number_to_split&gt; (Required). This must be PASSed with Share "Y" to return a result. For example, if &lt;number to split&gt; is 123.00456, this will return 123.0.

&lt;fractional_part&gt; returns the fractional part &lt;number_to_split&gt; (Required). This must be PASSed with Share "Y" to return a result. This should be a numeric field with sufficient decimal places to hold the fractional part of &lt;whole number&gt;, otherwise rounding will occur. For example, if &lt;number to split&gt; is 123.00456, this will return 0.00456.

&lt;number_to_split&gt; is the number to be split. This must contain valid numeric characters (Required).

---++ Comments:

_Read what other users have said about this page or add your own comments._

<br />%COMMENT%

-- Main.PeteBrower - 2011-08-12
Topic revision: r5 - 2015-08-06 - AlKalter