Cynthia@sas wrote:   Another point -- your file extension is incorrect. You cannot use .XLSX as a file extension for TAGSETS.EXCELXP. Will there be a tagset generating xlsx files in the near future?  ... View more

And a one-step-solution. data _null_;     length group $ 2         xList $ 200         max 8     ;         if _n_ = 1 then do;         declare hash h(ordered: 'yes');         h.defineKey('group');         h.defineData('group', 'xList', 'max');         h.defineDone();         call missing(group, xList, max);     end;     set work.have end= jobDone;     if h.find() ^= 0 then do;         /* new group */         max = xnum;         xList = x;         h.add();     end;     else do;         if max = xnum then do;             /* adding x to the group */             xList = catx('/', xList, x);             h.replace();         end;         if max < xnum then do;             /* replacing small xnum */             max = xnum;             xList = x;             h.replace();         end;     end;     if jobDone then do;         h.output(dataset: 'work.want(rename=(xList = x max = xnum))');     end; run; ... View more

Concept: use a regular expression catching correct and wrong postal codes - strange codes do not match the expression. Use first-function to verify that the code starts with "T". RegEx: /^[A-Z]\d[A-Z] \d[A-Z]\d$/ ... View more

The problem can be solved with a dynamically created data-step, but bear in mind that the performance with a high number of observations will be poor. Data-steps can be created with the following techniques: The macro language with %sysfunc and functions like open, fetch and close. data-_null_-step with file and put and afterwards %include to load and execute the generated program data-_null_-step with call execute - very much like the second technique, but debugging the program will be more difficult. The following code is not fully tested: data _null_;     set work.have end= last;     file "SOMEWHERE\calc.sas";     length line $ 200;     if _n_ = 1 then do;         put 'data work.want;';         put 'set work.have;';         put 'length result 8;';         put 'select (_n_);';     end;     line = catx(' ', 'when (', _n_, ') result =', calc, ';');     put line;     if last then do;         put 'end;';         put 'run;';     end; run; ... View more