Array Logic

[robertrao]

Hello,

How can I also Include the "N" logic belowif the condition is not satisfied??

Thanks

data want;

set have;

array abiot(10) antibiotic1-antibiotic10;

do i= 1 to 10;

　

if index(upcase(abiot{i}),'GENTAMICIN') > 0 then GENTAMICIN="Y" ;

drop i;

end;

run;

[PGStats]

Add

GENTAMICIN = "N";

before the do loop. It will keep that value when "GENTAMICIN" is not present in the array.

[Jagadishkatam]

Alternatively, an else GENTAMICIN="N" ; within the do loop after the if condition.

[PGStats]

That's not the same. An else condition will reset GENTAMICIN to "N" even if it has been met earlier. I assumed OP wants GENTAMICIN = "N" only if it is absent in the array.

[robertrao]

Hello PG stats,

I tried this and its resetting all the values to "N"

data want;

set have;

array abiot(10) antibiotic1-antibiotic10;

do i= 1 to 10;

　

if index(upcase(abiot{i}),'GENTAMICIN') > 0 then GENTAMICIN="Y" ;else GENTAMICIN="N";

drop i;

end;

run;

[Reeza]

---

@robertrao wrote:

Hello PG stats,

I tried this and its resetting all the values to "N"

data want;

set have;

array abiot(10) antibiotic1-antibiotic10;

do i= 1 to 10;

　

if index(upcase(abiot{i}),'GENTAMICIN') > 0 then GENTAMICIN="Y" ;else GENTAMICIN="N";

drop i;

end;

run;

---

That wasn't @PGStats solution. Reread his answer. 

[Reeza]

---

@Jagadishkatam wrote:
Alternatively, an else GENTAMICIN="N" ; within the do loop after the if condition.

---

No, that will reset it if it's been set to Y, which would be incorrect. 

Since your searching for a text string you could concatenate them all and search once though. 

If index(CATX (',' , of antibiotic1-antibiotic10), 'GENTAMICIN')> 0 then GENTAMICIN='Y';

else ....='N';

[RW9]

And just to add to that, the two functions IFC(), IFN() can be used for binary choices like this to remove if/else clause:

gentamycin=ifc(index(CATX (',' , of antibiotic1-antibiotic10), 'GENTAMICIN')> 0,'Y','N');

[ballardw]

I recomment @PGStats approach and to change this line:

if index(upcase(abiot{i}),'GENTAMICIN') > 0 then GENTAMICIN="Y" ;

to

if index(upcase(abiot{i}),'GENTAMICIN') > 0 then do;

   GENTAMICIN="Y"

   leave;

end;

Which will stop going through the loop the first time the condition is met. Since you are not counting or accumulating how many "Y" are involved then stop when you find the first one.

The LEAVE option as above would also resolve the problem of assigning the N if you used the Else approach.