helpf.pro
Регистрация
FAQ 1С 7.x » Категорий: 40
Найти...

Все версии7.x8.x ОП8.2 УП8.3 УПВидео   Добавить FAQ
1С Бухгалтерия 2.0 » 5Отчеты » 2
1С Зарплата и Управление Персоналом 2.5 » 4Перечисления » 1
1С Общие вопросы - Обычные формы » 23Полезные, Универсальные Функции » 28
1С Управление торговлей 10.3 » 1Пользователь, роль доступа, интерфейс » 4
COM-объекты, WMI, WSH » 24Работа с Microsoft Office и OpenOffice » 30
HTML, JS, VML » 4Работа с Датами (Временем) » 13
JSON, XML, TXT, CSV, DBF » 7Работа с Интернет, Почтой (Mail), FTP » 4
OLE, ActiveX » 2Работа с Таблицей Значений » 1
Администрирование » 52Работа с Текстом (Строкой) » 7
Виды расчетов » 6Работа с Типами данных » 1
Виды Субконто » 2Работа с Файлами и Каталогами » 6
Внешние компоненты » 2Работа с Формой (Диалог) и её элементами » 1
Встроенные Функции » 20Работа с Числами » 9
Группы расчетов » 1Регистры » 30
Диаграмма » 1Регулярные выражения » 11
Документы » 5Системные Ошибки » 4
Журналы расчетов » 14Список Справочника, Документов, Регистров » 1
Конвертация данных, Обмен, Перенос » 2Справочники » 18
Метаданные » 7Табличный документ » 6
Операция » 2Штрих-код (barcode) » 2
Категория: Виды расчетов
Версии: 7.x

Посчитаем все начисления текущего сотрудника за январь: // 1-й вариант: ВсегоНачислено = 0; ЖЗ.ВыбратьЗаписиПоОбъекту (ТекСотр, ДатаНач, ДатаКон); Пока ЖЗ.ПолучитьЗапись()=1 Цикл Если ЖЗ.ВидРасч.ВходитВГруппу(ГруппаРасчетов.ВсеНачисления)=1 То
Подробнее  Разместил: E_Migachev  Дата: 19.03.2010  Прочитано: 10542  Комментарии
0 
Распечатать
Категория: Полезные, Универсальные Функции
Версии: 7.x

Функция Перекодировка(Стр=" " ,Кодировка=" windows-1251" ) Стрим = СоздатьОбъект(" Adodb.Stream" ); Стрим.Type = 2; Стрим.Mode= 3; Стрим.charset=" iso-8859-5" ; Стрим.Open(); Стрим.WriteText(Стр); Стрим.Position=0; Стрим.charset=Кодировка;
Подробнее  Разместил: E_Migachev  Дата: 19.03.2010  Прочитано: 16916  Комментарии
0 
Распечатать
Категория: Виды расчетов
Версии: 7.x

ПоОкладу = 0; ЖЗ = СоздатьОбъект(" ЖурналРасчетов.Зарплата" ); ДатаНач = 01.01.2002; ЖЗ. ВыбратьПериодПоОбъекту(ТекСотр, ДатаНач); Пока ЖЗ.ПолучитьЗапись()=1 Цикл Если ЖЗ.ВидРасч = ВидРасчета.ПоОкладу Тогда ПоОкладу = ПоОкладу + ЖЗ.Результат
Подробнее  Разместил: E_Migachev  Дата: 19.03.2010  Прочитано: 8027  Комментарии
0 
Распечатать
Категория: Виды расчетов
Версии: 7.x

ВР = ВидРасчета.НаРуки; ВР = ВидРасчета.Премия; ВР = ВидРасчета.ПолучитьАтрибут(" НаРуки" );
Подробнее  Разместил: E_Migachev  Дата: 19.03.2010  Прочитано: 8333  Комментарии
0 
Распечатать
Категория: Журналы расчетов
Версии: 7.x

НачалоПериода = ЖЗ.НачалоТекущегоПериода(); КонецПериода = ЖЗ.КонецТекущегоПериода(); ПериодСтрокой = ЖЗ.ОписательПериода(НачМес); //например " Январь 2002 г"
Подробнее  Разместил: E_Migachev  Дата: 19.03.2010  Прочитано: 8786  Комментарии
0 
Распечатать
Категория: Журналы расчетов
Версии: 7.x

При отмене проведения документа обычно автоматически удаляются всего его движения, в том числе и введенные записи в журналы расчетов. Можно также явно удалять записи методом журнала расчетов УдалитьЗапись() .
Подробнее  Разместил: E_Migachev  Дата: 19.03.2010  Прочитано: 10193  Комментарии
0 
Распечатать
Категория: Журналы расчетов
Версии: 7.x

// Посчитаем все начисления текущего сотрудника за январь: ВсегоНачислено = 0; ЖЗ.ВыбратьЗаписиПоОбъекту (ТекСотр, ДатаНач, ДатаКон); Пока ЖЗ.ПолучитьЗапись()=1 Цикл Если ЖЗ.ВидРасч.ВходитВГруппу(ГруппаРасчетов.ВсеНачисления)=1 Тогда ВсегоНач
Подробнее  Разместил: E_Migachev  Дата: 19.03.2010  Прочитано: 10010  Комментарии
0 
Распечатать
Категория: Виды расчетов
Версии: 7.x

ТЗВидыРасчетов = Новый ТаблицаЗначений; ТЗВидыРасчетов.Колонки.Добавить(" ВидРасчета" ); ЖРЗарплата = v7.CreateObject(" ЖурналРасчетов.Зарплата" ); ЖРЗарплата.ВыбратьЗаписи(НачДата,КонДата); Пока ЖРЗарплата.ПолучитьЗапись() = 1 Цикл СтрВидыРасч
Подробнее  Разместил: E_Migachev  Дата: 19.03.2010  Прочитано: 9629  Комментарии
0 
Распечатать
Категория: Журналы расчетов
Версии: 7.x

Например, организуем перебор записей с периодом действия в январе. ЖЗ = СоздатьОбъект(" ЖурналРасчетов.Зарплата" ); ДатаНач = 01.01.2002; ДатаКон = 31.01.2002; ЖЗ.ВыбратьЗаписи(ДатаНач, ДатаКон); Пока ЖЗ.ПолучитьЗапись()=1 Цикл // действ
Подробнее  Разместил: E_Migachev  Дата: 19.03.2010  Прочитано: 11695  Комментарии
0 
Распечатать
Категория: Журналы расчетов
Версии: 7.x

Добавление записи в журнал расчетов: Метод Новая может быть вызван где угодно, в глобальном модуле, модуле обработок, документов и т.д. Данный метод проверяет корректность заполненных реквизитов журнала расчетов. При вводе новых записей журнал
Подробнее  Разместил: E_Migachev  Дата: 19.03.2010  Прочитано: 19902  Комментарии: 9
+1 
Распечатать
Всего 365 на 37 страницах по 10 на каждой странице