Имя: Пароль:
JOB
Работа
Посоветуйте, где можно выложить на продажу обработку?
0 Шифровальщик2012
 
04.10.12
21:26
Посоветуйте серьезные сайты, где можно выложить на продажу обработку?
1 sinisterfrag
 
04.10.12
21:27
infostart
2 Шифровальщик2012
 
04.10.12
21:30
(1) а еще есть?
3 aleks-id
 
04.10.12
21:32
(2) есть. яндекс.диск
4 ЧашкаЧая
 
04.10.12
21:32
(3) Для очень серьезных обработок.
5 Шифровальщик2012
 
04.10.12
21:33
(4) дык это просто хранилище,  а не на продажу
6 Boleev v2
 
04.10.12
21:34
шо за обработка? выкладуй тут, ща мы у тебя купим
7 Андрей_Андреич
 
naïve
04.10.12
21:35
стулья из дворца!
8 Шифровальщик2012
 
04.10.12
21:35
(6) неее, обработка исключительная....
9 Boleev v2
 
04.10.12
21:36
(8) дерьмо небось..как пить дать, никому ненужное дерьмо.
10 Agent ООЗ
 
04.10.12
21:36
запатентуй!
11 Jump
 
04.10.12
21:36
(0)На сайте имяобработки.рф
12 GreenLab
 
04.10.12
21:36
Лавры Мани не дают покоя успешным )
13 Шифровальщик2012
 
04.10.12
21:36
(9) ну почему дерьмо, уже 15 покупок есть, все хвалят, жалобы поступают редко...
14 ОбычныйЧеловек
 
04.10.12
21:37
(8) уверен, что таких обработок нет? На самом деле перенумераторов очень много так, что особо не надейся продать свой )
15 Шифровальщик2012
 
04.10.12
21:38
(14) есть конкуренты, но в моей изюминка, выгодно отличающая её от конкурентов :)
16 Boleev v2
 
04.10.12
21:38
продам то, никому не скажу что.
17 Шифровальщик2012
 
04.10.12
21:39
(16) дык я тебе не продаю, чего напрягся? :)
18 Boleev v2
 
04.10.12
21:39
Маркетинг, Котлер все дела.
19 Злопчинский
 
04.10.12
21:40
(15) трындишь. обработок/разработок с изюминками - можно пересчитать по польцам.
так что выкладывай на ИС, отсегивай 50% Доржи - потом доложишь о результатах... писатель, млин, изюминок.. это не изюминка, а таракан
20 Eugeneer
 
04.10.12
21:40
Ну давай не томи. что за обработка. я может возьму в продажи

Чем кстати (1) не устроил?
21 Шифровальщик2012
 
04.10.12
21:40
А по поводу Мани, скажу так, он молодец.
22 Фдулич
 
04.10.12
21:40
(0)где скриншоты описалово?
23 ОбычныйЧеловек
 
04.10.12
21:41
Вобщем если хочешь быть как все тогда в (1) если хочешь быть богатым и успешным тогда к мане - он тебя и пропиарит и разместит и ...
24 Шифровальщик2012
 
04.10.12
21:41
(20) всем устроил, хочу расширить круг распространения
25 Eugeneer
 
04.10.12
21:41
26 Eugeneer
 
04.10.12
21:41
При условии что обработка вписывается в разработки для торговли.
27 Злопчинский
 
04.10.12
21:41
.. и логан совй продаст... надо же поддерживать преемственность поколений
28 Eugeneer
 
04.10.12
21:42
и я буду уверен что она чего то стоит.
29 Шифровальщик2012
 
04.10.12
21:42
(25)(26) Бухгалтерия - это торговля для тебя?
30 aleks-id
 
04.10.12
21:43
(21) о как лизнул! думаешь он тебе теперь 90% отстегнет?
31 Eugeneer
 
04.10.12
21:43
(29) есть раздел бухгалтерии. можно.
32 Шифровальщик2012
 
04.10.12
21:44
(30) а чего лизнул? Вместо того, чтобы в тупых темах сидеть, Маня времени не теряет и его обработки очень хорошо представлены
33 Андрей_Андреич
 
naïve
04.10.12
21:44
(15) Это крутой маркетинг. Берешь оно, зарываешь в нем изюминку...
34 Фдулич
 
04.10.12
21:44
торги начались?
35 Шифровальщик2012
 
04.10.12
21:45
(31) Я тебе ТАМ отпишусь и ссылки кину в личку :)
36 aleks-id
 
04.10.12
21:45
(32) >>а чего лизнул?
да ж0пу лизнул
37 Eugeneer
 
04.10.12
21:45
(32) ты его не слушай. Алекс неадекват еще тот. И семяизвержение регулярно когда о меня видит. Или что ли бо касаемое меня.
38 Eugeneer
 
04.10.12
21:46
А ну еще и дятел!)
39 Alex S D
 
04.10.12
21:47
(35) еще 1 ник мани, ловки троллит сам себя)
40 aleks-id
 
04.10.12
21:47
(37) ты лысый гарантированно словишь по кумполу при встрече
41 Eugeneer
 
04.10.12
21:48
(40) рука сломается)
42 Eugeneer
 
04.10.12
21:48
нечем будет потом дрочить.
43 aleks-id
 
04.10.12
21:48
(39) думаешь? на него похоже...
44 andrewalexk
 
04.10.12
21:51
:) 2 дубля сруца...занятно
45 Шифровальщик2012
 
04.10.12
21:52
(40) а ты волосатый?
46 misha122062
 
04.10.12
21:54
(8)>> неее, обработка исключительная....

ЕПТ! Нетленка детектед!
47 andrewalexk
 
04.10.12
21:55
:) "вы жалкие ничтожные люди! маня вас всех продаст купит и снова продаст но уже дороже"
48 aleks-id
 
04.10.12
21:55
спалился лысый. терминальная стадия фгм детектед
49 Eugeneer
 
04.10.12
21:55
Странно. Не могу найти по запросу aleks-id чо за крендель) Ща поищу в бложике, может там есть фото этого дрыща, грозащего по кумполу настучать.
50 aleks-id
 
04.10.12
21:56
(49) дада. поищи
51 Шифровальщик2012
 
04.10.12
21:56
(47)  один умный человек сказал, что он предпочтет нанять 100 человек, чтобы быть свободным на 99%, чем быть занятым на 100%, чем нанимать 100 человек.
52 andrewalexk
 
04.10.12
21:56
(48):) *мгм
зы
не подумайте что метро-голдвин-мейер
53 Шифровальщик2012
 
04.10.12
21:57
(49) да это ботан какой-нить пишет. В инете все шварценеггеры - ботаны.
54 andrewalexk
 
04.10.12
21:57
(51) :)) судя по тому...маня...что в предложении 1 чтобы и 2 чем...это не особо умный человек...
55 Шифровальщик2012
 
04.10.12
21:59
(54) не суди, да не судим будешь
56 Злопчинский
 
04.10.12
21:59
прально.. хренли неботанам боятся и майлы скрывать..
57 Eugeneer
 
04.10.12
21:59
(53) да не. ботаны хоть поумнее будут. а это дятел.
58 Eugeneer
 
04.10.12
22:00
Нашел пока что только какие то статьи в базе знаний. Ни имени ни ФИО. в бложике по нику ноль. гугл не ле. должен же был где то спалиться.
59 Eugeneer
 
04.10.12
22:01
Ежова ито раскусил. Тоже шифровался. ща уже весь интернет знает. И фотки и все остальное.
60 aleks-id
 
04.10.12
22:01
(58) ты со всех ников поиск заряди. глядишь чо и выстрелит
61 Eugeneer
 
04.10.12
22:02
Надо владельцу бложика наводку сделать. У него специализация получше моей.
62 Фдулич
 
04.10.12
22:02
срач чтоли
63 Alex S D
 
04.10.12
22:02
а как же, маня же тут
64 aleks-id
 
04.10.12
22:03
/*жует попкорн*/
65 ОбычныйЧеловек
 
04.10.12
22:05
(62) ни в коем случае - просто интелегентное выяснение отношений - это же 1совцы а не саповцы-дикари какие нить )
66 Шифровальщик2012
 
04.10.12
22:05
А как вот такие штуки делают?
http://www.youtube.com/watch?v=qArRoMfrohw
67 DrShad
 
04.10.12
22:05
(0) я куплю! а что она делает?
68 ОбычныйЧеловек
 
04.10.12
22:06
(67) сначала купи а потом уже задавай вопросы...
69 Шифровальщик2012
 
04.10.12
22:07
(67)Делает все в рамках конфигурации Бухгалтерия Предприятия.
К обработке через внешнюю компоненту подключается шлем, мысли напрямую через сервер предприятия идут в БД - это изюминка и ноу-хау.
70 aleks-id
 
04.10.12
22:07
(67) судя по описанию она показывает изюминку
71 Alex S D
 
04.10.12
22:07
(66) единственное что ниче так это музыкА)
72 Сниф
 
04.10.12
22:08
(69) фигасе, а шлем Главбух одевает или прог? чьи мысли идут в БД?
73 Alex S D
 
04.10.12
22:09
тупой вброс, а обработки то и нет да?
74 Шифровальщик2012
 
04.10.12
22:09
(72) Главбуха мысли, конечно, если сделаю чтобы прога - то ты без работы останешься
75 Eugeneer
 
04.10.12
22:10
я только что увидел. автор дал ссылки.
(0) в скайп добавь. и завтра поговорим.
76 Шифровальщик2012
 
04.10.12
22:11
(75) ок
77 DrShad
 
04.10.12
22:11
не шлем не интересно, а вот если она расчет налога на прибыль делает в бесконечном цикле и за время расчета налоговый инспектор успевает состариться и сдохнуть глядя на прогресс бар - это то что я так долго искал
78 aleks-id
 
04.10.12
22:11
(72) шлем одевает кодер. а главбух его туда напрямую ипет
79 Фдулич
 
04.10.12
22:14
и не только глыба и все остальные ипут
80 aleks-id
 
04.10.12
22:18
чето маня затих. неужто шлем напялил?
81 DrShad
 
04.10.12
22:19
(80) ну а как же и наслаждается
82 DrShad
 
04.10.12
22:20
(0) твоя изюминка это избыточность кода и циклы там где не нужно
83 ГдеСобака Зарыта
 
04.10.12
22:22
Я уж думал калькулятор Иванцова раздают
84 Шифровальщик2012
 
04.10.12
22:22
(82) когда купить успел?
85 DrShad
 
04.10.12
22:22
(84) а кто ж тебе раскажет
86 DrShad
 
04.10.12
22:23
+(85) переписать и довести хотя бы до состояния чтоб ничего не портила просят за тобой
87 Шифровальщик2012
 
04.10.12
22:23
(86) хорош уже врать
88 DrShad
 
04.10.12
22:26
(87) а что врать? у тебя 146% копрокод
89 Eugeneer
 
04.10.12
22:26
(0) могу сразу сказать. Обработка не массовая. Для БП что ты сделал ищут редко и продается редко.
Если у тебя цель просто иметь 10-20 в месяц тогда да вполне реально, на большее вряд ли.
Если всего эти два решения (считай одно для разных версия БП - причем для БП3- сейчас вообще как бы еще далеко до широких масс). У меня есть аналогичные решения - да продаются - я их делал жля работы - по мне так даже если 5 раз за год продасться - на дороге не валяется и есть не просит.

Если хочешь больше и есть желание - надо делать немного другое. Могу отдать весь блок бухгалтерии - все что у меня есть по ней. Ты будешь заниматься этими разработками. Со всемх (полностью - мои или на продаж этих разработок на ИС) отдам 50 процентов. С тебя вникунуть, развивать, если надо сопровождать. Искать также что сделать нового. Пиарить вместе и тп. Условие одно - все под моим началом и под сабсистемсом.
90 Шифровальщик2012
 
04.10.12
22:26
(88) приведешь пример кода?
91 Eugeneer
 
04.10.12
22:29
Короче могу отдать свои решения. Можешь объединить со своими. или в мои влить свое. для БП. и если хочешь все направление БП будет твоим. Даже если хоч можешь искать нужные решения платные других - будем заключать договор. продажи делим.
92 Фдулич
 
04.10.12
22:31
продали душу!
93 Eugeneer
 
04.10.12
22:32
Еще описания надо изменить. слишком много. название не явное. поисковые запросы подобные редки. Решение предметное, а название как для суперспецов. При создании названия нужно впервую и самую главную очередь учитывать - что будут набирать бухи в поисковой строке. А они будут там набирать то чего в твоем названии нет - оно слишком замудрено. И написано слишком много. Они устанут и закроют ссылку.
Короче я в этом профи. Что делать и как.
94 DrShad
 
