Имя: Пароль:
1C
1С v8
Скидка отрабатывает неверно
🠗Ø (Волшебник 04.04.2017 14:51)
0 Da D
 
04.04.17
14:37
Этот код всё норм отрабатывает,а этот:

Если ВидСкидкиНаценки = "Сумма"  Тогда
        Если ТекущаяСтрока.Номенклатура.ВидНоменклатуры.Код = "ЦУ0000008" Тогда
            Пароль = ПолучитьФорму("ФормаСменыПароля").ОткрытьМодально();
            Если Пароль = "280317" Тогда
                ТекущаяСтрока.ПроцентСкидкиНаценки = ЗначениеСкидкиНаценки;
            Иначе
                ЗначениеСкидкиНаценки = 0;
            КонецЕсли;
        КонецЕсли;
        КонецЕсли;
А этот должен делать Скидку Суммовую, а не Процентную, выбираю 500(как я думал РУБЛЕЙ), а он делает скидку 500%
1 drcrasher
 
04.04.17
14:38
ну так и пиши значение скидки, а не процент
2 Da D
 
04.04.17
14:39
(1) Ты о чем ? открывается форма я там пишу 500 и выбираю Суммовая скидка
3 Da D
 
04.04.17
14:40
тяжко разобраться, прог, который это допиливал уволился
а мне разбирайся
4 Nuobu
 
04.04.17
14:41
(3) А ты прог?
5 Волшебник
 
модератор
04.04.17
14:42
(3) Тебе проще заявление на увольнение написать, чем программный код.

Каким надо быть тупым, чтобы присвоить полю ПроцентСкидкиНаценки значение 500 и ожидать 500 рублей...
6 1Снеговик
 
гуру
04.04.17
14:43
(5) при чем он вводит 500 в форму пароля
7 Волшебник
 
модератор
04.04.17
14:44
(6) Не, вряд ли. Форма пароля открывается модально и закрывается. А вот условие на ВидНоменклатуры.Код = "бла-бла" о многом говорит
8 1Снеговик
 
гуру
04.04.17
14:44
Там после Иначе должно быть ТекущаяСтрока.ПроцентСкидкиНаценки = 0 имхо
9 Da D
 
04.04.17
14:45
(7) Это условие говорит о том, на какую номенклатуру распространяется скидка
10 Naf2017
 
04.04.17
14:46
предыдущий программист уволился 28 марта сего года?
11 Волшебник
 
модератор
04.04.17
14:46
(9) Я без тебя это понял, просто так не пишут. Сравнивают с константой или с предопределённым значением, или берут значение скидки из регистра сведений или реквизита.
12 1Снеговик
 
гуру
04.04.17
14:47
Меня больше смущает Если ВидСкидкиНаценки = "Сумма" Тогда

Кажется в условие совсем не попадает. Надо скидки нормально настраивать сначала.
13 Da D
 
04.04.17
14:47
(11) Вот как написал великий погромист, так и есть, а мне "учись, вот он допиливал конфу"
14 Richard Stallman
 
04.04.17
14:48
(9) уже скоро операторы научатся менять код любого товара на нужный для получения скидки. И брать откаты с покупателей...
15 Волшебник
 
модератор
04.04.17
14:48
(13) Нам это неинтересно. Со своим говнокодом разбирайтесь сами.
16 Волшебник
 
модератор
04.04.17
14:48
(14) Чётко
17 Da D
 
04.04.17
14:49
это код не товара, а группы номенклатуры
18 Da D
 
04.04.17
14:49
Процедура КлавишаСкидкаПроцентНажатие(Элемент)

    Вид = "Процент";
    
    Тип = "Скидка";
    
    Закрыть(ВернутьЗначение());

КонецПроцедуры

Процедура КлавишаНаценкаПроцентНажатие(Элемент)

    Вид = "Процент";
    
    Тип = "Наценка";
    
    Закрыть(ВернутьЗначение());

КонецПроцедуры

Процедура КлавишаСкидкаСуммаНажатие(Элемент)

    Вид = "Сумма";
    
    Тип = "Скидка";
    
    Закрыть(ВернутьЗначение());

КонецПроцедуры

Процедура КлавишаНаценкаСуммаНажатие(Элемент)

    Вид = "Сумма";
    
    Тип = "Наценка";
    
    Закрыть(ВернутьЗначение());

КонецПроцедуры
                                                                         
Функция ВернутьЗначение()
    
    ЗначениеСкидкиНаценки = ОбщегоНазначения.ПривестиСтрокуКЧислу(Значение, Истина);
    
    Если ЗначениеСкидкиНаценки = Неопределено Тогда
        Возврат 0;
    Иначе
        
        Если Тип = "Скидка" Тогда
            ЗначениеСкидкиНаценки = ЗначениеСкидкиНаценки;
        Иначе
            ЗначениеСкидкиНаценки = -ЗначениеСкидкиНаценки;
        КонецЕсли;
        
        Возврат ЗначениеСкидкиНаценки;
        
    КонецЕсли;
    
КонецФункции
19 catena
 
04.04.17
14:50
(13)С таким подходом к подбору программистов такой вот код и получается...
20 Da D
 
04.04.17
14:50
(19) меня взяли не программистом, а учеником
и видимо учиться я должен у суперкода и сам у себя
21 Волшебник
 
модератор
04.04.17
14:51
(20) Это Ваши личные проблемы.
Здесь можно обсудить любую тему при этом оставаясь на форуме для 1Сников, который нужен для работы. Ymryn