Форум 1С
Форум 1С
Программистам. Бухгалтерам. Администраторам. Пользователям
Задай вопрос - получи решение проблемы. Без троллинга и флуда.
12 Мая 2021, 07:51
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Не получили письмо с кодом активации?
МультиВход
 
collapse

Автор Тема: Помогите плизз новичку!  (Прочитано 2474 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн Sentyabr

  • *
  • Регистрация: 2010-01-17
  • Сообщений: 1
  • РЕПУТАЦИЯ: 0
Работаю в Зарплата и Управление персоналом.На предприятии поставили задачу!
Есть модуль который выгружает данные квартплаты в .dbf
Необходимо найти человека и ввести другую сумму(Документы РазовыеУдержанияРаботниковОрганизаций).И естественно выгрузить его в .dbf
Я создал на диалоговом окне кнопку сохранить и пишу для нее обработку но что то у меня ни чего не склеивается структуру сделал правильно а вот как дальше быть  :( ???
сама обработка:
Цитировать
Процедура СохранитьНажатие(Элемент)
   Путь="C:\test\";
   База=Новый XBase;
   //ТаблЗн=Новый ТаблицаЗначений;
   База.Поля.Добавить("P_Org","S",5);
   База.Поля.Добавить("P_TN","S",6);
   База.Поля.Добавить("P_Fam","S",30);
   База.Поля.Добавить("P_IMY","S",30);
   База.Поля.Добавить("P_OTC","S",30);
   База.Поля.Добавить("ID_LS","S",11);
   База.Поля.Добавить("ITOG","N",9);
   База.Поля.Добавить("PRIZN","S",1);
   База.Поля.Добавить("NEW_ORG","S",5);
   База.СоздатьФайл(Путь+"test.dbf",Путь+"index.cdx");
    База.индексы.Добавить("IDXCODE","CODE");
   
         //Выполняем запрос
   
    Запрос = Новый Запрос;
    Запрос.Текст = "ВЫБРАТЬ
                   |   Организации.Наименование КАК Наименование,
                   |   РегистрацияРазовыхУдержанийРаботниковОрганизаций.Ссылка КАК Ссылка,
                   |   РегистрацияРазовыхУдержанийРаботниковОрганизаций.Дата КАК Дата,
                   |   РегистрацияРазовыхУдержанийРаботниковОрганизаций.Проведен КАК Проведен,
                   |   РегистрацияРазовыхУдержанийРаботниковОрганизаций.Организация КАК Организация
                   |ИЗ
                   |   Документ.РегистрацияРазовыхУдержанийРаботниковОрганизаций КАК РегистрацияРазовыхУдержанийРаботниковОрганизаций
                   |      ЛЕВОЕ СОЕДИНЕНИЕ Справочник.Организации КАК Организации
                   |      ПО РегистрацияРазовыхУдержанийРаботниковОрганизаций.Организация = Организации.Ссылка
                   |
                   |УПОРЯДОЧИТЬ ПО
                   |   Наименование,
                   |   Ссылка,
                   |   Дата,
                   |   Проведен,
                   |   Организация";
   
    Результат = Запрос.Выполнить();
    Выборка = Результат.Выбрать();
   
    Пока Выборка.Следующий() Цикл
   Док=Документы.РегистрацияРазовыхУдержанийРаботниковОрганизаций.Выбрать();
    Док.Организация=Док.Организация;    //Поле Объекта недоступно для записи???   
    Док.Проведен=ТекущаяДата();
   
КонецЦикла ;
      
    База.Записать();
     База.АвтоСохранение = Истина;

        База.ЗакрытьФайл();
              Сообщить("База успешно сохранена");
      
КонецПроцедуры




Теги:
 


* Живое общение

Не устроил ответ?

Зарегистрируйся и задай свой вопрос. Живое общение приносит результат намного быстрее.


Зарегистрироваться

* Реклама

* Поиск

* Последние задачи на разработку (фриланс)

* Последние вакансии

* Том 10 авторов за месяц

Геннадий ОбьГЭС Геннадий ОбьГЭС
67 Сообщений
LexaK
34 Сообщений
kiokiosan
18 Сообщений
alexandr_ll
13 Сообщений
DmitriyF DmitriyF
10 Сообщений
antoneus antoneus
9 Сообщений
Ивашка
9 Сообщений
Мария2021
9 Сообщений
kah
8 Сообщений
alex0402 alex0402
8 Сообщений

* Кто онлайн

  • Точка Гостей: 367
  • Точка Скрытых: 0
  • Точка Пользователей: 2
  • Точка Сейчас на форуме:

* Облако тэгов

* Инструменты

* Дополнительно

Поиск