PDA

Просмотр полной версии : Нумерация платёжного поручения



Makar121
28.09.2010, 12:22
В 7.7 Бухгалтерия, платёжные поручения, выгрузка в банк клиент, нумерация перевалила за 1000, отображаются все платёжки нормально а вот выгружаются в формате до 999, а потом заново 1,2,3...
Как сделать что бы дальше шла нумерация 1001,1002... и т.д

Разработчик
28.09.2010, 13:03
В конфигураторе откройте обработку ПредприятиеКлиент, найдите строку
Результат = Строка(Число(Прав(СокрЛП(гл ПреобразоватьНомерДок(Док� �мент.НомерДок, 0, 0)),3)));
Замените 3 на 4

Makar121
29.09.2010, 11:31
Разработчик
Ура, заработало... СПАСИБО ОГРОМНОЕ!!! счастлив до усрачки...

Добавлено через 22 часа 11 минут 53 секунды
А если у меня нумерация 00001126, выгружает 1126, а надо с 00001126, поменял 4 на 8, но не прокатило, как быть дальше?

gfulk
29.09.2010, 16:59
Замените строку выше на :
Результат=Документ.НомерДо к;

Makar121
30.09.2010, 08:48
у меня вот так:

ИначеЕсли Параметр = "БанковскийСчетКонтрагента" Тогда
Результат = Документ.СчетКонтрагента;

ИначеЕсли Параметр = "НомерДокумента" Тогда
Результат = Строка(Число(Прав(СокрЛП(гл ПреобразоватьНомерДок(Док� �мент.НомерДок, 0, 0)),4)));

Если Число(Результат) = 0 Тогда
Сообщить("У документа с номером """ + Документ.НомерДок + """ номер должен оканчиваться на три цифры и не на ""000""", "!");
КонецЕсли;

КонецЕсли;

Возврат Результат;

Помогите лузеру... где заменить?

NeSpec
30.09.2010, 11:40
глПреобразоватьНомерДок(Д окумент.НомерДок, 0, 0)),
Зашел бы в глобальный модуль и посмотрел описание процедуры глПреобразоватьНомерДок,

// глПреобразоватьНомерДок( <НомерДок>, <ВыводитьНули> ,<ВыводитьПрефикс> ) Экспорт
//
// Параметры:
// <НомерДок> - значение типа Строка - номер документа
// <ВыводитьНули>
// - число
// 0 - не выводить лидирующие нули
// 1 - выводить лидирующие нули
// <ВыводитьПрефикс>
// - число
// 0 - не выводить префикс
// 1 - выводить префикс
// 2 - выводить префикс сзади
//
// Возвращаемое значение.
// Строка - номер документа для печати
//
// Описание:
// Процедура предназначена для преобразования номера документа.
// Используется, например, при выводе номера документа на печать.

Первый "нолик", тот что после Д окумент.НомерДок означает, что не дополнять номер нулями до длины нумератора, замени его на 1, должно получиться.

Разработчик
30.09.2010, 20:59
[QUOTE=Makar121;79036]у меня вот так:

ИначеЕсли Параметр = "БанковскийСчетКонтрагента" Тогда
Результат = Документ.СчетКонтрагента;

ИначеЕсли Параметр = "НомерДокумента" Тогда
Результат = Строка(Число(Прав(СокрЛП(гл ПреобразоватьНомерДок(Док� �мент.НомерДок, 0, 0)),4)));

Если Число(Результат) = 0 Тогда
Сообщить("У документа с номером """ + Документ.НомерДок + """ номер должен оканчиваться на три цифры и не на ""000""", "!");
КонецЕсли;

КонецЕсли;

Возврат Результат;

Помогите лузеру... где заменить?[/QUOTE

Должно быть так:

ИначеЕсли Параметр = "БанковскийСчетКонтрагента" Тогда
Результат = Документ.СчетКонтрагента;

ИначеЕсли Параметр = "НомерДокумента" Тогда
Результат = Документ.НомерДок;

Если Число(Результат) = 0 Тогда
Сообщить("У документа с номером """ + Документ.НомерДок + """ номер должен оканчиваться на три цифры и не на ""000""", "!");
КонецЕсли;

КонецЕсли;

Возврат Результат;

Makar121
01.10.2010, 09:02
Разработчик ура, заработало!