Conditions

[SassienFuté]

Hello everyone,

Does someone know how to replace a series of conditions as below :

if toto ne 0 then a = '1'; else a = '0';
if tutu ne 0 than b = '1'; else b = '0';
if titi ne 0 then c = '1'; else c = '0';
if tata ne 0 than d = '1'; else d = '0';
if tete ne 0 than e = '1'; else e = '0';

Thank you very much and have a good journey

[Kurt_Bremser]

Please post a more descriptive sample of your code, so we can see the conditions. Right now I have no idea what you want to simplify.

[SassienFuté]

Thank for your message KurtBremser. I just modified my post.

[Kurt_Bremser · Accepted solution]

OK, so the statements are the same, only variables change.

Use arrays:

data have;
input toto tutu titi tata tete;
datalines;
1 1 0 1 0
;

data want;
set have;
array in {*} toto tutu titi tata tete;
array out {*} $ a b c d e;
do i = 1 to dim(in);
  out{i} = ifc(in{i} ne 0,'1','0');
end;
drop i;
run;

The ifc() function is a simplification of your if/then/else.