НДС у Предпринимателя
Показывать по
10
20
40
сообщений
- 1
- 2
18.01.2010
18:09
#11
я исправил в обработке место, де он определяет КПП - сразу стал все видть и заполнять... не знаю какие последствия, но на этапе заполнения - это сработало
18.01.2010
19:42
#15
Это что получается, ошибка в отчете, и исправлять самостоятельно. Тогда можно подробнее на этом месте? Где и что исправить, что бы с ИНН (КПП) было все нормально???
18.01.2010
20:02
#16
"Повторюсь, я не уверен, что это именно ошибка - может не догнал чего-то просто, но времени разбираться уже нет. Во всяком случае, после исправления у меня все заработало. Но, тем не менее, исправлять если будете - то на свой страх и риск 
Заходим в конфигуратор. Файл - открыть. выбираем файл "Каталог базы\ExtForms\Rp09q4.grp\NDS904.ERT"
В модуле обработки ищем процедурину "ЗаполнитьРеквизиты". В самомо ее начале следующий кусок:
Процедура ЗаполнитьРеквизиты( ИзмФирма=0 )
СписокДанных = СоздатьОбъект( "СписокЗначений" );
Если ИдентКонфигурации <> "NLGPL" Тогда
СписокДанных.Установить( "Контекст", Контекст );
СписокДанных.Установить( "Дата", Дата2 );
СписокДанных.Установить( "ИНН", """" );
СписокДанных.Установить( "КаталогХранения", """" );
Попытка
глПолучитьДанные( СписокДанных );
Исключение
КонецПопытки;
ОргИНН = СписокДанных.Получить( "ИНН" );
ИНН = СРЕД(ОргИНН, 1, 10); /// ИСПРАВЛЯТЬ ТУТ
КПП = СРЕД(ОргИНН, 12,20); /// И ТУТ
Иначе
Далее заменяем помеченные строки на
ИНН = СРЕД(ОргИНН, 1, 12);
КПП = СРЕД(ОргИНН, 13,20);
сохраняем и все...
Это пример для 3 раздела. При необходимости ту же процедуру проделать для файлов
NDS903.ERT
NDS905.ERT
и так далее..."
Заходим в конфигуратор. Файл - открыть. выбираем файл "Каталог базы\ExtForms\Rp09q4.grp\NDS904.ERT"
В модуле обработки ищем процедурину "ЗаполнитьРеквизиты". В самомо ее начале следующий кусок:
Процедура ЗаполнитьРеквизиты( ИзмФирма=0 )
СписокДанных = СоздатьОбъект( "СписокЗначений" );
Если ИдентКонфигурации <> "NLGPL" Тогда
СписокДанных.Установить( "Контекст", Контекст );
СписокДанных.Установить( "Дата", Дата2 );
СписокДанных.Установить( "ИНН", """" );
СписокДанных.Установить( "КаталогХранения", """" );
Попытка
глПолучитьДанные( СписокДанных );
Исключение
КонецПопытки;
ОргИНН = СписокДанных.Получить( "ИНН" );
ИНН = СРЕД(ОргИНН, 1, 10); /// ИСПРАВЛЯТЬ ТУТ
КПП = СРЕД(ОргИНН, 12,20); /// И ТУТ
Иначе
Далее заменяем помеченные строки на
ИНН = СРЕД(ОргИНН, 1, 12);
КПП = СРЕД(ОргИНН, 13,20);
сохраняем и все...
Это пример для 3 раздела. При необходимости ту же процедуру проделать для файлов
NDS903.ERT
NDS905.ERT
и так далее..."
18.01.2010
22:18
#17
"Если Найти(ОргИНН, "\") = 0 Тогда
ИНН = Сред(ОргИНН, 1, 12);
КПП = """";
Иначе
ИНН = Сред(ОргИНН, 1, 10);
КПП = Сред(ОргИНН, 12, 20);
КонецЕсли;
так будет лучше мне кажется..."
ИНН = Сред(ОргИНН, 1, 12);
КПП = """";
Иначе
ИНН = Сред(ОргИНН, 1, 10);
КПП = Сред(ОргИНН, 12, 20);
КонецЕсли;
так будет лучше мне кажется..."
19.01.2010
02:36
#19
"
КонецЕсли;
// начало_____________________________________________________< br> Если СтрДлина(ОргИНН) <> 12 Тогда
// Налогоплательщик - юр. лицо
ИНН = "00" + ИНН;
Иначе
// Налогоплательщик - физ. лицо
ИНН = ОргИНН;
КПП = """";
КонецЕсли;
//конец_______________________________________________
Если ПустоеЗначение(КаталогХранения)=1 Тогда
// Определяем каталог хранения из ИБ
КаталогХранения = СокрЛП(СписокДанных.Получить("КаталогХранения"));
КонецЕсли;
ЗаполнитьИНН_КПП();
КонецПроцедуры // ЗаполнитьРеквизиты()
1с просто Забыла встваить кусок модуля. Интересно что в титульнике есть, а в разделах нет)). Такой кусок в 4 кв за 08г есть. имено он исключает проблему с каталогом)))"
КонецЕсли;
// начало_____________________________________________________<
// Налогоплательщик - юр. лицо
ИНН = "00" + ИНН;
Иначе
// Налогоплательщик - физ. лицо
ИНН = ОргИНН;
КПП = """";
КонецЕсли;
//конец_______________________________________________
Если ПустоеЗначение(КаталогХранения)=1 Тогда
// Определяем каталог хранения из ИБ
КаталогХранения = СокрЛП(СписокДанных.Получить("КаталогХранения"));
КонецЕсли;
ЗаполнитьИНН_КПП();
КонецПроцедуры // ЗаполнитьРеквизиты()
1с просто Забыла встваить кусок модуля. Интересно что в титульнике есть, а в разделах нет)). Такой кусок в 4 кв за 08г есть. имено он исключает проблему с каталогом)))"
- 1
- 2
обновление ПК «Спринтер» и форм отчетности (версия 09Q41)Не печатается дата в новой налоговой декларации. Бухгалтерский учет, ред. 4.5 7.70.509
Читают тему
(гостей: 1)