04.10.12
22:33
(90) твое?

ЗаполнитьСтоимостьИзТабличнойЧастиИсточника(СтруктураПередаваемыхПараметров);
   //заполним стоимость по остатку на счете

   
   Если СтруктураПередаваемыхПараметров.ТЗ.Колонки.Найти("Склад") = Неопределено Тогда
       НоваяКолонка = СтруктураПередаваемыхПараметров.ТЗ.Колонки.Добавить();
       
       // Создание описателя типов для таблицы значений

       Массив = Новый Массив;
       Массив.Добавить(Тип("СправочникСсылка.Склады"));
       ОписаниеТиповС = Новый ОписаниеТипов(Массив, , );
       СтруктураПередаваемыхПараметров.ТЗ.Колонки.Добавить("Склад",ОписаниеТиповС,"Склад",);    
   КонецЕсли;
   
   
   МассивСубконто = Новый Массив;
   МассивСубконто.Добавить(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Партии);
   МассивСубконто.Добавить(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Номенклатура);
   МассивСубконто.Добавить(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Склады);
   
   Запрос = Новый Запрос;
   Запрос.УстановитьПараметр("СкладскойУчет",СтруктураПередаваемыхПараметров.СкладскойУчет);
   Запрос.УстановитьПараметр("ВыбСчет",СчетСальдоНачальнойСуммы);
   Запрос.УстановитьПараметр("ВыбОрганизация",Организация);
   Запрос.УстановитьПараметр("МассивСубконто",МассивСубконто);
   Запрос.УстановитьПараметр("ГраницаОстатка", ПолучитьГраницуСрезаОстатков(КонецДня(КонПериода)));
   Запрос.УстановитьПараметр("ТЗ",СтруктураПередаваемыхПараметров.ТЗ);
   
   Запрос.МенеджерВременныхТаблиц = Новый МенеджерВременныхТаблиц;
   
   Запрос.Текст =
   "ВЫБРАТЬ
   |    ТЗ.ГраницаМинЦеныПрод КАК ГраницаМинЦеныПрод,
   |    ТЗ.Единица КАК Единица,
   |    ТЗ.Количество КАК Количество,
   |    ТЗ.Коэффициент КАК Коэффициент,
   |    ТЗ.НомерГТД КАК НомерГТД,
   |    ВЫБОР
   |        КОГДА &СкладскойУчет
   |            ТОГДА ТЗ.Склад
   |        ИНАЧЕ ЗНАЧЕНИЕ(Справочник.Склады.ПустаяСсылка)
   |    КОНЕЦ КАК Склад,
   |    ТЗ.СтавкаНДС КАК СтавкаНДС,
   |    ТЗ.Страна КАК Страна,
   |    ТЗ.Товар КАК Товар,
   |    ТЗ.Услуга КАК Услуга
   |ПОМЕСТИТЬ ИсходнаяТаблица
   |ИЗ
   |    &ТЗ КАК ТЗ
   |;
   |
   |////////////////////////////////////////////////////////////////////////////////

   |ВЫБРАТЬ
   |    СводнаяТаблицаТабличныхЧастей.Товар,
   |    СводнаяТаблицаТабличныхЧастей.Единица,
   |    СводнаяТаблицаТабличныхЧастей.Коэффициент,
   |    СУММА(СводнаяТаблицаТабличныхЧастей.Количество) КАК Количество,
   |    ВЫРАЗИТЬ(0 КАК ЧИСЛО(17, 2)) КАК Сумма,
   |    СводнаяТаблицаТабличныхЧастей.ГраницаМинЦеныПрод,
   |    СводнаяТаблицаТабличныхЧастей.СтавкаНДС,
   |    СводнаяТаблицаТабличныхЧастей.НомерГТД,
   |    СводнаяТаблицаТабличныхЧастей.Страна,
   |    СводнаяТаблицаТабличныхЧастей.Услуга,
   |    СводнаяТаблицаТабличныхЧастей.Склад,
   |    СУММА(СводнаяТаблицаТабличныхЧастей.Количество * СводнаяТаблицаТабличныхЧастей.Коэффициент) КАК КоличествоНаКоэффициент,
   |    ВЫРАЗИТЬ(ЛОЖЬ КАК БУЛЕВО) КАК СтрокаОбработана
   |ПОМЕСТИТЬ ТаблицаТабличныхЧастейДокументов
   |ИЗ
   |    (ВЫБРАТЬ
   |        ТЗ.ГраницаМинЦеныПрод КАК ГраницаМинЦеныПрод,
   |        ТЗ.Единица КАК Единица,
   |        ТЗ.Количество КАК Количество,
   |        ТЗ.Коэффициент КАК Коэффициент,
   |        ТЗ.НомерГТД КАК НомерГТД,
   |        ВЫРАЗИТЬ(ТЗ.Склад КАК Справочник.Склады) КАК Склад,
   |        ТЗ.СтавкаНДС КАК СтавкаНДС,
   |        ТЗ.Страна КАК Страна,
   |        ТЗ.Товар КАК Товар,
   |        ТЗ.Услуга КАК Услуга
   |    ИЗ
   |        ИсходнаяТаблица КАК ТЗ) КАК СводнаяТаблицаТабличныхЧастей
   |
   |СГРУППИРОВАТЬ ПО
   |    СводнаяТаблицаТабличныхЧастей.ГраницаМинЦеныПрод,
   |    СводнаяТаблицаТабличныхЧастей.Единица,
   |    СводнаяТаблицаТабличныхЧастей.Коэффициент,
   |    СводнаяТаблицаТабличныхЧастей.НомерГТД,
   |    СводнаяТаблицаТабличныхЧастей.Склад,
   |    СводнаяТаблицаТабличныхЧастей.СтавкаНДС,
   |    СводнаяТаблицаТабличныхЧастей.Страна,
   |    СводнаяТаблицаТабличныхЧастей.Товар,
   |    СводнаяТаблицаТабличныхЧастей.Услуга
   |;
   |
   |////////////////////////////////////////////////////////////////////////////////

   |ВЫБРАТЬ
   |    ТаблицаОстаткиПоПартиям.Партия,
   |    ТаблицаОстаткиПоПартиям.Номенклатура,
   |    ТаблицаОстаткиПоПартиям.Склад,
   |    СУММА(ТаблицаОстаткиПоПартиям.КоличествоОстаток) КАК КоличествоОстаток,
   |    СУММА(ТаблицаОстаткиПоПартиям.СуммаОстаток) КАК СуммаОстаток
   |ПОМЕСТИТЬ ТаблицаОстатокПоПартиям
   |ИЗ
   |    (ВЫБРАТЬ
   |        ВЫРАЗИТЬ(ХозрасчетныйОстатки.Субконто1 КАК Документ.ПоступлениеТоваровУслуг) КАК Партия,
   |        ВЫРАЗИТЬ(ХозрасчетныйОстатки.Субконто2 КАК Справочник.Номенклатура) КАК Номенклатура,
   |        ВЫБОР
   |            КОГДА &СкладскойУчет
   |                ТОГДА ВЫРАЗИТЬ(ХозрасчетныйОстатки.Субконто3 КАК Справочник.Склады)
   |            ИНАЧЕ ЗНАЧЕНИЕ(Справочник.Склады.ПустаяСсылка)
   |        КОНЕЦ КАК Склад,
   |        СУММА(ХозрасчетныйОстатки.СуммаОстаток) КАК СуммаОстаток,
   |        СУММА(ХозрасчетныйОстатки.КоличествоОстаток) КАК КоличествоОстаток
   |    ИЗ
   |        РегистрБухгалтерии.Хозрасчетный.Остатки(
   |                &ГраницаОстатка,
   |                Счет = &ВыбСчет,
   |                &МассивСубконто,
   |                Организация = &ВыбОрганизация
   |                    И Субконто1 ССЫЛКА Документ.ПоступлениеТоваровУслуг
   |                    И Субконто2 В
   |                        (ВЫБРАТЬ РАЗЛИЧНЫЕ
   |                            ТаблицаТабличныхЧастейДокументов.Товар
   |                        ИЗ
   |                            ТаблицаТабличныхЧастейДокументов КАК ТаблицаТабличныхЧастейДокументов)) КАК ХозрасчетныйОстатки
   |    
   |    СГРУППИРОВАТЬ ПО
   |        ХозрасчетныйОстатки.СуммаОстаток,
   |        ХозрасчетныйОстатки.КоличествоОстаток,
   |        ВЫРАЗИТЬ(ХозрасчетныйОстатки.Субконто1 КАК Документ.ПоступлениеТоваровУслуг),
   |        ВЫРАЗИТЬ(ХозрасчетныйОстатки.Субконто2 КАК Справочник.Номенклатура),
   |        ВЫБОР
   |            КОГДА &СкладскойУчет
   |                ТОГДА ВЫРАЗИТЬ(ХозрасчетныйОстатки.Субконто3 КАК Справочник.Склады)
   |            ИНАЧЕ ЗНАЧЕНИЕ(Справочник.Склады.ПустаяСсылка)
   |        КОНЕЦ
   |    
   |    ИМЕЮЩИЕ
   |        СУММА(ХозрасчетныйОстатки.КоличествоОстаток) > 0) КАК ТаблицаОстаткиПоПартиям
   |
   |СГРУППИРОВАТЬ ПО
   |    ТаблицаОстаткиПоПартиям.Партия,
   |    ТаблицаОстаткиПоПартиям.Номенклатура,
   |    ТаблицаОстаткиПоПартиям.Склад
   |;
   |
   |////////////////////////////////////////////////////////////////////////////////

   |ВЫБРАТЬ
   |    ТаблицаОстатокПоГТД.Номенклатура,
   |    ТаблицаОстатокПоГТД.Склад,
   |    ТаблицаОстатокПоГТД.НомерГТД,
   |    ТаблицаОстатокПоГТД.Страна,
   |    СУММА(ТаблицаОстатокПоГТД.КоличествоОстаток) КАК КоличествоОстаток,
   |    СУММА(ТаблицаОстатокПоГТД.СуммаОстаток) КАК СуммаОстаток
   |ПОМЕСТИТЬ ТаблицаОстатокПоГТД
   |ИЗ
   |    (ВЫБРАТЬ
   |        ТаблицаОстатокПоПартиям.Партия КАК Партия,
   |        ТаблицаОстатокПоПартиям.Номенклатура КАК Номенклатура,
   |        ТаблицаОстатокПоПартиям.Склад КАК Склад,
   |        ТаблицаОстатокПоПартиям.КоличествоОстаток КАК КоличествоОстаток,
   |        ТаблицаОстатокПоПартиям.СуммаОстаток КАК СуммаОстаток,
   |        МАКСИМУМ(ПоступлениеТоваровУслугТовары.СтранаПроисхождения) КАК Страна,
   |        МАКСИМУМ(ПоступлениеТоваровУслугТовары.НомерГТД) КАК НомерГТД
   |    ИЗ
   |        ТаблицаОстатокПоПартиям КАК ТаблицаОстатокПоПартиям
   |            ВНУТРЕННЕЕ СОЕДИНЕНИЕ Документ.ПоступлениеТоваровУслуг.Товары КАК ПоступлениеТоваровУслугТовары
   |            ПО ТаблицаОстатокПоПартиям.Партия = ПоступлениеТоваровУслугТовары.Ссылка
   |                И ТаблицаОстатокПоПартиям.Номенклатура = ПоступлениеТоваровУслугТовары.Номенклатура
   |    
   |    СГРУППИРОВАТЬ ПО
   |        ТаблицаОстатокПоПартиям.Партия,
   |        ТаблицаОстатокПоПартиям.Номенклатура,
   |        ТаблицаОстатокПоПартиям.Склад,
   |        ТаблицаОстатокПоПартиям.КоличествоОстаток,
   |        ТаблицаОстатокПоПартиям.СуммаОстаток) КАК ТаблицаОстатокПоГТД
   |
   |СГРУППИРОВАТЬ ПО
   |    ТаблицаОстатокПоГТД.Склад,
   |    ТаблицаОстатокПоГТД.Номенклатура,
   |    ТаблицаОстатокПоГТД.НомерГТД,
   |    ТаблицаОстатокПоГТД.Страна";
   
   Запрос.ВыполнитьПакет();
   
   Запрос.Текст = "Выбрать * ИЗ ТаблицаТабличныхЧастейДокументов КАК ТаблицаТабличныхЧастейДокументов";
   
   ТЗТабличныхЧастей = Запрос.Выполнить().Выгрузить();
   ТаблицаИсключений = ТЗТабличныхЧастей.СкопироватьКолонки();
   
   Если ВидСортировкиРаспределенияСтоимости = 1 Тогда
       ТЗТабличныхЧастей.Сортировать("ГраницаМинЦеныПрод,Товар,НомерГТД,Склад");
   Иначе
       ТЗТабличныхЧастей.Сортировать("ГраницаМинЦеныПрод Убыв,Товар,НомерГТД,Склад");
   КонецЕсли;
   
   Запрос.Текст = "Выбрать * ИЗ ТаблицаОстатокПоГТД КАК ТаблицаОстатокПоГТД";
   
   ТЗТаблицаОстатокПоГТД = Запрос.Выполнить().Выгрузить();
   
   Для Каждого СтрокаТЗТаблицаОстатокПоГТД ИЗ ТЗТаблицаОстатокПоГТД Цикл
       
       Отбор = Новый Структура;
       Отбор.Вставить("Товар",СтрокаТЗТаблицаОстатокПоГТД.Номенклатура);
       Отбор.Вставить("Склад",СтрокаТЗТаблицаОстатокПоГТД.Склад);
       Отбор.Вставить("НомерГТД",СтрокаТЗТаблицаОстатокПоГТД.НомерГТД);
       Отбор.Вставить("Страна",СтрокаТЗТаблицаОстатокПоГТД.Страна);
       
       МассивСтрокТаблицы = ТЗТабличныхЧастей.НайтиСтроки(Отбор);
       
       Если МассивСтрокТаблицы.Количество() = 0 Тогда
           Продолжить;
       КонецЕсли;
       
       ЕстьНаОстаткеКоличество = СтрокаТЗТаблицаОстатокПоГТД.КоличествоОстаток;
       ЕстьНаОстаткеСтоимость  = СтрокаТЗТаблицаОстатокПоГТД.СуммаОстаток;
       
       ОстатокКоличество     = ЕстьНаОстаткеКоличество;
       ОстатокСтоимости     = ЕстьНаОстаткеСтоимость;
       
       Для ш = 0 По МассивСтрокТаблицы.Количество() - 1 Цикл
           
           СтрокаТаблицы = МассивСтрокТаблицы[0];
           
           Если СтрокаТаблицы.КоличествоНаКоэффициент < ОстатокКоличество Тогда //остаток больше, чем в таблице

               
               СтрокаТаблицы.Сумма = ОКР(СтрокаТаблицы.КоличествоНаКоэффициент * ОстатокСтоимости / ОстатокКоличество,2);
               ОстатокКоличество = ОстатокКоличество - СтрокаТаблицы.КоличествоНаКоэффициент;
               ОстатокСтоимости  = ОстатокСтоимости - СтрокаТаблицы.Сумма;
               СтрокаТаблицы.СтрокаОбработана = Истина;
               
           ИначеЕсли СтрокаТаблицы.КоличествоНаКоэффициент = ОстатокКоличество Тогда
               
               СтрокаТаблицы.Сумма = ОстатокСтоимости;
               ОстатокКоличество = 0;
               ОстатокСтоимости  = 0;
               СтрокаТаблицы.СтрокаОбработана = Истина;
               
           ИначеЕсли СтрокаТаблицы.КоличествоНаКоэффициент > ОстатокКоличество Тогда //остаток меньше, чем в таблице, корректируем количество

               
               РазницаОстаткаКоличества = (СтрокаТаблицы.КоличествоНаКоэффициент - ОстатокКоличество) / СтрокаТаблицы.Коэффициент;
               
               СтрокаТаблицы.КоличествоНаКоэффициент = ОстатокКоличество;
               СтрокаТаблицы.Количество = СтрокаТаблицы.КоличествоНаКоэффициент / СтрокаТаблицы.Коэффициент;
               СтрокаТаблицы.Сумма = ОКР(СтрокаТаблицы.КоличествоНаКоэффициент * ОстатокСтоимости / ОстатокКоличество,2);
               ОстатокКоличество = 0;
               ОстатокСтоимости = 0;
               СтрокаТаблицы.СтрокаОбработана = Истина;
               
               //заполним таблицу исключений

               
               НоваяСтрокаТабИскл = ТаблицаИсключений.Добавить();
               ЗаполнитьЗначенияСвойств(НоваяСтрокаТабИскл,СтрокаТаблицы,,"Количество,КоличествоНаКоэффициент,Сумма");
               НоваяСтрокаТабИскл.Количество = РазницаОстаткаКоличества;
               НоваяСтрокаТабИскл.Сумма = СтрокаТаблицы.Сумма * РазницаОстаткаКоличества;
               //---------------------------

               
           КонецЕсли;
           
           Если ОстатокКоличество = 0 Тогда
               Прервать;
           КонецЕсли;
           
       КонецЦикла;            
   КонецЦикла;
   
   Отбор = Новый Структура;
   Отбор.Вставить("СтрокаОбработана",Ложь);
   УдаляемыеСтроки = ТЗТабличныхЧастей.НайтиСтроки(Отбор);
   
   Для ш = 0 По УдаляемыеСтроки.Количество() - 1 Цикл
       НоваяСтрокаТабИскл = ТаблицаИсключений.Добавить();
       ЗаполнитьЗначенияСвойств(НоваяСтрокаТабИскл,УдаляемыеСтроки[ш]);
       ТЗТабличныхЧастей.Удалить(УдаляемыеСтроки[ш]);
   КонецЦикла;
   
   Если ВидСортировкиГраницыДатыФормированияДокументовПриФормированииТаблицыИсключений = 1 Тогда
       ТаблицаИсключений.Сортировать("ГраницаМинЦеныПрод Убыв");
   ИначеЕсли ВидСортировкиГраницыДатыФормированияДокументовПриФормированииТаблицыИсключений = 2 Тогда
       ТаблицаИсключений.Сортировать("ГраницаМинЦеныПрод Возр");
   КонецЕсли;
   
   СтруктураПередаваемыхПараметров.Вставить("ТаблицаИсключений",ТаблицаИсключений);
   
   СтруктураПередаваемыхПараметров.ТЗ = ТЗТабличныхЧастей;
   
   Если СтруктураПередаваемыхПараметров.СкладскойУчет Тогда
       СтруктураПередаваемыхПараметров.ТЗ.Свернуть("ГраницаМинЦеныПрод,Товар,Единица,Коэффициент,СтавкаНДС,НомерГТД,Склад,Страна,Услуга", "Количество,Сумма");  
       СтруктураПередаваемыхПараметров.ТЗ.Сортировать("Товар,Склад,НомерГТД");
       СтруктураПередаваемыхПараметров.ТаблицаИсключений.Свернуть("ГраницаМинЦеныПрод,Товар,Единица,Коэффициент,СтавкаНДС,НомерГТД,Склад,Страна,Услуга", "Количество,Сумма");  
   Иначе
       СтруктураПередаваемыхПараметров.ТЗ.Свернуть("ГраницаМинЦеныПрод,Товар,Единица,Коэффициент,СтавкаНДС,НомерГТД,Страна,Услуга", "Количество,Сумма");  
       СтруктураПередаваемыхПараметров.ТЗ.Сортировать("Товар,НомерГТД");
       СтруктураПередаваемыхПараметров.ТаблицаИсключений.Свернуть("ГраницаМинЦеныПрод,Товар,Единица,Коэффициент,СтавкаНДС,НомерГТД,Страна,Услуга", "Количество,Сумма");  
   КонецЕсли;
