Date:         Thu, 29 May 2008 10:01:56 -0400
Reply-To:     Bob_Abelson@HGSI.COM
Sender:       "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
From:         Bob_Abelson@HGSI.COM
Subject:      Re: Array documentation
Comments: To: ash007 <RamsamyAshley@GMAIL.COM>
In-Reply-To:  <2dd6e8de-4de6-42d7-a81c-8dbfbcd586c7@f36g2000hsa.googlegroups.com>
Content-Type: text/plain; charset=us-ascii

DATA RESN.CNTNAUT4;
 SET RESN.CNTNAUT3;
ARRAY CDCL [*]
CDCLA001 CDCLA002 CDCLA003 CDCLA004 CDCLA005 CDCLA006 CDCLA007 CDCLA008
CDCLA009
CDCLA010 CDCLA011 CDCLA012 CDCLA013 CDCLA014 CDCLA015 CDCLA016 CDCLA017
CDCLA018
CDCLA019 CDCLA020;
CLNSA = 0;
CLNSF = 0;
DO I=1 TO HBOUND(CDCL);
         IF CDCL[I]='NSA' THEN CLNSA=1;
         IF CDCL[I]='NSF' THEN CLNSF=1;
END;
DROP I;
RUN;

Bob Abelson
HGSI
240 314 4400 x1374
bob_abelson@hgsi.com



ash007 <RamsamyAshley@GMAIL.COM>
Sent by: "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
05/29/2008 09:56 AM
Please respond to
ash007 <RamsamyAshley@GMAIL.COM>


To
SAS-L@LISTSERV.UGA.EDU
cc

Subject
Re: Array documentation






thanks for your help.

how can I use ARRAY with this :

DATA RESN.CNTNAUT4;
 SET RESN.CNTNAUT3;
 IF  CDCLA001 = 'NSA' OR CDCLA002 = 'NSA'
  OR CDCLA003 = 'NSA' OR CDCLA004 = 'NSA'
  OR CDCLA005 = 'NSA' OR CDCLA006 = 'NSA'
  OR CDCLA007 = 'NSA' OR CDCLA008 = 'NSA'
  OR CDCLA009 = 'NSA' OR CDCLA010 = 'NSA'
  OR CDCLA011 = 'NSA' OR CDCLA012 = 'NSA'
  OR CDCLA013 = 'NSA' OR CDCLA014 = 'NSA'
  OR CDCLA015 = 'NSA' OR CDCLA016 = 'NSA'
  OR CDCLA017 = 'NSA' OR CDCLA018 = 'NSA'
  OR CDCLA019 = 'NSA' OR CDCLA020 = 'NSA'
   THEN CLNSA = 1; ELSE CLNSA = 0;

IF   CDCLA001 = 'NSF' OR CDCLA002 = 'NSF'
  OR CDCLA003 = 'NSF' OR CDCLA004 = 'NSF'
  OR CDCLA005 = 'NSF' OR CDCLA006 = 'NSF'
  OR CDCLA007 = 'NSF' OR CDCLA008 = 'NSF'
  OR CDCLA009 = 'NSF' OR CDCLA010 = 'NSF'
  OR CDCLA011 = 'NSF' OR CDCLA012 = 'NSF'
  OR CDCLA013 = 'NSF' OR CDCLA014 = 'NSF'
  OR CDCLA015 = 'NSF' OR CDCLA016 = 'NSF'
  OR CDCLA017 = 'NSF' OR CDCLA018 = 'NSF'
  OR CDCLA019 = 'NSF' OR CDCLA020 = 'NSF'
   THEN CLNSF = 1; ELSE CLNSF = 0;
RUN;