Перейти из форума на сайт.

Новости • Файловые архивы
Поиск • Активные темы • Топ лист
Правила • Кто в on-line?
Вход • Забыли пароль? • Первый раз на этом сайте? • Регистрация
Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » 1C Программирование и поддержка

Модерирует : ShIvADeSt

ShIvADeSt (03-04-2009 02:03): Продолжение тут
http://forum.ru-board.com/topic.cgi?forum=33&topic=10256#1 		 Версия для печати • Подписаться • Добавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100

   

ShIvADeSt



Moderator		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Тема для программирования !!!
Это продолжение темы, предыдущие части доступны тут

ПРОГРАММЫ  1С:Предприятие 1C - 1C: Вопросы по конфигурациям
ВАРЕЗНИК   1C:Предприятие 7.7 - 1С:Предприятие v.8.x - 1C Диск ИТС - 1С: Совместимо 8.х
Топик 1C Ebooks
ЗДЕСЬ (обновлено 27.03.2009) - небольшая библиотечка (книги, документация, видео, утилиты) по 1С, финансам, бухучету и т.п.
Все рассортировано по версиям...

Для заблудившихся в трех соснах >>> FAQ по форуму RU.Board
Всего записей: 3956 | Зарегистр. 29-07-2003 | Отправлено: 02:30 06-02-2008 | Исправлено: vkramnik, 21:26 27-03-2009
vaseker



Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
An4eus
Поле агрегатного типа не обнаружено (огр).
Всего записей: 23 | Зарегистр. 10-10-2005 | Отправлено: 05:08 17-12-2008
DARKDEAD

Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Скрин из конфы с планом счетов выложи
Всего записей: 249 | Зарегистр. 04-02-2008 | Отправлено: 09:48 17-12-2008
An4eus



Silver Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
vaseker
тфу ты...

Код:
Ит.ИспользоватьПланСчетов(ПланыСчетов.огр);

и указывается план счетов, как он задан в кофигураторе!

----------
Век живи - век учись!
Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 14:38 17-12-2008
tdr1225



Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
vaseker
Синтаксис:
ИспользоватьПланСчетов(<ПланСчетов>)
Назначение:
Назначить план счетов, по которому будут выдаваться итоги.
Возвращает: значение данной установки до вызова метода.
Параметры:  
<ПланСчетов> - значение типа ''План Счетов''. Если не задан, то установка не меняется.
 
ты указываешь строку
Всего записей: 282 | Зарегистр. 07-12-2005 | Отправлено: 14:41 17-12-2008
macromedia23



Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Кто поможет с ЗиУП.  
Как сделать так что бы в табеле учета рабочего времени, автоматически формировались работники с разным графиком работы.  
на пример: у всех офисных сотрудников рабочая неделя пятидневка по 8 часов, а у сторожей график два через два по 12 часов. Нужно что бы табел учета рабочего времени, сам это формировал, как этого добиться?
Всего записей: 205 | Зарегистр. 18-07-2008 | Отправлено: 16:41 17-12-2008
sokol110973

Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

Цитата:
Кто поможет с ЗиУП.  
Как сделать так что бы в табеле учета рабочего времени, автоматически формировались работники с разным графиком работы.  
на пример: у всех офисных сотрудников рабочая неделя пятидневка по 8 часов, а у сторожей график два через два по 12 часов. Нужно что бы табел учета рабочего времени, сам это формировал, как этого добиться?

 
Меню Предприятие - Графики работы
 
Заводишь сменный график 2 через два, кадровым перемещением (либо документом о приеме на работу) этому сотруднику присваиваешь этот график, и будет тебе счастье  
Всего записей: 6 | Зарегистр. 28-08-2008 | Отправлено: 17:43 17-12-2008
macromedia23



Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
sokol110973
Я все сделал, только вот как было раньше пятидневка так и осталось в табеле, а вот когда нанимаешь нового работника и указываешь сразу нужный график работы то все нормально, по чему так?
Всего записей: 205 | Зарегистр. 18-07-2008 | Отправлено: 10:29 18-12-2008
DARKDEAD

Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
macromedia23
 
sokol110973 Сказал как сделать, кадровое перемещение юзай
Всего записей: 249 | Зарегистр. 04-02-2008 | Отправлено: 12:08 18-12-2008
vaseker



Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
An4eus

Цитата:

Код:
Ит.ИспользоватьПланСчетов(ПланыСчетов.огр);

Спасибо, заработало, но теперь другая проблема - при использовании нового плана счетов осв ничегоо не выдает,тогда как по основному плану все заполняется..
Права пользователей распределены таким образом, что бухгалтер имеет полный доступко всем планам счетов, а новый пользователь имеет доступ для чтения только на новый план.. ни у того,ни у другого пользователя не выводятся итоги по новому плану.. в чем может быть проблема?
Всего записей: 23 | Зарегистр. 10-10-2005 | Отправлено: 19:47 18-12-2008
An4eus



