Hi Wayne,
I really don’t know how to hide a level of an across variable. But the whole a group or an across variable can be hidden using noprint option, such as
Define flag / group noprint;
Define baoan / across noprint;


I modified the code by using COMPUTE block to calculate the sum of B1 and B4, instead of calculating it in a data step.  

proc report data=test nowd;
   column flag baoan N B1B4;
   define flag /group;
   define baoan / across;
   define KK / analysis;
   rbreak after / summarize;          /* add a summary at the bottom */
   compute B1B4;
         B1B4 = sum(_C2_, _C4_); /* _C2_ and _C4_ are the second and the 4th colomn in the output table */
   endcomp;
   where Baoan in ('B1' 'B2' 'B4');
run;

In addition,  using data step you can get more you want.
data test_1;
     set test;
         if first.flag then do;
             B1=0; B2=0; B3=0; B4=0;
                     if baoan = 'B1' then B1 = 1;
                 if baoan = 'B2' then B2 = 1;
               if baoan = 'B3' then B3 = 1;
               if baoan = 'B4' then B4 = 1;
                  end;
      else do;
             if baoan = 'B1' then B1+1;
                 if baoan = 'B2' then B2+1;
                         if baoan = 'B3' then B3+1;
                         if baoan = 'B4' then B4+1;
                end;
                B14 = B1 + B4;
        if last.flag then output;
        by flag;
        drop baoan;
  run;     

问题一：
ODS HTML File = 'filename';
PROC REPOER DATA=mo.Os_baoan nowindows;  /*nowindows是关键*/
your other statements;
ODS HTML CLOSE;

问题二：
我也不知道，等待高手回答。

第一个问题解决  谢谢~！
求高手解后两个~

问题二, 三
sumclaim 是不是应该出现在 column 语句中

Try to add following  before  run;

rbreak after / summarize;

您好，我看不太明白你的意思 ，能给我解释清楚些么，比如 我想让以上的表格结果多一列，就叫KK吧，内容就是本季和上年的加总（注意本季和上年在原始清单中不是独立的字段，在原始清单中是隶属于baoan_dis字段维度下），请问如何修改程序实现呢？
求解