Очень много IIF - как быть

@WEEKEST · Регистрация: 22.07.2014

Author24 — интернет-сервис помощи студентам

Здравствуйте

недавно столкнулся с такой ситуацией пришлось прописать слишком много условий, до сих пор никак не могу решить,

Суть:

по определенному условию должен формироваться столбец с коэфициентом
Цель (переоценка товара)

SQL

 IIf([срок год Мес]>18 AND [Оставшийся срок годн мес]<=1,0.1,IIf([срок год Мес]>18 AND [Оставшийся срок годн мес]<=2,0.2,IIf ....  AS Выражение1

и так раз 20 наверное как сократить

искал на форумах не нашел как быть

и как быть?

Видел где то что создают VB

Visual Basic

Private Sub ReconcileNow()
If txtTValue = "" Then
Exit Sub
End If
If C1 = 1 And Minus = 1 Then
    txtTaC1 = CDbl(txtTpC1) - CDbl(txtTValue)
    txtTaC2 = ""
ElseIf C1 = 1 And Minus = 0 Then
    txtTaC1 = CDbl(txtTpC1) + CDbl(txtTValue)
    txtTaC2 = ""
ElseIf C2 = 1 And Minus = 1 Then
    txtTaC2 = CDbl(txtTpC2) - CDbl(txtTValue)
    txtTaC1 = ""
ElseIf C2 = 1 And Minus = 0 Then
    txtTaC2 = CDbl(txtTpC2) + CDbl(txtTValue)
    txtTaC1 = ""
Else
    If Round = 1 And Minus = 1 Then
        txtTaR = CDbl(txtTaR) - CDbl(txtTValue)
    ElseIf Round = 1 And Minus = 0 Then
        txtTaR = CDbl(txtTaR) + CDbl(txtTValue)
    End If
End If
End Sub

Но так не силен в VBA не смог адаптировать под себя

@ltv_1953 · 17.04.2015, 12:18

Сообщение от WEEKEST

IIf([срок год Мес]>18 AND [Оставшийся срок годн мес]<=1,0.1,IIf([срок год Мес]>18 AND [Оставшийся срок годн мес]<=2,0.2,IIf .... AS Выражение1

Непонятно, что в конце этого выражения. А по первым двум - чем не устраивает просто выражение типа

SQL

1	([Оставшийся срок годн мес] MOD [срок год Мес])*0.1

@snipe · 17.04.2015, 13:06

вместо выражения можно использовать функцию (самонаписанную) и тогда вот эти iif просто отвалятся (в сторону)

@WEEKEST · 17.04.2015, 13:33 **[ТС]**

совсем не так считает ((

SQL

1	([Оставшийся срок годн мес] MOD [срок год Мес])*0.1

и причем я не понимаю принцип ее действия

условий оч много - вот законченный кусок (половина того что надо)

SQL

IIf([срок год Мес]>18 AND [Оставшийся срок годн мес]<=1;0,1;IIf([срок год Мес]>18 AND [Оставшийся срок годн мес]<=2;0,2;IIf([срок год Мес]>18 AND [Оставшийся срок годн мес]<=3;0,5;IIf([срок год Мес]>18 AND [Оставшийся срок годн мес]<=4;0,7;IIf([срок год Мес]>18 AND [Оставшийся срок годн мес]<=5;0,9;IIf([срок год Мес]>18 AND [Оставшийся срок годн мес]<=6;1;IIf([срок год Мес]=18 AND [Оставшийся срок годн мес]<=1;0,1;IIf([срок год Мес]=18 AND [Оставшийся срок годн мес]<=2;0,25;IIf([срок год Мес]=18 AND [Оставшийся срок годн мес]<=3;0,6;IIf([срок год Мес]=18 AND [Оставшийся срок годн мес]<=4;0,7;IIf([срок год Мес]=18 AND [Оставшийся срок годн мес]<=5;0,8;IIf([срок год Мес]<=12 AND [Оставшийся срок годн мес]<=1;0,1;IIf([срок год Мес]<=12 AND [Оставшийся срок годн мес]<=2;0,3;0)))))))))))))

но условий больше впихнуть некуда -
знаний пока не хватает как то это реализовать

Добавлено через 1 минуту
snipe

а о какой "самописной" функции идет речь?

в идеале я так и хочу

@ltv_1953 · 17.04.2015, 14:33

Ну тогда в пишите публичную функцию, что-то вроде этой (условия у Вас неполные, так что возможны неверная трактовка) и обращаетесь к ней в запросах, ... .

Visual Basic

'Предполагается, что срок годности и осталось целые месяцы
Public Function KKK(ByVal SS As Integer, ByVal OO As Integer) As Currency
    If SS > 18 Then
        Select Case OO
        Case 0, 1
            KKK = 0.1
        Case 2
            KKK = 0.2
        Case 3
            KKK = 0.5
        Case 4
            KKK = 0.7
        Case 5
            KKK = 0.9
        Case 6
            KKK = 1
        Case Else
            KKK = 1
        End Select
    ElseIf SS = 18 Then
        Select Case OO
        Case 0, 1, 2
            KKK = 0.25
        Case 3
            KKK = 0.6
        Case 4
            KKK = 0.7
        Case 5
            KKK = 0.8
        Case Else
            KKK = 1
        End Select
    ElseIf SS = 12 Then
        ...
    End If
End Function

mobile · 17.04.2015, 22:01

Вообще говоря, задавать такие сложные отношения в коде не очень хорошо. Гораздо лучше делать это в таблице. Легко пополнять, легко менять параметры. А в коде это сплошной экстрим.

WEEKEST, посмотрите вариант с таблицей чисел для каждого срока. Дополнительная таблица называется Сроки. Запрос, вычисляющий нужное выражение - СрокЗапрос

@WEEKEST · 20.04.2015, 09:51 **[ТС]**

Да пожалуй это более "рабочий" подход
но я уже сделал с кодом.

Но этот вариант обязательно возьму на заметку - очень нравится мне когда все просто)

Большой спасибо

@snipe 4064 / 1445 / 399 Регистрация: 07.08.2013 Сообщений: 3,617
	17.04.2015, 13:06	3
	вместо выражения можно использовать функцию (самонаписанную) и тогда вот эти iif просто отвалятся (в сторону) 0

@WEEKEST 0 / 0 / 0 Регистрация: 22.07.2014 Сообщений: 59
	20.04.2015, 09:51 [ТС]	7
	Да пожалуй это более "рабочий" подход но я уже сделал с кодом. Но этот вариант обязательно возьму на заметку - очень нравится мне когда все просто) Большой спасибо 0

Очень много IIF - как быть

Решение