|
Чат на улице вязов!
|
|
| im_tesseract |
Дата: Пятница, 12.08.2011, 18:38 | Сообщение # 301 |
goddess of mischief
Группа: Проверенные
Сообщений: 954
Репутация: 2044
Награды: 5
Страна: Украина
Дата регистрации: 24.12.2010
Статус: Покинул призрачную зону
|
Quote (DlX)
На йух хоть послала?
нет =DD |
|
|
| |
|
|
| Alice_Strange |
Дата: Пятница, 12.08.2011, 18:39 | Сообщение # 302 |
освоившийся
Группа: Пользователи
Сообщений: 229
Репутация: 310
Награды: 1
Страна: Российская Федерация
Дата регистрации: 09.02.2011
Статус: Покинул призрачную зону
|
Quote (Anti-Cosmo♥) нет =DD
я же говорила хД |
|
|
| |
|
|
| ANGELWOLF |
Дата: Пятница, 12.08.2011, 18:40 | Сообщение # 303 |
бывалый
Группа: Проверенные +
Сообщений: 734
Репутация: 1520
Награды: 0
Страна: Российская Федерация
Дата регистрации: 20.10.2008
Статус: Покинул призрачную зону
|
Quote (Alice_Strange) мультик *-* обожаю *-*
Ааа, не мультик я не очень 
Cheshirka, приятного аппетита
Quote (DlX) Еще вот такая тож из того ж разряда
Грустно  |
|
|
| |
|
|
| Alice_Strange |
Дата: Пятница, 12.08.2011, 18:40 | Сообщение # 304 |
освоившийся
Группа: Пользователи
Сообщений: 229
Репутация: 310
Награды: 1
Страна: Российская Федерация
Дата регистрации: 09.02.2011
Статус: Покинул призрачную зону
|
Quote (ANGELWOLF) Ааа, не мультик я не очень
а я наоборот *-* такой милый :33 |
|
|
| |
|
|
| DlX |
Дата: Пятница, 12.08.2011, 18:41 | Сообщение # 305 |
бывалый
Группа: Проверенные
Сообщений: 956
Репутация: 1462
Награды: 0
Страна: Российская Федерация
Дата регистрации: 04.01.2009
Статус: Покинул призрачную зону
|
Горелой пластмассой пахнет  |
俺はおちんちんが大好きなんだよ |
| |
|
|
| Lenka |
Дата: Пятница, 12.08.2011, 18:42 | Сообщение # 306 |
Котэ :3
Группа: Проверенные
Сообщений: 892
Репутация: 2537
Награды: 7
Страна: Российская Федерация
Город: Омск
Дата регистрации: 07.11.2008
Статус: Покинул призрачную зону
|
|
|
|
| |
|
|
| Alice_Strange |
Дата: Пятница, 12.08.2011, 18:42 | Сообщение # 307 |
освоившийся
Группа: Пользователи
Сообщений: 229
Репутация: 310
Награды: 1
Страна: Российская Федерация
Дата регистрации: 09.02.2011
Статус: Покинул призрачную зону
|
Quote (DlX) Горелой пластмассой пахнет
пожар? О_О |
|
|
| |
|
|
| Lenka |
Дата: Пятница, 12.08.2011, 18:42 | Сообщение # 308 |
Котэ :3
Группа: Проверенные
Сообщений: 892
Репутация: 2537
Награды: 7
Страна: Российская Федерация
Город: Омск
Дата регистрации: 07.11.2008
Статус: Покинул призрачную зону
|
DlX, от чего? ОО |
|
|
| |
|
|
| ANGELWOLF |
Дата: Пятница, 12.08.2011, 18:43 | Сообщение # 309 |
бывалый
Группа: Проверенные +
Сообщений: 734
Репутация: 1520
Награды: 0
Страна: Российская Федерация
Дата регистрации: 20.10.2008
Статус: Покинул призрачную зону
|
Quote (DlX) Горелой пластмассой пахнет
Оо |
|
|
| |
|
|
| DlX |
Дата: Пятница, 12.08.2011, 18:43 | Сообщение # 310 |
бывалый
Группа: Проверенные
Сообщений: 956
Репутация: 1462
Награды: 0
Страна: Российская Федерация
Дата регистрации: 04.01.2009
Статус: Покинул призрачную зону
|
Quote (Alice_Strange) пожар? О_О
Lenka, таки играешся?  |
俺はおちんちんが大好きなんだよ |
| |
|
|
| Alice_Strange |
Дата: Пятница, 12.08.2011, 18:44 | Сообщение # 311 |
освоившийся
Группа: Пользователи
Сообщений: 229
Репутация: 310
Награды: 1
Страна: Российская Федерация
Дата регистрации: 09.02.2011
Статус: Покинул призрачную зону
|
DlX, не дай бог О_О |
|
|
| |
|
|
| ANGELWOLF |
Дата: Пятница, 12.08.2011, 18:44 | Сообщение # 312 |
бывалый
Группа: Проверенные +
Сообщений: 734
Репутация: 1520
Награды: 0
Страна: Российская Федерация
Дата регистрации: 20.10.2008
Статус: Покинул призрачную зону
|
Lenka, во что играешь? |
|
|
| |
|
|
| im_tesseract |
Дата: Пятница, 12.08.2011, 18:45 | Сообщение # 313 |
goddess of mischief
Группа: Проверенные
Сообщений: 954
Репутация: 2044
Награды: 5
Страна: Украина
Дата регистрации: 24.12.2010
Статус: Покинул призрачную зону
|
блин..что-то дальнейших эпизодов найти не могу х( |
|
|
| |
|
|
| DlX |
Дата: Пятница, 12.08.2011, 18:45 | Сообщение # 314 |
бывалый
Группа: Проверенные
Сообщений: 956
Репутация: 1462
Награды: 0
Страна: Российская Федерация
Дата регистрации: 04.01.2009
Статус: Покинул призрачную зону
|
Quote (Anti-Cosmo♥) блин..что-то дальнейших эпизодов найти не могу х(
Ищи лучше.  |
俺はおちんちんが大好きなんだよ |
| |
|
|
| Lenka |
Дата: Пятница, 12.08.2011, 18:46 | Сообщение # 315 |
Котэ :3
Группа: Проверенные
Сообщений: 892
Репутация: 2537
Награды: 7
Страна: Российская Федерация
Город: Омск
Дата регистрации: 07.11.2008
Статус: Покинул призрачную зону
|
Quote (DlX) Lenka, таки играешся?
Quote (ANGELWOLF) Lenka, во что играешь?
Quote Процедура ПриОткрытии()
Дата = ТекущаяДата();
КонецПроцедуры
Процедура НоменклатураСсылкаПриИзменении(Элемент)
ДатаПарам = Дата;
ТЦНом = ТипЦенНом;
ТЦСост = ТипЦенСост;
НомСтрока = Элемент.Значение;
РезультатНом = ЗапросПоНоменклатуре(ТЦНом,ТЦСост,ДатаПарам,НомСтрока);
Строка = ЭлементыФормы.Номенклатура.ТекущиеДанные;
Пока РезультатНом.Следующий() Цикл
Строка.СтараяЦена = РезультатНом.Цена;
КонецЦикла;
РезультатСост = ЗапросПоСоставу(ТЦНом,ТЦСост,ДатаПарам,НомСтрока);
СуммаПоНом = 0;
Для Каждого Стр ИЗ РезультатСост Цикл
СтрокаСост = Состав.Добавить();
СтрокаСост.СсылкаСостав = Стр.Номенклатура;
СтрокаСост.Цена = Стр.Цена;
СтрокаСост.Количество = Стр.Количество;
Сумма = Стр.Цена * Стр.Количество;
СтрокаСост.Сумма = Сумма;
СуммаПоНом = СуммаПоНом + Сумма;
КонецЦикла;
Строка.Себестоимость = СуммаПоНом;
КонецПроцедуры
Функция ЗапросПоНоменклатуре(ТЦНом,ТЦСост,ДатаПарам,НомСтрока)
Запрос = Новый Запрос;
Запрос.УстановитьПараметр("ТЦНом",ТЦНом);
Запрос.УстановитьПараметр("ТЦСост",ТЦСост);
Запрос.УстановитьПараметр("Дата",ДатаПарам);
Запрос.УстановитьПараметр("Номенклатура",НомСтрока);
Запрос.Текст = "ВЫБРАТЬ
| ЦеныНоменклатурыСрезПоследних.Цена
|ИЗ
| РегистрСведений.ЦеныНоменклатуры.СрезПоследних(
| &Дата,
| ТипЦен = &ТЦНом
| И Номенклатура = &Номенклатура) КАК ЦеныНоменклатурыСрезПоследних";
Результат = Запрос.Выполнить().Выбрать();
Возврат Результат;
КонецФункции
Функция ЗапросПоСоставу(ТЦНом,ТЦСост,ДатаПарам,НомСтрока)
Запрос = Новый Запрос;
Запрос.УстановитьПараметр("ТЦНом",ТЦНом);
Запрос.УстановитьПараметр("ТЦСост",ТЦСост);
Запрос.УстановитьПараметр("Дата",ДатаПарам);
Запрос.УстановитьПараметр("Номенклатура",НомСтрока);
Запрос.Текст = "ВЫБРАТЬ
| СпецификацииНоменклатурыИсходныеКомплектующие.Номенклатура,
| СпецификацииНоменклатурыИсходныеКомплектующие.Количество,
| ЦеныНоменклатурыСрезПоследних.Цена
|ИЗ
| РегистрСведений.ЦеныНоменклатуры.СрезПоследних(&Дата, ТипЦен = &ТЦСост) КАК ЦеныНоменклатурыСрезПоследних
| ВНУТРЕННЕЕ СОЕДИНЕНИЕ Справочник.СпецификацииНоменклатуры.ИсходныеКомплектующие КАК СпецификацииНоменклатурыИсходныеКомплектующие
| ПО ЦеныНоменклатурыСрезПоследних.Номенклатура = СпецификацииНоменклатурыИсходныеКомплектующие.Номенклатура
|ГДЕ
| СпецификацииНоменклатурыИсходныеКомплектующие.Ссылка.Владелец = &Номенклатура";
Результат = Запрос.Выполнить().Выгрузить();
Возврат Результат;
КонецФункции
Процедура НоменклатураНоваяЦенаПриИзменении(Элемент)
Строка = ЭлементыФормы.Номенклатура.ТекущиеДанные;
Строка.Наценка = (Строка.НоваяЦена - Строка.СтараяЦена)*100/Строка.СтараяЦена;
КонецПроцедуры
Процедура НоменклатураПриАктивизацииСтроки(Элемент)
ДатаПарам = Дата;
ТЦНом = ТипЦенНом;
ТЦСост = ТипЦенСост;
НомСтрока = Элемент.ТекущиеДанные.Ссылка;
Если НомСтрока <> "" Тогда
Состав.Очистить();
РезультатСост = ЗапросПоСоставу(ТЦНом,ТЦСост,ДатаПарам,НомСтрока);
Для Каждого Стр ИЗ РезультатСост Цикл
СтрокаСост = Состав.Добавить();
СтрокаСост.СсылкаСостав = Стр.Номенклатура;
СтрокаСост.Цена = Стр.Цена;
СтрокаСост.Количество = Стр.Количество;
Сумма = Стр.Цена * Стр.Количество;
СтрокаСост.Сумма = Сумма;
// СуммаПоНом = СуммаПоНом + Сумма;
КонецЦикла;
КонецЕсли;
КонецПроцедуры
Процедура Печать(Кнопка)
ИмяМакета = "Макет";
ТабДок = Новый ТабличныйДокумент;
ТабДок.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_Макет";
ДатаЦен = Дата;
КонецПроцедуры
Своя игрушка  |
|
|
| |
|
|
| AlexHunt |
Дата: Пятница, 12.08.2011, 18:46 | Сообщение # 316 |
бывалый
Группа: Наблюдатели
Сообщений: 871
Репутация: 1793
Награды: 0
Страна: Российская Федерация
Дата регистрации: 05.03.2008
Статус: Покинул призрачную зону
|
 Авик вроде как временный. Но слишком милый чтоб взять и поменять Оставить пока что-ли? |
The cake is a lie! |
| |
|
|
| im_tesseract |
Дата: Пятница, 12.08.2011, 18:46 | Сообщение # 317 |
goddess of mischief
Группа: Проверенные
Сообщений: 954
Репутация: 2044
Награды: 5
Страна: Украина
Дата регистрации: 24.12.2010
Статус: Покинул призрачную зону
|
А вот,"Счастливая любовь" то что надо  |
|
|
| |
|
|
| DlX |
Дата: Пятница, 12.08.2011, 18:46 | Сообщение # 318 |
бывалый
Группа: Проверенные
Сообщений: 956
Репутация: 1462
Награды: 0
Страна: Российская Федерация
Дата регистрации: 04.01.2009
Статус: Покинул призрачную зону
|
|
俺はおちんちんが大好きなんだよ |
| |
|
|
| ANGELWOLF |
Дата: Пятница, 12.08.2011, 18:46 | Сообщение # 319 |
бывалый
Группа: Проверенные +
Сообщений: 734
Репутация: 1520
Награды: 0
Страна: Российская Федерация
Дата регистрации: 20.10.2008
Статус: Покинул призрачную зону
|
Тааак, надо бы поней с русской озвучкой поискать... |
|
|
| |
|
|
| DlX |
Дата: Пятница, 12.08.2011, 18:47 | Сообщение # 320 |
бывалый
Группа: Проверенные
Сообщений: 956
Репутация: 1462
Награды: 0
Страна: Российская Федерация
Дата регистрации: 04.01.2009
Статус: Покинул призрачную зону
|
Quote (AlexHunt) Оставить пока что-ли?
Оставляй. |
俺はおちんちんが大好きなんだよ |
| |
|
|
