LISTSERV at the University of Georgia
Menubar Imagemap
Home Browse Manage Request Manuals Register
Previous messageNext messagePrevious in topicNext in topicPrevious by same authorNext by same authorPrevious page (July 2004, week 4)Back to main SAS-L pageJoin or leave SAS-L (or change settings)ReplyPost a new messageSearchProportional fontNon-proportional font
Date:         Fri, 23 Jul 2004 16:15:56 -0500
Reply-To:     "Dunn, Toby" <Toby.Dunn@TEA.STATE.TX.US>
Sender:       "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
From:         "Dunn, Toby" <Toby.Dunn@TEA.STATE.TX.US>
Subject:      Re: Help Please
Comments: To: David Fickbohm <DavidF@HOMEGAIN.COM>
Content-Type: text/plain; charset="us-ascii"

David,

Try this,

DATA TWO (DROP = _:); SET ONE; BY ID;

RETAIN _LEAD1 _LEAD2 _AMT1 _AMT2 _CITY1 _CITY2 " ";

DO _I = 1 TO 2; _LEAD1 = LAG(LEAD1); _LEAD2 = LAG(LEAD2); _AMT1 = LAG(AMT1); _AMT2 = LAG(AMT2); _CITY1 = LAG(CITY1); _CITY2 = LAG(CITY2);

IF LEAD1 = " " THEN LEAD1 = _LEAD1; IF LEAD2 = " " THEN LEAD2 = _LEAD2; IF AMT1 = " " THEN AMT1 = _AMT1; IF AMT2 = " " THEN AMT2 = _AMT2; IF CITY1 = " " THEN CITY1 = _CITY1; IF CITY2 = " " THEN CITY2 = _CITY2; END;

IF LAST.ID THEN OUTPUT;

RUN;

There are better more elegant ways to do what you are asking but this is (I think) the most straight forward and easiest to understand.

HTH Toby Dunn

-----Original Message----- From: SAS(r) Discussion [mailto:SAS-L@LISTSERV.UGA.EDU] On Behalf Of David Fickbohm Sent: Friday, July 23, 2004 3:57 PM To: SAS-L@LISTSERV.UGA.EDU Subject: Help Please

People, I am working in SAS V8.1 in a PC environment. I have the following data:

ID LEAD1 CITY1 AMT1 LEAD2 CITY2 AMT2 LEAD3 CITY3 AMT3 LEAD4 CITY4 AMT4 11 B SF 111 11 S SR 100 11 C SA 10 22 B MY 112 33 S NY 85

I want the output to look like this:

ID LEAD1 CITY1 AMT1 LEAD2 CITY2 AMT2 LEAD3 CITY3 AMT3 LEAD4 CITY4 AMT4 11 B SF 111 S SR 100 B SA 10 22 B MY 112 33 S NY 85

All thoughts, ideas, will be greatly appreciated.

Thanks Dave

Dave Fickbohm Data Mining Analyst Homegain+ 2450 45th St. Emeryville, CA, 94608 Phone 510 655 0800 ext 4151


Back to: Top of message | Previous page | Main SAS-L page