1C предприятие 7.7 для SQL самописная за основу взяли 7,70,026
Прошу помощи.
Сейчас бухгалтерия работает.
Создаём счёт.
На основании счёта создаётся накладная
Оплата заносится одним из 3-х подчинённых документов.
В журнале счетов напротив оплаченного счёта
После проплаты в колонке "Оплата" появляется "+"
Возникла необходимость в журнале после оплаты вместо "+", а лучше где-то рядом, указать номер подчинённой накладной
Модуль журнала счетовФункция Подчиненные()
Если ТекущийДокумент.Выбран()=0 Тогда
Возврат "";
КонецЕсли;
Док = СоздатьОбъект("Документ");
Док.ВыбратьПодчиненныеДокументы('01.01.1970','31.12.2100',ТекущийДокумент);
Текст = "";
Пока Док.ПолучитьДокумент()=1 Цикл
Текст = "Есть подчиненные документы!";
Прервать;
КонецЦикла;
Возврат Текст;
КонецФункции
// ===============================
Процедура ОткрытьПодчиненные()
Если ТекущийДокумент.Выбран()=0 Тогда
Возврат;
КонецЕсли;
ОткрытьФорму("Журнал.Подчиненные.ФормаСписка",,ТекущийДокумент);
КонецПроцедуры
Функция ОбновитьИнфоОплата()
Если ТекущийДокумент.Выбран()=0 Тогда
Возврат "";
КонецЕсли;
Док = СоздатьОбъект("Документ");
Док.ВыбратьПодчиненныеДокументы('01.01.1980','31.12.2100',ТекущийДокумент);
Пока Док.ПолучитьДокумент()=1 Цикл
Если (Док.Вид() = "ПриходныйБанкСНДС") или (Док.Вид() = "ПриходныйКассовыйКлиент") или (Док.Вид() = "ПриходныйБанкБезНДС") Тогда
Возврат "+";
КонецЕсли;
КонецЦикла;
Возврат "";
КонецФункции
КонецЦикла;
Возврат "";
КонецФункции
Открытая тема (есть новые ответы)
Опрос (есть новые голоса)
Открытая тема (нет новых ответов)
Опрос (нет новых голосов)
Горячая тема (есть новые ответы)
Закрытая тема
Горячая тема (нет новых ответов)
Тема перемещена