1. 1C / Говнокод #27248

    +1

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    Запрос = Новый Запрос;
    	Запрос.УстановитьПараметр("Регистратор",              ЭтотОбъект.Отбор.Регистратор.Значение);
    	Запрос.УстановитьПараметр("НачалоПериода",            ЭтотОбъект.Отбор.Регистратор.Значение.МоментВремени());
    	Запрос.УстановитьПараметр("КонецПериода",             ЭтотОбъект.Отбор.Регистратор.Значение.МоментВремени());
    
    	Запрос.Текст = 
    	"ВЫБРАТЬ
    	|	ТаблицаСоставаДокумента.Склад,
    	|	ТаблицаСоставаДокумента.Номенклатура,
    	|	ТаблицаСоставаДокумента.Качество,
    	|	ТаблицаСоставаДокумента.ХарактеристикаНоменклатуры,
    	|	ТаблицаСоставаДокумента.СерияНоменклатуры
    	|ПОМЕСТИТЬ ВТ_Состава_Документа
    	|ИЗ
    	|	&ТаблицаСоставаДокумента КАК ТаблицаСоставаДокумента
    	|;
    	|
    	|////////////////////////////////////////////////////////////////////////////////
    	|ВЫБРАТЬ
    	|	СвободныеОстаткиОстаткиИОбороты.Склад,
    	|	СвободныеОстаткиОстаткиИОбороты.Номенклатура,
    	|	СвободныеОстаткиОстаткиИОбороты.Качество,
    	|	СвободныеОстаткиОстаткиИОбороты.ХарактеристикаНоменклатуры,
    	|	СвободныеОстаткиОстаткиИОбороты.СерияНоменклатуры,
    	|	СвободныеОстаткиОстаткиИОбороты.КоличествоНачальныйОстаток,
    	|	СвободныеОстаткиОстаткиИОбороты.КоличествоКонечныйОстаток
    	|ИЗ
    	|	РегистрНакопления.ТоварыНаСкладах.ОстаткиИОбороты(
    	|			&НачалоПериода,
    	|			&КонецПериода,
    	|			Запись,
    	|			Движения,
    	|			НЕ Номенклатура.ВидНоменклатуры = ЗНАЧЕНИЕ(Справочник.ВидыНоменклатуры.Продукция)
    	|				И НЕ Номенклатура.ВестиУчетПоСериям
    	|				И (Склад, Номенклатура, Качество, ХарактеристикаНоменклатуры, СерияНоменклатуры) В
    	|					(ВЫБРАТЬ
    	|						ВТ_СоставаДокумента.Склад,
    	|						ВТ_СоставаДокумента.Номенклатура,
    	|						ВТ_СоставаДокумента.Качество,
    	|						ВТ_СоставаДокумента.ХарактеристикаНоменклатуры,
    	|						ВТ_СоставаДокумента.СерияНоменклатуры
    	|					ИЗ
    	|						ВТ_Состава_Документа КАК ВТ_СоставаДокумента)) КАК СвободныеОстаткиОстаткиИОбороты
    	|ГДЕ
    	|	СвободныеОстаткиОстаткиИОбороты.Регистратор = &Регистратор
    	|	И СвободныеОстаткиОстаткиИОбороты.КоличествоКонечныйОстаток < 0";

    Проверка на отрицательные остатки.....

    Запостил: timm00, 11 Февраля 2021

    Комментарии (7) RSS

    • Блин, чё-то это 1с, не тянет он на сверх язык!
      Ответить
    • .
      	|	СвободныеОстаткиОстаткиИОбороты.Склад,
      	|	СвободныеОстаткиОстаткиИОбороты.Номенклатура,
      	|	СвободныеОстаткиОстаткиИОбороты.Качество,
      	|	СвободныеОстаткиОстаткиИОбороты.ХарактеристикаНоменклатуры,
      	|	СвободныеОстаткиОстаткиИОбороты.СерияНоменклатуры,
      	|	СвободныеОстаткиОстаткиИОбороты.КоличествоНачальныйОстаток,
      	|	СвободныеОстаткиОстаткиИОбороты.КоличествоКонечныйОстаток


      блядь, Летов, ты же умер вроде, нет?
      Ответить
    • Как же хуиово быть одно-эсс-ником, но ещё хуже быть их директором:

      «Вот такими хитростями компания 1С создаёт поток уголовных дел по ч. 2 и и ч. 3 ст. 146 УК. Не оформил подписку на навязанную услугу „ИТС“ — получи статью, отягощенную признаками „в особо крупном размере“ и „с использованием служебного положения“ (просто потому, что директор). Защищаем сейчас клиента, законно приобретённый экземпляр которого ПО 1С стоимостью 10 800 руб., установленный на 1 рабочем месте, путём манипуляций с расчётами превратился в незаконное использование одновременно 6 отдельных многопользовательских программ стоимостью 1 055 000 руб»

      https://www.klerk.ru/buh/news/506861/
      Ответить
      • надо было использовать иностранные программы, ничего бы и не заметили.
        Ответить
    • Летов? Ты же умер..
      Ответить

    Добавить комментарий