Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Неназначенных незавершенных заказов: 2, свеженьких 1
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Войти | Зарегистрироваться )



История благодарностей участнику Sede ::: Спасибо сказали: 2 раз
Дата поста: В теме: За сообщение: Спасибо сказали:
21.07.15, 15:54 Показать таблицу в форму отрытой модально
Цитата(Домовик @ 21.07.15, 13:15) *
в приходной скидки - это 9.99 вместо округленного 10.0 ? так вы ж читаете 9.99 из Эксель? где тогда корректировка?
случайный " клац" по цене или количество в приходной возможен?


Вам если расходную представили на сумму 1000,00 грн, то для получения заказа вы должны уплати именно 1000, а не 999,99, иначе 0,01 пойдет в задолженность.

Приведу пример (цены/скидка - отсебятина):
Товар - стоимость - 38,98 грн.
При заказе 5 штук - скида 1,5%.
38,98*5=194,90, (-1,5%) = 191,98 (точное число 191,9765) - сума к оплате (по расходной) 191,98
Новая цена 1й единицы товара 191,98/5 = 38,396,
Какая новая цена 1й единицы товара должна стоять у меня в приходной??

в приходной точность цены 1 копейка итого:
при цене 38,40 * 5 = 192,00
при цене 38,39 * 5 = 191,95.
Получается "ни рыба ни мясо".

Если брать за основу цену 1й единицы товара правильного расчеты не получится, поэтому надо корректировать сумму.
Это я к примеру на практике у меня в табличную часть загружаются цены за 1 единицу с бесконечной дробной частью, ну или с несколькими знаками (как в примере выше) в Приходной этого так быстро не найдеш, в таблице же сразу заметно даже по длине цыфр
Домовик,
03.06.15, 9:24 Поиск в пустом подчиненном справочнике
Добрый день.
Создан подчиненный справочник (КодыКонтрагентов, реквизиты: КодТовара, Контрагент) подчинен справочнику (ТМЦ).
Пример - в справочнике ТМЦ товар Мыло, на етот товар в справочнике КодыКонтрагентов записи (фирма 1 - код 00001, фирма2 - код 22212, фирма3 - код 23232)
Необходимо - Найти код указаного контрагента и вернуть название Товара ТМЦ(владелец)
Листинг функции поиска в подчиненном справочнике.
Функция ПоискПоКоду(кодПоиска, Контрагент)               
нет=0;    
спрКодКонтр=СоздатьОбъект("Справочник.КодыКонтрагентов");
    спрКодКонтр.ВыбратьЭлементы(0);  
    Пока спрКодКонтр.ПолучитьЭлемент()=1 Цикл
        КодИзСпр=СокрЛП(Строка(СпрКодКонтр.КодТовара));
        КонтрИзСпр=спрКодКонтр.Контрагент;
        Пометка=спрКодКонтр.ПометкаУдаления();
          Если (КодИзСпр=кодПоиска) И (КонтрИзСпр=Контрагент) И (Пометка=0) Тогда
          Возврат спрКодКонтр.Владелец;  
    
         Прервать;
        Иначе
         нет=1;
         КонецЕсли;    
КонецЦикла;
Если нет=1 Тогда
      Возврат "";
КонецЕсли;
КонецФункции


Использование НайтиПоРеквизиту или НайтиПоНаименованию исключаю, так как в случае 2х одинаковых кодов поиск остановится на первом елементе (например у фирмы1 на код 00001 - мыло, у фирмы2 на коде 00001-рубашки)

Суть седующая: если в справочнике есть хотябы одна запись все работает отлично(записанные коды находит - если кодов нет сообщает).
Если справочник пуст результат -сообщает что все коды присутствуют.
Какбы вариант добавить 1 запись вроде (БлаБла, Абракадабра) и все работает никаких претензий, но все же для себя хотелось бы разобраться почему Фирма1="" и код 00001=""(Пустой справочник)

Как узнать что в справочнике (есть/нет) записи. Или может что-нибуть посоветуете.

Вот что получилось - Как один из вариантов - пересчет елементов при вызове запроса
Функция ПоискПоКоду(кодПоиска, Контрагент)               
//*************
Запрос = СоздатьОбъект("Запрос");
    ТекстЗапроса = "
    |ТекущийЭлемент  = Справочник.КодыКонтрагентов.ТекущийЭлемент;
    |Функция Счетчик = Счётчик();
    |"
  ;
    Запрос.Выполнить(ТекстЗапроса);
Если Запрос.Счетчик=0 Тогда
   Возврат "";
КонецЕсли;    
//*************
нет=0;    
спрКодКонтр=СоздатьОбъект("Справочник.КодыКонтрагентов");
    спрКодКонтр.ВыбратьЭлементы(0);  
    Пока спрКодКонтр.ПолучитьЭлемент()=1 Цикл
        КодИзСпр=СокрЛП(Строка(СпрКодКонтр.КодТовара));
        КонтрИзСпр=спрКодКонтр.Контрагент;
        Пометка=спрКодКонтр.ПометкаУдаления();
          Если (КодИзСпр=кодПоиска) И (КонтрИзСпр=выбКонтрагент) И (Пометка=0) Тогда
          Возврат спрКодКонтр.Владелец;  
         Прервать;
        Иначе
         нет=1;
         КонецЕсли;    
    КонецЦикла;
Если нет=1 Тогда
      Возврат "";
КонецЕсли;
КонецФункции

Может кому пригодится
Vofka,

RSS Текстовая версия Сейчас: 20.04.24, 1:50
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!