Имя: Пароль:
1C
1C 7.7
v7: контрольГлубиныКредита
,
0 AlaMaRit
 
08.09.15
14:32
*******************************************
Процедура Сформировать()
Спр=СоздатьОбъект("СправочникСонтрагенты");
Дог=СоздатьОбъект ("СправочникДоговоры");
Спр.ВыбратьЭлементы();
Пока Спр=("ПолучитьЭлемент")
Цикл Дог.ИспользоватьВладельца(Спр.ТекущийЭлемент);
Дог.ВыбратьЭлементы();
Пока Дог.ПолучитьЭлемент(1)
Дог.ГлубинаКредита=14;
Дог.Записать()
КонецЦикла

КонецПроцедуры

вот такая процедура, сохраняю, открываю и мне выдаёт такую ошибку:
<<?>>Дог.ГлубинаКредита=14;
{C:\USERS\ADMIN\DESKTOP\123.ERT(10)}: Выражение должно иметь логический тип

что должно стоять вместо знака вопроса?, где я допустил ошибку?, прошу показать наглядно знающих
1 b_ru
 
08.09.15
14:34
Цикл
2 ДенисЧ
 
08.09.15
14:35
Пока Спр=("ПолучитьЭлемент")

Что это такое было?
3 2S
 
08.09.15
14:35
(0) Т9?
4 Ненавижу 1С
 
гуру
08.09.15
14:36
(0) Спр=СоздатьОбъект("СправочникСонтрагенты");

ты пьян?
5 aka AMIGO
 
08.09.15
14:37
(0) Тебе ведь сказали:
1. скобки циклов не закрыты.
2. Обращение к справочникам неправильное
3. Пример цикла получения элементов справочника надо посмотреть в Описании внутреннего языка 1С

ЗЫ. нельзя так неряшливо оформлять код.
6 zhig75
 
08.09.15
14:38
(0) Какой-то рандомный набор циклов с операторами.
7 шаэс
 
08.09.15
14:38
(0) скажите честно, Вы код копировали или набирали по памяти? Там не должно было работать прям с начала
8 Ненавижу 1С
 
гуру
08.09.15
14:39
Пока Спр=("ПолучитьЭлемент")
это ад
9 itlikbez
 
08.09.15
14:40

Пока Спр.ПолучитьЭлемент()=1 Цикл   Дог.ИспользоватьВладельца(Спр.ТекущийЭлемент);
Дог.ВыбратьЭлементы();
Пока Дог.ПолучитьЭлемент()=1 цикл
Дог.ГлубинаКредита=14;
Дог.Записать()
КонецЦикла
КонецЦикла
10 aka AMIGO
 
08.09.15
14:43
Спр=СоздатьОбъект("Справочник.Контрагенты");
    Дог=СоздатьОбъект ("Справочник.Договоры");
    Спр.ВыбратьЭлементы();
    Пока Спр.ПолучитьЭлемент()=1     Цикл
        Дог.ИспользоватьВладельца(Спр.ТекущийЭлемент());
        Дог.ВыбратьЭлементы();
        Пока Дог.ПолучитьЭлемент()=1 Цикл
            Дог.ГлубинаКредита=14;
            Дог.Записать();
        КонецЦикла;
    КонецЦикла;
11 aka AMIGO
 
08.09.15
14:43
(9) :)
12 itlikbez
 
08.09.15
14:47
(11) Ты ему совсем не оставил пространства для развития )))
13 AlaMaRit
 
08.09.15
14:47
спасибо всем, вроде форма открылась, но теперь выдает ошибку Спр=СоздатьОбъект("СправочникКонтрагенты");
{C:\USERS\ADMIN\DESKTOP\123.ERT(3)}: Неудачная попытка создания объекта (СправочникКонтрагенты)
14 aka AMIGO
 
08.09.15
14:48
(13) посмотри внимательно в (10)
15 itlikbez
 
08.09.15
14:48
+(12) А, нет. Все в порядке (13), изв.
16 AlaMaRit
 
08.09.15
14:49
куда посмотреть? 10 - это что?
17 aka AMIGO
 
