ReSQL.ru
     
powered by simpleCommunicator - 2.0.52     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Переменная в операторе ветвления.
19 сообщений из 44, страница 2 из 2
  2  все
Переменная в операторе ветвления.
    #39737314
Фотография час58
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
час58
Участник
alecko,

Изначально, я не предполагал, что у них так часто будут меняться шапки на фуражки и появляться кепки...
залез в код, раз в год и заменил слова ассортимента.
Теперь вот надо исправлять свой промах.
Слишком много мест править приходится.
Хорошо, если это будет только в одном месте кода, которое подставляется в виде короткой и постоянной строчки типа (NABOR)в качестве условия отбора во все остальные места
...
Рейтинг: 0 / 0
23.11.2018, 09:29
| Ответить | Цитировать | Написать  
Переменная в операторе ветвления.
    #39737317
Озверин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Озверин
Участник
час58alecko,

Изначально, я не предполагал, что у них так часто будут меняться шапки на фуражки и появляться кепки...
залез в код, раз в год и заменил слова ассортимента.
Теперь вот надо исправлять свой промах.
Слишком много мест править приходится.
Хорошо, если это будет только в одном месте кода, которое подставляется в виде короткой и постоянной строчки типа (NABOR)в качестве условия отбора во все остальные места

почему бы не выносить всю эту информацию в базу? Зачем менять код? Сделайте им настройку, пусть сами выбирают.
...
Рейтинг: 0 / 0
23.11.2018, 09:33
| Ответить | Цитировать | Написать  
Переменная в операторе ветвления.
    #39737321
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
ОзверинЗачем менять код? Сделайте им настройку, пусть сами выбирают.
А оплачиваемая поддержка?..
...
Рейтинг: 0 / 0
23.11.2018, 09:43
| Ответить | Цитировать | Написать  
Переменная в операторе ветвления.
    #39737329
Озверин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Озверин
Участник
ПанургОзверинЗачем менять код? Сделайте им настройку, пусть сами выбирают.
А оплачиваемая поддержка?..

разработка стоит дороже, чем поддержка. Зачем тратить время на поддержку?
...
Рейтинг: 0 / 0
23.11.2018, 09:49
| Ответить | Цитировать | Написать  
Переменная в операторе ветвления.
    #39737334
Фотография час58
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
час58
Участник
Озверин,

Поддержка, порой, длится годами....
...
Рейтинг: 0 / 0
23.11.2018, 09:55
| Ответить | Цитировать | Написать  
Переменная в операторе ветвления.
    #39737346
Фотография час58
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
час58
Участник
спасибо всем за помощь.
Булевые рулят!
получилось так:

Функция :
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Public Function FUN_NABOR_VIDOV_PAY(PAY_VIDS As String) As Boolean
'проверка принадлежности платежа
FUN_NABOR_VIDOV_PAY = False

Select Case PAY_VIDS

Case "Рога", "Копыта", "Справки", "шапки"
  FUN_NABOR_VIDOV_PAY = True
End Select

End Function



Во всех селектах - обращаемся к этой функции.

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
    Select Case FUN_NABOR_VIDOV_PAY(PAY_VIDS)
    
    Case True
     ' нужное
      FUN_NADA_KTI_YES_NO = True
    Case Else
    ' иное
      FUN_NADA_KTI_YES_NO = False
    End Select
...
Рейтинг: 0 / 0
23.11.2018, 10:24
| Ответить | Цитировать | Написать  
Переменная в операторе ветвления.
    #39737347
Озверин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Озверин
Участник
час58, ад какой то ;)
...
Рейтинг: 0 / 0
23.11.2018, 10:25
| Ответить | Цитировать | Написать  
Переменная в операторе ветвления.
    #39737349
Фотография час58
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
час58
Участник
Можно, конечно к этой функции обращаться и по
If ....

Главное, что менять значение строки теперь придётся в одном месте кода.
...
Рейтинг: 0 / 0
23.11.2018, 10:27
| Ответить | Цитировать | Написать  
Переменная в операторе ветвления.
    #39737350
Фотография час58
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
час58
Участник
Озверин,

Спасибо.
...
Рейтинг: 0 / 0
23.11.2018, 10:27
| Ответить | Цитировать | Написать  
Переменная в операторе ветвления.
    #39737354
Озверин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Озверин
Участник
час58Озверин,

Спасибо.

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
 Select Case FUN_NABOR_VIDOV_PAY(PAY_VIDS)
    
    Case True
     ' нужное
      FUN_NADA_KTI_YES_NO = True
    Case Else
    ' иное
      FUN_NADA_KTI_YES_NO = False
    End Select