Silver Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
vaseker

Цитата:
An4eus

Цитата:

Код:
Ит.ИспользоватьПланСчетов(ПланыСчетов.огр);

Спасибо, заработало...
ну вот и чудненько!
 

Цитата:
но теперь другая проблема - при использовании нового плана счетов осв ничегоо не выдает,тогда как по основному плану все заполняется..
Права пользователей распределены таким образом, что бухгалтер имеет полный доступко всем планам счетов, а новый пользователь имеет доступ для чтения только на новый план.. ни у того,ни у другого пользователя не выводятся итоги по новому плану.. в чем может быть проблема?

1. Правильно понимаю, что если ОСВ изменить на строчку выше, то всё работает - нужно сделать так, чтоб "бз изменений" всё работало?
2. а как же менеджеры проводят документ по новому плану счетов? что изменялись документы?


----------
Век живи - век учись!
Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 21:33 18-12-2008
vaseker



Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
An4eus, экономист может только просматривать документы, но не по всем счетам, а только по 60, 62 и т.д.
Всего записей: 23 | Зарегистр. 10-10-2005 | Отправлено: 08:56 19-12-2008
butyrinIgor

Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Кто нибудь знает где можно качнуть за 3-й квартал отчетность на 1с 7.7
Всего записей: 1 | Зарегистр. 19-12-2008 | Отправлено: 10:27 19-12-2008
newjon



Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
butyrinIgor
тебе сюда
Всего записей: 395 | Зарегистр. 03-06-2005 | Отправлено: 10:36 19-12-2008
Akam1



Комса		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
butyrinIgor
1C:Предприятие 7.7 + все конфигурации 1С

----------
В правильно поставленном вопросе всегда содержится 50% ответа
Все будет так, как должно быть. Даже если будет иначе.
Всего записей: 26400 | Зарегистр. 20-04-2006 | Отправлено: 10:38 19-12-2008
softechhh

Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
привет! есть такая функция для получения часов участка (самописная конфа) :
 
Функция ПолучитьЧасыУчастка(_участок)
ЗапросТабель = СоздатьОбъект("Запрос");
ТекстЗапроса =  
"//{{ЗАПРОС(Сформировать)
|Период с ВыбНачПериода по ВыбКонПериода;
|Док = Документ.ТабельПоДням.ТекущийДокумент;
|Сотр = Документ.ТабельПоДням.Сотр;
|Группировка Док упорядочить по Док.ДатаДок;
|Группировка СтрокаДокумента;
//|Условие(ПС_ПолучитьПараметр(""Участок"",Сотр)=_участок);
|Условие(Сотр.Участок.Получить(ВыбКонПериода)=_участок);
|"//}}ЗАПРОС
;
// Если ошибка в запросе, то выход из процедуры
Если ЗапросТабель.Выполнить(ТекстЗапроса) = 0 Тогда
Возврат 0;
КонецЕсли;
 
_часы = 0;
Пока ЗапросТабель.Группировка(1) = 1 Цикл
Пока ЗапросТабель.Группировка(2) = 1 Цикл
_док = ЗапросТабель.Док;  
_док.ПолучитьСтрокуПоНомеру(ЗапросТабель.СтрокаДокумента);  
_дней = 31;
Если (ТекущаяДата()>=ВыбНачПериода)и(ТекущаяДата()<=ВыбКонПериода) Тогда
_дней = Мин(ДатаЧисло(ТекущаяДата()),ДатаЧисло(ВыбКонПериода));
КонецЕсли;
Для й=1 По _дней Цикл              
Атрибут = "Д"+?(й<10,"0","")+СокрЛП(Строка(й));
_часы=_часы+?(_док.ПолучитьАтрибут(Атрибут).Значение>0,1,0);
КонецЦикла;
КонецЦикла;
КонецЦикла;  
//Сообщить(_участок);
//Сообщить(_часы);
Возврат _часы;
КонецФункции // ПолучитьЧасыУчастка(Запрос.ЗначениеУпорядочивания(1))
 
нада переделать эту функция для получения дней сотрудника! Нужно поидее условие подправить!!  
Всего записей: 26 | Зарегистр. 19-11-2008 | Отправлено: 11:38 19-12-2008
DARKDEAD

Member		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
softechhh
А если просто добавить перевод часов в дни?
Дни = _час / 24;
 
Если потрудится, можно дробность конкретизировать.
Всего записей: 249 | Зарегистр. 04-02-2008 | Отправлено: 15:45 19-12-2008
softechhh

Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
я немного подкорректировал функцию, она теперь возвращает дни сотрудника, но только одного, т.е. я так понял нету привязки ко всем сотрудникам.
 
