Имя: Пароль:
1C
1С v8
вывод результатов запроса
0 Татьяна211287
 
28.05.12
11:18
Есть запрос:
Запрос.Текст =
       
"ВЫБРАТЬ
|    ЗаказПокупателя.АдресДоставки КАК АдресУчастка,
|    ЗаказПокупателя.Ответственный.Наименование КАК ДоверенноеЛицо,
|    ЗаказПокупателя.СуммаДокумента,
|    ЗаказПокупателя.Контрагент.Наименование КАК ФИОЗаказчика,
|    ЗаказПокупателя.Контрагент.ДокументУдостоверяющийЛичность,
|    ЗаказПокупателяТовары.Количество КАК КоличествоТовары,
|  ЗаказПокупателяТовары.Номенклатура,
|    ЗаказПокупателяТовары.Номенклатура.БазоваяЕдиницаИзмерения КАК НоменклатураБазоваяЕдиницаИзмеренияТовары,
|    ЗаказПокупателяУслуги.Номенклатура.Наименование КАК Услуги,
|    ЗаказПокупателяУслуги.Номенклатура.БазоваяЕдиницаИзмерения КАК НоменклатураБазоваяЕдиницаИзмеренияУслуги,
|    ЗаказПокупателяУслуги.Количество КАК КоличествоУслуги,
|    ЗаказПокупателя.Контрагент.ОсновноеКонтактноеЛицо,
|    ПриходныйКассовыйОрдер.СуммаДокумента КАК Сумма1
|ИЗ
|    Документ.ЗаказПокупателя.Товары КАК ЗаказПокупателяТовары
|        ЛЕВОЕ СОЕДИНЕНИЕ Документ.ЗаказПокупателя КАК ЗаказПокупателя
|        ПО ЗаказПокупателяТовары.Ссылка = ЗаказПокупателя.Ссылка,
|    Документ.ЗаказПокупателя.Услуги КАК ЗаказПокупателяУслуги,
|    Документ.ПриходныйКассовыйОрдер КАК ПриходныйКассовыйОрдер
|ГДЕ
|    ЗаказПокупателя.Ссылка = &ТекущийДокумент";         Запрос.УстановитьПараметр("ТекущийДокумент",СсылкаНаОбъект);
Результат = Запрос.Выполнить();


Как записать условие для сравнения сумму документа "Заказ покупателя" и суммы "Приходного кассового ордера" (Если Сумма ПКо = Сумма Заказ покупателя, то ....)?
47 Eugene_life
 
28.05.12
15:01
:D А я еще переживал, что произвожу г-код. Но с удовлетворением вижу,что я не одинок во вселенной :D
48 Eugene_life
 
28.05.12
15:04
(46) Напиши вместо
Результат1 = Запрос.Выполнить();
вот так:
Результат1 = Запрос.Выполнить().Выгрузить();
останови в этой строке Отладчиком (надеюсь, знаешь, как отлаживать внешние печатные формы) и проверь - все ли данные тебе вернул запрос. Тогда многое прояснится
49 Конфигуратор1с
 
28.05.12
15:09
|    ЕСТЬNULL(ВложенныйЗапрос.СуммаАванса, 0) КАК Поле1 замени на
 |    ЕСТЬNULL(ВложенныйЗапрос.СуммаАванса, 0) КАК СуммаАванса
50 Конфигуратор1с
 
28.05.12
15:10
(47)не ну вы свою полоску с полоской Татьяны не ровняйте))
51 Eugene_life
 
28.05.12
15:15
(50) А я не про Татьянин код, а про тот, который до ее изменений :)
52 Конфигуратор1с
 
28.05.12
15:23
(51)это где у меня говн-окод? (в целом его наличия я не отрицаю)))))
53 Eugene_life
 
