Как изменить журнал "счета"?

25.03.2009, 06:42. **Показов** 24919. **Ответов** 18

Студворк — интернет-сервис помощи студентам

Заводится документ "Счет", на основании счета делается "Отгрузка..." либо "Оказание услуг...". Подскажите, как сделать так, чтоб бухгалтер в журнале "Счета" видел, по каким из счетов была отгрузка или оказаны услуги?

версия: 1С 7.7 редакция 4.5

@vytfyt · 25.03.2009, 07:37

Как-то тема слабо коррелирует с текстом сообщения...
По теме: в конфигураторе.
По сообщению: сделайте в журнале счетов дополнительную колонку и выводите в нее признак какой-то при наличии подчиненных документов.

25.03.2009, 07:45

ну так это не изменение журнала счета чтоли?

26.03.2009, 06:49

Что ни кто не знает чтоли? Или просто не охото помогать? Тогда зачем нужен форум?

@Koo · 26.03.2009, 07:54

Посмотри в типовой бух, как реализовано в журнале платежных поручений

26.03.2009, 08:53

Хоть на этом спасибо

@vytfyt · 26.03.2009, 09:15

Сообщение от DeathExpectation

ну так это не изменение журнала счета чтоли?

С моей точки зрения, изменение журнала есть ни что иное, как модификация состава журнала и граф журнала, т.е. изменение метаданных.
Задача же, описанная в самом теле сообщения, относится к модификации представления журнала (без изменения метаданных).

Сообщение от DeathExpectation

Что ни кто не знает чтоли? Или просто не охото помогать? Тогда зачем нужен форум?

Форум - это место общения на профессиональные или околопрофессиональные темы (по крайней мере, этот). Посему, следует принимать тот факт, что задав вопрос, вы получите ответ только в том случае, если кто-то посчитает интересным для себя и для других ответить на него. Что касается конкретно вашего вопроса, он показывает ваше нежелание читать документацию, а также разбираться с типовыми решениями. В этом мы, увы, не сможем вам помочь.

Сообщение от DeathExpectation

Хоть на этом спасибо

Еще раз хочу напомнить, что вам никто ничего не должен.

@Koo · 26.03.2009, 09:54

Сообщение от DeathExpectation

Хоть на этом спасибо

Пожалуйста. А если б вы привели кусок кода в котором что-то не получается, ответ был бы более развернут

@umkmowm181538 · 26.03.2009, 23:52

Сообщение от vitfil

С моей точки зрения, изменение журнала есть ни что иное, как модификация состава журнала и граф журнала, т.е. изменение метаданных.
Задача же, описанная в самом теле сообщения, относится к модификации представления журнала (без изменения метаданных).

Мне кажется, речь идет об изменение модуля формы и диалога журнала "Счета". Это ли не изменение метаданных?

28.03.2009, 12:28

Я добавил колонку в журнал счета

Вот функция которая заполняет эту колонку

Функция ПоказатьСтатусСчета()
ДокиПодч = СоздатьОбъект("Документ");
Рез="";
Если ПустоеЗначение(ТекущийДокумент)=1 Тогда
Возврат Рез;
Иначе
Если ДокиПодч.ВыбратьПодчиненныеДокументы(,,Т екущийДокумент)=1 Тогда
Пока ДокиПодч.ПолучитьДокумент()=1 Цикл
Если ДокиПодч.Проведен()=1 Тогда
Если (ДокиПодч.Вид()="Выписка") тогда
ДокиПодч.ПолучитьСтроку();
Рез=ДокиПодч.ТекущийДокумент();
КонецЕсли;
КонецЕсли;

КонецЦикла;

Возврат Рез;
Иначе
Возврат Рез;
КонецЕсли;
КонецЕсли;
КонецФункции

Она выводит выписку которая была сделана на основании счета.
Подскажите как мне сделать так чтобы она выводила следующие данные

или подскажите как пожно сделать чтобы при нажатии на колонку где у нас вывелось выписка в журнале счета открывалась сама выписка

@vbs · 28.03.2009, 14:37

Надо из нужной строки выписки вытащить реквизиты "ДатаДокВходящий" и "НомерДокВходящий"

28.03.2009, 14:55

Можешь написать кодом пожалуйста

@umkmowm181538 · 28.03.2009, 15:48

[codebox]ДокиПодч.ВыбратьСТроки();
Пока докиПодч.ПолучитьСтроку()=1 Цикл
Если ДокиПодч.КакТамНазываетсяРеквизитВКоторо мСЧет=ТекущийДокумент Тогда
ДатаПлатежки=ДокиПодч.КакТамНазываетсяДА таДОк;
НомерПлатежки=ДокиПодч.КакТамНазываетсяН омерПлатежки;
КонецЕсли;
КонецЦикла;[/codebox]

28.03.2009, 17:04

Сообщение от unknown181538

[codebox]ДокиПодч.ВыбратьСТроки();
Пока докиПодч.ПолучитьСтроку()=1 Цикл
Если ДокиПодч.КакТамНазываетсяРеквизитВКоторо мСЧет=ТекущийДокумент Тогда
ДатаПлатежки=ДокиПодч.КакТамНазываетсяДА таДОк;
НомерПлатежки=ДокиПодч.КакТамНазываетсяН омерПлатежки;
КонецЕсли;
КонецЦикла;[/codebox]

Спасибо

@vytfyt · 29.03.2009, 08:39

Сообщение от unknown181538

Мне кажется, речь идет об изменение модуля формы и диалога журнала "Счета". Это ли не изменение метаданных?

А разве 1С не говорит при этом "...не вызвали изменения метаданных"? Или для вас является секретом то, что 1С позволяет хранить модули отдельно от конфигурации, что называется "в базовой комплектации"?

