If missing value are sequential at least 2 id foe example :
ID      xret     did       ear
A101     22       3         2
A103     02       5         1
B104     09       3         1
.           01       1         2
.            12       4         3
B108     11       5         4
B110     06       7         7
.           07       6         3
B112     78       2         6
-----------------------------------
I hope to  result:
ID      xret     did       ear
A101     22       3         2
A103     02       5         1
B104     09       3         1
B104     01       1         2
B104     12       4         3
B108     11       5         4
B110     06       7         7
B110     07       6         3
B112     78       2         6
---------------------------------------
It is follow you code results , but missing value still exist in column id

ID      xret     did       ear
A101     22       3         2
A103     02       5         1
B104     09       3         1
B104     01       1         2
  .          12       4         3
B108     11       5         4
B110     06       7         7
B110     07       6         3
B112     78       2         6

data a;
set a;
retain temp;
if id ne . then temp=id;
else id=temp;drop temp;
run;

data a;
set a;
retain temp;
if id ne . then temp=id;
else id=temp;drop temp;
run;

dewrewr4