MID

Purpose: Extracts a subset of characters.

Format:    MID   destination    source    starting location   character count

Notes:      Use this statement to retrieve a subset of characters from a text variable.  The string is extracted from  the  source  variable  from  starting location  and is  character count  in length.  The extracted string is stored in the  destination  variable.  The location of the first character of any string is 0.

Example:

clear
$source = "abcdefghijklmnopqrstuvwxyz0123456789"

a = 24
b = 10
mid $dest $source a b

print $dest

exit

See Also:  TXT2NUM    MEM2TXT    TXT2MEM