|
Помогите исправить ошибки в кодах 1C | ☑ | ||
---|---|---|---|---|
0
Emiliya_Emili
10.05.15
✎
12:16
|
Подскажите как сделать так чтобы поле сотрудник заполнялось само текущим пользователем(Для этого установлен параметр сеанса текущий пользователь)
Вот код &НаСервере Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка) //Объект.Сотрудник=ПараметрыСеанса.ТекущийПользователь.Наименование; КонецПроцедуры ////////////////////////////// Возможно ли добавлять товар в документ в из табличной части справочника В справочники "ВИДЫ СКИДОК" в табличной части содержатся товары на которые распространяется скидка //////////////////// в документе запись на занятия необходимо при выборе услуги указывать (помещать в реквизит Объект.КоличествоЕдиниц) ее стоимость код &НаКлиенте Процедура УслугаПриИзменении(Элемент) Объект.КоличествоЕдиниц=ЦеныТоваровИУслуг.РозничнаяЦенаЕдиницы(Объект.Дата,Объект.Услуга); КонецПроцедуры Общий модуль Функция РозничнаяЦенаЕдиницы(АктуальнаяДата, ЭлементТовары) Экспорт Отбор = Новый Структура("ТоварИУслуга", ЭлементТовары); ЗначенияРесурсов=РегистрыСведений.ЦеныТоваровИУслуг.ПолучитьПоследнее(АктуальнаяДата, Отбор); Возврат ЗначенияРесурсов.КоличествоЕдиниц; КонецФункции ///////////////// необходимо в справочник клиенты в поле сумма покупки поместить сумму всех покупок клиента &НаСервере Функция ПолучитьСуммуПокупок () Экспорт Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ | ЕСТЬNULL(ПродажиКлиентам.Сумма, 0) КАК Сумма |ИЗ | РегистрНакопления.ПродажиКлиентам КАК ПродажиКлиентам |ГДЕ | ПродажиКлиентам.Клиент = &Клиент"; Запрос.УстановитьПараметр("Клиент", Объект.Наименование); РезультатЗапроса = Запрос.Выполнить(); ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать(); СуммаП=0; Пока ВыборкаДетальныеЗаписи.Следующий() Цикл СуммаП=СуммаП+ВыборкаДетальныеЗаписи.Сумма; Сообщить(""+ СуммаП +""); КонецЦикла; Возврат СуммаП; КонецФункции и при каждой новой покупке ее перерасчитывать автоматически &НаКлиенте Процедура ОбработкаЗаписиНового(НовыйОбъект, Источник, СтандартнаяОбработка) СуммаПокупок=ПолучитьСуммуПокупок (); Если СуммаПокупок < 10000 Тогда Объект.СкидкаКлиента=0; ИначеЕсли СуммаПокупок<10000 Тогда Объект.СкидкаКлиента=5; КонецЕсли; КонецПроцедуры |
|||
1
vicof
10.05.15
✎
12:42
|
1. Определяйся с типами
2. Возможно 3. И чо? 4. Дурацкий подход, лучше сделать отчет |
|||
2
Emiliya_Emili
10.05.15
✎
13:06
|
если во втором вопросе возможно, то как?
по поводу третьего вопроса я выбираю услугу а цена не подставляется и 4 мне нужен не отчет мне нужно хранить это все в справочнике |
|||
3
GROOVY
10.05.15
✎
13:11
|
Я не ради флуда, но "позовите специалиста".
|
|||
4
H A D G E H O G s
10.05.15
✎
13:13
|
(2) Вам правда 70 лет?
|
|||
5
GROOVY
10.05.15
✎
13:13
|
(4) Стесняешься фотку выпрашивать?
|
|||
6
H A D G E H O G s
10.05.15
✎
13:14
|
(5) Нет, интересуюсь, правда ли встречаются такие программисты.
|
|||
7
GROOVY
10.05.15
✎
13:16
|
(6) Могу тебе точно сказать, я учил восьмерке женщину 72 лет. До этого она кодила на 7.7. И надо сказать была самым активным участником группы. Устроилась работать потом в строительный холдинг.
|
|||
8
Emiliya_Emili
10.05.15
✎
13:26
|
при чем тут моя опечатка при вводе даты и мой вопрос по коду?
|
|||
9
Lama12
10.05.15
✎
13:59
|
(8) Традиции форума... :). По сути вопроса (3)+1
|
|||
10
Emiliya_Emili
10.05.15
✎
14:21
|
и что это значит позвать специалиста?
|
|||
11
GROOVY
10.05.15
✎
14:27
|
(10) Это значит, что надо найти в итернете компанию франчайзи с хорошими отзывами, позвонить им, описать проблему, заключить договор, оплатить предоплату, и позвать специалиста.
|
|||
12
Emiliya_Emili
10.05.15
✎
14:31
|
увы но это невозможно, так как ни одна компания не станет за меня писать диплом
|
|||
13
GROOVY
10.05.15
✎
14:36
|
Облом с дипломом вышел.
|
|||
14
GROOVY
10.05.15
✎
14:37
|
Во Ищу репетитора по программированию скооперируйтесь.
|
|||
15
Torquader
10.05.15
✎
15:44
|
(12) Есть люди, которые за деньги пишут любой диплом на любую тему.
|
|||
16
EugeniaK
10.05.15
✎
16:28
|
(12) Думаю, любая компания франчайзи с удовольствием в этом помогут.
Разумеется,придется оплатить услуги консультанта за постановку и программиста за реализацию. |
|||
17
ice777
10.05.15
✎
16:30
|
(6) мне больше.)
|
|||
18
PePaRiTB
11.05.15
✎
06:12
|
(0) Вам лучше книжки почитать или курсы посмотреть, а уж если все горит, то позвонить специалисту/франчайзи
P.S. Особо приглянулась шедевральная экспортная (!) функция формы ПолучитьСуммуПокупок (). А если это УТ, где все это реализовано ... занавес |
|||
19
FireAlex
11.05.15
✎
11:10
|
код порадовал:
------------------ Если СуммаПокупок < 10000 Тогда Объект.СкидкаКлиента=0; ИначеЕсли СуммаПокупок<10000 Тогда Объект.СкидкаКлиента=5; КонецЕсли; ------------------ второе условие типа 1=2 :) |
|||
20
ildary
11.05.15
✎
11:24
|
(19) растет новая смена "атстатыщ".
|
|||
21
PePaRiTB
11.05.15
✎
11:25
|
(19) и это все делается в процедуре ОбработкаЗаписиНового
Конечно знатный какашко-код в принципе |
|||
22
marvak
11.05.15
✎
12:38
|
(0)
Думаю помогать писать диплом вам тут не станут. Найдите хорошего и отзывчивого парня-ровесника, который знает 1С, и хорошо известными женскими приемами заставьте его помочь вам. |
|||
23
Torquader
11.05.15
✎
13:43
|
(22) Есть подозрение, что это мальчик, замаскированный под девочку, так как девочки обычно не на форуме такие вопросы задают.
|
|||
24
Garykom
гуру
11.05.15
✎
14:09
|
(23) это про "лучший способ выучить язык"?
|
|||
25
ChMikle
11.05.15
✎
14:11
|
(20) атстатыщщ -это наше , те уже начинают шевелиться от 200 :)
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |