Если у Вас есть типовая , но доработанная УПП ( которая не полностью снята с поддержки) Вы всегда можете получить вариант типовой конфигурации. Конфигурация-►Поддержка-►Настройка поддержки-►"Сохранить в файл" ( получившийся файл это и есть типовая ). Конфигурация-►Поддержка-►Настройка поддержки-►"Сравнить, объединить" ( вы сравните вашу текущую конфигурацию с типовой , в том числе и Ваш отчет)
[ВангаМод_On] Видно, есть желание организавать доступ к файловой версии базы на платформе 7.7 с двух ( и более ) компьютеров под оправлением разных операционных систем : Windows XP, Windows 10. Могу только подсказать, как это сделать на Windows XP, Windows 7. 1. У вас должен быть каталог в сети к которому есть доступ вышеопределенных ОС. 2. Поместить в него информационную базу. 3.(проверить что бы к файлам базы был полный доступ) 4.Установите 1с.7.7, последний релиз "027". ( определитесь с компонентами которые необходимы для вашей информационной базы ) 5.Установите на ОС региональные настройки русские. 6.Пропишете путь и имя к информационной базе. 7.При первом входе база предложит вам установить "региональные настройки". выберите пункт "+Текущие системная установка". 8.Удостоверьтесь, что зашли в базу не монопольно и повторите пункт 5,6 на второй машине. [/ВангаМод_Off]
Проверьте, что - бы курс валюты рассчетов в упр. учете на дату формирования документа был установлен. Регистры сведений : 1."Курсы валют"; 2. "Курсы валют для расчета с персоналом"
Кадровое перемещение организации. На вкладке начисление есть кнопочка "Групповое изменение", там можно все изменить на процент или на сумму конкретную.
Есть предположение, что у Вас КонПериода и НачПериода переменные типа Дата а следует указать ДатаВремя. Тогда не надо будет дополнительно указывать НачалоДня и КонецДня.
У нас на форуме есть "хорошая" кнопка, нажав на которую можно без лишних слов выразить человеку благодарность за его сообщение. У новичков возникнет вопрос: "А где же она?". А вот она:
Если чей-то пост Вы посчитали для себя полезным - жмите на кнопку!
1. Добавляем свою кнопку "Добавить", или подменяем стандартную. 2. В обработчике добавления пишем следующее :
СтруктураПараметрыДляЗаполненияДокумента = Новый Структура; Для каждого ТекОтбор Из ДокументСписок.Отбор Цикл Если ТекОтбор.Использование Тогда //Записываем нужные отборы и значения СтруктураПараметрыДляЗаполненияДокумента.Вставить(ТекОтбор.Имя,ТекОтбор.Значение); КонецЕсли; КонецЦикла;
//Создаем свое добавление нового документа : НовыйДокумент = Документы._НашДокумент_.СоздатьДокумент(); ЗаполнитьЗначенияСвойств(НовыйДокумент,СтруктураПараметрыДляЗаполненияДокумента);
//Открываем форму : ТекущаяФорма = НовыйДокумент.ПолучитьФорму(); ТекущаяФорма.Открыть();
Третий параметр содержит единицу измерения, в которой необходимо получить результат функции. В качестве третьего параметра можно использовать следующие значения: Секунда, Минута, Час, День, Месяц, Квартал, Год. При расчете результата функция игнорирует единицы измерения, которые меньше, чем указанная в данном параметре единица.
Например, если в качестве третьего параметра указать Час, то при расчете результата будут игнорироваться минуты и секунды, присутствующие в первых двух параметрах. Если же в третьем параметре указать Месяц, то игнорироваться будут дни, часы, минуты и секунды.
Установите там где устанавливается и ,просто, скопируйте файлы с одной машины на другую. Кстати вот это пробовали ?
Цитата
Проблема заключается в том, что полоса прогресса установки останавливается на некотором месте и категорически отказывается идти дальше; повисев так немного, вываливается ошибка копирования - и до свидания! Так, например, ведут себя 1С 7.7 и обновления релизов конфигураций для нее. Решение было найдено, как всегда, в интернете... но решение таково, что заслуживает отдельного здесь упоминания .
Поскольку человек в здравом уме скорее всего не поверит в такое решение, сразу скажу, что установить удавалось только так, никак иначе.
1. Запустите программу установки. 2. Индикатор полосы прогресса застывает на «том самом месте». 3. Щелкните по значку текущих подключений в области уведомлений на панели задач. (на самом деле у меня полоса прогресса начинала снова заполняться именно на этом месте - просто щелчок по значку сети в трее) 4. Зайдите в «Центр управления сетями и общим доступом». 5. На картинке, изображающей вашу сеть (карте сети) щелкните по иконке своего компьютера («Этот компьютер»). 6. Переключитесь в окошко установки и с возрастающим недоверием наблюдайте, как заполняется полоса прогресса. 6.5. Если 4-й пируэт не увенчался успехом, снова бейте в бубен. Вместо того, чтобы щелкать по «Этому компьютеру», щелкайте по изображению вашей сети или по «Интернету» (если вы к нему подключены). 7. Bingo!!!
Если и теперь все равно не bingo, и, пока вы делаете п. с 3 по 6.5, партнер стоит столбом, используйте папуасский тамтам. Вырубите сеть на совсем. Потом, разумеется, врубите.
Сам не верил пока сегодня не столкнулся. Повеселило.
1. Добавляем реквизит Документ с типом ЗаказПокупателя. 2. Из документа заполняем этот реквизит после создания обработки (фактически раскомментировать осталось) 3. В обработке "передзакрытием" ( или по любому другому обработчику) записываем в реквизит документ все что душа желает.
У нас на форуме есть "хорошая" кнопка, нажав на которую можно без лишних слов выразить человеку благодарность за его сообщение. У новичков возникнет вопрос: "А где же она?". А вот она:
Если чей-то пост Вы посчитали для себя полезным - жмите на кнопку!
для кадого ТекСтрока из Объект.Товары цикл Если ЗначениеЗаполнено(ТекСтрока.Номенклатура) тогда ТекСтрока.ЕдиницаИзмерения = ТекСтрока.Номенклатура.ЕдиницаХраненияОстатков; ТекСтрока.ЕдиницаИзмеренияМест= ТекСтрока.Номенклатура.ЕдиницаИзмеренияМест; КонецЕсли; Конеццикла;
Есть обработка "Обмен данными между ПП"1С:Предприятие 7.7" и системами клиент-банк" от внедренческого центра "Конто". Купите, найдите. (насколько я понял правилами форума запрещено такое вылаживать). Но кусочек кода в помощь, думаю можно :
//****************************************************************************** Функция Импорт_Файла_ДБФ(Параметр) ФайлБД = СоздатьОбъект("XBase"); Попытка ФайлБД.ОткрытьФайл(Путь,,0); Исключение Предупреждение("Ошибка отрытия файла " + Путь); Возврат 0; КонецПопытки; Если ФайлБД.Открыта() = 0 Тогда Предупреждение("Ошибка отрытия файла " + Путь); Возврат 0; КонецЕсли; ФайлБД.КодоваяСтраница(спКодировка.ПолучитьЗначение(спКодировка.ТекущаяСтрока())); КвоПлатежей = 0; ФайлБД.Последняя(); Пока (ФайлБД.вНачале() = 0) Цикл //Если проведено не вчера - возврат Состояние("Обраатывается строка №" + ФайлБД.НомерЗаписи()); Если (ФайлБД.DATE <> Параметр.Получить("ДатаДок")) Тогда ФайлБД.Предыдущая(); Продолжить; КонецЕсли; Если (СокрЛП(Цел(ФайлБД.COUNT_A)) = Параметр.Получить("РСчет")) Тогда Сп = СоздатьОбъект("СписокЗначений"); Сп.Установить("РСчет",СокрЛП(Цел(ФайлБД.COUNT_B))); Сп.Установить("МФО",СокрЛП(Цел(ФайлБД.MFO_B))); Сп.Установить("ОКПО",СокрЛП(Цел(ФайлБД.OKPO_B))); Сп.Установить("Контрагент",СокрЛП(ФайлБД.NAME_B)); Сп.Установить("Банк",СокрЛП(ФайлБД.BANK_B)); Сп.Установить("Расход",ФайлБД.SUMMA); Сп.Установить("Приход",0); Сообщить("Платеж в " + СокрЛП(ФайлБД.NAME_B)); ИначеЕсли (СокрЛП(Цел(ФайлБД.COUNT_B)) = Параметр.Получить("РСчет")) Тогда Сп = СоздатьОбъект("СписокЗначений"); Сп.Установить("РСчет",СокрЛП(Цел(ФайлБД.COUNT_A))); Сп.Установить("МФО",СокрЛП(Цел(ФайлБД.MFO_A))); Сп.Установить("ОКПО",СокрЛП(Цел(ФайлБД.OKPO_A))); Сп.Установить("Контрагент",СокрЛП(ФайлБД.NAME_A)); Сп.Установить("Банк",СокрЛП(ФайлБД.BANK_A)); Сп.Установить("Приход",ФайлБД.SUMMA); Сп.Установить("Расход",0); Сообщить("Платеж от " + СокрЛП(ФайлБД.NAME_A)); Иначе ФайлБД.Предыдущая(); Продолжить; КонецЕсли; КвоПлатежей = КвоПлатежей + 1; Сп.Установить("Содержание",СтрЗаменить(ФайлБД.N_P ,РазделительСтрок," ")); Сп.Установить("НомерПП", ФайлБД.N_D); Параметр.ДобавитьЗначение(Сп); ФайлБД.Предыдущая(); КонецЦикла; ФайлБД.ЗакрытьФайл();
Попытка Если ФС.СуществуетФайл(Путь) = 1 Тогда ФС.УдалитьФайл(Путь); КонецЕсли; Исключение Сообщить("Невозможно перезаписать файл с предыдущей выгрузкой.","!!!"); Возврат 0; КонецПопытки;
Попытка ФайлБД.СоздатьФайл(Путь); Исключение Предупреждение("Ошибка создания файла " + Путь); Возврат 0; КонецПопытки; Если ФайлБД.Открыта() = 0 Тогда Предупреждение("Ошибка открытия файла " + Путь); Возврат 0; КонецЕсли; Для Ном = 1 По Параметр.РазмерСписка() Цикл Сп = Параметр.ПолучитьЗначение(Ном); Если ТипЗначенияСтр(Сп) <> "СписокЗначений" Тогда Продолжить; КонецЕсли; ФайлБД.Добавить();
Возвращает: тип: Число. В случае успеха поиска возвращает 1, иначе - 0.
Описание: Метод предназначен для поиска следующего атрибута в соответствии с параметрами, установленными ранее методом НайтиАтрибут / FindAttrib.
Пример:
ФормаРасш = СоздатьОбъект("РасширениеФормы"); р = ФормаРасш.НайтиАтрибут(5,"Основной"); Пока р = 1 Цикл Сообщить(ФормаРасш.ТекущийАтрибут().Заголовок); р = ФормаРасш.ПолучитьСледующийАтрибут(); КонецЦикла;
Перем мСписокФлаговОднойГруппы; Функция Присвоить(Чему,Что) Экспорт Чему = Что; Возврат ""; КонецФункции //====================================================================== Процедура ПриИзмененииФлагов(НомерФлага) для инд = 1 по мСписокФлаговОднойГруппы.РазмерСписка() Цикл Шаблон("[Присвоить("+(мСписокФлаговОднойГруппы.ПолучитьЗначение(инд))+","+(?(НомерФлага = инд,1,0))+")]"); КонецЦикла; КонецПроцедуры // ПриИзмененииФлагов(НомерФлага)
//Наименование флагов которые связаны между собой ! (Их порядок важен) //Аналогичные должны быть на форме, с теми-же Идентификаторами, а на вкладке дополнительно вызывать ПриИзмененииФлагов() с соотвецтвующим значением //Значение = порядковый номер флага
мСписокФлаговОднойГруппы = СоздатьОбъект("СписокЗначений"); мСписокФлаговОднойГруппы.ДобавитьЗначение("Фл1"); //1-й по порядку мСписокФлаговОднойГруппы.ДобавитьЗначение("Флаг2");//2-й мСписокФлаговОднойГруппы.ДобавитьЗначение("ОченьКлассныйФлаг");//3-й
У нас на форуме есть "хорошая" кнопка, нажав на которую можно без лишних слов выразить человеку благодарность за его сообщение. У новичков возникнет вопрос: "А где же она?". А вот она:
Если чей-то пост Вы посчитали для себя полезным - жмите на кнопку!
Таким способом можно найти строки в ТБ в которых и нужный док и тмц находятся в одной строке а не в разных ( что возможно по Вашему алгоритму) Поправленная часть :
Для каждого СтрокаТаблицы Из ТДСебестоимость Цикл НеНайденНеобходимыйДокумент = ТБ.Найти(СтрокаТаблицы.Док,"Док") = Неопределено; НайденнаяСтрокаСНоменклатурой = ТБ.Найти(СтрокаТаблицы.ТМЦ,"ТМЦ"); НеНайденаНеобходимаяНоменклатура = НайденнаяСтрокаСНоменклатурой = Неопределено; ПустыеСуммыИКоличествоВСтрокеНоменклатуры = ?(НеНайденаНеобходимаяНоменклатура,Истина,НайденнаяСтрокаСНоменклатурой.Количество=0 И НайденнаяСтрокаСНоменклатурой.Сумма=0);
Если НеНайденНеобходимыйДокумент ИЛИ НеНайденаНеобходимаяНоменклатура ИЛИ ПустыеСуммыИКоличествоВСтрокеНоменклатуры Тогда продолжить; КонецЕсли;
НоваяСтрока = ТБ.Добавить(); ЗаполнитьЗначенияСвойств(НоваяСтрока,СтрокаТаблицы); НоваяСтрока.Документ = СтрокаТаблицы.Док;//--► идиотизм, одни и те же сущности называть по разному, где - то Документ а где - то Док. КонецЦикла;
Для каждого СтрокаТаблицы Из ТБ Цикл Если НЕ ЗначениеЗаполнено(СтрокаТаблицы.Док) Тогда Продолжить; КонецЕсли; Если СтрокаТаблицы.Док.СуммаВключаетНДС = Истина Тогда СтрокаТаблицы.Сумма = СтрокаТаблицы.Сумма-СтрокаТаблицы.СуммаНДС; КонецЕсли; КонецЦикла;
Пользуйтесь рабочим столом, Вкладка Расчет зарплаты -- ► Журнал выплаты зарплаты --► Зарплата к выплате. По интерфейсу : Расчет зарплаты организации --► Расчет зарплаты --► Касса и банк --► Зарплата к выплате
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!