It sounds like you are concerned with finding the related array element in the Pr_time values for a given value of Pr.
Without example data it is a bit difficult to demonstrate specific functions due to character/numeric but this may get you started.
data example;
input pr_1 - pr_3 pr_time1-pr_time3;
array pr pr_1-pr_3;
array t pr_time1-pr_time3 ;
time= t[whichn(6,of pr(*))];
datalines;
3 2 6 15 18 25
;
run;
The WHICHN (of if the values are character WHICHC) searches for the first value, which would the known value you are searching for among the array values of pr and returns the index of the first variable containing the desired value. or 0 if not found.
Since you would in likelihood not always have a found value you would likely want to have something like
if whichn(6,of pr(*))>0 then time= t[whichn(6,of pr(*))];
Note that is possibly to functions inside array index locations as long as the function will return integer values (within the defined array size to avoid out of range error messages).
... View more