Type : CREATION_INTERNE
El script solo define una lógica macro y no lee ni crea tablas de datos por sí mismo.
| 1 | %put MACRO CALLED: doallitem v1.1; |
| 2 | |
| 3 | %macro doallitem(__dolist,code); |
| 4 | %local i item err; |
| 5 | %let err=ERR%str(OR); |
| 6 | %IF %qsubstr(&code,1,1) NE %str(%') |
| 7 | or %qsubstr(&code,%length(&code),1) NE %str(%') %THEN |
| 8 | %put &err: (doallitem) Code supplied to second parameter must be enclosed in single quotes; |
| 9 | %ELSE %DO i=1 %to %words(&__dolist); |
| 10 | %let item=%scan(&__dolist,&i,%str( )); |
| 11 | %substr(&code,2,%LENGTH(&code)-2) |
| 12 | %END; |
| 13 | %mend doallitem; |