how to derive extra record

[thanikondharish]

Sex	Age
F	13
F	13
F	14
F	12
F	15
F	11
F	14
F	12
F	15
M	14
M	14
M	12
M	13
M	12
M	16
M	12
M	15
M	11
M	15

i have above dataset how derive extra record for maximum age like see below dataset 

Sex	Age	status
F	11
F	12
F	12
F	13
F	13
F	14
F	14
F	15
F	15
F	15	maximum
M	11
M	12
M	12
M	12
M	13
M	14
M	14
M	15
M	15
M	16
M	16	maximum

[singhsahab]

Hello,

data have;
input Sex $ Age;
datalines;
F 13
F 13
F 14
F 12
F 15
F 11
F 14
F 12
F 15
M 14
M 14
M 12
M 13
M 12
M 16
M 12
M 15
M 11
M 15
;
run;

proc sort ; by sex age;
run;

data want;
set have;
by sex age;
if last.sex then status='maximum';
run;

Thanks,

[thanikondharish]

i wrote program like this but i want to write code use (do until) within
datastep block

[singhsahab]

Hello,

If a simple salutation is available ,Why you want to make it complex by using loops . if you use explicit loop , it'll take so more time then implicit loop. 

Meanwhile you can use Array to fulfill yr request . 

Thanks... 

[Kurt_Bremser]

As soon as you mark one of my previous answers to your posts as a solution, I might be tempted to provide such code.

[PeterClemmensen]

Why on Earth Do you want to arramge your data like this?

If there is a reporting purpose behind, then perhaps PROC REPORT is a better approach