Имя: Пароль:
1C
1С v8
Как вывести данные контрагента?
,
0 Самая счастливая
 
03.10.13
09:41
Подскажите пожалуйста, как обратится к справочнику контрагенты к вкладке контакты, хочу в документе акт сверки в макете ,вывести фио руководителя контрагента в печатной форме, как написать код?
1 Нуф-Нуф
 
03.10.13
09:41
без фото не взлетит
2 GROOVY
 
03.10.13
09:44
(0) Намного лучше.

Что за конфигурация. Вангую: контакты хранятся в регистре сведений, нужно к нему запрос построить.
3 andreymongol82
 
03.10.13
09:46
(0) Советую глянуть для начала типовую печатную форму. Ту же ТОРГ12.
4 Самая счастливая
 
03.10.13
09:47
бух корп 8
5 Godofsin
 
03.10.13
09:47
ОбщиеМодули - УправлениеКИ - там есть нужные типовые процедуры и функции
6 Самая счастливая
 
03.10.13
09:54
спасибо
7 Самая счастливая
 
03.10.13
09:55
только я новичек мне не разобраться, напишите код пожалуйста
8 el7cartel
 
03.10.13
09:56
(7) оригинальная просьба...
9 Jonny_Khomich
 
03.10.13
09:56
(7) Давай тут за тебя ЗП ещё будут получать, чтобы было по честному.
10 Wobland
 
03.10.13
10:02
(9) по-честному будет, если ты сам не умеешь з/п получать
11 Godofsin
 
03.10.13
10:24
(7) Ну фотку давай тогда по традиции.
12 Холодильник
 
03.10.13
10:28
..барабанная дробь в ожидании фото
13 чувак
 
03.10.13
10:30
какой то бородатый мужик троллит вас :)
14 Самая счастливая
 
03.10.13
10:48
напишите код пожалуйста
15 Холодильник
 
03.10.13
10:49
(14)

Функция УстановитьСтатус(НовыйСтатус, ДополнительныеПараметры) Экспорт
    
    ЗначениеНовогоСтатуса = Перечисления.СтатусыЗаказовКлиентов[НовыйСтатус];
    
    Если ЗначениеНовогоСтатуса = Перечисления.СтатусыЗаказовКлиентов.НеСогласован Тогда
        
        Если Согласован Тогда
            Согласован = Ложь;
        КонецЕсли;
        
    ИначеЕсли (Статус <> Перечисления.СтатусыЗаказовКлиентов.Закрыт И
        Статус <> Перечисления.СтатусыЗаказовКлиентов.КОбеспечению И
        Статус <> Перечисления.СтатусыЗаказовКлиентов.КОтгрузке И
        (ЗначениеНовогоСтатуса = Перечисления.СтатусыЗаказовКлиентов.КОбеспечению Или // Если статус меняется на "КОбеспечению"
        ЗначениеНовогоСтатуса = Перечисления.СтатусыЗаказовКлиентов.КОтгрузке)) Тогда // или "КОтгрузке"
        
        РассчитатьДатыОтгрузки();
        
    КонецЕсли;
    
    Если ДополнительныеПараметры <> Неопределено Тогда
        ЗначениеПараметра = Неопределено;
        Если ДополнительныеПараметры.Свойство("ОтменаНеотработанныхСтрок", ЗначениеПараметра) Тогда
            
            КоличествоСтрок = ПродажиСервер.ОтменитьНепоставленныеСтроки(
                ЭтотОбъект,
                "Товары",
                ЗначениеПараметра,
                Не (Статус = Перечисления.СтатусыЗаказовКлиентов.НеСогласован
                    Или Статус = Перечисления.СтатусыЗаказовКлиентов.Согласован
                    Или Статус = Перечисления.СтатусыЗаказовКлиентов.КОбеспечению
                )
            );
            Если КоличествоСтрок <> 0 Тогда
                ЗаполнитьЭтапыГрафикаОплаты();
            КонецЕсли;
            
        КонецЕсли;
    КонецЕсли;
    
    Статус = ЗначениеНовогоСтатуса;
    
    Возврат ПроверитьЗаполнение();
    
КонецФункции
16 Sabbath
 
03.10.13
10:55
Самая счастливая и кодишь в 1с, что-то тут не сходится!)
17 Godofsin
 
03.10.13
10:59
(15) ж0сткий троллинг ))))
18 Холодильник
 
03.10.13
11:00
ребята, ну напишите код, пожалуйста
19 Godofsin
 
03.10.13
11:21
Спр = Справочники.КонтактныеЛица.Выбрать(,Владелец);
    Пока спр.Следующий() цикл
        Если Спр.Должность = "Руководитель" тогда
            Сообщить("Епта! Да вот же он!" +Спр.Фамилия+" "Спр.Имя+" "+Спр.Отчество);
        КонецЕсли;
    КонецЦикла;

P.S. Не проверял
20 Godofsin
 
03.10.13
11:21
+(19) Владелец - ссылка на элемент-владелец справочника контрагенты.
Пожалуйста.
21 Самая счастливая
 
03.10.13
12:11
не то)
22 Godofsin
 
03.10.13
12:14
(21) чо значит "не то"?
23 Самая счастливая
 
03.10.13
13:55
спасибо
24 Самая счастливая
 
03.10.13
14:17
как написать условие если организация=Ромашка тогда должность=директор иначе должность = директор филиала
25 Wobland
 
03.10.13
14:18
(24) конецесли;
26 Самая счастливая
 
03.10.13
14:43
не работает(((((
27 catena
 
03.10.13
14:45
(26)Печалька
28 VikingKosmo
 
03.10.13
15:29
(26) Что именно?