Имя: Пароль:
1C
1С v8
 не идет на печать ☑
0 irbekk
 
17.07.13
✎
12:35
Добрый день всем!!! Хэлп плиз!!!
Функция ПечатьАктаОбОказанииУслуг()

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

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

   СтруктурнаяЕдиницаОрганизация = ОбщегоНазначения.ПолучитьСтруктурнуюЕдиницу(Шапка.Организация, Шапка.СтруктурноеПодразделение);

   ТабДокумент = Новый ТабличныйДокумент;
   ТабДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_АктОбОказанииПроизводственныхУслуг_Акт";
   Макет       = ПолучитьМакет("Акт");

   ОбластьМакета = Макет.ПолучитьОбласть("Заголовок");
   ОбластьМакета.Параметры.ТекстЗаголовка = РаботаСДиалогами.СформироватьЗаголовокДокумента(ЭтотОбъект, "", глСписокПрефиксовУзлов, Истина);
   ТабДокумент.Вывести(ОбластьМакета);

   ОбластьМакета = Макет.ПолучитьОбласть("Поставщик");
   ПредставлениеПоставщика = ОбщегоНазначения.ОписаниеОрганизации(ОбщегоНазначения.СведенияОЮрФизЛице(СтруктурнаяЕдиницаОрганизация, Шапка.Дата), "ПолноеНаименование,");
   ОбластьМакета.Параметры.ПредставлениеПоставщика = ПредставлениеПоставщика;
   ОбластьМакета.Параметры.Поставщик = СтруктурнаяЕдиницаОрганизация;
   ТабДокумент.Вывести(ОбластьМакета);

   ОбластьМакета = Макет.ПолучитьОбласть("Покупатель");
   ПредставлениеПолучателя = ОбщегоНазначения.ОписаниеОрганизации(ОбщегоНазначения.СведенияОЮрФизЛице(Шапка.Получатель, Шапка.Дата), "ПолноеНаименование,");
   ОбластьМакета.Параметры.ПредставлениеПолучателя = ПредставлениеПолучателя;
   ОбластьМакета.Параметры.Получатель = Шапка.Получатель;
   ТабДокумент.Вывести(ОбластьМакета);

   Если ЗначениеЗаполнено(Шапка.Основание) Тогда
       ОбластьМакета = Макет.ПолучитьОбласть("Основание");
       ОбластьМакета.Параметры.Заполнить(Шапка);
       ТабДокумент.Вывести(ОбластьМакета);
   КонецЕсли;

   // Вывести табличную часть
   ОбластьМакета = Макет.ПолучитьОбласть("ШапкаТаблицы");
   ОбластьСтроки = Макет.ПолучитьОбласть("Строка");

   ТабДокумент.Вывести(ОбластьМакета);
   НомерСтроки = 0;

   Для Каждого СтрокаТабличнойЧасти Из ТаблицаУслуги Цикл    

       НомерСтроки = НомерСтроки + 1;
       
       ОбластьСтроки.Параметры.Заполнить(СтрокаТабличнойЧасти);
       ОбластьСтроки.Параметры.НомерСтроки = НомерСтроки;
       ОбластьСтроки.Параметры.Товар        = СокрЛП(СтрокаТабличнойЧасти.Товар);

       ТабДокумент.Вывести(ОбластьСтроки);

   КонецЦикла;

   Если ТаблицаУслуги <> Неопределено Тогда

       Сумма    = ТаблицаУслуги.Итог("Сумма");
       СуммаНДС = ТаблицаУслуги.Итог("СуммаНДС");

   Иначе

       Сумма    = 0;
       СуммаНДС = 0;

   КонецЕсли;

   ОбластьМакета = Макет.ПолучитьОбласть("Итого");
   ОбластьМакета.Параметры.Всего = ОбщегоНазначения.ФорматСумм(Сумма);
   ТабДокумент.Вывести(ОбластьМакета);

   Если Шапка.УчитыватьНДС Тогда

       ОбластьМакета = Макет.ПолучитьОбласть("ИтогоНДС");
       
       Если НЕ (СуммаНДС = 0) Тогда
           ОбластьМакета.Параметры.ВсегоНДС = ОбщегоНазначения.ФорматСумм(СуммаНДС);
           ОбластьМакета.Параметры.НДС      = ?(Шапка.СуммаВключаетНДС, "В том числе НДС", " Сумма НДС");
       Иначе
           ОбластьМакета.Параметры.НДС      = "Без налога (НДС)";
           ОбластьМакета.Параметры.ВсегоНДС = "-";
       КонецЕсли;
       
   
       ТабДокумент.Вывести(ОбластьМакета);

   КонецЕсли;

   СуммаКПрописи = Сумма + ?(Шапка.СуммаВключаетНДС, 0, СуммаНДС);
   ОбластьМакета = Макет.ПолучитьОбласть("СуммаПрописью");
   ОбластьМакета.Параметры.ИтоговаяСтрока ="Всего оказано услуг " + НомерСтроки
                                          + ", на сумму " + ОбщегоНазначения.ФорматСумм(СуммаКПрописи, Шапка.ВалютаДокумента);
   ОбластьМакета.Параметры.СуммаПрописью  = ОбщегоНазначения.СформироватьСуммуПрописью(СуммаКПрописи, Шапка.ВалютаДокумента);
   ТабДокумент.Вывести(ОбластьМакета);

   ОбластьМакета = Макет.ПолучитьОбласть("Подписи");
   Если СсылкаНаОбъект.БанковскийСчетОрганизации.Пустая() Тогда    
       СведенияОбОрганизации = ОбщегоНазначения.СведенияОЮрФизЛице(СтруктурнаяЕдиницаОрганизация, Шапка.Дата);
   Иначе
       СведенияОбОрганизации = ОбщегоНазначения.СведенияОЮрФизЛице(СтруктурнаяЕдиницаОрганизация, Шапка.Дата, ,СсылкаНаОбъект.БанковскийСчетОрганизации);
   КонецЕсли;    
   
   ОбластьМакета.Параметры.Организация                      = СведенияОбОрганизации.ПолноеНаименование;
   ОбластьМакета.Параметры.ПредставлениеРНН_БИНОрганизации = ОбщегоНазначения.ПолучитьРегистрационныйНомерОрганизацииКонтрагентаВПечатнуюФорму(СведенияОбОрганизации, Шапка.Дата);
   ОбластьМакета.Параметры.АдресОрганизации                = СведенияОбОрганизации.ЮридическийАдрес;
   ОбластьМакета.Параметры.РасчетныйСчетОрганизации        = "" + СведенияОбОрганизации.НомерСчета + " в " + СведенияОбОрганизации.Банк + " ,"
   + СведенияОбОрганизации.АдресБанка;
   
   ОбластьМакета.Параметры.БИКОрганизации                  = СведенияОбОрганизации.БИК;                                                    
   ОбластьМакета.Параметры.ДолжностьОтветственного          = Шапка.ДолжностьОтветственного;
   ОбластьМакета.Параметры.ФИООтветственного                = Шапка.ФИООтветственного;

   СведенияОПокупателе = ОбщегоНазначения.СведенияОЮрФизЛице(Шапка.Получатель, Шапка.Дата);
   ОбластьМакета.Параметры.Контрагент                      = СведенияОПокупателе.ПолноеНаименование;
   ОбластьМакета.Параметры.ПредставлениеРНН_БИНКонтрагента = ОбщегоНазначения.ПолучитьРегистрационныйНомерОрганизацииКонтрагентаВПечатнуюФорму(СведенияОПокупателе, Шапка.Дата);
   ОбластьМакета.Параметры.АдресКонтрагента                = СведенияОПокупателе.ЮридическийАдрес;
   ОбластьМакета.Параметры.РасчетныйСчетКонтрагента        = "" + СведенияОПокупателе.НомерСчета + " в " + СведенияОПокупателе.Банк + " ,"
                                                           + СведенияОПокупателе.АдресБанка;
                                                   
     ОбластьМакета.Параметры.БИККонтрагента                  = СведенияОПокупателе.БИК;    

   ТабДокумент.Вывести(ОбластьМакета);

   Возврат ТабДокумент;

