Имя: Пароль:
1C
 
Бухгалтерия предприятия. Проблема с префиксами при печати.
0 Grekos2
 
15.03.17
14:33
Бухгалтерия предприятия, редакция 2.0 (2.0.66.18)

При печати ТОРГ 12 не печатаются префиксы и ведущие нули.
АА-000318 превращается в 318.

Если АА занести в регистр сведений "ПрефиксыИнформационныхБаз"
то АА-000318 превращается в АА318, без тире и ведущих нулей.

Проблему удалось решить записав в справочнике организация в поле префикс вместо "АА" любое другое строковое значение , например "ААА".

Вопрос. Как правильно решить данную проблему. ?
         С какой целью вообще удаляется префикс , тире и ведущие нули ?
1 Сияющий Асинхраль
 
15.03.17
14:55
По сути префикс играет только роль разделителя документов между организациями, т.е. используется для обеспечения непрерывности нумерации внутри ОДНОЙ организации. Другого какого-либо заумного смысла в префиксе нет. Поэтому он, собсно, и убирается при печати. Убирается он на уровне конфигурации, есть там то ли функция, то ли процедурка, которая убирает эти самые лишние нули и префиксы. Закомментарив ее, можно, конечно их оставить, но смысла особого не вижу, все равно эти префиксы убираются не только из печатных номеров, но и из книги продаж и т.д.
2 Сияющий Асинхраль
 
15.03.17
14:58
А вот, собсно, и эта процедурка:

// Процедура предназначена для преобразования номера документа.
//
// Параметры:
//  Документ - (ДокументСсылка), документ, чей номер надо получить для печати.
//
// Возвращаемое значение.
//  Строка - номер документа для печати
//
Функция ПолучитьНомерНаПечать(Документ, МассивПрефиксов = Неопределено) Экспорт

    Если Документ = Неопределено Тогда
        Возврат 0;
    КонецЕсли;

    Номер   = СокрЛП(Документ.Номер);
    
    // {ОбменДаннымиБСП
    // Если номер документа по стандарту БСП 8.2, сформируем номер через стандартную процедуру БСП.
    Если ПолучитьФункциональнуюОпцию("ИспользоватьОбменДанными") = Истина Тогда
        
        Если Сред(Номер, 5, 1) = "-" Тогда
            Номер = ПрефиксацияОбъектовКлиентСервер.ПолучитьНомерНаПечать(Номер,
            Ложь, // УдалитьПрефиксИнформационнойБазы
            Истина // УдалитьПользовательскийПрефикс
            );
            Возврат Номер;
        КонецЕсли;
        
    КонецЕсли;
    // }ОбменДаннымиБСП
    
    Префикс = "";
    Если МассивПрефиксов = Неопределено Тогда
        
        Организация              = Неопределено;
        ПодразделениеОрганизации = Неопределено;
        
        Если ТипЗнч(Документ) = Тип("ВыборкаИзРезультатаЗапроса")
            ИЛИ ТипЗнч(Документ) = Тип("Структура") Тогда

            Организация = Документ.Организация;
            
        Иначе

            МетаданныеДокумента = Документ.Метаданные();

            Если ЕстьРеквизитДокумента("Организация", МетаданныеДокумента) Тогда

                Организация = Документ.Организация;

            КонецЕсли;
            
        КонецЕсли;
        
        МассивПрефиксовДляОбхода = СформироватьМассивПрефиксовДляРИБИОрганизации(Организация);
        
    Иначе
        
        МассивПрефиксовДляОбхода = МассивПрефиксов;
        
    КонецЕсли;
    
    Для Каждого ТекущийПрефикс ИЗ МассивПрефиксовДляОбхода Цикл
        
        // удаление префикса из номера документа
        Если Найти(Номер, ТекущийПрефикс)=1 Тогда
            Номер = Сред(Номер, СтрДлина(ТекущийПрефикс)+1);
        КонецЕсли;
        
        // так же, может остаться "минус" впереди
        Если Лев(Номер, 1) = "-" Тогда
            Номер = Сред(Номер, 2);
        КонецЕсли;
        
        // удаление ведущих нулей
        Пока Лев(Номер, 1)="0" Цикл
            Номер = Сред(Номер, 2);
        КонецЦикла;
    КонецЦикла;

    Возврат Номер;

КонецФункции // ПолучитьНомерНаПечать()
3 Grekos2
 
15.03.17
15:00
(1) Бухгалтерия жалуется, что нет префиксов.
    Основание, что некоторые клиенты получают распечатку из базы торговли с префиксами.

    Процедуру видел конечно же.
    Править нельзя.
4 Grekos2
 
15.03.17
15:01
Вносить изменения в конфигурацию бухгалтерия не рекомендовано.
5 SadrArt
 
15.03.17
15:01
(0) Как правильно решить данную проблему. ?

Какую проблему?
6 Grekos2
 
15.03.17
15:02
Интересует, существует ли настройка, чтобы префикс не убирался.
7 Grekos2
 
15.03.17
15:03
(5) Исключить удаление префиксов и ведущих нулей при печати.
8 ВРедная
 
15.03.17
15:04
(7) решите проблему по-другому - удалите префиксы в торговле
9 Сияющий Асинхраль
 
15.03.17
15:04
(4) Что ты как дитё? Решений два, они лежат на поверхности. Либо в торговле давать документы без префиксов (для этого кстати, не надо изменять конфу, достаточно прилепить внешние печатные формы), либо точно также сделать в бухгалтерии - то бишь внешними печатными формами. Лично по-моему сделать это в торговле проще, поскольку в бухгалтерии надо будет переделывать еще и книгу продаж и т.д.
AdBlock убивает бесплатный контент. 1Сергей