高手进！ column 制表问题~

proc report data= mo.Os_baoan  out = aa;                                                           
column FLAG   baoan_dis  N ;                                                                                                            
define FLAG/group ;                                                                                                                     
define sumclaim /analysis sum;                                                                                                         
define baoan_dis/across ;                                                                                                               
run;            

程序如上，结果如下图

FLAG	本季	本年非本季	其他年份	上年	N
报案注销	9	9	10	71	99
拒赔				1	1
立案注销	1			14	15
正常	300	209	101	845	1455
重开	3		12	14	29

问题一：如何使 proc report 的column 制表结果输出成 html 的网页版格式，
问题二，baoan_dis 维度被展开了一共有四个维度，我想新生成一列字段对 baoan_dis 字段维度下的 本年非本季 和其他年份 的两个维度加总
求高手帮修改以上程序 或者 举例子其他类似程序 实现 我想要的上面的操作。
谢谢！
补充问题三：横向维度整体求和有 N 统计量解决，如何修改代码使得实现对纵向统计量的求和 ，即如何让展示表格产生新一行 统计 报案注销，拒赔，立案注销，正常，重开的 汇总？？
求解

补充问题四：baoan_dis 维度被展开了一共有四个维度，如何使得其中“本季的”维度 那一列的表格背景颜色变黄？

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;

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

咕舟蓑笠 发表于 2013-2-19 02:42
问题一：
ODS HTML File = 'filename';
PROC REPOER DATA=mo.Os_baoan nowindows;  /*nowindows是关键*/  ...

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

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

Try to add following  before  run;

rbreak after / summarize;

yongyitian 发表于 2013-2-19 12:18
问题二, 三
sumclaim 是不是应该出现在 column 语句中

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

Data test;    /* this is simulated dataset */

input flag  $ baoan $;

datalines;

F1    B1

F1    B1

F1    B2

F1    B3

F1    B3

F1    B3

F1    B4

F1    B4

F1    B4

F1    B4

F2    B4

F3    B1

F3    B4

F3    B4

F3    B4

F3    B4

F4    B1

F4    B2

F4    B3

F4    B3

F4    B3

F4    B4

F5    B1

F5    B1

F5    B1

F5    B3

F5    B4

F5    B4

; run;

data test_kk;  /* add new column KK */

   set test;

   if baoan='B1' or baoan='B4' then KK =1;  

run;

proc report data=test_kk nowd;

   column flag baoan N KK;

   define flag /group;

   define baoan / across;

   define KK / analysis;

   rbreak after / summarize;  /* add a summary at the bottom */

run;     

yongyitian 发表于 2013-2-19 23:46
Data test;    /* this is simulated dataset */input flag  $ baoan $;datalines;F1    B1F1    B1F1    B ...

太感谢了！只需要补充一个标记维度让两者相加，我太笨了，呵呵。。。基本问题都解决了！过会还没人答题了 我就把分数给你！
谢谢。

另外 ，我刚才突然有想到出来一个问题，还是上面的例子，baoan 下的维度一共四个，经过define baoan/across 后四个维度全部就展开了，而KK 是B1 和B4  的加总  ，假设 KK 剩余的空白的维度 我们编号为2 ，难么KK字段下就有两个维度。问题来了，如果我其实只想使用baoan 字段下的的B1  维度，和KK字段下的编号为1的B1+B4结果的 维度，剩下的都不要，这时候 ，加where baoan ="B1"语句后，KK字段的展示结果也变成了只有B1,而没有了我需要相加的B4的结果.

请问如何解决以上问题？？

如果有空，还劳烦大侠再赐教！

wayne0524 发表于 2013-2-20 09:15
太感谢了！只需要补充一个标记维度让两者相加，我太笨了，呵呵。。。基本问题都解决了！过会还没人答题了 ...

add a where condition as follows

proc report data=test_kk nowd;
   column flag baoan N KK;
   define flag /group;
   define baoan / across;
   define KK / analysis;
   rbreak after / summarize;  /* add a summary at the bottom */
   where baoan in ('B1' 'B2' 'B4');    /* add here */
run;

yongyitian 发表于 2013-2-20 09:31
add a where condition as follows

proc report data=test_kk nowd;

where  我刚才想到了，我修改了一下上上楼的 补充的问题 您有空再帮看看 谢谢