28.05.12
15:26
(52) Я вообще вот про что (но самокритика - это хорошо):
ЮрУслуги=Справочники.НоменклатурныеГруппы.НайтиПоНаименованию("Юридические услуги",Истина);
   Если ЮрУслуги=Справочники.НоменклатурныеГруппы.ПустаяСсылка() Тогда
       Сообщить("Номенклатурная группа ""Юридические услуги"" не обнаружена");
       Возврат Таб;
   КонецЕсли;
   Межевание=Справочники.НоменклатурныеГруппы.НайтиПоНаименованию("Межевание",Истина);
   Если Межевание=Справочники.НоменклатурныеГруппы.ПустаяСсылка() Тогда
       Сообщить("Номенклатурная группа ""Межевание"" не обнаружена");
       Возврат Таб;
   КонецЕсли;    
   Запрос = Новый Запрос;
   Запрос.Текст="ВЫБРАТЬ
                |    ЗаказПокупателяУслуги.Сумма КАК Сумма,
                |    ВЫБОР
                |        КОГДА ЗаказПокупателяУслуги.Номенклатура.НоменклатурнаяГруппа = &Межевание
                |            ТОГДА &Межевание
                |        ИНАЧЕ ВЫБОР
                |                КОГДА ЗаказПокупателяУслуги.Номенклатура.НоменклатурнаяГруппа = &ЮрУслуги
                |                    ТОГДА &ЮрУслуги
                |                ИНАЧЕ &ПустаяГруппа
                |            КОНЕЦ
                |    КОНЕЦ КАК Группа
                |ИЗ
                |    Документ.ЗаказПокупателя.Услуги КАК ЗаказПокупателяУслуги
                |ГДЕ
                |    ЗаказПокупателяУслуги.Ссылка = &Ссылка";
   Запрос.УстановитьПараметр("Межевание",Межевание.Ссылка);
   Запрос.УстановитьПараметр("ЮрУслуги",ЮрУслуги.Ссылка);
   Запрос.УстановитьПараметр("ПустаяГруппа",Справочники.НоменклатурныеГруппы.ПустаяСсылка());
   Запрос.УстановитьПараметр("Ссылка",СсылкаНаОбъект);
   ВТ=Запрос.Выполнить().Выгрузить();
54 Конфигуратор1с
 
28.05.12
15:38
(53)а, так то я так понимаю Танечка и писала
55 Конфигуратор1с
 
28.05.12
15:40
Кстати, Татьяна, ты где? как там с выборкой, получилось?
56 Aprobator
 
28.05.12
15:44
(53) нафига выбор в выборе то? КОГДА ... КОГДА ... ИНАЧЕ
57 Eugene_life
 
28.05.12
15:45
(56) про то и речь )
58 Eugene_life
 
28.05.12
15:46
(55) Наверное, пошла домой. Нафиг девушке этот 1С :)
59 Aprobator
 
28.05.12
15:46
(44) второй подзапрос, обращение к виртуальной таблице РегистрНакопления.ВзаиморасчетыСКонтрагентами.Обороты - не нужна сумма и группировка. Почитай в СП, виртуальная таблица свертку по полям выбора сама делает.
60 Aprobator
 
28.05.12
15:47
(58) может это хобби )))
61 Конфигуратор1с
 
28.05.12
15:50
(59) всмысле оно свернет по сделкам?
62 Конфигуратор1с
 
28.05.12
17:22
Похоже Таня ушла и не вернется(((
63 Татьяна211287
 
28.05.12
18:09
домой то надо добираться, вот и ушла)Но вернулась)
64 Татьяна211287
 
28.05.12
18:11
(54)Это не мой код,я думаю от него избавится вообще. Дискуссии прям без меня)
65 Татьяна211287
 
28.05.12
18:14
Процесс творения продолжается)Завтра покажу что получилось!
66 Конфигуратор1с
 
28.05.12
18:43
(65) ты сейчас покажи, а то я спать не буду - переживать
67 Татьяна211287
 
28.05.12
19:05
да на работе у меня эта внешняя форма осталась(Ты только не теряйся!Хорошо)
68 Конфигуратор1с
 
28.05.12
19:21
(87)если че - пиши на почту
69 Aprobator
 
28.05.12
23:15
(61) именно так.
70 1C_Enigma
 