95 kotletka
 
04.10.12
22:35
(94)аааа... пля мозг взорвался
96 Шифровальщик2012
 
04.10.12
22:36
(94) Слабо троллишь, как молодой бобер.
Этот код ты взял из мисты, а не из обработки.
97 Шифровальщик2012
 
04.10.12
22:38
(93) Хорошо, почитал все внимательно. Надо подумать над предложением. Свободного времени не так много, чтобы вплотную заниматься целым разделом.
98 DrShad
 
04.10.12
22:38
(96) а ты решил что действительно нарыл что-то в бухии!?
99 thezos
 
04.10.12
22:38
(94)
ВидСортировкиГраницыДатыФормированияДокументовПриФормированииТаблицыИсключений

Это пять!)))
100 DrShad
 
04.10.12
22:39
там таких перлов хоть энциклопедию пиши
101 Eugeneer
 
04.10.12
22:40
(99) а я лично готов пятерку поставить за такие переменные.
Это говорит о том что человек заботится о том чтобы потом можно было быстро найти нужную переменную.

И терпеть ненавижу коды с перемемнными

ИЗ
ВЗ
ЗЗ
КЗ

это полное мудачье
102 DrShad
 
04.10.12
22:41
а то что она в данном коде наюх не нужна?
103 Шифровальщик2012
 
04.10.12
22:43
(102) твоим мозгом это не понять :)
104 Eugeneer
 
04.10.12
22:44
(100) зачастую модули пишут когда нужно сделать задачу в сжатые сроки. Оптимизация работы программ - отдельная часть работы, требующая гораздо больше времени. И как правило оптимизация - задача которая выполняется впоследствии.
А если код написан даже безобразно но дает приелемый результат, это все равно решение.
А оптимизировать решения можно до бесконечности. Только ведь у нас заказчики не будут платить за то чтобы программист сидел вдумчиво написал а потом оптимизировал - они же не понимают что этот процесс творческий.
есть задача и уже вчера - надо сделать! Работает - все пипец. Не трожь.


И чо ты ржешь - уверен залезть ща в твои дебри - да там ховнеца тоже будет - поржем всей мистой.
105 DrShad
 
04.10.12
22:44
(103) в общем ты как и Маня скомуниздил чью-то обработку переписал копирайты и выдаешь за свою :))))
106 DrShad
 
04.10.12
22:44
(104) не надо только оправдываться
107 DrShad
 
04.10.12
22:45
(104) залезь, только я аналитик а не кодер, но даже мне видна вся убогость ТС и тебя как разработчика
108 Шифровальщик2012
 
04.10.12
22:46
(106) Если ты сидишь на работе целыми днями и думаешь только о максимальной оптимизации и красоте кода - то тебя надо или увольнять.
109 DrShad
 
04.10.12
22:47
[ - то тебя надо или увольнять.] или что?
110 Шифровальщик2012
 
04.10.12
22:47
+(108) Если ты рабочее время тратишь на то, чтобы код был максимально оптимизирован, даже когда этого не требуется - работодатель зря платит тебе деньги.
111 DrShad
 
04.10.12
22:48
www.wiseadvice.ru
напиши руководству - пусть меня уволят
телефон генерального дать?
112 Шифровальщик2012
 
04.10.12
22:49
(109) У меня в правой руке не работает срединный нерв и повреждены две артерии, поэтому, когда я печатаю слепым методом, бывают опечатки.
113 Eugeneer
 
04.10.12
22:49
(107) прочитай свой пост. сарказм прет. понаразвелось вских оналетигев. бездельников.
114 Шифровальщик2012
 
04.10.12
22:49
+(112) не все пальцы правой руки чувствуют клавиши
115 andrewalexk
 
04.10.12
22:49
(112) :)...фапитан 3 ранга?
116 Нуф-Нуф
 
04.10.12
22:49
Маня? Ты?
117 aleks-id
 
04.10.12
22:49
ветка скатилась в уг
118 DrShad
 
04.10.12
22:49
[ - то тебя надо или увольнять.] и [- работодатель зря платит тебе деньги.] где именно ты опечатался?
119 Eugeneer
 
04.10.12
22:50
(111) ясень уй. языком вертеть - не мешки ворочать.
120 andrewalexk
 
04.10.12
22:50
(117) :) куг/аум
121 Шифровальщик2012
 
04.10.12
22:50
(113) Он вчера мне с пеной у рта доказывал, что в этот код способен обработат таблицу без колонки "Склад"

|    ВЫБОР
  |        КОГДА &СкладскойУчет
  |            ТОГДА ТЗ.Склад
  |        ИНАЧЕ ЗНАЧЕНИЕ(Справочник.Склады.ПустаяСсылка)
  |    КОНЕЦ КАК Склад,
122 andrewalexk
 
04.10.12
22:51
(119) :)...он спросил у ясеня
123 DrShad
 
04.10.12
22:51
(121) а ты так и не разобрался?
124 aleks-id
 
04.10.12
22:52
(120) у=унылый или упоротый?
125 GreyK
 
04.10.12
22:52
(0) Ты рекламку на первом канале оплати и усё булет пучком :)
126 DrShad
 
04.10.12
22:52
(121) по твоему коду у тебя колонка Склад всегда имеет пустую ссылку
127 DrShad
 
04.10.12
22:52
+(126) *хотя бы пустую ссылку
128 Шифровальщик2012
 
04.10.12
22:53
(123) дык ты же мне вчера это кричал, как последний ламер.
Мол зачем ты создаешь колонку "Склад" и отправляешь её в запрос...
129 Шифровальщик2012
 
04.10.12
22:54
(126) неужели? Вот это чудеса....
Иди учись код анализировать... аналитег каканый
130 Eugeneer
 
04.10.12
22:54
(126) опачки. анука поподробнее.

По запросы если учет = истина (на форме галка стоит которая параметром является) - брать из ТЗ. Если нет - пустую брать.

с какого фига там всегда пустая?
131 DrShad
 
04.10.12
22:54
(128) ссылку на этот пост? ты укурыш как и Маня и читаешь только так как тебе нравится, т.е. совсем не то что написано
132 DrShad
 
04.10.12
22:55
(130) ты код почитай до запроса, упорыш
133 zak555
 
04.10.12
22:55
где описание ?
134 Eugeneer
 
04.10.12
22:56
(132) понятно все стобой. кроме оскроблений ты ни на что не способен. оналитег.
135 Шифровальщик2012
 
04.10.12
22:57
(132) у тебя даже мозгов не хватает представить, что в СтруктуреПередаваемыхПараметров может прийти таблица значений как с колонкой "Склад", так и без неё...

О чем с тобой вообще можно тогда говорить, а тем более обсуждать?
136 DrShad
 
04.10.12
22:59
(135) ты же ее добавляешь, причем с типом, так что там всегда будет хотя бы пустая ссылка
137 DrShad
 
04.10.12
23:00
+(136) но откуда копрокодеру об этом знать :)))
138 Eugeneer
 
04.10.12
23:01
(136) але гараж. какой в опу тип. стрктурапередавамыхпараметров - массив.
СкладскойУчет - одно из значений массива. его даже в процедуре в этой нет. он параметром процедуры идет. а к тему потом тз добавляется как одно из значений массива.
139 Шифровальщик2012
 
04.10.12
23:02
(137) молодец, что признался. Это с твоей стороны маленький шаг к становлению личности, но большой шаг к осознанию своей профпригодности.
140 zak555
 
04.10.12
23:02
походу обработка -- это стандартные отчёты
141 DrShad
 
04.10.12
23:02
в общем так, чтоб решить все споры в этой ветке раз и навсегда - ставлю бутылку вискаря, что твоя "изюминка" либо решается штатными средствами, либо решена до тебя причем изящнее
142 Eugeneer
 
04.10.12
23:03
короче понятно. Дршард нажрался и гонит беса. простим его за это.
143 DrShad
 
04.10.12
23:03
(138) Маня , тыдебил? или притворяешься?
144 Сниф
 
04.10.12
23:04
Распалились, горячие финские копрофайтеры.
145 Eugeneer
 
04.10.12
23:05
(143) не продолжай позорится. с твой стороны будет очень глупо. и чем дальше чем хуже.
146 Шифровальщик2012
 
04.10.12
23:06
(141) Мне хохляцкий спирт с красителями не нужен
147 DrShad
 
04.10.12
23:06
(145) это по-твоему что делает?
Если СтруктураПередаваемыхПараметров.ТЗ.Колонки.Найти("Склад") = Неопределено Тогда
      НоваяКолонка = СтруктураПередаваемыхПараметров.ТЗ.Колонки.Добавить();
       
      // Создание описателя типов для таблицы значений

      Массив = Новый Массив;
      Массив.Добавить(Тип("СправочникСсылка.Склады"));
      ОписаниеТиповС = Новый ОписаниеТипов(Массив, , );
      СтруктураПередаваемыхПараметров.ТЗ.Колонки.Добавить("Склад",ОписаниеТиповС,"Склад",);    
  КонецЕсли;
148 DrShad
 
04.10.12
23:07
(146) слив засчитан!
149 Шифровальщик2012
 
04.10.12
23:08
(147) Во-первых, вот этой строчки  там нет, откуда ты её взял - я не знаю
НоваяКолонка = СтруктураПередаваемыхПараметров.ТЗ.Колонки.Добавить();


Во вторых, осуществляется проверка на наличие колонки "Склад", и если её нет - создается.
150 Eugeneer
 
04.10.12
23:08
(143) дебило.
до запрос стоит

Если СтруктураПередаваемыхПараметров.ТЗ.Колонки.Найти("Склад") = Неопределено Тогда

и твоей головенке даже в голову не пришло почему и чтобы это значило.

И то что пустая ссылка вернулась бы. но только не для этого условия.
151 zak555
 
04.10.12
23:09
(147) создаётся две колонки
152 DrShad
 
04.10.12
23:09
(148) правильно создается и типизируется, а тогда вот это зачем?
|    ВЫБОР
 |        КОГДА &СкладскойУчет
 |            ТОГДА ТЗ.Склад
 |        ИНАЧЕ ЗНАЧЕНИЕ(Справочник.Склады.ПустаяСсылка)
 |    КОНЕЦ КАК Склад,
153 Eugeneer
 
04.10.12
23:10
(147) вот и я и говорю что ты дятел.

Он поставил контрольное условие
Если СтруктураПередаваемыхПараметров.ТЗ.Колонки.Найти("Склад") = Неопределено Тогда

те если в изначальной передачи нету ну значит нету. запрос то тут причем.
Ведь если оно НЕ НЕОПРЕДЕЛЕНО тогда там идет з со складами и запрос ПРАВИЛЬНЫЙ
154 DrShad
 
04.10.12
23:10
(151) об этом я скромно умалчиваю :))
155 Шифровальщик2012
 
04.10.12
23:11
(152) пля, после этого вопроса ты еще себя прогом считаешь?

Запрос вывалится, если не будет физически в таблице колонки "Склад", маза фака...
156 DrShad
 
04.10.12
23:12
(155) дятел, после кода в (147) она у тебя есть ВСЕГДА
157 Eugeneer
 
04.10.12
23:12
да дятел он. код читать не умеет. условия тем более.
Наверное даже и не знает что такое НЕОПРЕДЕЛЕНО
158 Шифровальщик2012
 
04.10.12
23:14
(156) о ты тяжелый чувак, как мне объяснить твоему мозгу, что:
- если нет в таблице колонки склад - мы её создаем, чтобы отработал запрос;
- если есть в таблице колонка склад - то будет стоять признак СкладскойУчет = ИСТИНА
159 Eugeneer
 
04.10.12
23:15
(155) короче добавь в изначальную таблицу колонку постоянной и убери кусок кода. А то этот не успокоится до конца жизни.
160 zak555
 
04.10.12
23:16
(121) зачем это нужно в тексте запроса ?
нельзя ли это проверять в установке перматера ?
+ ТЗ изначально получена из запроса ?
161 Шифровальщик2012
 
04.10.12
23:16
(159) :)
162 Eugeneer
 
04.10.12
23:16
(158) складской учет - я так понял из БП константа - вести партионный учет по складам.
Сделай колонку в ТЗ постоянной. Складской учет из констант. меньше кода будет и проверок. и этот успокоится. а то его несет. Как я писал выше я его прощаю...но когда человек тугой и пьяный то это пипец.
163 pumbaEO
 
04.10.12
23:20
Давай сувалку, но DrShad прав Выбор когда нах не нужен.
164 Eugeneer
 
04.10.12
23:21
(163) если он сделает колонку изначально в ТЗ фиксированной тогда да.
165 zak555
 
04.10.12
23:21
а что маня освоил регистр бухгалтерии ?
166 Sh1ko
 
04.10.12
23:22
Так в чем изюминка?
167 VasRogov
 
04.10.12
23:22
(163) +1
168 zak555
 
04.10.12
23:22
(166) развести срач
169 Шифровальщик2012
 
04.10.12
23:22
(167) +1 еще один ламер-копрокодер?
170 Eugeneer
 
04.10.12
23:22
о чем я и говорил. вся суть только в оптимизации7 в данном случае кода. автор немного замудрил. но решение рабочее. и на скорость не влияет. только что кода много. абсолютно лишнего. даже с добавлением колонки все одной строкой достаточно было, вместо аж целых пяти.
171 DrShad
 
04.10.12
23:22
(164) еще раз, код из (147) что делает?
172 DrShad
 
04.10.12
23:24
(170) почитай v8: Помогите определить профессиональный уровень, написавшего это (новый текст) и найди там точно тоже но от моего имени :))), вот только ТС этого так и не осилил
173 mih_io
 
04.10.12
23:24
Исходя из (158) ВЫБОР не нужен.

(171) создает колонку склад в начальной ТЗ, если её там нет, чтобы запрос не упал нах ) Ключевое слово, если её там нет )
174 Шифровальщик2012
 
04.10.12
23:24
Для особо одаренных, еще раз объясняю
&СкладскойУчет всегда ИСТИНА, если в &ТЗ присутствует колонка "Склад"
Если в &ТЗ нет колонки склад, то запрос вывалистся, если эту колонку не создать.

ВЫБОР
|        КОГДА &СкладскойУчет
|            ТОГДА ТЗ.Склад
|        ИНАЧЕ ЗНАЧЕНИЕ(Справочник.Склады.ПустаяСсылка)
|    КОНЕЦ КАК Склад,
175 zak555
 
04.10.12
23:25
|        РегистрБухгалтерии.Хозрасчетный.Остатки(
   |                &ГраницаОстатка,
   |                Счет = &ВыбСчет,
   |                &МассивСубконто,
   |                Организация = &ВыбОрганизация
   |                    И Субконто1 ССЫЛКА Документ.ПоступлениеТоваровУслуг
   |                    И Субконто2 В
   |                        (ВЫБРАТЬ РАЗЛИЧНЫЕ
   |                            ТаблицаТабличныхЧастейДокументов.Товар
   |                        ИЗ
   |                            ТаблицаТабличныхЧастейДокументов КАК ТаблицаТабличныхЧастейДокументов)) КАК ХозрасчетныйОстатки


а что это за счет такой, где первая аналитика идёт документ, а вторая номенклатура ?
176 Eugeneer
 
04.10.12
23:25
(171) )))))
проверяет есть ли в нужной ТЗ колонка (на предмет ее существования вообще КОЛОНКИ те ее вообще может не быть в ТЗ до этой процедуры). Нету - просто ее добавляет.

а если есть ну то и есть.
177 VasRogov
 
04.10.12
23:25
(174) null -  слышал о таком ???
178 DrShad
 
04.10.12
23:26
(174) ты дятел, перед запросом ты колонку добавляешь, если ее там нет - т.е. она там есть ВСЕГДА
179 Eugeneer
 
04.10.12
23:27
(177) каким еуем нулл относится к тому что
ТЗ.Склад - фактически может не существовать.
180 Шифровальщик2012
 
04.10.12
23:28
(178) от ты дятлище, а до тебя не доходит, что КОГДА СКЛАДСКОЙУЧЕТ, то мне эта колонка нужна, а когда НЕ СКЛАДСКОЙУЧЕТ, то она мне нафиг не нужна
181 Eugeneer
 
04.10.12
23:29
фу истец просто... это какая то мегажесть7 ущепните меня. может это сон и тупые 1Сники мне снятся?
182 pumbaEO
 
04.10.12
23:29
Ну или просто
Запрос.УстановитьПараметр("СкладскойУчет",СтруктураПередаваемыхПараметров.ТЗ.Колонки.Найти("Склад") <> Неопределено);  

тогда можно и не создавать колонку, но опять таки исходя из (174)
183 Eugeneer
 
04.10.12
23:30
короче ухожу... такой тупизны я в жизни не видел...время жакл потраченного. буду знать что оналитеги тупые как валенки.
184 VasRogov
 
04.10.12
23:30
(179) я так понял, запрос. Если фактически не существует ТЗ, то будет null, поправьте если не прав
185 Шифровальщик2012
 
04.10.12
23:30
(182) Складской учет мне вычислять в процедуре не надо, он вычисляется до процедуры и приходит в нее в виде  передаваемого параметра
186 Шифровальщик2012
 
04.10.12
23:31
(184) Туда не придет ТЗ, которой фактически не существует
187 pumbaEO
 
04.10.12
23:33
(185) Для особо одаренных, еще раз объясняю
&СкладскойУчет всегда ИСТИНА, если в &ТЗ присутствует колонка "Склад"
188 mih_io
 
04.10.12
23:33
(185) в (182) он написал правильно, если у тебя всегда выполняется условие из (174) что мол колонка склад есть и нужна вкупе с заполненным ранее параметром СкладскойУчет, тогда можно даже колонку не добавлять
189 Шифровальщик2012
 
04.10.12
23:34
(187) не всегда &СкладскойУчет Истина, когда в &ТЗ присутствует колонка
190 VasRogov
 
04.10.12
23:34
(186) запроса полностью не видел, поэтому не могу сказать, что к чему. Предположил
191 Шифровальщик2012
 
04.10.12
23:36
(188) ---> (189)
192 mih_io
 
04.10.12
23:36
(189) тогда ок. а бывает, складскойучет истина, а колонки нет? ) или это на всякий случай, чем черт не шутит? )
193 Шифровальщик2012
 
04.10.12
23:37
(192) колонка создается до запроса, если её нет
194 pumbaEO
 
04.10.12
23:38
(189) тогда тебе стоит поичить таблички истинности.
Запрос.УстановитьПараметр("СкладскойУчет",СтруктураПередаваемыхПараметров.СкладскойУчет И СтруктураПередаваемыхПараметров.ТЗ.Колонки.Найти("Склад") <> Неопределено )
195 Шифровальщик2012
 
04.10.12
23:39
(194) Для Пумб, еще раз, СкладскойУчет - это параметр, приходящий в процедуру
196 Шифровальщик2012
 
04.10.12
23:40
+(195) И быть может только так:
Запрос.УстановитьПараметр("СкладскойУчет",СтруктураПередаваемыхПараметров.СкладскойУчет )
197 andrewalexk
 
04.10.12
23:40
(124) :) 1 у = унылое
2 у = упоротый
1 м = маня
198 DrShad
 
04.10.12
23:44
(193) и после этого ты утверждаешь, что запрос без Выбор валится если колонки нет :)))
199 mih_io
 
04.10.12
23:44
(195) честно, код своё дело делает. Можно, конечно, оптимизировать, но на скорость это уже не будет влиять. Только внешний вид.

Но вот лично ты сам не совсем понимаешь, что до тебя пытаются донести и не совсем по теме отвечаешь. Как прям на экзамене, списал и пытаешься сдать аргументируя, что вот же всё написано ) ну мол чего еще надо то )
200 andrewalexk
 
04.10.12
23:48
:) 200
201 Шифровальщик2012
 
04.10.12
23:49
(175) > а что это за счет такой, где первая аналитика идёт документ, а вторая номенклатура ?

Это песдец. Миста - сборище полупрограммистов-неудачников.
202 Шифровальщик2012
 
04.10.12
23:50
+(201) учи третий параметр метода .Остатки(
203 andrewalexk
 
04.10.12
23:51
(201) :)) и толькр ты бог
зы
во имя нуралиева, шифровальщика и святого мани
204 pumbaEO
 
04.10.12
23:54
Я может чего то не понимаю, но
Для ш = 0 По МассивСтрокТаблицы.Количество() - 1 Цикл
          СтрокаТаблицы = МассивСтрокТаблицы[0];

Подскажи ты не забыл в МассивСтрокТаблицы[0] вместо 0 поставить букву ША?
205 mista2012-09-11
 
04.10.12
23:55
выкладывай на инфостате - я вон выложил и аж 133 ихних доллара уже заработал и штук пятнадцать Фиксиных статей и обработок уже скачал. Делай  людям такое же добро как и Фиксин и люди тебя отблагодарят (когда нибудь но не в этой жизни ибо делать людям добро не самое приятное и полезное занятие, но это я отвлекся...гы гы)
206 DrShad
 
04.10.12
23:58
(204) ты ему еще расскажи про конструкцию Для Каждого ... из ... Цикл :)))
207 zak555
 
04.10.12
23:59
(202) счет какой ?
208 DrShad
 
05.10.12
00:01
(207) расслабься, там ТС переопрделеил порядок субконто
209 zak555
 
05.10.12
00:02
МассивСубконто субконто не заметил
210 Шифровальщик2012
 
05.10.12
00:04
(204) не, не забыл. Массив всегда содержит одно значение. Просто цикл забыл убрать, но это ничего не меняет :)
211 pumbaEO
 
05.10.12
00:04
(206) та вроде один раз использует.
Но сц   уко шоб ТС  через месяц свой код посмотрел не на 27 дюймовом мониторе...

ВидСортировкиГраницыДатыФормированияДокументовПриФормированииТаблицыИсключений - ну жесть.
212 DrShad
 
05.10.12
00:06
(210) код не избыточен?
213 pumbaEO
 
05.10.12
00:06
(210) пиз дишь как дышишь: у тебя группируются по
 СводнаяТаблицаТабличныхЧастей.ГраницаМинЦеныПрод,
   |    СводнаяТаблицаТабличныхЧастей.Единица,
   |    СводнаяТаблицаТабличныхЧастей.Коэффициент,
   |    СводнаяТаблицаТабличныхЧастей.НомерГТД,
   |    СводнаяТаблицаТабличныхЧастей.Склад,
   |    СводнаяТаблицаТабличныхЧастей.СтавкаНДС,
   |    СводнаяТаблицаТабличныхЧастей.Страна,
   |    СводнаяТаблицаТабличныхЧастей.Товар,
   |    СводнаяТаблицаТабличныхЧастей.Услуга

а ищется по

Отбор.Вставить("Товар",СтрокаТЗТаблицаОстатокПоГТД.Номенклатура);
       Отбор.Вставить("Склад",СтрокаТЗТаблицаОстатокПоГТД.Склад);
       Отбор.Вставить("НомерГТД",СтрокаТЗТаблицаОстатокПоГТД.НомерГТД);
       Отбор.Вставить("Страна",СтрокаТЗТаблицаОстатокПоГТД.Страна);

9<>4
214 Шифровальщик2012
 
05.10.12
00:08
(213) Группироваться оно может по чему угодно, а каждая строка уникальная по четырем колонкам отбора
215 zak555
 
05.10.12
00:09
этот код из http://subsystems.ru/catalog/36/131/ ?
216 Шифровальщик2012
 
05.10.12
00:10
(215) это мой код
217 zak555
 
05.10.12
00:11
(216) так ты условие озвучишь или как ?
218 pumbaEO
 
05.10.12
00:11
(214) Ну раз автор сказал, что уникально - значит уникально.
219 Шифровальщик2012
 
05.10.12
00:14
(204) Хотя ты прав, ты нашел ошибку, которая бы рано или поздно сработала бы.  Спасибо тебе.
220 zak555
 
05.10.12
00:15
(214) такого быть не может

в одно ГТД, по одной позиции может быть несколько номенклатур
причём номенклатуры могут совпадать, а вот в чём они приходуются - нет
221 zak555
 
05.10.12
00:17
+ (220) или приёти один и тот же товар на один и тот же склад
часть в балонах 10 л, а другая часть -- 20 Л
222 Шифровальщик2012
 
05.10.12
00:17
Вот полный код процедуры