КонецФункции
1 Wobland
 
17.07.13
✎
12:35
что это?
2 irbekk
 
17.07.13
✎
12:40
часть кривого кода,где проблема? хз
3 irbekk
 
17.07.13
✎
12:43
(акт об оказании услуг) вот полный
4 Wobland
 
17.07.13
✎
12:43
(2) а вдруг код не крив? вдруг нет проблемы?
5 irbekk
 
17.07.13
✎
12:48
скинул скриншот
6 Wobland
 
17.07.13
✎
12:49
(5) впечатляет
7 irbekk
 
17.07.13
✎
12:55
Извиняюсь!Вы если знайте где ошибка(в коде) напишите,а если нет то свободны...
8 Grobik
 
17.07.13
✎
12:55
Смахивает на АктОбОказанииПроизводственныхУслуг из УТП явно не Украинской. Не удивлюсь если ТС это в ВПФ скопипастил.
9 Wobland
 
17.07.13
✎
12:56
(7) мне лениво портянку эту читать. а ты намёк не понял? определи сам узкое место, ошибку покажи. на худой конец скриншот
10 irbekk
 
17.07.13
✎
13:00
Да так и сделал),обрезал где надо и слепил внешншку. Конфа: типовая для Казахстана. вот полный код

Функция ПечатьАктаОбОказанииУслуг()

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

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

   СтруктурнаяЕдиницаОрганизация = ОбщегоНазначения.ПолучитьСтруктурнуюЕдиницу(Шапка.Организация, Шапка.СтруктурноеПодразделение);

   ТабДокумент = Новый ТабличныйДокумент;
   ТабДокумент.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_АктОбОказанииПроизводственныхУслуг_Акт";
   Макет       = ПолучитьМакет("Акт");

   ОбластьМакета = Макет.ПолучитьОбласть("Заголовок");
   ОбластьМакета.Параметры.ТекстЗаголовка = РаботаСДиалогами.СформироватьЗаголовокДокумента(ЭтотОбъект, "", глСписокПрефиксовУзлов, Истина);
   ТабДокумент.Вывести(ОбластьМакета);

   ОбластьМакета = Макет.ПолучитьОбласть("Поставщик");
   ПредставлениеПоставщика = ОбщегоНазначения.ОписаниеОрганизации(ОбщегоНазначения.СведенияОЮрФизЛице(СтруктурнаяЕдиницаОрганизация, Шапка.Дата), "ПолноеНаименование,");
   ОбластьМакета.Параметры.ПредставлениеПоставщика = ПредставлениеПоставщика;
   ОбластьМакета.Параметры.Поставщик = СтруктурнаяЕдиницаОрганизация;
   ТабДокумент.Вывести(ОбластьМакета);

   ОбластьМакета = Макет.ПолучитьОбласть("Покупатель");
   ПредставлениеПолучателя = ОбщегоНазначения.ОписаниеОрганизации(ОбщегоНазначения.СведенияОЮрФизЛице(Шапка.Получатель, Шапка.Дата), "ПолноеНаименование,");
   ОбластьМакета.Параметры.ПредставлениеПолучателя = ПредставлениеПолучателя;
   ОбластьМакета.Параметры.Получатель = Шапка.Получатель;
   ТабДокумент.Вывести(ОбластьМакета);

   Если ЗначениеЗаполнено(Шапка.Основание) Тогда
       ОбластьМакета = Макет.ПолучитьОбласть("Основание");
       ОбластьМакета.Параметры.Заполнить(Шапка);
       ТабДокумент.Вывести(ОбластьМакета);
   КонецЕсли;
// Вывести табличную часть
   ОбластьМакета = Макет.ПолучитьОбласть("ШапкаТаблицы");
   ОбластьСтроки = Макет.ПолучитьОбласть("Строка");

   ТабДокумент.Вывести(ОбластьМакета);
   НомерСтроки = 0;

   Для Каждого СтрокаТабличнойЧасти Из ТаблицаУслуги Цикл    

       НомерСтроки = НомерСтроки + 1;
       
       ОбластьСтроки.Параметры.Заполнить(СтрокаТабличнойЧасти);
       ОбластьСтроки.Параметры.НомерСтроки = НомерСтроки;
       ОбластьСтроки.Параметры.Товар        = СокрЛП(СтрокаТабличнойЧасти.Товар);

       ТабДокумент.Вывести(ОбластьСтроки);

   КонецЦикла;

   Если ТаблицаУслуги <> Неопределено Тогда

       Сумма    = ТаблицаУслуги.Итог("Сумма");
       СуммаНДС = ТаблицаУслуги.Итог("СуммаНДС");

   Иначе

       Сумма    = 0;
       СуммаНДС = 0;

   КонецЕсли;

   ОбластьМакета = Макет.ПолучитьОбласть("Итого");
   ОбластьМакета.Параметры.Всего = ОбщегоНазначения.ФорматСумм(Сумма);
   ТабДокумент.Вывести(ОбластьМакета);

   Если Шапка.УчитыватьНДС Тогда

       ОбластьМакета = Макет.ПолучитьОбласть("ИтогоНДС");
       
       Если НЕ (СуммаНДС = 0) Тогда
           ОбластьМакета.Параметры.ВсегоНДС = ОбщегоНазначения.ФорматСумм(СуммаНДС);
           ОбластьМакета.Параметры.НДС      = ?(Шапка.СуммаВключаетНДС, "В том числе НДС", " Сумма НДС");
       Иначе
           ОбластьМакета.Параметры.НДС      = "Без налога (НДС)";
           ОбластьМакета.Параметры.ВсегоНДС = "-";
       КонецЕсли;
       
   
       ТабДокумент.Вывести(ОбластьМакета);

   КонецЕсли;

   СуммаКПрописи = Сумма + ?(Шапка.СуммаВключаетНДС, 0, СуммаНДС);
   ОбластьМакета = Макет.ПолучитьОбласть("СуммаПрописью");
   ОбластьМакета.Параметры.ИтоговаяСтрока ="Всего оказано услуг " + НомерСтроки
                                          + ", на сумму " + ОбщегоНазначения.ФорматСумм(СуммаКПрописи, Шапка.ВалютаДокумента);
   ОбластьМакета.Параметры.СуммаПрописью  = ОбщегоНазначения.СформироватьСуммуПрописью(СуммаКПрописи, Шапка.ВалютаДокумента);
   ТабДокумент.Вывести(ОбластьМакета);

   ОбластьМакета = Макет.ПолучитьОбласть("Подписи");
   Если СсылкаНаОбъект.БанковскийСчетОрганизации.Пустая() Тогда    
       СведенияОбОрганизации = ОбщегоНазначения.СведенияОЮрФизЛице(СтруктурнаяЕдиницаОрганизация, Шапка.Дата);
   Иначе
       СведенияОбОрганизации = ОбщегоНазначения.СведенияОЮрФизЛице(СтруктурнаяЕдиницаОрганизация, Шапка.Дата, ,СсылкаНаОбъект.БанковскийСчетОрганизации);
   КонецЕсли;    
   
   ОбластьМакета.Параметры.Организация                      = СведенияОбОрганизации.ПолноеНаименование;
   ОбластьМакета.Параметры.ПредставлениеРНН_БИНОрганизации = ОбщегоНазначения.ПолучитьРегистрационныйНомерОрганизацииКонтрагентаВПечатнуюФорму(СведенияОбОрганизации, Шапка.Дата);
   ОбластьМакета.Параметры.АдресОрганизации                = СведенияОбОрганизации.ЮридическийАдрес;
   ОбластьМакета.Параметры.РасчетныйСчетОрганизации        = "" + СведенияОбОрганизации.НомерСчета + " в " + СведенияОбОрганизации.Банк + " ,"
   + СведенияОбОрганизации.АдресБанка;
   
   ОбластьМакета.Параметры.БИКОрганизации                  = СведенияОбОрганизации.БИК;                                                    
   ОбластьМакета.Параметры.ДолжностьОтветственного          = Шапка.ДолжностьОтветственного;
   ОбластьМакета.Параметры.ФИООтветственного                = Шапка.ФИООтветственного;

   СведенияОПокупателе = ОбщегоНазначения.СведенияОЮрФизЛице(Шапка.Получатель, Шапка.Дата);
   ОбластьМакета.Параметры.Контрагент                      = СведенияОПокупателе.ПолноеНаименование;
   ОбластьМакета.Параметры.ПредставлениеРНН_БИНКонтрагента = ОбщегоНазначения.ПолучитьРегистрационныйНомерОрганизацииКонтрагентаВПечатнуюФорму(СведенияОПокупателе, Шапка.Дата);
   ОбластьМакета.Параметры.АдресКонтрагента                = СведенияОПокупателе.ЮридическийАдрес;
   ОбластьМакета.Параметры.РасчетныйСчетКонтрагента        = "" + СведенияОПокупателе.НомерСчета + " в " + СведенияОПокупателе.Банк + " ,"
                                                           + СведенияОПокупателе.АдресБанка;
                                                   
     ОбластьМакета.Параметры.БИККонтрагента                  = СведенияОПокупателе.БИК;    

   ТабДокумент.Вывести(ОбластьМакета);

   Возврат ТабДокумент;