29.05.12
01:40
(67) он может :-)
71 Конфигуратор1с
 
29.05.12
07:40
(70)Привет. Что за наезды? )))
72 Aprobator
 
29.05.12
10:31
не иначе своим опытом делится )))
73 1C_Enigma
 
29.05.12
11:06
(72) :-) подкатываю. Глупый вопрос созрел.
74 Конфигуратор1с
 
29.05.12
11:09
(73)так чего на почту не пишешь. Всегда тебе рад
75 1C_Enigma
 
29.05.12
14:09
(74) тут интересней - некая романтика, что ли.....
76 1C_Enigma
 
29.05.12
14:54
Глупый вопрос - можно ли док "Определение фин результатов" проводить каждый день?
Созерцание прибыли/убытка только в конце месяца шефа не устраивает.....вот
77 Конфигуратор1с
 
29.05.12
15:17
(76)вообщето можно, только есть такая фишка - закрытие месяца выгребает остатки на конец месяца, а определение финрезультата выгребает по момент времени кажись. Поэтому проводишь вначале месяца его последним днем месяца в 235959 и пусть шеф наслаждается ))))
78 Конфигуратор1с
 
29.05.12
15:19
(75)а ты на почту ссылку на ветки на мисте сбрасывай)))
79 1C_Enigma
 
29.05.12
16:00
(77) 01.06.2012 я срання сажусь и провожу док "закрытие месяца" с датой 30.06.2012 и временем 235959???
80 1C_Enigma
 
29.05.12
16:01
01.06.2012 работаю, работаю, ввожу накладные, затраты и т.д, а вечером провожу "определение фин результатов"??? и это и есть счастье?
81 1C_Enigma
 
29.05.12
16:09
не...пусть делает отчет "Вал прибыль", "Затраты", второе вычитает из первого ручками. Всякие амортизации и переоценки - в конце месяца. А то напортачим в базе, ну его в баню...
82 1C_Enigma
 
29.05.12
16:14
Отвечайте быстрее!!! у меня еще есть глупый вопрос!!!
83 Конфигуратор1с
 
29.05.12
16:49
(82)спрашивай
84 Конфигуратор1с
 
29.05.12
16:50
(82)так валовая прибыль в упр учете считается не определением финрезультата, так что я думаю диру пойдет и так
85 Конфигуратор1с
 
29.05.12
16:51
(81)я, кстати, своим отчет делал по фин результату по упр учету. Там брал выручку, вычитал затраты, Еще, правда сделал им регистр финрез, куда они доп доходы отражали
86 1C_Enigma
 
29.05.12
17:18
(85) О!!! придется и мне ваять. У нас бонусы бывают, думала их как оказание услуг проводить.
Вопрос. Глупый. Есть ОС. Указала я ему, что нужно, срок пол. исп, стоимость и т.д.....служит оно служит и тут чик....кончился срок полезного использования, но мы его не выбрасываем (реально оно еще может служить). По сути, что если я не угадаю со сроком пол. исп. Чего мне потом делать....пусть просто висит...амортизация не будет же на него начисляться...
Просто у нас такая куча всяких учетов не велась.....а с меня хотят, чтоб отразила им все....=(
87 Aprobator
 
29.05.12
17:20
(86) а как же. Большая красная кнопка мечта любого буха. А вообще ПБУ смотреть надо.
88 1C_Enigma
 
29.05.12
17:21
(87)....мне многие инструменты из торговли нужны. Соединять, выгружать и т.д - не предлагать....
89 1C_Enigma
 
29.05.12
17:22
Красная Большая Кнопка - это круто!!! =)
90 Aprobator
 
29.05.12
17:27
(88) интим не предлагать (соединять , выгружать и т.д.)? А как же без этого? Есть готовое работающее решение. Надо грамотно передрать функционал или изобретать велосипед. Другие альтернативы - какие?
91 1C_Enigma
 
29.05.12
17:28
(88) уволиться =)
92 Aprobator
 
29.05.12
17:32
хорошо там, где нас нет )
93 Конфигуратор1с
 
