STRTOKEN : Extraire une sous-chaîneen fonction des délimiteurs

La fonction STROKEN retourne une sous-chaîne, qui se compose des caractères d'une chaîne à partir du début d'une chaîne à un caractère déterminé, nommé délimiteur.

Pour utiliser cette fonction, vous devez importer la bibliothèque de fonctions MNTUWS. Pour informations sur l'import de cette bibliothèque, consultez Invoquer une Fonction.

Syntaxe : Extraire une sous-chaîne

STRTOKEN(string, delimiters)

où :

string

Alphanumérique

est la chaîne de caractères, ou d'un champ contenant celle-ci encadrée par des guillemets simples.

Délimiteurs

Alphanumérique

est une chaîne de caractères, ou variable encadrée par des guillemets qui contient une liste de délimiteurs. Délimitez les délimiteurs avec des points-virgules.

Haut de page

Exemple : Extraire une sous-chaîne :

STRTOKEN retourne une sous-chaîne des cinq premières valeurs de STREET dans la source de données VIDEOTRK en fonction du point, de l'espace, ou de l'astérisque délimiteur.

MAINTAIN FILE VIDEOTRK
MODULE IMPORT (MNTUWS);
FOR ALL NEXT CUSTID INTO CSTACK ;
COMPUTE CNT/I5 = 1;
TYPE "   ";
REPEAT WHILE CNT LE 5;
COMPUTE SUBSTREET/A20 = STRTOKEN(CSTACK(CNT).STREET,".; ,*");
TYPE " STREET =        <CSTACK(CNT).STREET"
TYPE " SUBSTREET =     <SUBSTREET "
COMPUTE CNT = CNT +1;
ENDREPEAT
END

La sortie est :

STREET =        86 ELLIOTT AVE.
SUBSTREET =     86
STREET =        7 DAVENPORT LA.
SUBSTREET =     7
STREET =        8 MAGNOLIA LA.
SUBSTREET =     8
STREET =        35 POWELL ST.
SUBSTREET =     35
STREET =        10 COW LA.
SUBSTREET =     10