Имя: Пароль:
1C
1С v8
Помогите переписать код с 7.7 на 8.2
,
0 msk-07
 
16.05.12
13:06
Процедура Сформировать()
   Таб = СоздатьОбъект("Таблица");
   Таб.ИсходнаяТаблица("Сформировать");
   Таб.ВывестиСекцию("Шапка1");
   
   док=СоздатьОбъект("Документ.СчетФактураВыданный");
   док.ВыбратьДокументы(НачДата,КонДата);
   
   
   Пока Док.ПолучитьДокумент()=1 Цикл
       
   ДокОснов=Док.ДокументОснование;
   Если Док.УчитыватьНДС <> 1 Тогда
       
       Таб.ВывестиСекцию("Строка");
   КонецЕсли;
   
   КонецЦикла;
   
   
   Таб.Опции(0,0,0,0);
   Таб.ТолькоПросмотр(1);
   Таб.Показать("Сформировать","");
КонецПроцедуры
1 Андрюха
 
16.05.12
13:06
Какой бюджет?
2 aka AMIGO
 
16.05.12
13:07
(0) а что, в 8.2 уже нет генератора запросов/отчетов?
3 msk-07
 
16.05.12
13:07
Я надеюсь только на помощь. Извините, только начал изучать и работать
4 msk-07
 
16.05.12
13:08
aka AMIGO, честно не знаю, что это
5 Happy Bear
 
16.05.12
13:08
(3) так для начала свой вариант покажи.
6 aka AMIGO
 
16.05.12
13:08
(3)начни с Радченко, а не с мисты
7 Андрюха
 
16.05.12
13:09
Да это ж элементарно, Ватсон. Юзай поиск, если конечно "помогите" <> "сделайте"
8 msk-07
 
16.05.12
13:10
Мне нужна только помощь, весь код почти изменил, только ошибка в Таб.Показать("Сформировать","");
9 aka AMIGO
 
16.05.12
13:13
(8)книг по языку нет под рукой? там есть примеры
10 Rovan
 
гуру
16.05.12
13:13
(8) покажи что получилось
11 Андрюха
 
16.05.12
13:14
Поищи в любой типовой: ПолучитьМакет, ПолучитьОбласть
12 msk-07
 
16.05.12
13:14
Процедура КнопкаВыполнитьНажатие(Кнопка)
   Табл=Новый ТабличныйДокумент;
   Макет = ЭтотОбъект.ПолучитьМакет("Формировать");
   ОбластьШапкаОсновной=Макет.ПолучитьОбласть("Шапка");
   
   Док=Документы.НДС_СчетФактураВыданный;
   Док.Выбрать(НачалоПериода,КонецПериода);

   Пока Док =1 Цикл
       ДокОснов=Док.ДокументОснование;
       Если Док.НДС_СчетФактураПолученный <> 1 Тогда
           Табл.Вывести("Строка");
       КонецЕсли;
   КонецЦикла;
   
   Док.Показать("Сформировать","");  

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

Только не судите строга
13 msk-07
 
16.05.12
13:15
14 Smallrat
 
16.05.12
13:17
Док=Документы.НДС_СчетФактураВыданный;
   Док.Выбрать(НачалоПериода,КонецПериода);

   Пока Док =1 Цикл

Рекомендую от этого отучиться - пользуйте запрос.
15 Азат
 
16.05.12
13:19
(0) давай косарик мне на киви, сделаю за 10 мин)
16 hhhh
 
16.05.12
13:19
(13) и где тут у тебя Таб.Показать() ?? Чего-то темнишь?
17 msk-07
 
16.05.12
13:20
Везет, наверное и я смогу когда нибудь за десять минут писать...Только сейчас уже четыре часа мучаюсь
18 Азат
 
16.05.12
13:20
(17) ну вот, когда-то будешь за это 3 косарика брать с нубов) а пока давай косарик))
19 msk-07
 
16.05.12
13:21
hhhh Предпоследняя строчка Док.Показать("Сформировать","");
20 hhhh
 
16.05.12
13:23
(19) еще раз вопрос: где ту Таб.Показать() ???
21 msk-07
 
16.05.12
13:24
Я не так написал, ошибка {Форма.ОсновнаяФорма.Форма(17)}: Метод объекта не обнаружен (Показать)
   Док.Показать("Сформировать","");
22 GenAcid
 
16.05.12
13:24
(19) а почему Док?
23 msk-07
 
16.05.12
13:25
переменную так назвал  Док=Документы.НДС_СчетФактураВыданный;
24 palpetrovich
 
16.05.12
13:26
(23) правда не врубаешься? кучу намеков уже дали
25 hhhh
 
16.05.12
13:26
(23) переменную ты назвал

Табл=Новый ТабличныйДокумент;

Где ты называл другую переменную?
26 msk-07
 