29.05.12
17:57
(86)вообщето срок использования у нас устанавливается нормативными документа, поэтому ты его ставишь согласно норм. И амортизируешь пока первоначальная стоимость с износом не сравнится. а когда сравнится пусть болтается на обеих счетах. КОгда ликвидировать его буш тогда и спишешь все
94 Конфигуратор1с
 
29.05.12
18:08
(86) кроме бонусов там куча других доходов, которые, к сожалению в утп не реализованы. Вообще в утп как то с управленческим учетом не до конца сделано. Допустим оприходования излишка товара в бух учете садится на доходы, а в упр нет. Поэтому некий регистр доп доходов не от основной деятельности самое оно
95 Конфигуратор1с
 
29.05.12
18:09
Кстати, а где Таня?)))
96 1C_Enigma
 
29.05.12
18:13
А вообще, все так.
Фирма, учет в новой базе (УТП) не с нуля. Нужно отразить, что Босс вложил 100баксов - 30в кассе, 30 в товаре, 10 в ОС и т.д, остальное висит на 40 или 46(не помню). Ввела остатки по товарам, взаиморасчетам, ОС, приходы, расходы, затраты....и тут чик.....а бонус как ввести? бонус у нас - пришел поставщик и дал денег....чистейшая прибыль...ввести нет как =( буду пробовать оказанием услуг.
Дальше с этими ос, с которыми не угадаю.....(нет нормативных доков, нет коробок, нет дисков, ничего нет, сама придумывать буду)
Дальше....прикрутить инет-магазин нужно...Это самое стремное.
Если что-то не выгрузиться или не загрузиться - меня не уволят - меня пытать будут!!!!
97 1C_Enigma
 
29.05.12
18:13
(96) Таня обиделась =(
98 1C_Enigma
 
29.05.12
18:14
Что я без очереди =)
99 Конфигуратор1с
 
29.05.12
18:17
(96)так ты главное спокойствие, не нервничай.
100 Конфигуратор1с
 
29.05.12
18:17
100
101 Конфигуратор1с
 
29.05.12
18:24
(96) так бонусы они же на остатке не висят - это приход "прибыли". Можно и через услуги.
102 Конфигуратор1с
 
29.05.12
18:32
(96)Остатки все вводишь через 00 счет на последнюю дату месяца. Ос вводишь документом ввод остатков ос.
103 1C_Enigma
 
29.05.12
18:33
(101) я боюсь, что у меня по бух учету не отобразится приход "чистой прибыли", упр учет - хорошо, главное, чтоб потом баланс сошелся....
104 Конфигуратор1с
 
29.05.12
18:34
(96)кстати, если хочешь - скажи куда тебе выслать большой файлик метров под сто или контакты давай я тебе ссылку на скачивание вышлю
105 Конфигуратор1с
 
29.05.12
18:34
(103)чистая прибыль в остаток не вводится
106 1C_Enigma
 
29.05.12
18:35
(102) с первой частью я поигралась и все красиво сделала, вплоть до закрытия месяца и определения фин резов - баланс сошелся!!! все красиво. Правда я не вводила бонусы и всякие там возвраты от покупателей (ну как всегда у людей бывает)
107 1C_Enigma
 
29.05.12
18:36
(103) я его не собираюсь вводить
108 Конфигуратор1с
 
29.05.12
18:37
а через услугу она просто ляжет дт 36 кт 70 на сумму бонусов, потом закроется определением финрезультата на 79
109 1C_Enigma
 
29.05.12
18:37
просто я хочу, чтоб на счетах с прибылью в конце месяца было так - за продажи и т.д прибыль 10грн, бонусы - 5грн, общая прибыль - 15грн
110 1C_Enigma
 
29.05.12
18:38
во....так и я так себе нарисовала развитие сюжета
111 1C_Enigma
 
29.05.12
18:38
(104) а что в файлике? вирус на 100метров? =)
112 Конфигуратор1с
 
29.05.12
18:39
(111)хорошая книжка по утп
113 1C_Enigma
 
29.05.12
18:41
ух ты!!! почта в личке =)
114 1C_Enigma
 