08.09.15
14:50
(15) продолжает развиваться :)

(16) после "Справочник " должна быть точка.
вот так:
Спр=СоздатьОбъект("Справочник.Контрагенты");

а (10) - это ссылка на пост, поставь мшку на цифру в скобках - увидишь текст поста
18 AlaMaRit
 
08.09.15
14:51
спасибо Амиго
19 aka AMIGO
 
08.09.15
14:53
(18) пожалуйста.. Давай учись, и почитай две желтые книжки - "Описание языка", для начала - "Работа со справочниками"
20 AlaMaRit
 
08.09.15
14:54
вроде сработало, теперь ошибки не выдает, и после нажатия "сформировать" ни чего не происходит, так вроде не должно быть
21 aka AMIGO
 
08.09.15
14:56
(20) теперь надо смотреть в Справочник Договоры, изменился-ли твой КонтрольГлубиныКредита
22 Масянька
 
08.09.15
14:57
(20) Ёлки-моталки! Уже руками давно бы поставил. :)
23 AlaMaRit
 
08.09.15
14:58
Масянаька у мня там 100500 тыщ контрагентов, Амигос, это мне надо выти с конфигуратора и там в предприятии смотреть?
24 aka AMIGO
 
08.09.15
15:00
а "ничего не происходит" потому, что у тебя блок/алгоритм молчаливый, ничего не сообщает.

Например, после
Дог.Записать();

можно поставить:
Сообщить(Дог.КонтрольГлубиныКредита);

Вот и будет обработка с тобой разговаривать :)

(23) из конфигуратора выходить не надо..
Обработку ты должен запускать в 1С:Предприятии, там-же и в справочник договоров смотреть.
25 Масянька
 
08.09.15
15:02
(23) Ну, хозяин барин...
Щас накосячишь на 100500 контрагентов, потом будешь до старости исправлять... Кстати, руками.
26 Масянька
 
08.09.15
15:02
(24) Вам с Ё нужно уже школу открывать :)))))
27 Масянька
 
08.09.15
15:02
(24) Кстати, про архив сказал?
28 aka AMIGO
 
08.09.15
15:03
(26) с Ё мне соревноваться не светит :)
А насчет "школы" - я с 23-х лет преподаватель, так что мне простительно :)
29 aka AMIGO
 
08.09.15
15:04
(27) неа.. я думал, что ты скажешь :)
ЗЫ. лентяй я :)
30 AlaMaRit
 
08.09.15
15:06
Амиго, в условия контрагентов 14 дней не прописались, где я ошибся?
31 itlikbez
 
08.09.15
15:07
(30) Ты не мог ошибиться.
32 AlaMaRit
 
08.09.15
15:09
смог же
33 aka AMIGO
 
08.09.15
15:18
(30) у меня нет в Договорах реквизита ГлубинаКредита.

Он у тебя числовой, или это строка?
34 AlaMaRit
 
08.09.15
15:19
это не в договорах, а в сведениях контрагента
35 aka AMIGO
 
08.09.15
15:20
(34) опаньки.. а ты пытаешься писать в договор..
36 AlaMaRit
 
08.09.15
15:22
мне надо, чтобы у всех контрагентов в условиях было по умолчанию срок кредита 14 дней
37 Масянька
 
08.09.15
15:22
(34) (35) ну, вы, блин, даёте (С) :))))))))))))))))))
38 aka AMIGO
 
08.09.15
15:30
(35) отбой, это у тебя ТиС..

минуту..
39 aka AMIGO
 
08.09.15
15:41
Всё пишет:
http://pics.rsh.ru/img/kr_wdyq2fm9.png

(36) копируй себе код:

    Спр=СоздатьОбъект("Справочник.Контрагенты");
    Дог=СоздатьОбъект ("Справочник.Договоры");
    Спр.ВыбратьЭлементы();
    Пока Спр.ПолучитьЭлемент()=1     Цикл
        
        Если Спр.ЭтоГруппа()=1 Тогда
            Продолжить;
        КонецЕсли;
        
        Дог.ИспользоватьВладельца(Спр.ТекущийЭлемент());
        Сообщить(Спр.ТекущийЭлемент());
        
        Дог.ВыбратьЭлементы();
        
        Пока Дог.ПолучитьЭлемент()=1 Цикл
            Дог.ГлубинаКредита=14;
            
            Дог.Записать();
            Сообщить(Дог.ГлубинаКредита);
            
            //Прервать;
            
        КонецЦикла;
        
        //Прервать;
        
    КонецЦикла;
40 AlaMaRit
 
08.09.15
15:41
что такое ТиС?
41 AlaMaRit
 
08.09.15
15:42
спасибо, а куда его вставить?
42 aka AMIGO
 
08.09.15
15:44
(40) конфигурация такая, Торговля и Склад = ТиС

у тебя под меню есть справа желтый вопросительный знак, нажми на него, узнаешь в чём ты работаешь

(41) погодь, выложу-уж тебе в почтовик обработку :)
43 HawkEye
 
08.09.15
15:58
(0) дарю
    Спр = СоздатьОбъект("Справочник.Договоры");  
    Спр.ВыбратьЭлементы(0);
    Пока Спр.ПолучитьЭлемент() = 1 Цикл
        Спр.ГлубинаКредита = 14;
        Спр.Записать();
    КонецЦикла;
44 aka AMIGO
 
08.09.15
15:59
(43) а как-же трудности? их создавать и преодолевать надо :)
45 Масянька
 
08.09.15
16:00
(43) Ну, и кто ты после этого? :))))))))))))
46 HawkEye
 
08.09.15
16:27
(45) я же не сказал куда это вставлять надо )))
47 AlaMaRit
 
08.09.15
16:27
Обработка это конфигуратор?
48 Масянька
 
08.09.15
16:29
(46) Садист :))))))))
49 AlaMaRit
 
08.09.15
16:32
Масянька это ты мну?
50 Масянька
 
08.09.15
16:33
(49) В скобочках (перед текстом) стоит номер поста, которому отвечают.
51 AlaMaRit
 
08.09.15
16:35
а как это ты выбыраешь?
52 Масянька
 
08.09.15
16:37
(51) Пальцем :))))
Руками пишешь или указателем мышки (компьютерной) кликнуть на номер поста.
53 HawkEye
 
08.09.15
16:37
(51) на клавиатуре есть похожие значки )))
54 AlaMaRit
 
08.09.15
16:38
аааа вот я невнимательный спасибо разобрался,
55 AlaMaRit
 
08.09.15
16:39
(42) красавчик Амигос-Мучачос, все заработало как мне надо, не знаю как тут плюсы ставить, а то поставил бы
56 Масянька
 
08.09.15
16:39
(53) ОФФ Я тут на мобильнике мужа (просто мобильник) тыкала пальцем, чтобы позвонить... Он и доча ржали :))))
57 AlaMaRit
 
08.09.15
16:41
(56) и тебе спасибочки что разбавляла нашу переписку тут
58 aka AMIGO
 
08.09.15
16:44
(56) ладно уж, в ОФФ :) Моя жена носит мобильник в кармане, и, конечно, стукает этим карманом обо всё, и по карману всем.
Вытаскивает: "О! какой-то номер набрался.." Я спрашиваю: "Ну, и ты поговорила?" "Да - говорит - пообщались" :)
59 AlaMaRit
 
08.09.15
16:52
(58) а можно ещё вопросик?
60 Масянька
 
08.09.15
16:52
(59) НЕТ!!!!!!!!!!!
61 AlaMaRit
 
08.09.15
16:53
(60) маленький
62 Chameleon1980
 
08.09.15
20:09
пля. Завтра точно среда?
63 ДенисЧ
 
08.09.15
20:14
(62) Среда это маленькая пятница. Как и вопрос в (61)
64 Chameleon1980
 
08.09.15
20:25
ну судя по предыдущему вопросу и хорошему настроению я бы выслушал ТС
Компьютер — устройство, разработанное для ускорения и автоматизации человеческих ошибок.