Теми рефератів
> Реферати > Курсові роботи > Звіти з практики > Курсові проекти > Питання та відповіді > Ессе > Доклади > Учбові матеріали > Контрольні роботи > Методички > Лекції > Твори > Підручники > Статті Контакти
Реферати, твори, дипломи, практика » Курсовые обзорные » Автоматизована система обліку ріелтерських операцій

Реферат Автоматизована система обліку ріелтерських операцій





Область.Параметры.АгентПолное = Агент.ПолноеНаіменованіе;

ТабДок.Вивесті (Область);

// Клієнти

Для Кожного ТекСтрокаПокупателі З Покупці Цикл

Область = Макет.ПолучітьОбласть ("Клієнти");

Якщо ТекСтрокаПокупатели.УчастникПокупки.ЮрФизЛицо = Перечисления.ЮрФизЛицо.ФизЛицо Тоді

Область.Параметры.УчастникПокупки =

Інакше Область.Параметры.УчастникПокупки = + ", Представником якого є" +

КонецЕсли;

ТабДок.Вивесті (Область);

КонецЦікла;

// Текст1

Область = Макет.ПолучітьОбласть ("Текст1");

Якщо Операція = Перечисления.Операция.ПокупкаПродажа Тоді

Область.Параметри.Операція = "покупки";

Область.Параметры.Отчуждающего = "відчужує";

Область.Параметры.Продавцами = "Продавцями";

Інакше Область.Параметри.Операція = "оренди";

Область.Параметры.Отчуждающего = "здає в оренду";

Область.Параметры.Продавцами = "Орендодавцями";

КонецЕсли;

Область.Параметри.ВідОН = Предложеніе.ВідОН;

Область.Параметри.Город = Предложение.Город.ТипНаселенногоПункта.Наименование + "" + Предложеніе.Город;

Область.Параметри.Уліца = Предложение.Улица.ТипУлицы.Наименование + "" + Предложеніе.Уліца;

Область.Параметри.Дом = Предложеніе.Дом;

Якщо Предложеніе.Квартіра = "" Тоді

Інакше Область.Параметри.Квартіра = ", кв. "+ Предложеніе.Квартіра;

КонецЕсли;

Область.Параметры.СтоимостьУслуги = СтоімостьУслугі;

ПарПредмета = "рубль, рубля, рублів, м, копійка, копійки, копійок, ж, 2";

Область.Параметры.СтоимостьУслугиПрописью = ЧіслоПропісью (СтоімостьУслугі, "Л = ru_RU", ПарПредмета);

Область.Параметри.Агент = Агент;

Область.Параметры.НаименованиеОрганизации = Константы.НазваниеОрганизации.Получить ();

Область.Параметры.ИННОрганизации = Константи.ІНН.Получіть ();

Область.Параметры.КППОрганизации = Константи.КПП.Получіть ();

Область.Параметры.АдресОрганизации = Константи.Адрес.Получіть ();

Область.Параметры.ТелефоныОрганизации = Константы.Телефоны.Получить ();

Область.Параметры.РасчетныйСчет = Константы.РасчетныйСчет.Получить ();

Область.Параметри.Агент = Агент;

ТабДок.Вивесті (Область);

// Кліенти1


Назад | сторінка 16 з 18 | Наступна сторінка





Схожі реферати:

  • Реферат на тему: Калінінградська область
  • Реферат на тему: Мурманська область у семирічці
  • Реферат на тему: Область застосування напівпровідників
  • Реферат на тему: Наш край: Калінінградська область
  • Реферат на тему: Політологія як область знання