29.05.12
18:42
А ты С# уже выучил? Пишешь уже мега-проекты?
115 Конфигуратор1с
 
29.05.12
18:44
(114)нет. пока тока стартер к 1с написал )))
116 Конфигуратор1с
 
29.05.12
18:44
(113)почта скрыт(((
117 1C_Enigma
 
29.05.12
18:52
????? странно...а ....ну да =)
118 1C_Enigma
 
29.05.12
18:53
уже не скрыта
119 1C_Enigma
 
29.05.12
19:00
пусто на почте =(
120 Конфигуратор1с
 
29.05.12
19:01
(119)отправил. Только пока не качай еще догружаеться.
121 Конфигуратор1с
 
29.05.12
19:03
(120)все - качай
122 Конфигуратор1с
 
29.05.12
19:12
(119)я домой. Стучи если что
123 1C_Enigma
 
29.05.12
19:14
Спасибо!
124 Конфигуратор1с
 
29.05.12
23:10
(123) та не за что. я тут на недельку отлучусь через пару дней. Так что есть вопросы - задавай
125 1C_Enigma
 
30.05.12
00:09
Есть. Ты что дирехторь? В отпуск в начале лета нормальные люди не ходють.
126 Конфигуратор1с
 
30.05.12
00:14
(125)эх, было бы неплохо стать дирехтором - командовать у меня получается лучше чем программировать))) так сложилось, что иду в отпуск в начале лета
127 1C_Enigma
 
30.05.12
00:26
Знаешь, как говорят - работай усердно по 8 часов в день, станешь потом хазяином бизнесса и будешь работать по 24 часа в день :-)
128 1C_Enigma
 
30.05.12
00:27
нужно было так - хАзяином :-)
129 Конфигуратор1с
 
30.05.12
00:36
(127)так работа работе рознь. Одно дело попинать подчиненных, другое дело реально вкалывать)))
130 1C_Enigma
 
30.05.12
00:38
Когда ты не наемный директор и не украл бизнес - пинать подчиненных не будешь :-)
131 Конфигуратор1с
 
30.05.12
00:54
(130)я видел как один хороший человек по доброте душевной старался относится к подчиненным как друзьям. Результата - его бизнеса нет, "друзья" разворовав его бизнес, живут припеваючи а он отбивался от кредиторов.
Да и вообще, мы, подчиненные, такие что если не по пинаешь - хуже будет)))
132 Aprobator
 
30.05.12
13:04
(130) Почитай Миры смерти Гарри Гарисона, там во второй части на эту тему очень интересные размышления есть.
133 Татьяна211287
 
30.05.12
13:35
Привет,всем)Да, что вы,я ж необидчевая)) Работаю над обработкой до сих пор
134 Конфигуратор1с
 
30.05.12
13:46
(133) и как успехи?
135 Татьяна211287
 
30.05.12
13:56
победила только выборку суммы по авансу)
136 Конфигуратор1с
 
30.05.12
13:57
(135) ну показывай, не стесняйся - тут все свои
137 Татьяна211287
 