30.03.2009, 08:38

Подскажите как сделать то же самое в 1С редакции 1.3. пожалуста

@umkmowm181538 · 31.03.2009, 08:20

1.3 - версия платформы?) Тогда не знаю.
Если редакция конфигурации - то какая разница?

@vbs · 31.03.2009, 13:40

Судя по всему, у него УСН. Там "Выписка" устроена примерно так же, как и в Бух 4.5
ДокиПодч.ВыбратьСТроки();
Пока докиПодч.ПолучитьСтроку()=1 Цикл
Если ДокиПодч.ПервичныйДокумент=ТекущийДокуме нт Тогда
ДатаПлатежки=ДокиПодч.ДатаДокВходящий;
НомерПлатежки=ДокиПодч.НомерДокВходящий;
КонецЕсли;
КонецЦикла;

07.04.2009, 12:04

огромное всем спасибо

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»	SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .

Dyothyxpystotyom

	Как изменить журнал "счета"? 25.03.2009, 06:42. Показов 24919. Ответов 18 Метки нет (Все метки) Заводится документ "Счет", на основании счета делается "Отгрузка..." либо "Оказание услуг...". Подскажите, как сделать так, чтоб бухгалтер в журнале "Счета" видел, по каким из счетов была отгрузка или оказаны услуги? версия: 1С 7.7 редакция 4.5

@vytfyt 0 / 0 / 0 Регистрация: 28.03.2004 Сообщений: 1,913
	25.03.2009, 07:37
	Как-то тема слабо коррелирует с текстом сообщения... По теме: в конфигураторе. По сообщению: сделайте в журнале счетов дополнительную колонку и выводите в нее признак какой-то при наличии подчиненных документов. 0

Dyothyxpystotyom
	25.03.2009, 07:45
	ну так это не изменение журнала счета чтоли?

Dyothyxpystotyom
	26.03.2009, 06:49
	Что ни кто не знает чтоли? Или просто не охото помогать? Тогда зачем нужен форум?

@Koo 0 / 0 / 0 Регистрация: 22.04.2010 Сообщений: 38
	26.03.2009, 07:54
	Посмотри в типовой бух, как реализовано в журнале платежных поручений 0

Dyothyxpystotyom
	26.03.2009, 08:53
	Хоть на этом спасибо

Dyothyxpystotyom
	28.03.2009, 12:28
	Я добавил колонку в журнал счета Вот функция которая заполняет эту колонку Функция ПоказатьСтатусСчета() ДокиПодч = СоздатьОбъект("Документ"); Рез=""; Если ПустоеЗначение(ТекущийДокумент)=1 Тогда Возврат Рез; Иначе Если ДокиПодч.ВыбратьПодчиненныеДокументы(,,Т екущийДокумент)=1 Тогда Пока ДокиПодч.ПолучитьДокумент()=1 Цикл Если ДокиПодч.Проведен()=1 Тогда Если (ДокиПодч.Вид()="Выписка") тогда ДокиПодч.ПолучитьСтроку(); Рез=ДокиПодч.ТекущийДокумент(); КонецЕсли; КонецЕсли; КонецЦикла; Возврат Рез; Иначе Возврат Рез; КонецЕсли; КонецЕсли; КонецФункции Она выводит выписку которая была сделана на основании счета. Подскажите как мне сделать так чтобы она выводила следующие данные или подскажите как пожно сделать чтобы при нажатии на колонку где у нас вывелось выписка в журнале счета открывалась сама выписка

@vbs 0 / 0 / 1 Регистрация: 22.06.2013 Сообщений: 9
	28.03.2009, 14:37
	Надо из нужной строки выписки вытащить реквизиты "ДатаДокВходящий" и "НомерДокВходящий" 0

Dyothyxpystotyom
	28.03.2009, 14:55
	Можешь написать кодом пожалуйста

@umkmowm181538 0 / 0 / 0 Регистрация: 24.12.2008 Сообщений: 1,399
	28.03.2009, 15:48
	[codebox]ДокиПодч.ВыбратьСТроки(); Пока докиПодч.ПолучитьСтроку()=1 Цикл Если ДокиПодч.КакТамНазываетсяРеквизитВКоторо мСЧет=ТекущийДокумент Тогда ДатаПлатежки=ДокиПодч.КакТамНазываетсяДА таДОк; НомерПлатежки=ДокиПодч.КакТамНазываетсяН омерПлатежки; КонецЕсли; КонецЦикла;[/codebox] 0

Dyothyxpystotyom
	30.03.2009, 08:38
	Подскажите как сделать то же самое в 1С редакции 1.3. пожалуста

@umkmowm181538 0 / 0 / 0 Регистрация: 24.12.2008 Сообщений: 1,399
	31.03.2009, 08:20
	1.3 - версия платформы?) Тогда не знаю. Если редакция конфигурации - то какая разница? 0

@vbs 0 / 0 / 1 Регистрация: 22.06.2013 Сообщений: 9
	31.03.2009, 13:40
	Судя по всему, у него УСН. Там "Выписка" устроена примерно так же, как и в Бух 4.5 ДокиПодч.ВыбратьСТроки(); Пока докиПодч.ПолучитьСтроку()=1 Цикл Если ДокиПодч.ПервичныйДокумент=ТекущийДокуме нт Тогда ДатаПлатежки=ДокиПодч.ДатаДокВходящий; НомерПлатежки=ДокиПодч.НомерДокВходящий; КонецЕсли; КонецЦикла; 0

Dyothyxpystotyom
	07.04.2009, 12:04
	огромное всем спасибо