Имя: Пароль:
1C
Админ
v7: Нет возможности разместить документ после ТА
0 Последняя_
Надежда
 
01.10.10
09:17
Данная теба уже была, но уже находится в архиве.
Помогите, пожалуйста! А то меня 60 человек порвут...
Первый раз с таким сталкиваюсь.
Время сбирают документы получаемые с ftp через спец.обмен. Документов целая туча. Исменять все в ручную - проще застрелиться.
Подскажите чего-нибудь!
1 чувак
 
01.10.10
09:18
Да подвинь ТА и все дела!
2 Последняя_
Надежда
 
01.10.10
09:19
куда подвинуть?
3 Mikeware
 
01.10.10
09:19
А я б посмотрел....
4 Последняя_
Надежда
 
01.10.10
09:19
23:59:59. в завтра?
5 Последняя_
Надежда
 
01.10.10
09:19
ну, я серьезно...
6 filh
 
01.10.10
09:20
Период не открыт?
7 ДенисЧ
 
01.10.10
09:20
Всё, последняя секунда заполнилась. перемещай назад другие документы. Или этот.
8 Последняя_
Надежда
 
01.10.10
09:22
При чем тут период? он открыт с 1.10 по 15.10. Не удается переместить назад документ. тоже самое выдает... а других документов нереально много.
9 ДенисЧ
 
01.10.10
09:23
(8) а других вариантов всё равно нет
10 Ёпрст
 
гуру
01.10.10
09:24
Открой табло и напиши в нём

ПолучитьДатуТА()

ответ сюда.
11 Последняя_
Надежда
 
01.10.10
09:24
а никак нельзя сделать обработку чтобы поменять время документов на время в которое их провели?
12 zak555
 
01.10.10
09:25
(11) можно
13 Последняя_
Надежда
 
01.10.10
09:25
ПолучитьДатуТА() = 01.10.10
14 1Сергей
 
01.10.10
09:25
(11) тут ты червонцем не отделаешься
15 Последняя_
Надежда
 
01.10.10
09:27
млин... мне б до первой зп тут протянуть...
16 Гефест
 
01.10.10
09:27
(11) Ищи обработку на неназываемом сайте
17 ДенисЧ
 
01.10.10
09:27
(15) Придётся самой писать.
Ключевые слова: СделатьНепроведенным(), ПолучитьВремя(), УстановитьВремя, Записать(), Провести()
18 Ёпрст
 
гуру
01.10.10
09:28
(13) а документ последний на какое число ?
А на какое число ты доки свои лепишь ?
19 Последняя_
Надежда
 
01.10.10
09:30
последний док-т 01.10.10 23-59-59
20 Ёпрст
 
гуру
01.10.10
09:31
(19) сдвинь та вперёд на следующий день - сможешь еще х..ву тучу записать 1-го числа в 23-59-59
21 Ёпрст
 
гуру
01.10.10
09:31
+20 но лучше перетасовать доки.
С 23-59-59 есть один неприятный момент - позиция документа с одним временем, а проводки - с другим.
22 Последняя_
Надежда
 
01.10.10
09:35
*пошла сочинять обработку*
23 Ёпрст
 
гуру
01.10.10
09:37
(22) там всего-то пару строк кода.
24 ДенисЧ
 
01.10.10
09:39
(23) ну... Не пару, а штук 6-8... :-)
25 Ёпрст
 
гуру
01.10.10
09:41
(24) ну да.. рублей на 50 ответ был бы..
:)
26 3nt
 
01.10.10
09:42
(16) этот момент упустил
это который ****срат теперь неназываемый?
27 Последняя_
Надежда
 
01.10.10
10:17
ПолучитьВремя()
это откуда его поличить-то?
28 Последняя_
Надежда
 
01.10.10
10:17
получить, т.е.
29 ДенисЧ
 
01.10.10
10:19
(27)
ПолучитьВремя(<?>,,)
Синтаксис:
ПолучитьВремя(<Часы>,<Минуты>,<Секунды>)
Назначение:
Прочитать время документа. Возвращает время документа в переданные для этого переменные <Часы>, <Минуты>, <Секунды>.
Возвращает:
Строковое значение времени записи документа в виде 'ЧЧ.ММ.СС'.
Параметры:
<Часы> - переменная для приема часа записи документа;
<Минуты> - переменная для приема минут записи документа;
<Секунды> - переменная для приема секунд записи документа.
Замечание:
Метод  можно использовать только для объектов, созданных функцией СоздатьОбъект.
30 Последняя_
Надежда
 
01.10.10
10:21
это я тоже знаю где посмотреть. Вопрос в другом - какое время-то оно получит или откуда оно его получит?
31 ДенисЧ
 
01.10.10
10:21
(30) время документа оно получит...
32 Последняя_
Надежда
 
01.10.10
10:22
какое? время его создания или время которое видимое в журнале?
33 ДенисЧ
 
01.10.10
10:24
(32) у документа есть только одно время...
34 Последняя_
Надежда
 
01.10.10
10:27
блин... я запуталась. а можно как-нибудь вытащить время проведения документа? которое можно найти в журнале регистраций?
35 ДенисЧ
 
