好高深

这个不就是做FORMAT吗？你直接用DATA 步做也是一样的，
data code;
input LABEL $3. START $20.;
FMTNAME="$SEARCH";
cards;
M22 H&M (Shop)
;
run;

PROC FORMAT CNTLIN=CODE;
RUN;

The macro quoting part is the most difficult in learning SAS macros. In this case you need a %superq quoting function as below.

The %superq quoting function masks all special characters and mnemonic operators at macro execution but prevents further resolution of the value.

Please note the argument form is slightly different (&&gdesc&i --> gdesc&i).

507
508      %macro macro_format;
509      proc format;
510      value  $gencode
511          %do i=1 %to &numgenp.;
512          "&&code&i" = "%superq(gdesc&i)"
513         %end;
514         other   = "Unknown"
515         ;
516         run;
517      %mend macro_format;
518
519      
520      %macro_format;
MPRINT(MACRO_FORMAT):   proc format;
MPRINT(MACRO_FORMAT):   value $gencode "M22" = "H&M (Shop)" other = "Unknown" ;
NOTE: Format $GENCODE is already on the library.
NOTE: Format $GENCODE has been output.
MPRINT(MACRO_FORMAT):   run;

NOTE: PROCEDURE FORMAT used (Total process time):
      real time           0.00 seconds
      cpu time            0.00 seconds

Thank you so much. I spent almost 10 hours to fix this. Thank you so so much!! This forum is amazing~~