43%macro mp_dictionary(lib=WORK);
46 create view &lib..dictionaries as select * from dictionary.dictionaries;
47 select distinct memname into: list separated by
' ' from &lib..dictionaries;
48 %
do i=1 %to %sysfunc(countw(&list,%str( )));
49 %let mem=%scan(&list,&i,%str( ));
50 create view &lib..&mem as select * from dictionary.&mem;