Come: |
La funzione STRTOKEN restituisce una sottostringa, consistente nei caratteri di una stringa, dall'inizio di una stringa al carattere specificato, chiamato delimitatore.
Per usare questa funzione, è necessario importare la funzione libreria MNTUWS. Per informazioni sull'importazione di questa libreria, consultare Chiamata di una funzione.
STRTOKEN(string, delimiters)
dove:
Alfanumerico
La stringa di caratteri, o una variabile che contiene la stringa di caratteri racchiusa tra virgolette singole (").
Alfanumerico
Una stringa di caratteri, o variabile racchiusa tra virgolette doppie (") che contiene un elenco di delimitatori. Separare i delimitatori con punti e virgole.
STRTOKEN restituisce una sottostringa dei primi cinque valori STREET, nell'origine dati VIDEOTRK, a seconda del punto, spazio o asterisco dei delimitatori.
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
L'emissione è:
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
WebFOCUS |