0LASubrTextCutAtPos < Main

Tags: view all tags
---+ .TEXT CUT AT POS

_This subroutine removes characters from a text/alpha field._

<br />%TOC%
---++ Usage:
<pre>      PASS         &lt;text_field&gt;               FIELD            SHARE? Y
      PASS         &lt;start_cut&gt;                FIELD            SHARE? N
      PASS         &lt;len_cut&gt;                  FIELD            SHARE? N
      PASS         &lt;cut_field&gt;                FIELD            SHARE? Y
      GOSUB    --- .TEXT CUT AT POS
      *        Check for errors
      IF       --- .TEXT CUT AT POS           NE

</pre>
---++ Description:

This subroutine removes characters from a text/alpha field. The first 3 parameters are required. If any required parameters are missing, the subroutine will CANCEL.

&lt;text_field&gt; is the field from which you want the characters removed (Required). This must be PASSed with Share "Y" to return the value.

&lt;start_cut&gt; is the starting position of the characters to be removed (Required).

&lt;len_cut&gt; is the number of characters to be removed (Required).

&lt;cut_field&gt; returns the characters that were removed (Optional). This must be PASSed with Share "Y" to return the value.

Note: This subroutine is designed to operate on Alpha, Text, and Token fields only. The returned results are undefined if you specify any other type of field.
---++ Comments:

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

<br />%COMMENT%

-- Main.JeanNeron - 2012-02-10
Topic revision: r2 - 2023-04-10 - BrianRyan