30.05.12
14:00
Запрос = Новый Запрос;    
   Запрос.УстановитьПараметр("СсылкаНаЗаказ",ССылкаНаОбъект);
   Запрос.Текст =
   "ВЫБРАТЬ
   |    СУММА(ВзаиморасчетыСКонтрагентамиОбороты.СуммаВзаиморасчетовРасход) КАК СуммаАванса, ВзаиморасчетыСКонтрагентамиОбороты.Сделка КАК Сделка ПОМЕСТИТЬ ВТ_Аванс
   |ИЗ
   |            РегистрНакопления.ВзаиморасчетыСКонтрагентами.Обороты(, , регистратор, Сделка = &СсылкаНаЗаказ) КАК ВзаиморасчетыСКонтрагентамиОбороты
   |        ГДЕ
   |            ВзаиморасчетыСКонтрагентамиОбороты.Регистратор ССЫЛКА Документ.ПриходныйКассовыйОрдер        
   |        СГРУППИРОВАТЬ ПО
   |            ВзаиморасчетыСКонтрагентамиОбороты.Сделка;
   |ВЫБРАТЬ
   |    ЗаказПокупателя.Ответственный КАК ДоверенноеЛицо,
   |    ЗаказПокупателя.СуммаДокумента,
   |    ЗаказПокупателя.Ответственный.Наименование,
   |    ВТ_Аванс.СуммаАванса КАК СуммаАванса
   |ИЗ
   |    ВТ_Аванс КАК ВТ_Аванс
   |        ЛЕВОЕ СОЕДИНЕНИЕ Документ.ЗаказПокупателя КАК ЗаказПокупателя ПО ЗаказПокупателя.Ссылка = ВТ_Аванс.Сделка";
   Результат = Запрос.Выполнить();
       Выборка = Запрос.Выполнить().Выбрать();
       //Выборка = Выборка.СуммаАванса;
       //Пока Выборка.Следующий() Цикл
       Пока Выборка.Следующий()Цикл    
       Если Выборка.СуммаАванса = СсылкаНаОбъект.СуммаДокумента
           ТОГДА
           СтрокаСуммаАванса = "        3.2. «Заказчик» обязуется оплатить Исполнителю в порядке предварительной оплаты всю сумму, обозначенную в п. 3.1. Договора в день его подписания. Оплата производится путём внесения денежных средств представителю Исполнителя.";
           Иначе
           СтрокаСуммаАванса = "        3.2. «Заказчик» обязуется оплатить Исполнителю в порядке предварительной оплаты сумму (аванс) в размере" + " " + Выборка.СуммаАванса + "руб. в день подписания настоящего Договора. Оставшаяся часть денежных средств за оказание услуг, выполнение работ оплачивается Заказчиком в течение 30 дней с момента подписания настоящего Договора. Оплата производится путём внесения денежных средств представителю Исполнителя.";
       КонецЕсли;
    //   Если Выборка.СуммаАванса = Неопределено
    //      тогда
    //    СтрокаСуммаАванса = "        3.2. «Заказчик» обязуется оплатить Исполнителю в порядке предварительной оплаты сумму (аванс) в размере_______руб. в день подписания настоящего Договора. Оставшаяся часть денежных средств за оказание услуг, выполнение работ оплачивается Заказчиком в течение 30 дней с момента подписания настоящего Договора. Оплата производится путём внесения денежных средств представителю Исполнителя.";
    //КонецЕсли
КонецЦикла;

 Макет=ПолучитьМакет("Договор1");

ОбластьМакета.Параметры.Цена="       3.1. Цена услуг, работ по тнастоящему договору опредекляется равной "+ВТ[0].Сумма+" ("+СТрока(ПрописьЧисла)+") (В соответствии с тарифами,утвержденными 01.02.2011г. исполнительным органом организации Исполнителя.)";
       ПрописьЧислаНДС = ЧислоПрописью(ВТ[0].СуммаНДС, ФормСтрока, ПарПредмета);
       ОбластьМакета.Параметры.Пункт = СтрокаСуммаАванса;
138 Татьяна211287
 
30.05.12
14:01
Вот этот кусок
139 Татьяна211287
 
30.05.12
14:02
теперь стоит задача поставить в правильном падеже и числе ФИО и результат договора
140 Конфигуратор1с
 
30.05.12
14:04
(139)что есть результат?
141 Татьяна211287
 
30.05.12
14:07
результат берется из справочника номенклатура ( межевой план, схема тер.планирования и тд.)
142 Eugene_life
 
30.05.12
14:07
(141) А правильный падеж, как я понимаю, там только один - родительный :)
143 Татьяна211287
 
30.05.12
14:11
да
144 Татьяна211287
 
30.05.12
14:12
вот только зачем там единственное и множественное число, из справочника можно же выбрать толкь одного контрагента
145 Eugene_life
 
30.05.12
16:32
(144) :D
146 1C_Enigma
 
31.05.12
01:02
(132) в какой именно книге? Я так поняла, это серия романов