Процедура ЗаполнитьСтоимостьПоОстаткуНаСчете(СтруктураПередаваемыхПараметров) Экспорт
   
   ЗаполнитьСтоимостьИзТабличнойЧастиИсточника(СтруктураПередаваемыхПараметров);
   //заполним стоимость по остатку на счете
   
   Если СтруктураПередаваемыхПараметров.ТЗ.Колонки.Найти("Склад") = Неопределено Тогда
       // Создание описателя типов для таблицы значений
       Массив = Новый Массив;
       Массив.Добавить(Тип("СправочникСсылка.Склады"));
       ОписаниеТиповС = Новый ОписаниеТипов(Массив, , );
       СтруктураПередаваемыхПараметров.ТЗ.Колонки.Добавить("Склад",ОписаниеТиповС,"Склад",);    
   КонецЕсли;

   
   МассивСубконто = Новый Массив;
   МассивСубконто.Добавить(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Партии);
   МассивСубконто.Добавить(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Номенклатура);
   МассивСубконто.Добавить(ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.Склады);
       
   Запрос = Новый Запрос;
   Запрос.УстановитьПараметр("СкладскойУчет",СтруктураПередаваемыхПараметров.СкладскойУчет);
   Запрос.УстановитьПараметр("ВыбСчет",СчетСальдоНачальнойСуммы);
   Запрос.УстановитьПараметр("ВыбОрганизация",Организация);
   Запрос.УстановитьПараметр("МассивСубконто",МассивСубконто);
   Запрос.УстановитьПараметр("ГраницаОстатка", ПолучитьГраницуСрезаОстатков(КонецДня(КонПериода)));
   Запрос.УстановитьПараметр("ТЗ",СтруктураПередаваемыхПараметров.ТЗ);
   
   Запрос.МенеджерВременныхТаблиц = Новый МенеджерВременныхТаблиц;
   
   Запрос.Текст =
       "ВЫБРАТЬ
       |    ТЗ.ГраницаМинЦеныПрод КАК ГраницаМинЦеныПрод,
       |    ТЗ.Единица КАК Единица,
       |    ТЗ.Количество КАК Количество,
       |    ТЗ.Коэффициент КАК Коэффициент,
       |    ТЗ.НомерГТД КАК НомерГТД,
       |    ВЫБОР
       |        КОГДА &СкладскойУчет
       |            ТОГДА ТЗ.Склад
       |        ИНАЧЕ ЗНАЧЕНИЕ(Справочник.Склады.ПустаяСсылка)
       |    КОНЕЦ КАК Склад,
       |    ТЗ.СтавкаНДС КАК СтавкаНДС,
       |    ТЗ.Страна КАК Страна,
       |    ТЗ.Товар КАК Товар,
       |    ТЗ.Услуга КАК Услуга
       |ПОМЕСТИТЬ ИсходнаяТаблица
       |ИЗ
       |    &ТЗ КАК ТЗ
       |;
       |
       |////////////////////////////////////////////////////////////////////////////////
       |ВЫБРАТЬ
       |    СводнаяТаблицаТабличныхЧастей.Товар,
       |    СводнаяТаблицаТабличныхЧастей.Единица,
       |    СводнаяТаблицаТабличныхЧастей.Коэффициент,
       |    СУММА(СводнаяТаблицаТабличныхЧастей.Количество) КАК Количество,
       |    ВЫРАЗИТЬ(0 КАК ЧИСЛО(17, 2)) КАК Сумма,
       |    СводнаяТаблицаТабличныхЧастей.ГраницаМинЦеныПрод,
       |    СводнаяТаблицаТабличныхЧастей.СтавкаНДС,
       |    СводнаяТаблицаТабличныхЧастей.НомерГТД,
       |    СводнаяТаблицаТабличныхЧастей.Страна,
       |    СводнаяТаблицаТабличныхЧастей.Услуга,
       |    СводнаяТаблицаТабличныхЧастей.Склад,
       |    СУММА(СводнаяТаблицаТабличныхЧастей.Количество * СводнаяТаблицаТабличныхЧастей.Коэффициент) КАК КоличествоНаКоэффициент,
       |    ВЫРАЗИТЬ(ЛОЖЬ КАК БУЛЕВО) КАК СтрокаОбработана
       |ПОМЕСТИТЬ ТаблицаТабличныхЧастейДокументов
       |ИЗ
       |    (ВЫБРАТЬ
       |        ТЗ.ГраницаМинЦеныПрод КАК ГраницаМинЦеныПрод,
       |        ТЗ.Единица КАК Единица,
       |        ТЗ.Количество КАК Количество,
       |        ТЗ.Коэффициент КАК Коэффициент,
       |        ТЗ.НомерГТД КАК НомерГТД,
       |        ВЫРАЗИТЬ(ТЗ.Склад КАК Справочник.Склады) КАК Склад,
       |        ТЗ.СтавкаНДС КАК СтавкаНДС,
       |        ТЗ.Страна КАК Страна,
       |        ТЗ.Товар КАК Товар,
       |        ТЗ.Услуга КАК Услуга
       |    ИЗ
       |        ИсходнаяТаблица КАК ТЗ) КАК СводнаяТаблицаТабличныхЧастей
       |
       |СГРУППИРОВАТЬ ПО
       |    СводнаяТаблицаТабличныхЧастей.ГраницаМинЦеныПрод,
       |    СводнаяТаблицаТабличныхЧастей.Единица,
       |    СводнаяТаблицаТабличныхЧастей.Коэффициент,
       |    СводнаяТаблицаТабличныхЧастей.НомерГТД,
       |    СводнаяТаблицаТабличныхЧастей.Склад,
       |    СводнаяТаблицаТабличныхЧастей.СтавкаНДС,
       |    СводнаяТаблицаТабличныхЧастей.Страна,
       |    СводнаяТаблицаТабличныхЧастей.Товар,
       |    СводнаяТаблицаТабличныхЧастей.Услуга
       |;
       |
       |////////////////////////////////////////////////////////////////////////////////
       |ВЫБРАТЬ
       |    ТаблицаОстаткиПоПартиям.Партия,
       |    ТаблицаОстаткиПоПартиям.Номенклатура,
       |    ТаблицаОстаткиПоПартиям.Склад,
       |    СУММА(ТаблицаОстаткиПоПартиям.КоличествоОстаток) КАК КоличествоОстаток,
       |    СУММА(ТаблицаОстаткиПоПартиям.СуммаОстаток) КАК СуммаОстаток
       |ПОМЕСТИТЬ ТаблицаОстатокПоПартиям
       |ИЗ
       |    (ВЫБРАТЬ
       |        ВЫРАЗИТЬ(ХозрасчетныйОстатки.Субконто1 КАК Документ.ПоступлениеТоваровУслуг) КАК Партия,
       |        ВЫРАЗИТЬ(ХозрасчетныйОстатки.Субконто2 КАК Справочник.Номенклатура) КАК Номенклатура,
       |        ВЫБОР
       |            КОГДА &СкладскойУчет
       |                ТОГДА ВЫРАЗИТЬ(ХозрасчетныйОстатки.Субконто3 КАК Справочник.Склады)
       |            ИНАЧЕ ЗНАЧЕНИЕ(Справочник.Склады.ПустаяСсылка)
       |        КОНЕЦ КАК Склад,
       |        СУММА(ХозрасчетныйОстатки.СуммаОстаток) КАК СуммаОстаток,
       |        СУММА(ХозрасчетныйОстатки.КоличествоОстаток) КАК КоличествоОстаток
       |    ИЗ
       |        РегистрБухгалтерии.Хозрасчетный.Остатки(
       |                &ГраницаОстатка,
       |                Счет = &ВыбСчет,
       |                &МассивСубконто,
       |                Организация = &ВыбОрганизация
       |                    И Субконто1 ССЫЛКА Документ.ПоступлениеТоваровУслуг
       |                    И Субконто2 В
       |                        (ВЫБРАТЬ РАЗЛИЧНЫЕ
       |                            ТаблицаТабличныхЧастейДокументов.Товар
       |                        ИЗ
       |                            ТаблицаТабличныхЧастейДокументов КАК ТаблицаТабличныхЧастейДокументов)) КАК ХозрасчетныйОстатки
       |    
       |    СГРУППИРОВАТЬ ПО
       |        ХозрасчетныйОстатки.СуммаОстаток,
       |        ХозрасчетныйОстатки.КоличествоОстаток,
       |        ВЫРАЗИТЬ(ХозрасчетныйОстатки.Субконто1 КАК Документ.ПоступлениеТоваровУслуг),
       |        ВЫРАЗИТЬ(ХозрасчетныйОстатки.Субконто2 КАК Справочник.Номенклатура),
       |        ВЫБОР
       |            КОГДА &СкладскойУчет
       |                ТОГДА ВЫРАЗИТЬ(ХозрасчетныйОстатки.Субконто3 КАК Справочник.Склады)
       |            ИНАЧЕ ЗНАЧЕНИЕ(Справочник.Склады.ПустаяСсылка)
       |        КОНЕЦ
       |    
       |    ИМЕЮЩИЕ
       |        СУММА(ХозрасчетныйОстатки.КоличествоОстаток) > 0) КАК ТаблицаОстаткиПоПартиям
       |
       |СГРУППИРОВАТЬ ПО
       |    ТаблицаОстаткиПоПартиям.Партия,
       |    ТаблицаОстаткиПоПартиям.Номенклатура,
       |    ТаблицаОстаткиПоПартиям.Склад
       |;
       |
       |////////////////////////////////////////////////////////////////////////////////
       |ВЫБРАТЬ
       |    ТаблицаОстатокПоГТД.Номенклатура,
       |    ТаблицаОстатокПоГТД.Склад,
       |    ТаблицаОстатокПоГТД.НомерГТД,
       |    ТаблицаОстатокПоГТД.Страна,
       |    СУММА(ТаблицаОстатокПоГТД.КоличествоОстаток) КАК КоличествоОстаток,
       |    СУММА(ТаблицаОстатокПоГТД.СуммаОстаток) КАК СуммаОстаток
       |ПОМЕСТИТЬ ТаблицаОстатокПоГТД
       |ИЗ
       |    (ВЫБРАТЬ
       |        ТаблицаОстатокПоПартиям.Партия КАК Партия,
       |        ТаблицаОстатокПоПартиям.Номенклатура КАК Номенклатура,
       |        ТаблицаОстатокПоПартиям.Склад КАК Склад,
       |        ТаблицаОстатокПоПартиям.КоличествоОстаток КАК КоличествоОстаток,
       |        ТаблицаОстатокПоПартиям.СуммаОстаток КАК СуммаОстаток,
       |        МАКСИМУМ(ПоступлениеТоваровУслугТовары.СтранаПроисхождения) КАК Страна,
       |        МАКСИМУМ(ПоступлениеТоваровУслугТовары.НомерГТД) КАК НомерГТД
       |    ИЗ
       |        ТаблицаОстатокПоПартиям КАК ТаблицаОстатокПоПартиям
       |            ВНУТРЕННЕЕ СОЕДИНЕНИЕ Документ.ПоступлениеТоваровУслуг.Товары КАК ПоступлениеТоваровУслугТовары
       |            ПО ТаблицаОстатокПоПартиям.Партия = ПоступлениеТоваровУслугТовары.Ссылка
       |                И ТаблицаОстатокПоПартиям.Номенклатура = ПоступлениеТоваровУслугТовары.Номенклатура
       |    
       |    СГРУППИРОВАТЬ ПО
       |        ТаблицаОстатокПоПартиям.Партия,
       |        ТаблицаОстатокПоПартиям.Номенклатура,
       |        ТаблицаОстатокПоПартиям.Склад,
       |        ТаблицаОстатокПоПартиям.КоличествоОстаток,
       |        ТаблицаОстатокПоПартиям.СуммаОстаток) КАК ТаблицаОстатокПоГТД
       |
       |СГРУППИРОВАТЬ ПО
       |    ТаблицаОстатокПоГТД.Склад,
       |    ТаблицаОстатокПоГТД.Номенклатура,
       |    ТаблицаОстатокПоГТД.НомерГТД,
       |    ТаблицаОстатокПоГТД.Страна";
               
   Запрос.ВыполнитьПакет();
   
   Запрос.Текст = "Выбрать * ИЗ ТаблицаТабличныхЧастейДокументов КАК ТаблицаТабличныхЧастейДокументов";
   
   ТЗТабличныхЧастей = Запрос.Выполнить().Выгрузить();
   ТаблицаИсключений = ТЗТабличныхЧастей.СкопироватьКолонки();
   
   Если ВидСортировкиРаспределенияСтоимости = 1 Тогда
       ТЗТабличныхЧастей.Сортировать("ГраницаМинЦеныПрод,Товар,НомерГТД,Склад");
   Иначе
       ТЗТабличныхЧастей.Сортировать("ГраницаМинЦеныПрод Убыв,Товар,НомерГТД,Склад");
   КонецЕсли;
   
   Запрос.Текст = "Выбрать * ИЗ ТаблицаОстатокПоГТД КАК ТаблицаОстатокПоГТД";
   
   ТЗТаблицаОстатокПоГТД = Запрос.Выполнить().Выгрузить();
   
   Для Каждого СтрокаТЗТаблицаОстатокПоГТД ИЗ ТЗТаблицаОстатокПоГТД Цикл
       
       Отбор = Новый Структура;
       Отбор.Вставить("Товар",СтрокаТЗТаблицаОстатокПоГТД.Номенклатура);
       Отбор.Вставить("Склад",СтрокаТЗТаблицаОстатокПоГТД.Склад);
       Отбор.Вставить("НомерГТД",СтрокаТЗТаблицаОстатокПоГТД.НомерГТД);
       Отбор.Вставить("Страна",СтрокаТЗТаблицаОстатокПоГТД.Страна);

       МассивСтрокТаблицы = ТЗТабличныхЧастей.НайтиСтроки(Отбор);
       
       Если МассивСтрокТаблицы.Количество() = 0 Тогда
           Продолжить;
       КонецЕсли;
       
       ЕстьНаОстаткеКоличество = СтрокаТЗТаблицаОстатокПоГТД.КоличествоОстаток;
       ЕстьНаОстаткеСтоимость  = СтрокаТЗТаблицаОстатокПоГТД.СуммаОстаток;
       
       ОстатокКоличество    = ЕстьНаОстаткеКоличество;
       ОстатокСтоимости    = ЕстьНаОстаткеСтоимость;
       
       Для ш = 0 По МассивСтрокТаблицы.Количество() - 1 Цикл
           
           СтрокаТаблицы = МассивСтрокТаблицы[ш];
           
           Если СтрокаТаблицы.КоличествоНаКоэффициент < ОстатокКоличество Тогда //остаток больше, чем в таблице
               
               СтрокаТаблицы.Сумма = ОКР(СтрокаТаблицы.КоличествоНаКоэффициент * ОстатокСтоимости / ОстатокКоличество,2);
               ОстатокКоличество = ОстатокКоличество - СтрокаТаблицы.КоличествоНаКоэффициент;
               ОстатокСтоимости  = ОстатокСтоимости - СтрокаТаблицы.Сумма;
               СтрокаТаблицы.СтрокаОбработана = Истина;
               
           ИначеЕсли СтрокаТаблицы.КоличествоНаКоэффициент = ОстатокКоличество Тогда
       
               СтрокаТаблицы.Сумма = ОстатокСтоимости;
               ОстатокКоличество = 0;
               ОстатокСтоимости  = 0;
               СтрокаТаблицы.СтрокаОбработана = Истина;

           ИначеЕсли СтрокаТаблицы.КоличествоНаКоэффициент > ОстатокКоличество Тогда //остаток меньше, чем в таблице, корректируем количество
               
               РазницаОстаткаКоличества = (СтрокаТаблицы.КоличествоНаКоэффициент - ОстатокКоличество) / СтрокаТаблицы.Коэффициент;
               
               СтрокаТаблицы.КоличествоНаКоэффициент = ОстатокКоличество;
               СтрокаТаблицы.Количество = СтрокаТаблицы.КоличествоНаКоэффициент / СтрокаТаблицы.Коэффициент;
               СтрокаТаблицы.Сумма = ОКР(СтрокаТаблицы.КоличествоНаКоэффициент * ОстатокСтоимости / ОстатокКоличество,2);
               ОстатокКоличество = 0;
               ОстатокСтоимости = 0;
               СтрокаТаблицы.СтрокаОбработана = Истина;
               
               //заполним таблицу исключений
               
               НоваяСтрокаТабИскл = ТаблицаИсключений.Добавить();
               ЗаполнитьЗначенияСвойств(НоваяСтрокаТабИскл,СтрокаТаблицы,,"Количество,КоличествоНаКоэффициент,Сумма");
               НоваяСтрокаТабИскл.Количество = РазницаОстаткаКоличества;
               НоваяСтрокаТабИскл.Сумма = СтрокаТаблицы.Сумма * РазницаОстаткаКоличества;
               //---------------------------
               
           КонецЕсли;
           
           Если ОстатокКоличество = 0 Тогда
               Прервать;
           КонецЕсли;
           
       КонецЦикла;            
   КонецЦикла;
   
   Отбор = Новый Структура;
   Отбор.Вставить("СтрокаОбработана",Ложь);
   УдаляемыеСтроки = ТЗТабличныхЧастей.НайтиСтроки(Отбор);
   
   Для ш = 0 По УдаляемыеСтроки.Количество() - 1 Цикл
       НоваяСтрокаТабИскл = ТаблицаИсключений.Добавить();
       ЗаполнитьЗначенияСвойств(НоваяСтрокаТабИскл,УдаляемыеСтроки[ш]);
       ТЗТабличныхЧастей.Удалить(УдаляемыеСтроки[ш]);
   КонецЦикла;
   
   Если ВидСортировкиГраницыДатыФормированияДокументовПриФормированииТаблицыИсключений = 1 Тогда
       ТаблицаИсключений.Сортировать("ГраницаМинЦеныПрод Убыв");
   ИначеЕсли ВидСортировкиГраницыДатыФормированияДокументовПриФормированииТаблицыИсключений = 2 Тогда
       ТаблицаИсключений.Сортировать("ГраницаМинЦеныПрод Возр");
   КонецЕсли;
   
   СтруктураПередаваемыхПараметров.Вставить("ТаблицаИсключений",ТаблицаИсключений);
   
   СтруктураПередаваемыхПараметров.ТЗ = ТЗТабличныхЧастей;
   
   Если СтруктураПередаваемыхПараметров.СкладскойУчет Тогда
       СтруктураПередаваемыхПараметров.ТЗ.Свернуть("ГраницаМинЦеныПрод,Товар,Единица,Коэффициент,СтавкаНДС,НомерГТД,Склад,Страна,Услуга", "Количество,Сумма");  
       СтруктураПередаваемыхПараметров.ТЗ.Сортировать("Товар,Склад,НомерГТД");
       СтруктураПередаваемыхПараметров.ТаблицаИсключений.Свернуть("ГраницаМинЦеныПрод,Товар,Единица,Коэффициент,СтавкаНДС,НомерГТД,Склад,Страна,Услуга", "Количество,Сумма");  
   Иначе
       СтруктураПередаваемыхПараметров.ТЗ.Свернуть("ГраницаМинЦеныПрод,Товар,Единица,Коэффициент,СтавкаНДС,НомерГТД,Страна,Услуга", "Количество,Сумма");  
       СтруктураПередаваемыхПараметров.ТЗ.Сортировать("Товар,НомерГТД");
       СтруктураПередаваемыхПараметров.ТаблицаИсключений.Свернуть("ГраницаМинЦеныПрод,Товар,Единица,Коэффициент,СтавкаНДС,НомерГТД,Страна,Услуга", "Количество,Сумма");  
   КонецЕсли;

КонецПроцедуры
223 zak555
 
05.10.12
00:18
(222) где СтруктураПередаваемыхПараметров ?
224 Шифровальщик2012
 
05.10.12
00:19
(223) в обработке :)
225 pumbaEO
 
05.10.12
00:20
Та пошел ты сам знаешь куда.

Выложи копрокод на мисту, тебя помоями обольют, продай отрефакторенный код...
226 DrShad
 
05.10.12
00:20
Для ш = 0 По МассивСтрокТаблицы.Количество() - 1 Цикл
           
          СтрокаТаблицы = МассивСтрокТаблицы[ш];

=


Для каждого СтрокаТаблицы из МассивСтрокТаблицы Цикл
227 Шифровальщик2012
 
05.10.12
00:22
(225) Все равно я тебе благодарен за то, что ты нашел ошибку. Спасибо тебе.
228 pumbaEO
 
05.10.12
00:22
(227) с тебя вискарь, а спасибо можешь засунуть подальше.
229 Шифровальщик2012
 
05.10.12
00:23
(228) Твоя работа столько не стоит
230 bazvan
 
05.10.12
00:24
(226) Ром дак за келометр видно что этот код пишит клюшечник, и ооооочень похоже на местного клоуна.

Интересно сэрегирует:-)
231 Шифровальщик2012
 
05.10.12
00:25
(230) Если бы писал клюшечник, то он бы не использовал длинные имена переменных
232 pumbaEO
 
05.10.12
00:27
сэрегировал
233 zak555
 
05.10.12
00:27
(231) вот доказательство :
Если ВидСортировкиРаспределенияСтоимости = 1 Тогда

на 8ке принято для этого использовать тип Булево
234 DrShad
 
05.10.12
00:27
(231) а что ты знаешь про длинные имена?
(230) да он наехал на аналитика, а как столкнулся с аналитиком со знанием кода - слился
235 Шифровальщик2012
 
05.10.12
00:27
(232) спасибо тебе за рефакторинг ошибки :)
236 zak555
 
05.10.12
00:29
я уверен, что этот код нужно удалить и всё переписать
но для началла нужно узнать задачу
237 Шифровальщик2012
 
05.10.12
00:29
(233) А можно было бы написать Если ВидСортировкиРаспределенияСтоимости = Истина, что монопенисуально. Ты об этом не знал?
238 DrShad
 
05.10.12
00:31
(230) да и по коду видно что он не его - надергал кусков, ну не может кодер в одно сикле юзать разные конструкции, разные по типу переменные, т.е. где-то Булево, а где-то 1 или 0 и т.д.
239 Шифровальщик2012
 
05.10.12
00:31
(236) ты уже задавал глупый вопрос про счет. Если ты не знаешь третий параметр метода Остатки по регистру бухгалтерии, - твоя уверенность ничего для мну не значит
240 DrShad
 
05.10.12
00:31
(237) а кошернее было бы
Если ВидСортировкиРаспределенияСтоимости Тогда
241 Шифровальщик2012
 
05.10.12
00:32
(238) наконец-то ты догадался, что код надерган из разных кусков :)

Запрос 100% мой
242 Шифровальщик2012
 
05.10.12
00:33
(240) так в три раза быстрее отработает?
243 zak555
 
05.10.12
00:33
(239) так странно как-то получать партия/номенклатура/склад
как бы в партии еасть склад
244 DrShad
 
05.10.12
00:34
+(238)
Для Каждого СтрокаТЗТаблицаОстатокПоГТД ИЗ ТЗТаблицаОстатокПоГТД Цикл
       
      Отбор = Новый Структура;
      Отбор.Вставить("Товар",СтрокаТЗТаблицаОстатокПоГТД.Номенклатура);
      Отбор.Вставить("Склад",СтрокаТЗТаблицаОстатокПоГТД.Склад);
      Отбор.Вставить("НомерГТД",СтрокаТЗТаблицаОстатокПоГТД.НомерГТД);
      Отбор.Вставить("Страна",СтрокаТЗТаблицаОстатокПоГТД.Страна);

      МассивСтрокТаблицы = ТЗТабличныхЧастей.НайтиСтроки(Отбор);
       
      Если МассивСтрокТаблицы.Количество() = 0 Тогда
          Продолжить;
      КонецЕсли;
       
      ЕстьНаОстаткеКоличество = СтрокаТЗТаблицаОстатокПоГТД.КоличествоОстаток;
      ЕстьНаОстаткеСтоимость  = СтрокаТЗТаблицаОстатокПоГТД.СуммаОстаток;
       
      ОстатокКоличество    = ЕстьНаОстаткеКоличество;
      ОстатокСтоимости    = ЕстьНаОстаткеСтоимость;
       
      Для ш = 0 По МассивСтрокТаблицы.Количество() - 1 Цикл

первая и последняя строка цитаты - разный подход к написанию
245 DrShad
 
05.10.12
00:34
(242) к гадалке не ходи
246 DrShad
 
05.10.12
00:35
(241) запрос тоже дебильный
247 pumbaEO
 
05.10.12
00:36
(235) спасибо не надо, давай или вискарь или 10% продаж.
(238) может, если подходить к нему раз пять за пару лет.
248 Шифровальщик2012
 
05.10.12
00:37
(246) Покажи как надо?
249 bazvan
 
05.10.12
00:37
А наиух в запросе сплошное ВЫРАЗИТЬ не доганяю
250 DrShad
 
05.10.12
00:37
(247) :))) данный кусок кода был приведен как доказательство своей исключительности в качестве кодера и полной несостоятельности аналитика
251 DrShad
 
05.10.12
00:38
(248) на вискарь?
252 DrShad
 
05.10.12
00:39
+(251) что скажешь, если аналитик тебя сделает на написании запроса?
253 Шифровальщик2012
 
05.10.12
00:40
(249) В первом случае просто создаются типизированные колонки, которые нужны после запроса, а в других случаях, чтобы не коннектились лишние таблицы составных полей
254 pumbaEO
 
05.10.12
00:40
(252) кто-то тебя сегодня завел аналитик <> кодер, зачем пытаешься кому то доказать фигню надуманую?
255 bazvan
 
05.10.12
00:40
(253) хммммм
256 Шифровальщик2012
 
05.10.12
00:41
(252) Скажу, что аналитик обкакается
257 DrShad
 
05.10.12
00:43
(253) ВЫРАЗИТЬ(ХозрасчетныйОстатки.Субконто1 КАК Документ.ПоступлениеТоваровУслуг) КАК Партия,
...
И Субконто1 ССЫЛКА Документ.ПоступлениеТоваровУслуг

где здесь составные поля???
258 DrShad
 
05.10.12
00:44
(256) ну тем более ты тогда ничем не рискуешь и даже вискаря выиграешь
259 Шифровальщик2012
 
05.10.12
00:44
(257) ты не успел написать, как уже обкакался.
260 DrShad
 
05.10.12
00:45
(259) дебил, ты в параметра вирт таблицы ограничил тип поля - откуда составное?
261 Злопчинский
 
05.10.12
00:46
теперь понятно, почему ничего нового в прикладных решениях.. редко что интересное добаляется.. потому что погрязли нафиг в технических детьалях
262 NS
 
05.10.12
00:50
(233) Очень многие программисты пишушие на нормальных языках практически не используют bool.
Даже если такая возможность в языке есть.
263 Шифровальщик2012
 
05.10.12
00:51
(260) Маразматик, сначала  я написал ВЫРАЗИТЬ, а потом указал ССЫЛКА в параметре виртуальной таблицы. Надо иди и убирать выразить?
264 DrShad
 
05.10.12
00:53
(263) очередной слив засчитан! как же тебе повезло что не я твой аналитик - ты бы у меня код переписывал денно и нощно
265 Шифровальщик2012
 
05.10.12
00:54
+(263) Опять же, лишний раз убеждаюсь, что аналитеги, такие как ты, реально только пафос имеют.

Если я напишу ВЫРАЗИТЬ(), то конструктор мне поможет выбрать нужный тип в соединении.
266 Шифровальщик2012
 
05.10.12
00:57
(264) ты уже безвозвратно облажался, когда утверждал, что если СкладскойУчет = ЛОЖЬ, то колонка Склад в ТЗ не нужна.

  |    ВЫБОР
      |        КОГДА &СкладскойУчет
      |            ТОГДА ТЗ.Склад
      |        ИНАЧЕ ЗНАЧЕНИЕ(Справочник.Склады.ПустаяСсылка)
      |    КОНЕЦ КАК Склад,
267 DrShad
 
05.10.12
00:57
(265) не звезди
[сначала  я написал ВЫРАЗИТЬ, а потом указал ССЫЛКА в параметре виртуальной таблицы]
в конструкторе бы ты сначала задал параметры вирт таблицы, а лишь потом выбирал бы поля - опять ты товарищ зазвезделся
268 DrShad
 
05.10.12
00:58
(266) номер поста где я такое сказал? :))) иди проспись
269 Шифровальщик2012
 
05.10.12
00:58
(267) иди пиши толковые описания бизнес-процессов, программирование - это не твое
270 Шифровальщик2012
 
05.10.12
00:59
(268) иди спи, аналитег
271 DrShad
 
05.10.12
01:00
(270) и снова СЛИВ засчитан!
272 DrShad
 
05.10.12
01:01
tit немного и будешь также сливаться как Маня
273 DrShad
 
05.10.12
01:05
ладно, я спать, а ты упражняйся пока в сливе - потом проверю
274 bazvan
 
05.10.12
01:06
(272) это он и есть, по стилю и коду видно, даже прогназуемо сэрегировал
275 aleks-id
 
05.10.12
09:08
(274) это еще на первой странице вычислили ))
мда. зря я ушел, весело тут было
276 DrShad
 
05.10.12
10:53
не ну а чего, Маня круто устроился - плодит личности почкованием, в итоге Евгенер занимается продажами поделок, ПроПрог стряпает нетленки для УТ, как понадобилось осваивать БП - выделил новую Сущность в воспаленном мозге по ником Шифровальщик2012, которая теперь отвечает за направление по БП

Круто же!!!
277 zak555
 
05.10.12
10:58
(276) в бухии нужно ещё проводки понимать
278 andrewalexk
 
05.10.12
11:04
(276) :)) холдинг "Шизомания"
279 pumbaEO
 
05.10.12
11:05
(278) раздвоение личности.
280 DrShad
 
05.10.12
11:11
(279) уже растроение
281 Sh1ko
 
05.10.12
11:13
Ну а чо, один на Логане, второй на Прадо, третий на мерсе глк
282 andrewalexk
 
05.10.12
11:15
(281) :) *в нид4спид
283 prog01
 
05.10.12
11:36
(0)советую собирать банки из под пива )))
284 ILM
 
гуру
05.10.12
11:42
Я не понял, а где обработки то продавать?
285 Йюхйюх
 
05.10.12
11:45
По-моему, в (222) нормальный рабочий код.
Если какому-то гурману он не нравится - то этому гурману надо идти в фирму 1С и онананировать там на типовые конфигурации, в которых прог при разработке может одну процедуру переписывать по пять раз.
286 pumbaEO
 
05.10.12
11:46
(284) К Мане обращайся, я так понимаю он готов за скромное вознаграждение любой копрокод продвигать под своим брендом успешного логанвладельца, владельца всех автоматизаций параходов и заводов.
287 Sh1ko
 
05.10.12
11:47
Уже 300 постов, а ни обработки, ни изюминки не видно.
288 pumbaEO
 
05.10.12
11:49
(285) из (222) тут 100 постов рефакторили, а теперь конечно нормальный код. Только вот он все еще не рабочий, нет скорей так для гипотетического случая рабочий.
289 Йюхйюх
 
05.10.12
11:49
(288) а чего там на рефакторили? Ща посмотрю
290 Йюхйюх
 
05.10.12
11:52
(288) ну и чё?
Текст процедуры не изменился от первоначального.

Исчезла только
НоваяКолонка = СтруктураПередаваемыхПараметров.ТЗ.Колонки.Добавить();

