перенос документов из Бух 4.5 в ТиС 9.2
Показывать по
10
20
40
сообщений
- 1
- 2
11.06.2010
11:54
#12
"текДок.Новый();
//вставка+
СтараяРабочаяДата = РабочаяДата();
РабочаяДата(текДатаДок);
текДокПроверка = СоздатьОбъект("Документ."+текДок.Вид());
//вставка-
Если (текДок.Вид() <> "ГотоваяПродукция") И (текДок.Вид() <> "ПлановаяСебестоимость") Тогда
//вставка+
РабочаяДата(Продажа.ДатаДок);
//вставка-
текДок.ДатаДок = Продажа.ДатаДок;
//вставка+
Если текДокПроверка.НайтиПоНомеру(ПолучитьНомерДокумента(Продажа.НомерДок),текДок.ДатаДок)=0 Тогда
//вставка-
текДок.НомерДок = ПолучитьНомерДокумента(Продажа.НомерДок);
//вставка+
КонецЕсли;
//вставка-
Иначе
текДок.ДатаДок = текДатаДок;
КонецЕсли;
//....
текДок.Записать();
//вставка+
РабочаяДата(СтараяРабочаяДата);
//вставка-"
//вставка+
СтараяРабочаяДата = РабочаяДата();
РабочаяДата(текДатаДок);
текДокПроверка = СоздатьОбъект("Документ."+текДок.Вид());
//вставка-
Если (текДок.Вид() <> "ГотоваяПродукция") И (текДок.Вид() <> "ПлановаяСебестоимость") Тогда
//вставка+
РабочаяДата(Продажа.ДатаДок);
//вставка-
текДок.ДатаДок = Продажа.ДатаДок;
//вставка+
Если текДокПроверка.НайтиПоНомеру(ПолучитьНомерДокумента(Продажа.НомерДок),текДок.ДатаДок)=0 Тогда
//вставка-
текДок.НомерДок = ПолучитьНомерДокумента(Продажа.НомерДок);
//вставка+
КонецЕсли;
//вставка-
Иначе
текДок.ДатаДок = текДатаДок;
КонецЕсли;
//....
текДок.Записать();
//вставка+
РабочаяДата(СтараяРабочаяДата);
//вставка-"
24.06.2010
18:39
#13
а можно написать программулину, чтобы все предыдущие действия отменить? допустим я перекинул из тиса в бух доки за 1 месяц, из бух их можно безболезненно удалить?
24.06.2010
20:06
#14
> а можно написать программулину, чтобы все предыдущие действия отменить? допустим я перекинул из тиса в бух доки за 1 месяц, из бух их можно безболезненно удалить?
> а можно написать программулину, чтобы все предыдущие действия отменить? допустим я перекинул из тиса в бух доки за 1 месяц, из бух их можно безболезненно удалить?
что ????
> а можно написать программулину, чтобы все предыдущие действия отменить? допустим я перекинул из тиса в бух доки за 1 месяц, из бух их можно безболезненно удалить?
что ????
- 1
- 2
Читают тему
(гостей: 1)