topic Re: Nested if - do loops in SAS Programming

Nested if - do loops

89974114 — Mon, 05 Mar 2018 09:46:11 GMT

I have a dataset which looks like this:

ID      2017    2018    2019    2020

2017    30      24      20      18
2018    30      24      20      18
2019    30      24      20      18
2020    30      24      20      18

I am looking to create an array based on a few inputs:

%let FixedorFloating = '1 or 0';
%let Repricingfrequency = n Years;
%let LastRepricingDate = 'Date'n;

So far my code looks like this:

data ReferenceRateContract;
set refratecontract;

*arrays for years and flags;
array _year(2017:2020) year2017-year2020;
array _flag(2017:2020) flag2017-flag2020;

*loop over array;

if &FixedorFloating=1;

    do i=&dateoflastrepricing to hbound(_year);
    /*check if year matches year in variable name*/
    if put(ID, 4.) = compress(vname(_year(i)),, 'kd') 
        then _flag(i)=1;
    else _flag(i)=0;

    end;

else if &fixedorfloating=0;

    do i=&dateoflastrepricing to hbound(_year);
    if put (ID,4.)<=compress(vname(_year(i)),,'kd')
        then _flag(i)=1;

        else if put (ID, 4.) = compress(vname(_year(i-2*i)),, 'kd') 
        then _flag(i)=1;

        else _flag(i)=0;
        end;

drop i;

run;

The code works for the original if function but I'd like to make this more dynamic by introducing the else if FixedorFloating=0.

I'm also looking to make my function able to decipher whether the ID is on a year +2i year from the ID. i.e.

if ID=2017 - i'd like a 1 for years 2017, 2019. For ID=2018, 
I'd like a 1 for 2018, 2020 and so on hence the 

year(I-2*I)

I'm unsure if this is reasonable or incorrect.

The error of the log looks like this:

82         else if &fixedorfloating=0;
         ____
         160
 ERROR 160-185: No matching IF-THEN clause.

 84         then do i=&dateoflastrepricing to hbound(_year);
          ____
          180
 ERROR 180-322: Statement is not valid or it is used out of proper order.


 91         else _flag(i)=0;
 92         end;
           ___
           161
 ERROR 161-185: No matching DO/SELECT statement.

I'm assuming the if do followed by an else-if do isn't structured properly.

Re: Nested if - do loops

Kurt_Bremser — Mon, 05 Mar 2018 09:56:52 GMT

An if statement like this:

if &FixedorFloating=1;

(if without a then)

is called a "subsetting if", it is standalone, and does not support an else clause.

I guess you wanted something along:

data ReferenceRateContract;
set refratecontract;

*arrays for years and flags;
array _year(2017:2020) year2017-year2020;
array _flag(2017:2020) flag2017-flag2020;

*loop over array;

if &FixedorFloating=1
then do i=&dateoflastrepricing to hbound(_year);
    /*check if year matches year in variable name*/
  if put(ID, 4.) = compress(vname(_year(i)),, 'kd') 
  then _flag(i)=1;
  else _flag(i)=0;
end;
else if &fixedorfloating=0
then do i=&dateoflastrepricing to hbound(_year);
  if put (ID,4.)<=compress(vname(_year(i)),,'kd')
  then _flag(i)=1;
  else if put (ID, 4.) = compress(vname(_year(i-2*i)),, 'kd') 
  then _flag(i)=1;
  else _flag(i)=0;
end;
drop i;
run;

Re: Nested if - do loops

89974114 — Mon, 05 Mar 2018 10:05:25 GMT

Perfect, thanks.

Just trying to figure out a way to make the do loop flag up ID = year+2i now.

I get this error:

ERROR: Array subscript out of range at line 87 column 43.

Looking to pair up based on the following:

If ID = 2017, flag 2017, 2019

if ID= 2018, flag 2018, 2020

if ID= 2019, flag 2019

if ID= 2020, flag 2020

Re: Nested if - do loops

89974114 — Mon, 05 Mar 2018 10:09:21 GMT

Found it, just had to extend the array with appropriate variables. Ty.