Новости для бухгалтера, бухучет, налогообложение, отчетность, ФСБУ, прослеживаемость и маркировка, 1С:Бухгалтерия

Вход или Регистрация

Показывать по 10 20 40 сообщений
Новая тема Ответить
Письмо в техподдержку 1С
[Прочее]

Акт

enco_FobiaN
читатель
офлайн
Дата регистрации: 12.04.2007
Сообщений: 116
Пост №1
 
25.05.2007 14:28

"Делаю внешний отчет акт оказания услуг. В отчете передаю в докум через параметр контекст при открытии:<br>Процедура ПриОткрытии()<br> Если ПустоеЗначение(Форма.Параметр) = 0 Тогда<br> Докум      = Форма.Параметр.Получить("Контекст");<br> Устройство = Форма.Параметр.Получить("Устройство");<br> КолвоКопий = Форма.Параметр.Получить("КоличествоКопий");<br> Печать(Докум, Устройство, КолвоКопий);<br> Статусвозврата(0);<br> Возврат;<br> КонецЕсли;<br>КонецПроцедуры // ПриОткрытии()<br><br>При открытии пишет мне: СуммаПрописью(Докум.Итог("Всего")<<?>>) + ", в т.ч.: НДС - "+ СуммаПрописью(Докум.Итог("НДС")) + ?(глПризнакУчетаНалога(Контекст, "НП")=1,", налог с продаж - "+СуммаПрописью(Докум.Итог("НП")), """") + "."<br>Недостаточно фактических параметров<br><br>Какой параметр я что-то не пойму нужен.<br><br>Проблема в том, что при открытии отчета внешнего, он мне не хочет писать сумму прописью. Сравнивал со стандартным актом(mxl) в документе Оказание услуг, там разница только в том, что там не надо добавлять переменную Докум, которой я в отчете передавал контекст.<br><br>Вот в стандартном акте: "Всего оказано услуг на сумму: " +<br>СуммаПрописью(Итог("Всего")) + ", в т.ч.: НДС - "+ СуммаПрописью(Итог("НДС")) + ?(глПризнакУчетаНалога(Контекст, "НП")=1,", налог с продаж - "+СуммаПрописью(Итог("НП")), """") + "."<br><br>А вот в моем отчете: "Всего оказано услуг на сумму: " +<br>СуммаПрописью(Докум.Итог("Всего")) + ", в т.ч.: НДС - "+ СуммаПрописью(Докум.Итог("НДС")) + ?(глПризнакУчетаНалога(Контекст, "НП")=1,", налог с продаж - "+СуммаПрописью(Докум.Итог("НП")), """") + "."<br><br>Зотя все остальное, и цена, ед. изм и т.д. через Докум все выводит.<br><br><br><br>"

Daedal
читатель
офлайн
Дата регистрации: 20.09.2004
Сообщений: 632
Пост №2
 
28.05.2007 05:42

1)Ну дык посмотреть как объявлена эта функция СуммаПрописью<br>2) По грамотнее выражать мысли стоит, а то не очень всё понятно - по<br>несколько раз сообщение приходится перечитывать - не хорошо

enco_FobiaN
читатель
офлайн
Дата регистрации: 12.04.2007
Сообщений: 116
Пост №3
 
28.05.2007 07:26

"Вот эта функция:<br><br>Функция СуммаПрописью(Сумма, Валюта) <br> <br> Если ПустоеЗначение(Валюта) = 0 Тогда<br> <br> Если ПустоеЗначение(Валюта.ИмяФайлаПрописи) = 1 Тогда<br>        Предупреждение("Для выбранной валюты не указан файл прописи.");<br> ИначеЕсли ФС.СуществуетФайл(КаталогИБ()+Валюта.ИмяФайлаПрописи) = 0 Тогда<br>        Предупреждение("Для выбранной валюты неверно указан файл прописи.");<br> Иначе<br> Пропись(КаталогИБ()+Валюта.ИмяФайлаПрописи);<br> КонецЕсли;<br> <br> КонецЕсли;<br><br> СтрокаСуммы = Формат(Сумма, "ЧПДС");<br> <br> // установим пропись по умолчанию<br> Пропись("""");<br> Возврат СтрокаСуммы;<br> <br>КонецФункции // СуммаПрописью()"

