Имя: Пароль:
1C
1C 7.7
v7: Как сделать чтоб галка по умолчанию не стояла
0 KENT2007
 
19.02.12
16:09
Поступление материалов, в документе СФ стоит галка
1 Amra
 
19.02.12
16:10
посмотри код процедуры приоткрытии, где при создании нового галочка ставится
2 Попытка1С
 
19.02.12
16:11
Какая галка?
3 KENT2007
 
19.02.12
16:16
Если ((ПустоеЗначение(ДатаНомерСчетаФактуры) = 1) и (Выбран() = 1) и (КодВидаПоступления < 5))
   или (((ПустоеЗначение(ДатаСчетаФактуры) = 1) или (ПустоеЗначение(НомерСчетаФактуры) = 1)) и (Выбран() = 1))
    или (КодВидаПоступления = 3) Тогда
       СчетФактураПредъявлен = 0;
       Форма.ДатаНомерСчетаФактуры.Доступность(0);
       Форма.ДатаСчетаФактуры.Доступность(0);
       Форма.НомерСчетаФактуры.Доступность(0);
   Иначе
       СчетФактураПредъявлен = 1;
       Форма.ДатаНомерСчетаФактуры.Доступность(1);
       Форма.ДатаСчетаФактуры.Доступность(1);
       Форма.НомерСчетаФактуры.Доступность(1);
   КонецЕсли;
4 Попытка1С
 
19.02.12
16:17
И что тут тебе не ясно?
5 KENT2007
 
19.02.12
16:18
как сделать чтоб при открытии СчетФактураПредъявлен = 0
6 Amra
 
19.02.12
16:20
(5) Иначе
       СчетФактураПредъявлен = 0;

ПС. Писец...
7 BOZKURT
 
19.02.12
16:22
(6) это нашествие "специалистов" отсюда - http://www.spec8.ru/1c-prog-fast-start
8 KENT2007
 
19.02.12
16:22
я так и делаю все равно не получается
9 Amra
 
19.02.12
16:23
(8) значит срабатывает условие в "если"
10 Amra
 
19.02.12
16:24
(9) тьфу, то есть нет... значит где то еще есть переназначение этого реквизита
11 KENT2007
 
19.02.12
16:27
ну это все будет в процедуре приоткрытии?
12 BOZKURT
 
19.02.12
16:28
(12) подсказываю, в модуле ищи по тексту "СчетФактураПредъявлен" и ответ придет сам..
13 KENT2007
 
19.02.12
16:31
ищу ну что то не находится
14 Amra
 
19.02.12
16:32
(7) Да ТС вроде как не новичек...
15 Amra
 
19.02.12
16:33
(13) В процедуре приоткрытии нет ли вызова процедур первоначального заполнения документа?
16 BOZKURT
 
19.02.12
16:34
(14) он 4 года был ГБ или бизнес держал, теперь решил в 1С уйти, да еще и в 77.. :)
17 KENT2007
 