16.05.12
13:27
Блин...еще больше путаница(((
27 hhhh
 
16.05.12
13:29
(26) ну вот же ты пишешь

        Табл.Вывести("Строка");
 
и эту же строку должен показать.
28 takefive
 
16.05.12
13:30
Попробуй конструктор выходной формы. Сними флаг использовать построитель
29 aka AMIGO
 
16.05.12
13:31
(24) именно не врубается, нет опыта, не знает, как посмотреть..
(23)не годится с этого начинать. Без начальных знаний - то, что ты делаешь - метод научного тыка, авось проскочит..
здесь - не пройдет

(28) подскажи ему путь к построителю.. у меня 87-ки нет..

ЗЫ. ребята, дайте ссылкуТС на первую книгу радченко.. она первая, должна быть где-то в инете..

ЗЗЫ. а то получается: "вы умеете играть на пианино?" - "не знаю.. может и умею, не пробовал.."
30 aka AMIGO
 
16.05.12
13:31
87-ки = 8-ки :)
31 takefive
 
16.05.12
13:33
на форме обработки - Действия/Конструкторы/Конструктор выходной формы...
32 msk-07
 
16.05.12
13:34
hhhh Да, я указываю "Строка" как заголовок в Макете, макет называется "Формировать"
33 saser
 
16.05.12
13:36
34 palpetrovich
 
16.05.12
13:36
(32) не тормози, поменяй
Док.Показать("Сформировать","");  
на
Табл.Показать("Сформировать","");
35 msk-07
 
16.05.12
13:37
saser, я смотрела эту ссылку(((
36 kosts
 
16.05.12
13:37
Сразу учись на запросах делать

пример

Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
              |    ВводИндивидуальныхГрафиковРаботыОрганизации.Ссылка,
              |    ВводИндивидуальныхГрафиковРаботыОрганизации.Номер,
              |    ВводИндивидуальныхГрафиковРаботыОрганизации.Дата
              |ИЗ
              |    Документ.ВводИндивидуальныхГрафиковРаботыОрганизации КАК ВводИндивидуальныхГрафиковРаботыОрганизации
              |ГДЕ
              |    ВводИндивидуальныхГрафиковРаботыОрганизации.Проведен = ИСТИНА
              |    И ВводИндивидуальныхГрафиковРаботыОрганизации.ГодГрафика = &ГодГрафика
              |    И ВводИндивидуальныхГрафиковРаботыОрганизации.Дата МЕЖДУ &ДатаНачала И &ДатаОкончания"
;
Запрос.УстановитьПараметр("ДатаНачала", Дата(2012,1,1));
Запрос.УстановитьПараметр("ДатаОкончания", КонецМесяца(Дата(2012,1,1)));
Запрос.УстановитьПараметр("ГодГрафика", ГодГрафика);

Результат = Запрос.Выполнить();
Выборка = Результат.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);

Пока Выборка.Следующий() Цикл
   
КонецЦикла;
37 palpetrovich
 
16.05.12
13:38
а вообще = тебе для начала сюда http://www.nashe1c.ru/materials-view.jsp?id=46
38 palpetrovich
 
16.05.12
13:39
(35) блин, "смотрела"... смени пол в личке ...ну и фотка - вешь обязательная ;)
39 msk-07
 
16.05.12
13:42
Мне реально только помощь нужна((((( у меня не выходит, а приходится работать
40 msk-07
 
16.05.12
13:46
Теперь ошибок нет...но и результата нет...наверное цикл не работает, вот печаль
41 palpetrovich
 
16.05.12
13:47
(39) ты (34) пробовала?
42 msk-07
 
16.05.12
13:48
да, все норм..теперь только чистую таблицу выводит..а проверки нет(
43 Азат
 
16.05.12
13:48
Процедура Сформировать()
   ТД = Новый ТабличныйДокумент;
   Макет = ПолучитьМакет("Сформировать");
   Обл = Макет.ПолучитьОбласть("Шапка1");
   ТД.Вывести(Обл);

   Выборка = Документы.СчетФактураВыданный.Выбрать(НачДата, КонДата);
   Пока Выборка.Следующий() Цикл
       Если Выборка.УчитыватьНДС Тогда
           Продолжить;
       КонецЕсли;
       Обл = Макет.ПолучитьОбласть("Строка");
       Обл.Параметры.Заполнить(Выборка);    
       Обл.Параметры.Заполнить(Выборка.ДокОснование);    
       ТД.Вывести(Обл);
   КонецЦикла;
   ТД.Показать();
КонецПроцедуры
44 aka AMIGO
 
16.05.12
13:52
(0) вот тут тебе пара книжек в помощь, не поленись почитай

http://depositfiles.com/files/3255827
http://depositfiles.com/files/4713875
45 msk-07
 
16.05.12
13:53
Обязательно!!!! мне нужно научиться..и не выходит, депрессия постоянно
46 msk-07
 
16.05.12
13:53
Элементарного не понимаю
47 Азат
 
16.05.12
13:54
(45) может, пора нанять программиста?
48 msk-07
 
16.05.12
13:55
да, наверное
49 Обработка
 
16.05.12
13:56
зарегился в октябре 11го. С тех аор учишься 1с8? А 1с77 то на сколько знаешь?
50 msk-07
 
16.05.12
13:56
полный ноль
51 Азат
 
16.05.12
13:58
(48) а ты, наверное, генеральный директор молодой динамично развивающейся компании?
52 msk-07
 
16.05.12
13:58
))
53 msk-07
 
16.05.12
13:59
хотелось бы
54 Азат
 
16.05.12
14:00
(53) ну так что, тыщу заплатишь за эту печатку?
55 msk-07
 
16.05.12
14:07
я прошу только помощи((
56 saser
 
16.05.12
14:09
(55) К сожалению Вам помочь так , как Вы хотите очень сложно.
57 msk-07
 
16.05.12
14:10
я скала книги..все буду изучать, так как так тоже не возможно
58 msk-07
 
16.05.12
14:24
Простите..наверное всех достал..но в макете возможно ли такое написание
<Выборка>    <Док.ТекущийДокумент()>    <Док.ТекущийДокумент().НДС_СчетФактураПолученный>

или нет метода Текущий документ
59 salvator
 
16.05.12
14:29
У ТС постоянная смена пола. Непорядок.
60 msk-07
 
16.05.12
14:30
есть немного
61 Азат
 
16.05.12
14:31
(59) голубая луна всему виной, так в поселке говорили
этой странной фигни, этой странной фигни
msk-007 не простили
62 msk-07
 
16.05.12
14:33
кому что важно, кому научиться программировать, кому пол обсуждать...
63 salvator
 
16.05.12
14:34
(62) Тебе уже все разжевали: и ссылки на литературу дали, и код уже целиком написали. А теперь вопрос: чего еще нужно?
64 msk-07
 
16.05.12
14:35
salvator, извини, но мне правда не понятно если такой метод в макетах ТекущийДокумент()...или нет.или это только на 7.7 осталось
65 msk-07
 
16.05.12
14:36
Получается, на форуме не помогаю, а только обсуждаю знания действительно нуждающихся в поддержке. Извините, что время только на меня потратели
66 Has
 
16.05.12
14:37
а поиск в СП отменили?
67 msk-07
 
16.05.12
14:38
Has ??? что за СП
68 salvator
 
16.05.12
14:40
(67) Синтаксис-помощник. Но, чую, он тут не помощник. Только стена и большой разбег.
69 Has
 
16.05.12
14:40
70 msk-07
 
16.05.12
14:41
salvator, грустно и вообще уже жалею, что была заявлена моя тема на этом форуме
71 Error pro
 
16.05.12
14:46
(70) Город какой?
72 msk-07
 
16.05.12
14:48
Подмосковье
73 aka AMIGO
 
16.05.12
14:55
(72) сообщи мэйл. дома найду учебник для начинающих, вышлю тебе.
74 salvator
 
16.05.12
14:58
(64) В макете не надо ничего подобного писать. Просто укажи в нужных ячейках имена (с типом ячейки "Параметр"). И сама процедура:

Процедура Сформировать()
   Таб = Новый ТабличныйДокумент;
   Макет = ПолучитьМакет("Сформировать");
   ОбластьШапка = Макет.ПолучитьОбласть("Шапка1");
   ОбластьСтрока = Макет.ПолучитьОбласть("Строка");
   Таб.Вывести(ОбластьШапка);

   Выборка = Документы.СчетФактураВыданный.Выбрать(НачДата, КонДата);
   Пока Выборка.Следующий() Цикл
       Если Выборка.УчитыватьНДС Тогда
           Продолжить;
       КонецЕсли;
       ОбластьСтрока.Параметры.ИмяПараметраВМакете = Выборка.Ссылка; // далее по аналогии остальные параметры      
       Таб.Вывести(ОбластьСтрока);
   КонецЦикла;
   Таб.Показать();
КонецПроцедуры
75 saser
 
16.05.12
14:58
(65) Вопрос не в помощи , а в желании ТС хоть что-то из рекомендованного почитать и разобраться.
76 msk-07
 
16.05.12
14:59
[email protected] Спасибо, большое!!!! Я правда наелся на помощь и поддержку, у меня не выходит..но я стремлюсь((((
77 MaxxiMiliSanM
 
16.05.12
14:59
СКД
78 MaxxiMiliSanM
 
16.05.12
15:00
ни строчки кода - только запрос нужно написать и настроить
79 aka AMIGO
 
16.05.12
15:01
(76)вот и хорошо, часов в 7 получишь
80 msk-07
 
16.05.12
15:02
Огромное спасибо! Надеюсь все так начинали
81 aka AMIGO
 
16.05.12
21:23
(80)Получил?
82 SnarkHunter
 
16.05.12
21:27
(80)Нет, не все...

Вы подносили нам на блюде
Уже разжеванный гранит.
Все это сердце не забудет,
Но голова не сохранит!

(с)
83 MRAK
 
16.05.12
21:40
(12) книжки сначало почитай. Код совсем не хороший