Daedal
читатель
офлайн
Дата регистрации: 20.09.2004
Сообщений: 632
Пост №4
 
28.05.2007 07:36

> Вот эта функция:<br>> <br>> Функция СуммаПрописью(Сумма, Валюта) <br>> <br>Ну и что видно? Функция принимает два параметра и второй не указан как<br>допускающий пропуск при вызове.

enco_FobiaN
читатель
офлайн
Дата регистрации: 12.04.2007
Сообщений: 116
Пост №5
 
28.05.2007 08:33

Проблема в самом табличном документе, он ругается на то, как там прописано. По идее все правильно, делаю через Докум, а он все равно ругается.<br><br>Вот пример в таб. документе:<br><br>"Всего оказано услуг на сумму: " +<br>СуммаПрописью(Докум.Итог("Всего")) + ", в т.ч.: НДС - "+ СуммаПрописью(Докум.Итог("НДС")) + ?(глПризнакУчетаНалога(Контекст, "НП")=1,", налог с продаж - "+СуммаПрописью(Докум.Итог("НП")), ") + "."<br><br>Пишет после открытия вот такую ошибку: СуммаПрописью(Докум.Итог("Всего")<<?>>) + ", в т.ч.: НДС - "+ СуммаПрописью(Докум.Итог("НДС")) + ?(глПризнакУчетаНалога(Контекст, "НП")=1,", налог с продаж - "+СуммаПрописью(Докум.Итог("НП")), ") + "."<br>Недостаточно фактических параметров<br><br>

pika
читатель
офлайн
Дата регистрации: 23.02.2007
Сообщений: 262
Пост №6
 
28.05.2007 09:43

А что вообще вы пытаетесь сделать<br>1. Обработка по пакетной печати актов.<br>2. Печать акта через внешнию печатную форму.<br>или еще то-то?

Daedal
читатель
офлайн
Дата регистрации: 20.09.2004
Сообщений: 632
Пост №7
 
28.05.2007 10:50

"Во-первых, что такое табличный документ?<br>Во-вторых, выдаёт же, что за ошибка! Не достаточное количество параметров.<br><br>Что бы дошло пример:<br><br>Функция суммирование(первый, второй)<br> результат = первый + второй;<br> возврат результат;<br>КонецФункции;<br><br>А теперь вызываем её:<br><br>результат_сложения = суммирование(10);<br><br>Какой результат сложения возвратиться из функции?"

Prikum
активный пользователь
офлайн
Дата регистрации: 18.02.2002
Сообщений: 20951
Пост №8
 
28.05.2007 12:15

Опишите функцию как :<br>Функция СуммаПрописью(Сумма, Валюта=") <br><br>

Daedal
читатель
офлайн
Дата регистрации: 20.09.2004
Сообщений: 632
Пост №9
 
28.05.2007 12:41

Исходя из текста данной функции, который приведён выше параметр "Валюта" не должен быть пустой.<br>Иначе ничего не будет выводиться. Нужно указатель на элемент справочника.<br>Поэтому, естественный выход - это при вызове написать нечто типа: <br>СуммаПрописью(Докум.Итог("Всего"), Докум.Договор.ВалютаДоговора)

Daedal
читатель
офлайн
Дата регистрации: 20.09.2004
Сообщений: 632
Пост №10
 
28.05.2007 12:49

"А хотя можно и так. Тогда просто дописать <br>Если ПустоеЗначение(Валюта) = 1 Тогда<br> Валюта = Константа.ОсновнаяВалюта;<br>КонецЕсли;<br>"

Показывать по 10 20 40 сообщений

Читают тему:

Быстрый переход
Для технических специалистов
  • Книга жалоб и предложений по работе сайта
  • Для технических специалистов
  • Представление регламентированной отчетности
  • Говорильня
  • Бухгалтерский учет: обсуждаем проекты нормативных актов и рекомендаций по ведению учета от БМЦ
  • Новый порядок применения ККТ (онлайн кассы с передачей сведений в ФНС)
  • Интернет-конференция: Оформление командировок по новым правилам
  • МАРКИРОВКА
  • ЕГАИС
  • Учет, налогообложение, автоматизация