Я не понял, а почему бы просто не вернуть значение ф-ии FUN_NABOR_VIDOV_PAY(PAY_VIDS)? Зачем еще его в select-case загонять?
...
Рейтинг: 0 / 0
23.11.2018, 10:35
| Ответить | Цитировать | Написать  
Переменная в операторе ветвления.
    #39737360
Фотография час58
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
час58
Участник
Озверин,

Да, ты прав.
Просто это вообще не то вышло, что я пытаюсь сделать.
:-)
Мне надо в многоветвевой отбор селектами, вставить одно из условий в виде
Case NABOR
заменив последовательность слов
Код: vbnet
1.
 "Рога", "Копыта", "Справки", "шапки"


Одним словом NABOR.

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Select Case VID

Case  NABOR
.....
Case  NABOR_1
....
Case  NABOR_2
....
 Case Else 
....
End Select
...
Рейтинг: 0 / 0
23.11.2018, 10:45
| Ответить | Цитировать | Написать  
Переменная в операторе ветвления.
    #39737364
Озверин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Озверин
Участник
час58, так а зачем из одного select-case делать два?
чем вас не устраивает ситуация

Код: vbnet
1.
2.
3.
4.
select case 
 case "рога", "копыта"
 case "автомобили", "ковши"
end select
...
Рейтинг: 0 / 0
23.11.2018, 10:50
| Ответить | Цитировать | Написать  
Переменная в операторе ветвления.
    #39737366
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
час58, тебе же уже предложили нормальный (для этой ненормальной ситуации) вариант! Который с таблицей. Два поля " ключ-значение ", дёргать длукапом или запросом.
...
Рейтинг: 0 / 0
23.11.2018, 10:52
| Ответить | Цитировать | Написать  
Переменная в операторе ветвления.
    #39737373
Озверин
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Озверин
Участник
час58, а откуда приходят эти рога и копыта?
...
Рейтинг: 0 / 0
23.11.2018, 10:59
| Ответить | Цитировать | Написать  
Переменная в операторе ветвления.
    #39737392
Фотография час58
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
час58
Участник
Панург,
ты прав.
Этот вариант норм.
Только, конечно, без таблицы буду делать.
Просто шарики за ролики заскочили с этим авралом...
...
Рейтинг: 0 / 0
23.11.2018, 11:12
| Ответить | Цитировать | Написать  
Переменная в операторе ветвления.
    #39737402
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Панург
Участник
час58Этот вариант норм.
Только, конечно, без таблицы буду делать.Это как?!
...
Рейтинг: 0 / 0
23.11.2018, 11:31
| Ответить | Цитировать | Написать  
Переменная в операторе ветвления.
    #39737406
Фотография час58
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
час58
Участник
Панург,

в ЛОБ.
в коде строки.
...
Рейтинг: 0 / 0
23.11.2018, 11:35
| Ответить | Цитировать | Написать  
Переменная в операторе ветвления.
    #39737567
Фотография vmag
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vmag
Участник
час58в ЛОБ.
в коде строки.

 

Летит тяжелый транспортный самолет в сопровождении двух истребителей.
Лететь долго, и пилотам истребителей стало скучно.
Ну и начали они вы@бываться друг перед другом:
мертвые петли крутят, виражи, восьмерки.
И тут в радиоэфир вклинивается пилот транспортника:
— А спорим, я сейчас сделаю то, чего вы на своих истребителях никогда не сможете.
— Ты? На своем беременном Ил-76, собрался тягаться с нами, лучшими асами страны?
Ну давай, удиви нас. Прошло десять минут, транспортник как летел ровно, так и летит.
Истребителям надоело ждать, и они вызывают пилота Ил-76:
— Ну и? Когда ты начнешь?
— Уже готово.
— И что же ты сделал того, что не можем мы?
— Сходил поссать и выпил кофе.
...
Рейтинг: 0 / 0
23.11.2018, 15:54
| Ответить | Цитировать | Написать  
Переменная в операторе ветвления.
    #39737576
Фотография час58
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
час58
Участник
vmag,
:-)
...
Рейтинг: 0 / 0
23.11.2018, 16:06
| Ответить | Цитировать | Написать  
19 сообщений из 44, страница 2 из 2
  2  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Переменная в операторе ветвления.
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&gotonew=1&tid=1611021]:
 0ms
get settings:
 9ms
get forum list:
 11ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 55ms
get topic data:
 12ms
get first new msg:
 8ms
get forum data:
 3ms
get page messages:
 58ms
get tp. blocked users:
 1ms
others: 11ms
total:  176ms
созд. / загр.: 176ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]