19.02.12
16:35
Процедура ПриОткрытии()
   
   ПриЗаписиПерепроводить(1);
   глПроверкаРазрешенияРедактирования(Контекст);
   Если Форма.ТолькоПросмотр() = 1 Тогда
       Форма.КнопкаОК.Доступность(0);
       Форма.КнопкаПодбор.Доступность(0);
       Форма.КнопкаОчистить.Доступность(0);
       Форма.КнопкаЗаписать.Доступность(0);
   КонецЕсли;
   Если ВидПоступления > 10 Тогда
       СписокВидовПоступления.ДобавитьЗначение(11, "Поступление от поставщика");
       СписокВидовПоступления.ДобавитьЗначение(12, "Возврат ранее отгруженных (сч. 45)");
       СписокВидовПоступления.ДобавитьЗначение(13, "Возврат от покупателя");
       СписокВидовПоступления.ТекущаяСтрока(ВидПоступления - 10);
       КодВидаПоступления = ПолучитьКодВидаПоступления();
   Иначе
       СписокВидовПоступления.ДобавитьЗначение(1, "От поставщика на оптовый склад");
       СписокВидовПоступления.ДобавитьЗначение(2, "От поставщика в розничную продажу");
       СписокВидовПоступления.ДобавитьЗначение(3, "Возврат ранее отгруженных (сч. 45)");
       СписокВидовПоступления.ДобавитьЗначение(4, "Возврат от покупателя на опт. склад");
       СписокВидовПоступления.ДобавитьЗначение(5, "Возврат от покупателя в розн. продажу");
       СписокВидовПоступления.ТекущаяСтрока(ВидПоступления);
       КодВидаПоступления = ВидПоступления;
   КонецЕсли;

   Если ((ПустоеЗначение(ДатаНомерСчетаФактуры) = 1) и (Выбран() = 1) и (КодВидаПоступления < 5))
   или (((ПустоеЗначение(ДатаСчетаФактуры) = 1) или (ПустоеЗначение(НомерСчетаФактуры) = 1)) и (Выбран() = 1))
    или (КодВидаПоступления = 3) Тогда
       СчетФактураПредъявлен = 0;
       Форма.ДатаНомерСчетаФактуры.Доступность(0);
       Форма.ДатаСчетаФактуры.Доступность(0);
       Форма.НомерСчетаФактуры.Доступность(0);
   Иначе
       СчетФактураПредъявлен = 0;
       Форма.ДатаНомерСчетаФактуры.Доступность(1);
       Форма.ДатаСчетаФактуры.Доступность(1);
       Форма.НомерСчетаФактуры.Доступность(0);
   КонецЕсли;
   
   Форма.Товар.ВыполнятьФормулуТолькоПриИзменении(1);
   Форма.Количество.ВыполнятьФормулуТолькоПриИзменении(1);
   Форма.Цена.ВыполнятьФормулуТолькоПриИзменении(1);
   Форма.Сумма.ВыполнятьФормулуТолькоПриИзменении(1);
   Форма.НДС.ВыполнятьФормулуТолькоПриИзменении(1);
   Форма.НП.ВыполнятьФормулуТолькоПриИзменении(1);
   Форма.Всего.ВыполнятьФормулуТолькоПриИзменении(1);
   Форма.Стоимость.ВыполнятьФормулуТолькоПриИзменении(1);
   Форма.ВсегоСтоимость.ВыполнятьФормулуТолькоПриИзменении(1);

   ВариантЗачетаАванса.ДобавитьЗначение(1, "не зачитывать");
   ВариантЗачетаАванса.ДобавитьЗначение(2, "только по договору");
   ВариантЗачетаАванса.ДобавитьЗначение(0, "без указания договора");
   ВариантЗачетаАванса.ТекущаяСтрока(ВариантЗачетаАванса.НайтиЗначение(ЗачитыватьАванс));

   Форма.НДС.Видимость(глПризнакУчетаНалога(Контекст, "НДС"));
   Форма.НП.Видимость(глПризнакУчетаНалога(Контекст, "НП"));
   
   Форма.Кн_Видеокурс.Видимость(?(ТипЗначения(Видео_Компонента) = 0, 0, 1));
   
   НачальнаяДатаДокумента = ДатаДок;
   
   ПриВыбореВидаПоступления(1);
   УправлениеВидимостьюГТД(1);
   
   ТекДоговор = Договор;
   
   СписокВариантовОтраженияВозврата.ТекущаяСтрока(СписокВариантовОтраженияВозврата.НайтиЗначение(ВариантОтраженияВозврата));    
   
КонецПроцедуры // ПриОткрытии()
18 KENT2007
 
19.02.12
16:35
в том то и дело 77 тяжко дается
19 Cthulhu
 
19.02.12
16:37
(18): ну и не лезь...
20 Попытка1С
 
19.02.12
16:37
Чего вы ищете, автор уже все нашел. Все же есть в (3). Автор пойми что у тебя в (3).
21 KENT2007
 
19.02.12
16:41
все 1 исправил на 0 а птица не менеятся
22 Попытка1С
 
19.02.12
16:43
(21) Отладчик тебе в руки.
23 МастерВопросов
 
19.02.12
16:48
" KENT2007
3 - 19.02.12 - 16:16        Если ((ПустоеЗначение(ДатаНомерСчетаФактуры) = 1) и (Выбран() = 1) и (КодВидаПоступления < 5))
   или (((ПустоеЗначение(ДатаСчетаФактуры) = 1) или (ПустоеЗначение(НомерСчетаФактуры) = 1)) и (Выбран() = 1))
    или (КодВидаПоступления = 3) Тогда"


Условие жесть! Как бедная адинэс в этом разбирается :-)
24 BOZKURT
 
19.02.12
16:51
(23) и/или/может быть - видно очень не уверенный в себе человек писал..
25 KENT2007
 
19.02.12
16:51
всем спасибо в воскр лучше не работать, открывал поступление материалов. правил поступление товаров. 8ка рулит
26 МастерВопросов
 
19.02.12
16:53
+(23) в случае " (ПустоеЗначение(ДатаСчетаФактуры) = 1)" условие будет "Истина" несмотря на остальную писанину
27 МастерВопросов
 
19.02.12
16:57
(25) епт, что с парнем?
28 МастерВопросов
 
19.02.12
16:59
+(27) срочно бухать/спать!
29 BOZKURT
 
19.02.12
16:59
(27) он же сказал, воскресенье..
не все ведь по пятницам пьют..))
30 Amra
 
19.02.12
17:14
(29) Да-да, "в пятницу я в гомно, но в понедельник я как огурец" )))
AdBlock убивает бесплатный контент. 1Сергей