I figured it out never mind: %macro check; data amort5;   set amort2; %do i = 1 %to 400;     id&i = lag&i(id); %end; %mend check; %check; %macro still; data amort6; set amort5; if id1 ^= " " then id = id1; %do i = 2 %to 400; else if id&i ^= " " then id = id&i; %end; drop id2-id400 %mend still; %still; ... View more

That is easy using conditional input . data want; input @; if left(_infile_) eq: 'Loan #:' then do;input  @'Account Name:' accountname & $40.;output; end; else if  left(_infile_) eq: 'Loan Totals' then do;input  @'Loan Totals' _dis _cap _rec _bal; output;end;   else if left(_infile_) not in: ('Loan #:' 'Date' 'Page' 'Loan Totals')  then do;input  date : mmddyy10. Action $     Amount & $40.     Disbursed     Capitalized     Recovery     Balance ; output;end; format date mmddyy10.; cards; Loan #:     04-0026     Account Name:     Chew Dewey Barbeque Page #: 11 Date     Action     Amount     Disbursed     Capitalized     Recovery     Balance 07/09/2004     Commitment     1000     0     0     0     0 07/09/2004     Advance: Principal     1000     1000     0     0     1000 Loan Totals     1000     0     0     0 Loan #:     04-0037     Account Name:     Salmon River Plaza 07/12/2004     Commitment      27500     0     0     0     0 07/12/2004     Advance: Principal      27500     27500     0     0     27500 08/11/2004     Payment: Customized      600.8     0     0     0     27059.62 09/22/2004     Payment: Customized      545.8     0     0     0     26734.81 ; run; Ksharp ... View more