求助一个Nodupkey + Call missing的问题

例：
data a;
input g a b $;
cards;
1 1 .
1 2 .
1 3 Y
1 4 Y
1 5 .
2 1 .
2 2 Y
3 1 Y
;
run;

g是大分类，a是小分类，b是值；我想让每个子分类下的b值有且只有最后一个，前面的call missing。
例如：g = 1时，只保留a最大的那一个b = ‘Y'，前面的call missing。

提供一个有点傻的做法，算抛砖引玉（但是实际情况变量较多，而且不太方便排序）：

1. proc sort data = a out = b nodupkey;
   
2.   by g DESCENDING b;
   
3.   proc sort;
   
4.   by g a;
   
5. run;
   
6. 
   
7. data c;merge a(drop=b) b;
   
8.   by g a;
   
9. run;

复制代码

谢谢！

proc sql;
create table wanted as
select a.g, a.a, b.b
from a a left join
(select distinct g,max(a) as a,b from a where b ne '' group by 1) b
on a.g=b.g and a.a=b.a;
quit;