ПриходныйКассОрдер.ВыбратьДокументы((ДатаПереноса), (ДатаПереноса2));
Пока ПриходныйКассОрдер.ПолучитьДокумент() = 1 Цикл
Если ПриходныйКассОрдер.ПометкаУдаления() = 1 Тогда
Продолжить;
КонецЕсли;
Если "TD_0"+ПриходныйКассОрдер.Фирма.Код <> СпрОрганизация.Код Тогда Продолжить;
КонецЕсли;
НовыйНомер_ = Сред(СокрЛП(Строка(ПриходныйКассОрдер.НомерДок)), 3);
НовыйНомер = "TD_"+НовыйНомер_;
Сообщить(НовыйНомер+" "+ПриходныйКассОрдер.Контрагент.Наименование);
Если Документы.ПриходныйКассовыйОрдер.НайтиПоНомеру(НовыйНомер, ДатаПереноса).Пустая() Тогда
ПриходныйКассовыйОрдер_ = Документы.ПриходныйКассовыйОрдер.СоздатьДокумент();
ПриходныйКассовыйОрдер_.Дата = ПриходныйКассОрдер.ДатаДок;
ПриходныйКассовыйОрдер_.Номер = НовыйНомер;
// перезаполняем шапку
ПриходныйКассовыйОрдер_.Организация = СпрОрганизация;
ПриходныйКассовыйОрдер_.Касса = Справочники.Кассы.НайтиПоНаименованию(ПриходныйКассОрдер.Касса.Наименование);
ПриходныйКассовыйОрдер_.ОтражатьВУправленческомУчете = Истина;
ПриходныйКассовыйОрдер_.Ответственный = СоздатьНовогоПользователя(ПриходныйКассОрдер.Автор.Код, ПриходныйКассОрдер.Автор.Наименование);
ПриходныйКассовыйОрдер_.Комментарий = ПриходныйКассОрдер.Комментарий;
// заполняем табличную часть
ПриходныйКассовыйОрдер_.РасшифровкаПлатежа.Очистить();
//ПриходныйОрдер.ВыбратьСтроки();
//Пока ПриходныйКассОрдер.ПолучитьСтроку() = 1 Цикл
Если ПриходныйКассОрдер.КодОперации.Прочее = "Прочее" Тогда
//ВозвратПодотчетныхСумм = "Возврат от подотчетника" Тогда
ПриходныйКассовыйОрдер_.ВидОперации = Перечисления.ВидыОперацийПКО.ВозвратДенежныхСредствРаботником;
Через отладчик Документ в 7.7 ПриходныйКассОрдер.КодОперации.Прочее