Ты сам без лишних строк коды пишешь?
291 pumbaEO
 
05.10.12
11:55
Смотри (204) , (213) ,
ВидСортировкиГраницыДатыФормированияДокументовПриФормированииТаблицыИсключений

В запросах лишнее выразить поубирать
292 Йюхйюх
 
05.10.12
11:57
(291) а где там "лишнее" выразить, скажи пожалуйста? А то я чего-то недопонимаю...
293 Йюхйюх
 
05.10.12
11:59
(291) > СтрокаТаблицы = МассивСтрокТаблицы[0];

Это вообще фигня, причем полная, сам такие ошибки делаю. Кто-нить отвлечет, потом ищешь проблему полдня...
294 pumbaEO
 
05.10.12
12:01
(292) смотри (257) и в ВЫРАЗИТЬ(ТЗ.Склад КАК Справочник.Склады) КАК Склад в СводнаяТаблицаТабличныхЧастей  - зачем там выразить, если у него Таблица значений приходит с колонкой типизированной Склад?
295 Йюхйюх
 
05.10.12
12:01
+(293) Кстати, ш и 0  на клавитуре рядом находятся. Просто автору кода стоит убрать дурную практику, которую он притащил из бейсика в виде переменной "ш", она же "i" на английской раскладке.
296 pumbaEO
 
05.10.12
12:03
(295) если заменить
Для ш = 0 По МассивСтрокТаблицы.Количество() - 1 Цикл
на
Для каждого ЭлементМассива из МассивСтрокТаблицы Цикл

такой проблемы и не возникло бы.
297 Йюхйюх
 
05.10.12
12:04
(294) фиг знает зачем, думаю, что на скорость выполнения запроса это никак не влияет.
Ты в фирме одинес что-ли работаешь, где заставляют за 50 т.р. по сто раз одну и ту же процедуру переписывать и онанировать над ней?
298 Йюхйюх
 
05.10.12
12:06
(296) ---> (297) тоже к твоему ответу относится.

Какая нафиг разница? Нуралиев не разрешает так писать?
299 pumbaEO
 
05.10.12
12:08
(297) нет. Просто вчера спор зашел и тут ТС доказывал, что он самый умный.
(298) Такая же как вычислять количество на каждой итерации или же использовать итератор. for each не зря придумали.
300 Йюхйюх
 
05.10.12
12:12
(299) а как будет сочетаться твой интератор "for each" с желанием получить не текущее значение цикла, а предыдушее?
301 Йюхйюх
 
05.10.12
12:12
+(300) мне вот интересно, как ты тогда будешь онанировать со своим интератором? :)
302 pumbaEO
 
05.10.12
12:15
(300) а по сабжу там нужно предыдущее значение цикла?
(301) онанировать не буду, но переменную КоличествоЭлементов заведу.
303 Адимр
 
05.10.12
12:16
304 Йюхйюх
 
05.10.12
12:16
+(301) Меня реально удивляют кпрокодеры, посидевшие подаванами у каких-нить дотошных дядечек, которые их заставляли вылизывать до идиотизма код.
305 pumbaEO
 
05.10.12
12:17
(304) прострели копрокодерам каленку, прострели себе каленку ... Выход всегда есть.
306 Йюхйюх
 
05.10.12
12:17
(302) ты хоть в одной серьезной внедренческой конторе работал?
Ни в одной конторе я не встречал, чтобы требовали вылизывать код до совершенства. Важно, чтобы была конфетка для пользователя, а не красота внутри.
307 Igor 2007
 
05.10.12
12:18
(0) Здесь ещё не предлагали?: http://1c.proclub.ru/modules/mydownloads/rating.php
308 Йюхйюх
 
05.10.12
12:19
(305) да это ты вечно чем-то недоволен и всех критикуешь, судя по твоим мессагам. Я всем доволен и привык воспринимать мир таким, какой он есть.
309 pumbaEO
 
05.10.12
12:21
(306) нет не работал, по подвалам и ларькам прячусь.
Вылизывать код не заставляют, такие простейшие косяки не позволяют делать - посмотри на самый первый код различия в подходах сразу бросаются в глаза.

(308) я сам такой, посмотришь на свой код через месяц страшно становиться, поэтому и не люблю.
310 Йюхйюх
 
05.10.12
12:23
(309) там я увидел один единственный косяк, который может привести к ошибке. И то, это косяк не профессионального уровня, а просто, видимо, человек опечатался.

Ты, наверно, относишься к психотипу людей, которые в интернете вечно чем-то недоволны, а в жизни помалкивают в тряпочку?
311 Йюхйюх
 
05.10.12
12:24
Чё за обработка, кстати, нигде ссылки не нашел?
312 DrShad
 
05.10.12
13:31
(310) ну а ты конечно не помалкиваешь в тряпочку? в личке ничего кроме пола не заполнено - просто таки сама открытость
313 Светлый Гений
 
05.10.12
13:32
Вот и четвертая личность вылезла...
314 DrShad
 
05.10.12
13:34
(313) ага, типа троль
315 aleks-id
 
05.10.12
13:36
видать совсем лысая башня уехала
316 Maniac
 
05.10.12
13:44
Кто здесь
317 Светлый Гений
 
05.10.12
13:45
(316)все в сборе )))
318 DrShad
 
05.10.12
14:09
(317) ага пятая подтянулась
319 Йюхйюх
 
05.10.12
14:12
(312) а на йюхйюх светить персональные данные в интернете?
320 Sh1ko
 
05.10.12
14:13
Все, хватит, в Логан больше 5-ти чел не влазит.
321 andrewalexk
 
05.10.12
14:17
(320) :) ..следовательно для дальнейшей маниакальной эскалации личностей требуется газель
322 Ахиллес
 
05.10.12
15:10
Пля, а, как они впятером жену делят?
323 Ахиллес
 
05.10.12
15:12
Или там гарем наоборот? Главная жена и пять мань. Один маня посуду моет, второй маня полы моет, третий маня по магазинам ходит...
324 aleks-id
 
05.10.12
15:14
(322) они ее по очереди с понедельника по пятницу делят, в субботу киздят за глядки а в воскресенье киздят друг друга
325 zak555
 
05.10.12
15:29
вы о чьей жене ?
326 zak555
 
05.10.12
16:38
327 bazvan
 
05.10.12
17:05
(326) Вот он Логан то какой оказывается.
бухахаха
328 Йюхйюх
 
05.10.12
17:21
(326)  Если человек лысый в молодом возрасте, это говорит о том, что у него высокий уровень мужского гормона - тестостерона. Т.е. по природе, он доминирующий самец!
А кто волосатый сильно - у того низкий уровень мужского гормона.

Так что еще не понятно, что лучше, быть волосатым или лысым.
329 zak555
 
05.10.12
17:37
(328) факты где ?
330 pumbaEO
 
05.10.12
17:40
(328) таки маня, а еще доказывал что-то...
331 Йюхйюх
 
05.10.12
18:20
(330) таки ты задолбал уже виться под ногами мистадонтов и кричать Акелла промахнулся... акелла промахнулся... :)
332 Vahe
 
05.10.12
22:13
такое ощущение что Шифровальщик2012 и Eugeneer одно лицо, так ли это? вот в чем вопрос
333 Шифровальщик2012
 
05.10.12
22:14
(332) через несколько дней после смерти Артура Кларка произошел один из самых крупных взрывов во вселенной
334 Vahe
 
05.10.12
22:16
видимо да, диагноз подтвержден.
335 Sh1ko
 
05.10.12
22:18
(328) про Чернобыль не забываем еще -)
336 Шифровальщик2012
 
05.10.12
22:19
(334) ты врач?
337 Vahe
 
05.10.12
22:23
хех, что бы понять что чел напился до упаду, не нужно быть сотрудником вытрезвителя. Как то мелко мыслишь, покажи больше интеллекта, более интересные вопроса задавай, ведь по словам кажется что ты спец самого высокого класса
338 Шифровальщик2012
 
05.10.12
22:27
(337) Ну если ты мне не интересен, то зачем задавать тебе интересные вопросы?
339 Vahe
 
05.10.12
22:32
как бы объяснить что бы ты понял... Если человек не интересен, то это не означает что нужно задавать этому человеку не интересные вопросы. Ну скажем можешь не поддерживать разговор с таким человеком. Надеюсь ты понял о чем я...
340 Шифровальщик2012
 
05.10.12
22:33
(339) а ты не пытайся сойти за умного и что-то кому-то объяснять
341 Vahe
 
05.10.12
22:35
(340) ))))))) все трудновато и трудновато становится поддерживать с тобой разговор. Надеюсь ты понял...
342 Шифровальщик2012
 
05.10.12
22:36
(341) кто тебя сюда ваще звал?
343 Vahe
 
05.10.12
22:37
(342) ))))))))
344 Шифровальщик2012
 
05.10.12
22:39
(343) И что смешного я сказал? Или у тебя смех без причины?
345 Vahe
 
05.10.12
22:40
(344) уже не надеюсь... ))
346 zak555
 
05.10.12
23:04
так что за обработка ?
347 Шифровальщик2012
 
05.10.12
23:09
(346) а тебе зачем?
348 zak555
 
05.10.12
23:13
(347)
1. понять (243)
2. зачем бухия оперирует ценами
349 Шифровальщик2012
 
05.10.12
23:22
(348) тебе пока рано такие вещи понимать :)
350 zak555
 
05.10.12
23:30
(349) т.е. сам не знаешь зачем  это ?
351 Шифровальщик2012
 
05.10.12
23:35
(350) мне трудно будет это объяснить человеку, который не знает третьего параметра виртуальной таблицы запроса Остатки для регистрам бухгалтерии.
352 Sh1ko
 
05.10.12
23:38
Да он просто Бог в продажах!

- Продам обработку
- Что за обработка?
- А тебе зачем?

У нас есть вакансия директора по продажам, в подчинении 150 менеджеров, пойдешь?
353 zak555
 
05.10.12
23:38
(351) всё с тобой ясно
354 Sh1ko
 
05.10.12
23:39
+(352) Ауди а6, как служебная машина, не логан конечно, но тоже ездит.
355 zak555
 
05.10.12
23:39
(352) внешность должна быть презентабельная
356 bazvan
 
05.10.12
23:39
(351) нука расскажи нам про третий параметр виртуальной таблицы остатки ригистра бухгалтерии
357 DrShad
 
05.10.12
23:39
(351) очередной слив засчитан!
мне попробуй объяснить
358 Шифровальщик2012
 
05.10.12
23:41
(357) Только что ходил какать, тебя рядом не видел... Ты бы хотел посмотреть как я какаю и слить? Ну ты извращенец...
359 Sh1ko
 
05.10.12
23:42
Я валю с ветки.
360 Шифровальщик2012
 
05.10.12
23:43
(356) в третий парамитр ригистра бухгалтерии подключается шлем, который через внешнюю компоненту трансилирует мылси в виде запросов напрямую в БД, минуя сервер приложений.
361 bazvan
 
05.10.12
23:44
Мдяяя и этот клоун еще мне запрещает ковырять мне в носу. Клоун он и есть клоун
362 zak555
 
05.10.12
23:44
(360)

1. какую компоненту ?
2. что ты подразумеваешь под "сервером приложения" ?
363 zak555
 
05.10.12
23:45
+ виртуальная таблица не хранится в БД
364 DrShad
 
05.10.12
23:45
(361) +100500
кроме того он обиженный
365 zak555
 
05.10.12
23:46
маня, ты с детства лысый ?
366 Шифровальщик2012
 
05.10.12
23:46
(364) а че так мало плюсов?
367 bazvan
 
05.10.12
23:47
(364) ыыыыыыы
368 NS
 
05.10.12
23:48
Смотрю на ветку, и понимаю что что-то не так.
(367) Куда звезды дел?
369 bazvan
 
05.10.12
23:50
(366) яйички подрезал, тяжело тоскать. Да и не прилично в высшем обществе.
Это нищеброды гастры, да клоуны цыпуры и логаны покупают.
Реальным пацанам эт нах не нать
370 bazvan
 
05.10.12
23:51
(368) эт не звезды а яйца остроконечные, срезал, тяжело носить
371 NS
 
05.10.12
23:54
:)
А четыре куда?
372 bazvan
 
06.10.12
00:01
(371) ну полегше стало. Приберегу, скидывать буду постепенно
373 Джон Вэйн
 
06.10.12
00:43
Куда Маниака дели ? У меня к нему дело
374 Звездочёт
 
06.10.12
15:25
(2) 8plus.ru
375 riton
 
08.10.12
11:14
а на таких сайтах что-нибудь продается?
376 elexir
 
12.10.12
11:02
(0) что-нибудь нашлось? )