Нумерация РеализацияТоваровУслуг

1. wau8824ru 23 27.03.13 23:50 Сейчас в теме
Здравствуйте, УТ 10.3.19.4, 8.2.
Проблема звучит так, для удобства в организации номера РТУслуг и СФВыданный совпадают, но присутствует документ ВозвратТоваровПоставщику на основание которого выводится СФВыданный и портит нумерацию РТУслуг.
Внимание вопрос
Возможно ли Номер РТУслуг получать программно из таблицы Номеров СФВыданный+1? если да то Как?
По теме из базы знаний
Найденные решения
5. wau8824ru 23 30.07.19 14:30 Сейчас в теме
(1)
Проблема звучит так, для удобства в организации номера РТУслуг и СФВыданный совпадают, но присутствует документ ВозвратТоваровПоставщику на основание которого выводится СФВыданный и портит нумерацию РТУслуг.

В итоге для документа РеалТовУсл_ВозвТовПост_КорРеал - Используется общий нумератор
Так же и для ПостТовУсл_ВозвТовОтПок_КорПост - Используется общий нумератор
а счет фактуры получают номера документа основания, при открытии формы...
Прикрепленные файлы:
6. wau8824ru 23 30.07.19 15:17 Сейчас в теме
(5)
а счет фактуры получают номера документа основания

СФВ
	//88(
	ДокОсн = ЭтотОбъект.ДокументОснование;
	Если ЗначениеЗаполнено(ДокОсн)
		И ТипЗнч(ДокОсн) <> Тип("ДокументСсылка.ОтчетКомиссионераОПродажах")
		Тогда
		Если ЭтотОбъект.ВидСчетаФактуры = Перечисления.ВидСчетаФактурыВыставленного.НаРеализацию
			Или ЭтотОбъект.ВидСчетаФактуры = Перечисления.ВидСчетаФактурыВыставленного.Корректировочный
			Тогда
			Если ЭтотОбъект.Номер			<> ДокОсн.Номер					Тогда ЭтотОбъект.Номер				= ДокОсн.Номер;			КонецЕсли;
			Если ЭтотОбъект.Дата			<> ДокОсн.Дата					Тогда ЭтотОбъект.Дата				= ДокОсн.Дата;			КонецЕсли;
			Если ЭтотОбъект.Ответственный	<> ДокОсн.Ответственный			Тогда ЭтотОбъект.Ответственный		= ДокОсн.Ответственный;	КонецЕсли;
			Если ЭтотОбъект.Выставлен		<> Истина						Тогда ЭтотОбъект.Выставлен			= Истина;				КонецЕсли;
			Если ЭтотОбъект.ДатаВыставления	<> НачалоДня(ЭтотОбъект.Дата)	Тогда ЭтотОбъект.ДатаВыставления	= ЭтотОбъект.Дата;		КонецЕсли;
		КонецЕсли;
	КонецЕсли;
	//88)
КонецПроцедуры // ПриОткрытии()
Показать

СФП
	//88(
	ДокОсн = ЭтотОбъект.ДокументОснование;
	Если ЗначениеЗаполнено(ДокОсн)
		И ТипЗнч(ДокОсн) <> Тип("ДокументСсылка.ОтчетКомиссионераОПродажах")
		Тогда
		Если ЭтотОбъект.ВидСчетаФактуры = Перечисления.ВидСчетаФактурыПолученного.НаПоступление
			Или ЭтотОбъект.ВидСчетаФактуры = Перечисления.ВидСчетаФактурыПолученного.Корректировочный
			Тогда
			Если ЭтотОбъект.Номер			<> ДокОсн.Номер			Тогда ЭтотОбъект.Номер			= ДокОсн.Номер;			КонецЕсли;
			Если ЭтотОбъект.Дата			<> ДокОсн.Дата			Тогда ЭтотОбъект.Дата			= ДокОсн.Дата;			КонецЕсли;
			Если ЭтотОбъект.Ответственный	<> ДокОсн.Ответственный	Тогда ЭтотОбъект.Ответственный	= ДокОсн.Ответственный;	КонецЕсли;
		КонецЕсли;
	КонецЕсли;
	//88)