КонецФункции


Функция Печать() Экспорт
   

   
   // Получить экземпляр документа на печать        
   ТабДокумент = ПечатьАктаОбОказанииУслуг();
   
   
   УниверсальныеМеханизмы.НапечататьДокумент(ТабДокумент,1, Ложь, РаботаСДиалогами.СформироватьЗаголовокДокумента(СсылкаНаОбъект), СсылкаНаОбъект);

КонецФункции // Печать
11 Lionee
 
17.07.13
✎
13:22
опять портянки , и где ошибка ?
12 1Сергей
 
17.07.13
✎
13:25
Текст, блин, ошибки покажи
13 Wobland
 
17.07.13
✎
13:26
(11) (12) а она есть?
14 1Сергей
 
17.07.13
✎
13:28
(13) намекаешь на то, что они забыли купить принтер?
15 Wobland
 
17.07.13
✎
13:29
(14) как вариант. среди прочих: не включили, не установили
16 Lionee
 
17.07.13
✎
13:45
(15) а сам в (9) что писал ?
или уже распечатал и нашел ?
17 Grobik
 
17.07.13
✎
13:49
Угадал таки. Начни отсюда http://www.uasoft.com.ua/content/articles/315/

Обрати внимание где у тебя определяются ЭтотОбъект и СсылкаНаОбъект
18 Wobland
 
17.07.13
✎
16:29
(16) в (9) я писал про намёк о недостаточности входных данных
19 Wobland
 
17.07.13
✎
18:59
забавно. у товарища поле объекта не обнаружено, а он молчит, как партизан.
//на почту мне скрин прислал - (5)
20 irbekk
 
18.07.13
✎
14:06
Спасибо всеммм! Разобрался,убил код и заново все написал!
21 EvgeniuXP
 
18.07.13
✎
14:08
(7) и зачем так грубо?
Проблемы невозможно решaть нa том же уровне компетентности, нa котором они возникaют. Альберт Эйнштейн