POSIT : Rechercher le début d'une sous-chaîne (Maintain)

La fonction POSIT recherche la position de départ d'une sous-chaîne au sein d'une chaîne de caractères plus grande. Par exemple, la position de départ de la sous-chaîne DUCT dans la chaîne PRODUCTION est quatre. Si la sous-chaîne ne figure pas dans la chaîne parent, la fonction renvoie la valeur 0.

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

Syntaxe : Rechercher le début d'une sous-chaîne

POSIT(parent, substring)

où :

parent

Alphanumérique

Est le segment parent.

substring

Alphanumérique

La sous-chaîne pour laquelle trouver l'emplacement.

Haut de page

Exemple : Rechercher le début d'une sous-chaîne

POSIT affiche tous les titres de films contenant le mot ROOF et l'emplacement de départ de la chaîne ROOF :

MAINTAIN FILE movies
Module Import (mntuws);
Case Top
For all next Moviecode into stk1
  Where Title Contains 'ROOF';
Compute i/i2=1;
type "    Title       Start Position of word ROOF"
repeat stk1.Foccount
  Compute STK1(i).POS/I3 = POSIT(STK1(I).TITLE, 'ROOF');
  Type "  <STK1(i).Title  <<STK1(I).pos"
  Compute i=i+1;
endrepeat
EndCase
END

Les valeurs suivantes sont des exemples pour MOVIECODE et les valeurs pour le résultat de la fonction POSIT :

Title                   Start Position of word ROOF
FIDDLER ON THE ROOF     16
CAT ON A HOT TIN ROOF   18