Извлечь 2 числа из строки

*(Вопрос) У меня есть строковая переменная вида "120/90".
* Мне нужно числа, разделённые "/", записать в 2 разные переменные.
* Какие будут предложения?

*(Ответ) Размещён в SPSSX-L 5.1.2002. Автор: Ray.

DATA LIST FIXED /nb 1-10 (A).
BEGIN DATA
120/90
1425/1
1/2
/3
23/
END DATA.
LIST.

* находим позицию символа "/".
COMPUTE #pos=INDEX(nb,"/").

* Разносим 2 подстроки по числовым переменным.
COMPUTE nb1=NUMBER(SUBSTR(nb,1,#pos-1),F8.0).
COMPUTE nb2=NUMBER(SUBSTR(nb,#pos+1),F8.0).
EXECUTE.