Вызов макроса из другого макроса

* Пример вызова макроса из другого макроса.
* Автор: Raynald Levesque.

SET mprint=on.
DATA LIST FREE /dummy.
BEGIN DATA 
1 2 3 2
END DATA.

* Этот макрос вызывает макрос mac2.
DEFINE !mac1 (myvar !TOKENS(1)).
!mac2 myvar=!myvar.
!ENDDEFINE.

*---------------------------------------------------------

DEFINE !mac2 (myvar !TOKENS(1)).
Compute !myvar=1.
EXECUTE.
!ENDDEFINE.

*---------------------------------------------------------

!mac1 myvar=dd.