КонецПроцедуры// ПриОткрытии()
Показать
Остальные ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
5. wau8824ru 23 30.07.19 14:30 Сейчас в теме
(1)
Проблема звучит так, для удобства в организации номера РТУслуг и СФВыданный совпадают, но присутствует документ ВозвратТоваровПоставщику на основание которого выводится СФВыданный и портит нумерацию РТУслуг.

В итоге для документа РеалТовУсл_ВозвТовПост_КорРеал - Используется общий нумератор
Так же и для ПостТовУсл_ВозвТовОтПок_КорПост - Используется общий нумератор
а счет фактуры получают номера документа основания, при открытии формы...
Прикрепленные файлы:
6. wau8824ru 23 30.07.19 15:17 Сейчас в теме
(5)
а счет фактуры получают номера документа основания

СФВ
	//88(
	ДокОсн = ЭтотОбъект.ДокументОснование;
	Если ЗначениеЗаполнено(ДокОсн)
		И ТипЗнч(ДокОсн) <> Тип("ДокументСсылка.ОтчетКомиссионераОПродажах")
		Тогда
		Если ЭтотОбъект.ВидСчетаФактуры = Перечисления.ВидСчетаФактурыВыставленного.НаРеализацию
			Или ЭтотОбъект.ВидСчетаФактуры = Перечисления.ВидСчетаФактурыВыставленного.Корректировочный
			Тогда
			Если ЭтотОбъект.Номер			<> ДокОсн.Номер					Тогда ЭтотОбъект.Номер				= ДокОсн.Номер;			КонецЕсли;
			Если ЭтотОбъект.Дата			<> ДокОсн.Дата					Тогда ЭтотОбъект.Дата				= ДокОсн.Дата;			КонецЕсли;
			Если ЭтотОбъект.Ответственный	<> ДокОсн.Ответственный			Тогда ЭтотОбъект.Ответственный		= ДокОсн.Ответственный;	КонецЕсли;
			Если ЭтотОбъект.Выставлен		<> Истина						Тогда ЭтотОбъект.Выставлен			= Истина;				КонецЕсли;
			Если ЭтотОбъект.ДатаВыставления	<> НачалоДня(ЭтотОбъект.Дата)	Тогда ЭтотОбъект.ДатаВыставления	= ЭтотОбъект.Дата;		КонецЕсли;
		КонецЕсли;
	КонецЕсли;
	//88)
КонецПроцедуры // ПриОткрытии()
Показать

СФП
	//88(
	ДокОсн = ЭтотОбъект.ДокументОснование;
	Если ЗначениеЗаполнено(ДокОсн)
		И ТипЗнч(ДокОсн) <> Тип("ДокументСсылка.ОтчетКомиссионераОПродажах")
		Тогда
		Если ЭтотОбъект.ВидСчетаФактуры = Перечисления.ВидСчетаФактурыПолученного.НаПоступление
			Или ЭтотОбъект.ВидСчетаФактуры = Перечисления.ВидСчетаФактурыПолученного.Корректировочный
			Тогда
			Если ЭтотОбъект.Номер			<> ДокОсн.Номер			Тогда ЭтотОбъект.Номер			= ДокОсн.Номер;			КонецЕсли;
			Если ЭтотОбъект.Дата			<> ДокОсн.Дата			Тогда ЭтотОбъект.Дата			= ДокОсн.Дата;			КонецЕсли;
			Если ЭтотОбъект.Ответственный	<> ДокОсн.Ответственный	Тогда ЭтотОбъект.Ответственный	= ДокОсн.Ответственный;	КонецЕсли;
		КонецЕсли;
	КонецЕсли;
	//88)
КонецПроцедуры// ПриОткрытии()
Показать
2. sr5 28.03.13 02:51 Сейчас в теме
На вскидку, можно так
1. запрос к счет-фактурам, сортировать по убыванию кода
2. первая запись в выборке результата - будет с максимальным кодом
3. прибавляем единицу...
3. wau8824ru 23 28.03.13 09:08 Сейчас в теме
В какую процедуру впихнуть запрос??? просто опыта маловато, если можно то ткните носом...
4. Aleks1973 28.03.13 09:25 Сейчас в теме
При открытии, например. Или перед записью. Запрос из одной записи.
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот