Выбрать все движения регистра по документу 0
Процедура Взаиморасчеты(ВыбКлиент, ДатаНачало, ДатаКонец)
// Создание Таблицы для выходного отчета
Заг = " Неизвестно." ;
Таб = СоздатьОбъект(" Таблица" );
Клн = СоздатьОбъект(" Справочник.Клиенты" );
Клн.ИспользоватьДату(ДатаКонец);
Док = СИспользование предложения ДЛЯ ИЗМЕНЕНИЯ 0 Предложение ДЛЯ ИЗМЕНЕНИЯ позволяет заблаговременно заблокировать некоторые данные (которые могут читаться транзакцией другого соединения) уже при считывании, чтобы исключить взаимные блокировки при записи. ДЛЯ ИЗМЕНЕНИЯ дает возможность указать в Как в 1C загрузить из Word текст? 4 Как в 1C из Microsoft Office Word 2007 внести текст?
Код получения текста из файла word:
Wk = Новый COMОбъект(" Word.Application" );
//Покажем открываемый документ
Wk.Visible = Истина; Wk.Documents.Open(" D: file.doc" );
Документ = Wk.ActiveКак в форме списка журнала расчетов Зарплата вывести только записи, относящиеся к Документу 0 процедура ПриОткрытии() // Предопределенная процедура
перем док;
док = СоздатьОбъект(" Документ.Премия" );
// Метод Выбрать вызывает диалог для выбора документа
// Если документ не выбран
если док.Выбрать(" Выберите документ" ) = 0 тогда
ПредуКак вывести все расчеты, относящиеся к выбранному Сотруднику 0 сСотр_2 = СоздатьОбъект(" Справочник.Сотрудники" );
// Метод Выбрать вызывает диалог для выбора элемента справочника
// Если сотрудник не выбран
если сСотр_2.Выбрать(" Выберите сотрудника" , " ФормаСписка" ) = 0 тогда
Предупреждение(" Сотрудник Посмотреть все результаты поиска похожих
Работа с журналом расчетов в 1С7.7 из 1С 8.1 через Com соединение 1 Недавно делал перенос справочников и документов из 1С 7.7 " Зарплата и кадры" в 1С 8.1 " Управление торговым предприятием" через Com соединение. Во время переноса столкнулся с некоторыми проблемами. Одна из них - это при выполнении запроса очень ваВвод записей в журнал расчетов 1 Добавление записи в журнал расчетов:
Метод Новая может быть вызван где угодно, в глобальном модуле, модуле обработок, документов и т.д.
Данный метод проверяет корректность заполненных реквизитов журнала расчетов. При вводе новых записей журналПеребор записей журнала расчетов 0 Например, организуем перебор записей с периодом действия в январе.
ЖЗ = СоздатьОбъект(" ЖурналРасчетов.Зарплата" );
ДатаНач = 01.01.2002;
ДатаКон = 31.01.2002;
ЖЗ.ВыбратьЗаписи(ДатаНач, ДатаКон);
Пока ЖЗ.ПолучитьЗапись()=1 Цикл
// действРасчет начислений по сотруднику, подразделени, документу 0 // Посчитаем все начисления текущего сотрудника за январь:
ВсегоНачислено = 0;
ЖЗ.ВыбратьЗаписиПоОбъекту (ТекСотр, ДатаНач, ДатаКон);
Пока ЖЗ.ПолучитьЗапись()=1 Цикл
Если ЖЗ.ВидРасч.ВходитВГруппу(ГруппаРасчетов.ВсеНачисления)=1 Тогда
ВсегоНачУдаление записей в журнале расчетов 0 При отмене проведения документа обычно автоматически удаляются всего его движения, в том числе и введенные записи в журналы расчетов.
Можно также явно удалять записи методом журнала расчетов УдалитьЗапись() .Посмотреть все в категории Журналы расчетов
Журналы расчетов