Показано с 21 по 30 из 47
-
25.02.2015, 10:39 #21
- Регистрация
- 24.02.2015
- Сообщений
- 5
- Сказал(а) спасибо
- 1
- Поблагодарили 0 раз(а) в 0 сообщениях
да. скидываю скрины. помогите пожалуйста рещить данную проблему с реквизитами.1.jpg
-
25.02.2015, 10:47 #22
- Регистрация
- 24.02.2015
- Сообщений
- 5
- Сказал(а) спасибо
- 1
- Поблагодарили 0 раз(а) в 0 сообщениях
Вот скрены
http://web-ku.ru/1.jpg
http://web-ku.ru/2.png
---------- Post added at 09:47 ---------- Previous post was at 09:47 ----------
наименование работ и услуг пустое
-
25.02.2015, 10:53 #23
- Регистрация
- 29.01.2010
- Сообщений
- 1212
- Сказал(а) спасибо
- 30
- Поблагодарили 261 раз(а) в 245 сообщениях
-
25.02.2015, 10:58 #24
- Регистрация
- 27.05.2014
- Сообщений
- 1
- Сказал(а) спасибо
- 0
- Поблагодарили 0 раз(а) в 0 сообщениях
Спасибо за Акт!!
-
25.02.2015, 11:14 #25
- Регистрация
- 24.02.2015
- Сообщений
- 5
- Сказал(а) спасибо
- 1
- Поблагодарили 0 раз(а) в 0 сообщениях
помоги пожалуйста как открыть код
http://web-ku.ru/3.jpg
---------- Post added at 10:14 ---------- Previous post was at 10:03 ----------
Вот нашел код но он не работает . помогите что нужно исправить ?
// Вывести табличную часть
ОбластьМакета = Макет.ПолучитьОбласть(Обла стьШапки);
Если ДанныеДляПечати.ВыводитьК� �ды Тогда
ОбластьМакета.Параметры.Им яКодАртикул = ДанныеДляПечати.ТекстКодА� �тикул;
КонецЕсли;
ТабДокумент.Вывести(Област ьМакета);
ОбластьМакета = Макет.ПолучитьОбласть(Обла стьСтроки);
НомерСтроки = 0;
Для Каждого СтрокаТабличнойЧасти Из ТабличнаяЧасть Цикл
НомерСтроки = НомерСтроки + 1;
ОбластьМакета.Параметры.За полнить(СтрокаТабличнойЧа� �ти);
ОбластьМакета.Параметры.Но мерСтроки = НомерСтроки;
ОбластьМакета.Параметры.То вар = СокрЛП(СтрокаТабличнойЧас� �и.Товар);
Если Шапка.ВалютаДокумента <> мВалютаРегламентированног оУчета Тогда
ОбластьМакета.Параметры.Це на = СтрокаТабличнойЧасти.Сумм� � / ?(СтрокаТабличнойЧасти.Кол� �чество = 0, 1, СтрокаТабличнойЧасти.Коли� �ество);
КонецЕсли;
ТабДокумент.Вывести(Област ьМакета);
КонецЦикла;
Если ТабличнаяЧасть <> Неопределено Тогда
Сумма = ТабличнаяЧасть.Итог("Сумма" );
СуммаНДС = ТабличнаяЧасть.Итог("Сумма� �ДС");
Иначе
Сумма = 0;
СуммаНДС = 0;
КонецЕсли;
ОбластьМакета = Макет.ПолучитьОбласть("Ито� �о");
ОбластьМакета.Параметры.Вс его = ОбщегоНазначения.ФорматСу� �м(Сумма);
ТабДокумент.Вывести(Област ьМакета);
Если Шапка.УчитыватьНДС Тогда
ОбластьМакета = Макет.ПолучитьОбласть("Ито� �оНДС");
Если СуммаНДС <> 0 Тогда
ОбластьМакета.Параметры.Вс егоНДС = ОбщегоНазначения.ФорматСу� �м(СуммаНДС);
ОбластьМакета.Параметры.НД С = ?(Шапка.СуммаВключаетНДС, "В том числе НДС", " Сумма НДС");
Иначе
ОбластьМакета.Параметры.Вс егоНДС = "-";
ОбластьМакета.Параметры.НД С = "Без налога (НДС)";
КонецЕсли;
ТабДокумент.Вывести(Област ьМакета);
КонецЕсли;
СуммаКПрописи = Сумма + ?(Шапка.СуммаВключаетНДС, 0, СуммаНДС);
ОбластьМакета = Макет.ПолучитьОбласть("Сум� �аПрописью");
ОбластьМакета.Параметры.Ит оговаяСтрока ="Всего оказано услуг " + НомерСтроки
+ ", на сумму " + ОбщегоНазначения.ФорматСу� �м(СуммаКПрописи, мВалютаРегламентированног оУчета);
ОбластьМакета.Параметры.Су ммаПрописью = ОбщегоНазначения.Сформиро� �атьСуммуПрописью(СуммаКПр описи, мВалютаРегламентированног оУчета);
ТабДокумент.Вывести(Област ьМакета);
-
25.02.2015, 11:15 #26
- Регистрация
- 30.01.2015
- Сообщений
- 4
- Сказал(а) спасибо
- 1
- Поблагодарили 0 раз(а) в 0 сообщениях
arccos6pi,а вы можете сделать такую же форму для ут 10.3 ?
-
25.02.2015, 11:26 #27
- Регистрация
- 29.01.2010
- Сообщений
- 1212
- Сказал(а) спасибо
- 30
- Поблагодарили 261 раз(а) в 245 сообщениях
Вот смотри, у тебя в коде указано
Для Каждого СтрокаТабличнойЧасти Из ТабличнаяЧасть Цикл
ПыСы. Сама программа не умеет "догадываться" что именно ты хочешь распечатать (товары или например услуги)
-
25.02.2015, 11:56 #28
-
25.02.2015, 11:59 #29
- Регистрация
- 29.01.2010
- Сообщений
- 1212
- Сказал(а) спасибо
- 30
- Поблагодарили 261 раз(а) в 245 сообщениях
вот и перебирается ТЧ Услуги
Как все просто :dance:
-
-
25.02.2015, 12:01 #30
-
Пользователь сказал cпасибо:
Александр25 (25.02.2015)
Социальные закладки