=complicatedDecision(B5,C5,D5)
Public Function ComplicatedDecision(S2, X2, U2)
Dim sOutput As String
If X2 = "LIQUID" Then
If S2 > 0.01 Then
If U2 >= 0.01 And U2 <= 0.1 Then sOutput = "-TSRA"
If U2 >= 0.1 And U2 <= 0.3 Then sOutput = "TSRA"
If U2 > 0.3 Then sOutput = "+TSRA"
Else
If U2 >= 0.01 And U2 <= 0.1 Then sOutput = "-RA"
If U2 >= 0.1 And U2 <= 0.3 Then sOutput = "RA"
If U2 > 0.3 Then sOutput = "+RA"
End If
End If
If X2 = "FROZEN" Then
If S2 > 0.01 Then
If U2 >= 0.01 And U2 <= 0.1 Then sOutput = "-TSSN"
If U2 >= 0.1 And U2 <= 0.3 Then sOutput = "TSSN"
If U2 > 0.3 Then sOutput = "+TSSN"
Else
If U2 >= 0.01 And U2 <= 0.1 Then sOutput = "-SN"
If U2 >= 0.1 And U2 <= 0.3 Then sOutput = "SN"
If U2 > 0.3 Then sOutput = "+SN"
End If
End If
If X2 = "FREEZING" Then
If S2 > 0.01 Then
If U2 >= 0.01 And U2 <= 0.1 Then sOutput = "-TSFZRA"
If U2 >= 0.1 And U2 <= 0.3 Then sOutput = "TSFZRA"
If U2 > 0.3 Then sOutput = "+TSFZRA"
Else
If U2 >= 0.01 And U2 <= 0.1 Then sOutput = "-FZRA"
If U2 >= 0.1 And U2 <= 0.3 Then sOutput = "FZRA"
If U2 > 0.3 Then sOutput = "+FZRA"
End If
End If
If S2 < 0.01 Then
sOutput = ""
End If
ComplicatedDecision = sOutput
End Function
Public Function ComplicatedDecision(S2, X2, U2)
Dim sOutput As String
If X2 = "LIQUID" Then
If S2 < 0.01 Then
If U2 >= 0.01 And U2 <= 0.1 Then sOutput = "-TSRA"
If U2 >= 0.1 And U2 <= 0.3 Then sOutput = "TSRA"
If U2 > 0.3 Then sOutput = "+TSRA"
Else
If S2 >= 0.01 And S2 <= 0.1 Then sOutput = "-RA"
If S2 >= 0.1 And S2 <= 0.3 Then sOutput = "RA"
If S2 > 0.3 Then sOutput = "+RA"
End If
End If
If X2 = "FROZEN" Then
If S2 < 0.01 Then
If U2 >= 0.01 And U2 <= 0.1 Then sOutput = "-TSSN"
If U2 >= 0.1 And U2 <= 0.3 Then sOutput = "TSSN"
If U2 > 0.3 Then sOutput = "+TSSN"
Else
If S2 >= 0.01 And S2 <= 0.1 Then sOutput = "-SN"
If S2 >= 0.1 And S2 <= 0.3 Then sOutput = "SN"
If S2 > 0.3 Then sOutput = "+SN"
End If
End If
If X2 = "FREEZING" Then
If S2 < 0.01 Then
If U2 >= 0.01 And U2 <= 0.1 Then sOutput = "-TSFZRA"
If U2 >= 0.1 And U2 <= 0.3 Then sOutput = "TSFZRA"
If U2 > 0.3 Then sOutput = "+TSFZRA"
Else
If S2 >= 0.01 And S2 <= 0.1 Then sOutput = "-FZRA"
If S2 >= 0.1 And S2 <= 0.3 Then sOutput = "FZRA"
If S2 > 0.3 Then sOutput = "+FZRA"
End If
End If
If S2 < 0.01 Then
sOutput = ""
End If
ComplicatedDecision = sOutput
End Function
Open in new window