Привет всем! начинаю программировать, есть такая задача нужно сделать не типовую номирацию документов по такому принципу, чтобы сперва была дата, потом дефис и номер документа, т.е пример:
01082013-00000001
01082013-00000002
01082013-00000003
02082013-00000001
02082013-00000002
чтобы начальная номирация зависела от даты, я набросал кода, но этого точно не хватает, помогите его модифицировать, просто если добавлять документы за прошлые периоды, то номерация сбивается
вот что написал не судите строго
        Дата = Объект.Дата;
    НомерДокумента = Объект.Номер;
    ДатаДокумента = Формат(Дата, "ДФ=ddMMyyyy");
    Результат = ДатаДокумента+НомерДокумента;
    Объект.Номер = Результат;
При повторной записи номер также сбивается(  
Все дело делается на управляемых формах

во первых править нужно в рассо правильных местах используя префикс
Во вторых не забудь процедуру печати поправить

в справочнике организаций есть поле префикса. найди процедуру и замени префикс на дату.

а в самом документе сделать вообще никак? мне нужно так подправить только несколько документов

(3) не все там так просто

(3) не никак.  И еще номер документа в течении дня или года?

(3) как в (2) будет красиво и без гемора

смысл в дате, если нумерация сквозная? А если номер в течении дня, значит еще не зебудь поправить периодичность самого документа

Спасибо за советы, ща че нибудь буду думать

попробую с префиксом

вообще, есть требования к нумерации, которые нельзя нарушать в бух. учете

(10) пример из (0) не нарушает правила

1. нужный документ, вкладка Нумерация меняем периодичность "В пределах дня"


2. Идем в общие модули ПрефиксацияОбъектовБПСобытия
ищем процедуру УстановитьПрефиксИнформационнойБазыОрганизацииПодразделения


там после строки
ПрефиксОП = СтроковыеФункцииКлиентСервер.ДополнитьСтроку(ПрефиксОП, 2, "0", "Слева");

добавляем
МетаданныеДокумента = Источник.Метаданные();
ТекПрефикс = Префикс;
Если МетаданныеДокумента.Имя = "АктОбОказанииПроизводственныхУслуг" или
.... или что там тебе нужно тогда
        
  //А тут переназначай на свой префикс, у меня например это сделано так
  ПрефиксИБ="";
  ТекПрефикс = ТекПрефикс+Формат(Месяц(Источник.Дата),"ЧЦ=2; ЧВН=")+Формат(День(Источник.Дата),"ЧЦ=2; ЧВН=");
КонецЕсли;
Префикс=ТекПрефикс;

//Конец изменений
    
Префикс = ПрефиксОП + ПрефиксИБ + "-" + Префикс;

Правда есть одно но, во первых не все документы юзают эту процедру, например для Счет-фактуры вызывается совершенно другая процедура

В общих модулях ищем ПрефиксацияОбъектовСобытия

в ней Процедура УстановитьПрефикс

Ну и по аналогии меняем префикс


Ну и второе НО, это процедура печати (получения номера на печать)

Открываем ПрефиксацияОбъектовКлиентСерверПереопределяемый

и смотрим
Процедура ПриПолученииНомераНаПечать(НомерОбъекта, СтандартнаяОбработка) Экспорт
    
    Если Сред(НомерОбъекта, 3, 1) = "-" Тогда
        Возврат;
    КонецЕсли;
    
НомерОбъекта = ОбщегоНазначенияБПВызовСервера.ПолучитьНомерБП20(НомерОбъекта);
    СтандартнаяОбработка = Ложь;
    
КонецПроцедуры

я например себе добавлял
Если Сред(НомерОбъекта, 5, 1) = "-" Тогда
    Возврат;
КонецЕсли;
//Номер не соответствует формату

Ща попробую, у меня там документ "РеализацияТоваровУслуг"

Тогда курочь  УстановитьПрефиксИнформационнойБазыОрганизацииПодразделения  из ПрефиксацияОбъектовБПСобытия

(14) ну и смысла курочить нумерацию реализации без счет-фактуры - особо нет, т.е. я бы уточнил что со счет-фактурой? Или они тупо копируют номер реализации

Да))) Номерация заработала))) Aleksey -  большой респект))) счет фактура реально отвалилась, если делать на основании не формирует

кстати вру) счет-фактура выданный работает, по поводу ее номерации, чуть по позже узнаю

Не забудь про префикс организации и в процедуре печати поправь, чтобы он корректно удалял его

ага, ща это сделаю, неее.. Счет фактура не работает, мозг уже потек, в глазах начинает двоится, с счет фактурой буду завтра разбираться))    Aleksey - спасибо огромное, уважуха)))