данные по сотрудникам и отработанным часам беруться из дока "ТабельПоДням", в нем эта вся инфа есть!! Мне лишь нужно вытащить ее ф-цией , сотрудников с отработанными часами с помощью запроса.
 
Функция   ПолучитьДниУчастка()
    
Дата1 = НачМесяца(ДатаДок);
Дата2 = КонМесяца(ДатаДок);
    
ЗапросТабель = СоздатьОбъект("Запрос");
ТекстЗапроса =  
"//{{ЗАПРОС(Сформировать)
|Период с Дата1 по Дата2;
|Док = Документ.ТабельПоДням.ТекущийДокумент;
|Сотр = Документ.ТабельПоДням.Сотр;
|Группировка Док упорядочить по Док.ДатаДок;
|Группировка Сотр без Групп;
|Группировка СтрокаДокумента;
|Условие(Сотрудник=Сотр);
|"//}}ЗАПРОС
;
// Если ошибка в запросе, то выход из процедуры
Если ЗапросТабель.Выполнить(ТекстЗапроса) = 0 Тогда
    Возврат 0;
КонецЕсли;
    
Пока ЗапросТабель.Группировка(1) = 1 Цикл
    Пока ЗапросТабель.Группировка(2) = 1 Цикл
          Пока ЗапросТабель.Группировка(3) = 1 Цикл
        _док = ЗапросТабель.Док;  
        _док.ПолучитьСтрокуПоНомеру(ЗапросТабель.СтрокаДокумента);  
        _дней = 31;
        Если (ТекущаяДата()>=Дата1)и(ТекущаяДата()<=Дата2) Тогда
        _дней = Мин(ДатаЧисло(ТекущаяДата()),ДатаЧисло(Дата2));
        КонецЕсли;
        день = 0;
        Для й=1 По _дней Цикл    
        Атрибут = "Д"+?(й<10,"0","")+СокрЛП(Строка(й));
        день=день + ?(_док.ПолучитьАтрибут(Атрибут).Значение>0,1,0);
        КонецЦикла;
        КонецЦикла;
    КонецЦикла;  
КонецЦикла;
    Сообщить(день);
    Возврат день;  
КонецФункции
Всего записей: 26 | Зарегистр. 19-11-2008 | Отправлено: 16:04 19-12-2008 | Исправлено: softechhh, 16:09 19-12-2008
An4eus



Silver Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
vaseker
Цитата:
An4eus,  
экономист может только просматривать документы, но не по всем счетам, а только по 60, 62 и т.д.

а ты в курсе, что один план счетов вообще неикак не будет пересикаться с основным! т.е. менеджеры будут вести свою бухгатерию, а другие - свою!
если нужно ограничить просмотр документов, то проще сделать обработку, как журнал, куда будут включаться требуемые документы по фильтру!
 
softechhh
зачём всё это надо?

----------
Век живи - век учись!
Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 13:44 20-12-2008
softechhh

Newbie		Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
softechhh  
зачём всё это надо?
 
 
Это надо чтобы при заполнении другого документа "РасчетЗПДляСборщиков", в поле дни, этой функцией возвращались отработанные дни из док-та "ТабельПоДням", в докуметне табель по дням как раз и проставляються в ручную отработанные дни, т.е. он каждый день ведеться и потом подбиваеться в нем итог, сколько каждый сотрудник отработал дней в месяце
 
Добавлено:
Что не кому помочь???
Всего записей: 26 | Зарегистр. 19-11-2008 | Отправлено: 13:48 20-12-2008 | Исправлено: softechhh, 13:51 20-12-2008
An4eus



Silver Member		Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
softechhh
у тебя нету группировки по номеру строки документа!

Код:
 
|СтрокаДокумента = Документ.ТабельПоДням.ТекущийДокумент.НомерСтроки;
 

 
Добавлено:
и тогда сможешь использовать метод ПолучитьСтрокуПоНомеру(<?>) !

----------
Век живи - век учись!
Всего записей: 3768 | Зарегистр. 23-07-2007 | Отправлено: 19:01 20-12-2008 | Исправлено: An4eus, 20:18 20-12-2008
   

Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100

Компьютерный форум Ru.Board » Компьютеры » Прикладное программирование » 1C Программирование и поддержка
ShIvADeSt (03-04-2009 02:03): Продолжение тут
http://forum.ru-board.com/topic.cgi?forum=33&topic=10256#1


Реклама на форуме Ru.Board.

Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
Modified by Ru.B0ard
© Ru.B0ard 2000-2025

BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

Рейтинг.ru