01.10.10
10:28
(34) Из журнала и вытаскивай...
36 Гефест
 
01.10.10
10:29
(34) Это уже тянет рублей на 300 для Ёпрст3, плюс фотка в купальнике
37 Последняя_
Надежда
 
01.10.10
10:29
мдя...
38 Гефест
 
01.10.10
10:31
нафиг тебе время проведения?
39 Последняя_
Надежда
 
01.10.10
10:33
есть у нас тут одна противная тётечка-бабулечка... с дебильными взглядами на учет... да они еще и ревизию успели подсунуть... вот чтобы ревизию эту не задеть и нужно реальное время.
40 1Сергей
 
01.10.10
10:35
(39) шли её в лес, в честь пятницы
41 miki
 
01.10.10
10:36
(39)Поставь ревизию на 21-00. Остальные, которые после ревизии, переставь чуть позже.
42 Последняя_
Надежда
 
01.10.10
10:38
мне ппц...
43 Последняя_
Надежда
 
01.10.10
10:39
а если всем документам изменить время на 5-6 часов назад ничего не нарушится?
44 Последняя_
Надежда
 
01.10.10
10:39
а то у меня уже реальная паника...
45 1Сергей
 
01.10.10
10:41
(43) зачем 6 часов? там секунды достаточно
46 Последняя_
Надежда
 
01.10.10
10:41
ну так рабочий день в разгаре...
47 miki
 
01.10.10
10:42
(43)Если все - то не изменится.
Вот

   Докер        = CreateObject("Document.<Который нада или фсе>");
   Докер.SetFilter(1,0,1,1,1,1);
   Докер.SelectDocuments(ВыбКонПериода, ВыбКонПериода);
   ВремяЧ    = 22;
   Минуты    = 22;
   Секунды = 22;
   While Докер.GetDocument()=1 Do
       ТекДок    = Докер.CurrentDocument();
       Message(ТекДок);
       Докер.UnPost();
       Докер.SetTime(ВремяЧ,Минуты,Секунды);
       Докер.Write();
       Докер.MakeActions();
       Message(""+ВремяЧ+":"+Минуты+":"+Секунды,"!");
       
       Секунды    = Секунды+1;
       If Секунды%60=0 then
           Минуты    = Минуты+1;
           Секунды    = 0;
       EndIf;
   EndDo;

Переделай как надо. Можешь засунуть и непроведенные.
Как полегчает - полташ вышлешь Ёпрст3
48 Последняя_
Надежда
 
01.10.10
10:53
что-то тут не совмсем то что хочу...
49 miki
 
01.10.10
10:55
(48)можешь GetTime(ВремяЧ,Минуты,Секунды), отнять от часов 5-6 и далее по коду
50 Последняя_
Надежда
 
01.10.10
11:05
Док = СоздатьОбъект("Документ");  
  Док.ВыбратьДокументы(НачДата,КонДата);
  Пока Док.ПолучитьДокумент() = 1 Цикл  
       Если Док.Проведен()=0 Тогда
           Возврат;
       Иначе
       Если Док.Проведен() = 1 Тогда
             Док.СделатьНепроведенным();
         КонецЕсли;      
       ч=0; м=0; с=0;
       Док.ПолучитьВремя(ч,м,с);
         Док.УстановитьВремя(ч-6,м,с)

прокатит?
51 1Сергей
 
01.10.10
11:06
(50) вместо возврат напиши продолжить
52 Гефест
 
01.10.10
11:06
(50) далеко не докатится. только до первого непроведенного документа
53 Последняя_
Надежда
 
01.10.10
11:07
спасибо!
54 Последняя_
Надежда
 
01.10.10
11:07
а ничего если в монопольном режиме выполнять поставлю?
55 Последняя_
Надежда
 
01.10.10
11:20
Процедура Сформировать()
  Док = СоздатьОбъект("Документ");  
 Док.ВыбратьДокументы(НачДата,КонДата);
 
  Пока Док.ПолучитьДокумент() = 1 Цикл  
       Если Док.Проведен()=0 Тогда
           продолжить;
       Иначе
       Если Док.Проведен() = 1 Тогда
             Док.СделатьНепроведенным();
         КонецЕсли;      
       ч=0; м=0; с=0;
       Док.ПолучитьВремя(ч,м,с);
         Док.УстановитьВремя(ч-6,м,с);
         Сообщить(Док +" "+Док.ПолучитьВремя());  // нефига не выводит
         Док.Записать();
         Док.Провести();
     КонецЕсли;
   КонецЦикла;
КонецПроцедуры
56 ДенисЧ
 
01.10.10
11:21
Сообщить("" + Док +" "+Док.ПолучитьВремя());
57 Последняя_
Надежда
 
01.10.10
11:22
поздняк метаться... шпарит уже... но что-то как-то долго... я уже боюсь.
58 Последняя_
Надежда
 
01.10.10
11:23
а сколько по времени оно будет делаться, если там документов около 300 ?
59 Последняя_
Надежда
 
01.10.10
11:24
я успею пообедать? ))))))))))))))