Имя: Пароль:
1C
1С v8
Как сравнить по разным методам
0 serkorvin1
 
24.04.19
10:12
Если Тип = 1 тогда нужно сравнивать на знак равенства
Иначе на знак неравенства.
Подскажите как сделать

Функция Тест(Тип)

Если Тип = 1 Тогда

Если СокрЛП(тТовар.IDНаСайте) = "" Тогда

Иначе

Если СокрЛП(тТовар.IDНаСайте) <> "" Тогда

КонецЕсли;


.....
КонецФункции
1 1Сергей
 
24.04.19
10:14
Если Тип = 1 Тогда
    Если СокрЛП(тТовар.IDНаСайте) = "" Тогда

    КонецЕсли;
Иначе
    Если СокрЛП(тТовар.IDНаСайте) <> "" Тогда

    КонецЕсли;
КонецЕсли;
2 serkorvin1
 
24.04.19
10:16
Для Каждого тТовар ИЗ МассивТовара Цикл
        
        Если СокрЛП(тТовар.IDНаСайте) = "" Тогда
            Продолжить;
        Иначе
            НС = Объект.ТоварДляСинхронизации.Добавить();
            НС.Товар = тТовар;
            НС.Наименование = СтрЗаменить(тТовар.НаименованиеДляСайта, """", "");
            НС.Описание = СтрЗаменить(тТовар.ОписаниеДляСайта, """", "");
                       и тут еще много кода


В другом случае надо


Для Каждого тТовар ИЗ МассивТовара Цикл
        
        Если СокрЛП(тТовар.IDНаСайте) <> "" Тогда
            Продолжить;
        Иначе
            НС = Объект.ТоварДляСинхронизации.Добавить();
            НС.Товар = тТовар;
            НС.Наименование = СтрЗаменить(тТовар.НаименованиеДляСайта, """", "");
            НС.Описание = СтрЗаменить(тТовар.ОписаниеДляСайта, """", "");
                         и тут еще много Такого же кода
3 serkorvin1
 
24.04.19
10:16
(1) просто в таком случае будет простой дубляж кода
4 1Сергей
 
24.04.19
10:17
(3) блин, сразу бы сказал чо тебе надо. А то мой стеклянный шар на полировке :)
5 Йохохо
 
24.04.19
10:18
в функцию оберни
6 serkorvin1
 
24.04.19
10:18
(4) извиняюсь - хотел проще написать - но как всегда получилось :(((
7 1Сергей
 
24.04.19
10:18
Если (Тип = 1) И (СокрЛП(тТовар.IDНаСайте) = "") Тогда
            Продолжить;
        ИначеЕсли (Тип <> 1) И (СокрЛП(тТовар.IDНаСайте) <> "") Тогда
            Продолжить;
        Иначе
...
8 serkorvin1
 
24.04.19
10:26
(7) Спс
9 НЕА123
 
24.04.19
10:44
Если (Тип+(СокрЛП(тТовар.IDНаСайте) = "")) % 2 = 0 Тогда

Продолжить;

Иначе

пятница начинается в среду (с)
Проблемы невозможно решaть нa том же уровне компетентности, нa котором они возникaют. Альберт Эйнштейн