Comment : |
La fonction OVRLAY superpose une base chaîne de caractères avec une sous-chaîne.
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.
Il existe aussi une fonction OVRLAY disponible pour le langage reporting. Pour information sur cette fonction, consultez Fonctions Caractère.
OVRLAY(string1, string2, position)
où :
Alphanumérique
est la chaîne de caractères de base.
Alphanumérique
est la sous-chaîne qui superpose la chaîne1.
Entier
est la position dans la chaîne de base à laquelle la superposition commence.
OVRLAY remplace les lettres MCA dans le champ MOVIECODE avec MHD :
MAINTAIN FILE movies
Module Import (mntuws);
Case Top
Infer moviecode into MCASTK
Compute MCASTK.NEWCODE/A6;
For all next Moviecode into stk1
Stack copy from stk1 into MCASTK
where moviecode contains 'MCA';
Compute i/i2=1;
Type "Original Code New Code"
repeat mcastk.Foccount
Compute MCASTK(i).Newcode = OVRLAY(MCASTK(I).MOVIECODE, 'MHD', 4);
Type " <<MCASTK(i).moviecode <<MCASTK(I).NEWCODE"
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 OVRLAY :
Original Code New Code 001MCA 001MHD 081MCA 081MHD 082MCA 082MHD 161MCA 161MHD 196MCA 196MHD 530MCA 530MHD 550MCA 550MHD 883MCA 883MHD
WebFOCUS |