Имя: Пароль:
1C
1С v8
Не работает код
0 Hostess_
of_Love
 
25.05.12
10:18
Интерес чисто спортивный (или как его назвать?)
Два варианта кода, по сути одно и тоже. только один из них не работает
работающий вариант
       Если Найти(Строка(Fi.ActiveSheet.Cells(4, НомерКолонкиСЧЕТФАКТУРА).Value), "СЧЁТ-ФАКТУРА") = 0 Тогда
           ДокументПодходит1 = Ложь;
       КонецЕсли;
       
       Если Найти(Строка(Fi.ActiveSheet.Cells(2, 2).Value), "Счет-фактура") = 0 Тогда
           ДокументПодходит2 = Ложь;
       КонецЕсли;
       
       Если Найти(Строка(Fi.ActiveSheet.Cells(4, 2).Value), "СЧЕТ- ФАКТУРА") = 0 Тогда
           ДокументПодходит3 = Ложь;
       КонецЕсли;

не работающий

       Если Найти(Строка(Fi.ActiveSheet.Cells(4, НомерКолонкиСЧЕТФАКТУРА).Value), "СЧЁТ-ФАКТУРА") = 0 Тогда
           ДокументПодходит1 = Ложь;
       ИначеЕсли Найти(Строка(Fi.ActiveSheet.Cells(2, 2).Value), "Счет-фактура") = 0 Тогда
           ДокументПодходит2 = Ложь;
       иначеЕсли Найти(Строка(Fi.ActiveSheet.Cells(4, 2).Value), "СЧЕТ- ФАКТУРА") = 0 Тогда
           ДокументПодходит3 = Ложь;
       КонецЕсли;
или, все-таки, это не одно и тоже?
1 Mort
 
25.05.12
10:19
мда
2 0_Serg_0
 
25.05.12
10:21
добавь голосовалку
3 Cube
 
25.05.12
10:21
)) Пятнично)
4 Alex S D
 
25.05.12
10:21
брехня
5 Mort
 
25.05.12
10:22
В смысле развод? Света Семененко?
6 Wobland
 
25.05.12
10:23
ну. во втором варианте при "=0" уходит в Док1 и дальше не смотрит. а в первом все три условия отрабатывают
7 Hostess_
of_Love
 
25.05.12
10:23
хех... другого не ожидала :D
8 butterbean
 
25.05.12
10:23
(0) то что это не одно и тоже скажет любой умеющий читать человек, да и не умеющий но зрячий наверно тоже
9 Hostess_
of_Love
 
25.05.12
10:24
(8)я имела ввиду не сам текст кода
10 Hostess_
of_Love
 
25.05.12
10:24
(6)спасибо, теперь поняла
11 Trier
 
25.05.12
10:25
фотка хорошая,поэтому ласково и нежно)

см (6)
12 rutony
 
25.05.12
10:25
(0) Вообще то код разный, и делает разные вещи
В первом есть вариант когда результат:
ДокументПодходит1 = Ложь;
ДокументПодходит3 = Ложь;

а во втором что то одно...
13 rutony
 
25.05.12
10:25
Пока писал, уже написали)
14 Hostess_
of_Love
 
25.05.12
10:29
(11)а не ласково эт как?))
15 Wobland
 
25.05.12
10:30
(14) ну как мы можем даму с птицей сравнивать?
16 Hostess_
of_Love
 
25.05.12
10:31
(15)птицы разные бывают))
17 Wobland
 
25.05.12
10:33
(16) СтрЗаменить((15), "с птицей сравнивать", "дятлом называть")
18 serffer
 
25.05.12
10:34
Даеш использовать мисту вместо отладчика!
19 Hostess_
of_Love
 
25.05.12
10:34
(17)ну если так, то да)
20 Hostess_
of_Love
 
25.05.12
10:35
(18)думаешь я не умею им пользоваться?))
21 Cube
 
25.05.12
10:36
(20) Думаю, что блок-схемы ты не проходила, ни в школе, ни в универе... :)
22 Lama12
 
25.05.12
10:38
(0)Логика кода абсолютно разная.
23 Hostess_
of_Love
 
25.05.12
10:39
(21)вариант "проходила, но не помню и помнить не хочу" не?
24 Cube
 
25.05.12
10:40
(23) Это называется не "проходила", а "прошла мимо")) Ага?))
25 Hostess_
of_Love
 
25.05.12
10:42
(24)типа того))
26 Wobland
 
25.05.12
10:42
всё равно какашками закидали ;)
27 Hostess_
of_Love
 
25.05.12
10:44
(26)думаешь я обращаю на такое внимание?)) троллингу не поддаюсь))
28 Hawk_1c
 
25.05.12
10:48
(0) Специальность какая? Это 2 разных кода. Надеюсь не программер.
29 cViper
 
25.05.12
10:48
(27) А стоило бы. Глядишь стала бы в программировании разбираться.
30 155153144627
 
25.05.12
10:48
(0) В чем "не работает"?
В первом варианте забудут иметь значение Ложь как минимум две переменные ДокументПодходит.
Во втором возможно ни одной не будет присвоено значение, максимум одной.
31 Buster007
 
25.05.12
10:48
как можно использовать конструкцию Если ИначеЕсли для разных переменных?
32 hhhh
 
25.05.12
10:49
(25) есть 2 варианта: "знал, но забыл" и " не знал, да еще и забыл".
33 Aleks73
 
25.05.12
10:50
(0) рекомендую.
в школе читал, занятно.

Название: Паскаль для всех

Автор: Боон К.

Аннотация:

В доступной форме изложены основы программирования на языке ПАСКАЛЬ. Хотя книга ориентирована на читателей, не имеющих опыта работы с вычислительной техникой, она может быть полезна и специалистам, так как позволяет не только познакомиться с языком, но и по-новому взглянуть на известные принципы программирования.
Для инженерно-технических работников, студентов и школьников.
34 155153144627
 
25.05.12
10:51
ДокументПодходит = Ложь;
Если Найти(СтрЗаменить(ВРЕГ(Строка(Fi.ActiveSheet.Cells(4, НомерКолонкиСЧЕТФАКТУРА).Value))," ",""), "СЧЁТ-ФАКТУРА") <> 0 Тогда
           ДокументПодходит = Истина;
       КонецЕсли;

Вот это поставь вместо своего.
35 Aleks73
 
25.05.12
10:51
Кстати, коллеги, было много хороших книжек типа (33) , мне вспомнилась только эта, накидайте тоже ссылок ТС !
36 cViper
 
25.05.12
10:53
(34) Тогда уж так:
ДокументПодходит = (Найти(СтрЗаменить(ВРЕГ(Строка(Fi.ActiveSheet.Cells(4, НомерКолонкиСЧЕТФАКТУРА).Value))," ",""), "СЧЁТ-ФАКТУРА") <> 0 );
37 155153144627
 
25.05.12
10:58
(36) А такое работает? А = Б <> В; ?
Про А = Б = В знаю.
38 cViper
 
25.05.12
11:02
(37) Работает. Переменной присваиваю значение, вычисленное в скобках.
39 Mort
 
25.05.12
12:26
http://lib.mexmat.ru/books/44563
Вот мегакнига для таких вещей.
Кaк может человек ожидaть, что его мольбaм о снисхождении ответит тот, кто превыше, когдa сaм он откaзывaет в милосердии тем, кто ниже его? Петр Трубецкой