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

Реферат Модернізація автоматизованої інформаційної системи обліку товару





">laquo;([ЧислоРабочихДнейМежду(ДатаНачала,ДатаКонца)] раб. дн.). );

ТекстЗапроса=

"//{{ЗАПИТ (Сформувати)

Період з ДатаНачала по ДатаКонца;

Номенклатура=Регістр.Продажі.Номенклатура,

Регістр.Остаткі.Товар;

КолПродажі=Регістр.Продажі.Колічество;

КолОстаткі=Регістр.Остаткі.Колічество;

Функція Продано=Сума (КолПродажі);

Функція НачОст=НачОст (КолОстаткі);

Функція КонОст=КонОст (КолОстаткі);

Функція Прихід=Прихід (КолОстаткі);

//Функція Витрата=Витрата (КолОстаткі);

Угрупування Номенклатура без груп;

Угрупування Документ;

" //}} ЗАПИТ

;

НетОш=1;// Немає помилок при накладенні фільтрів

НетОш=НетОш * глФільтрПоПеременнойЗапроса (ТабліцаМФ,

Номенклатура , ВибТМЦ, ВибТМЦ raquo ;,

ТекстЗапроса,Загол,laquo;СвойстваНоменклатурыraquo;);

//НетОш=НетОш * глФільтрПоПеременнойЗапроса (ТабліцаМФ,

Постачальник , ВибПоставщік, ВибПоставщік raquo ;, ТекстЗапроса, , );


Якщо НетОш=0 Тоді

Повернення;

КонецЕсли;

//Якщо помилка в запиті, то вихід з процедури

Якщо Запрос.Виполніть (ТекстЗапроса)=0 Тоді

Повернення;

КонецЕсли;


Запрос2=СоздатьОб'ект ( Запит );

заголов= raquo ;;

ЗаголУсловія=Шаблон ( За період з [ДатаНачала] по [ДатаКонца] +

laquo;([ЧислоРабочихДнейМежду(ДатаНачала,ДатаКонца)] раб. дн.). );


ТекстЗапроса2=

"//{{ЗАПИТ (Сформувати)

Період з ДатаНачала по ДатаКонца;

Номенклатура=Регістр.Продажі.Номенклатура,

Регістр.Остаткі.Товар;

Постачальник=Регістр.Продажі.Поставщік,

Регістр.Остаткі.ПріхДок.Агент;

КолПродажі=Регістр.Продажі.Колічество;

КолОстаткі=Регістр.Остаткі.Колічество;

Функція Продано=Сума (КолПродажі);

Функція НачОст=НачОст (КолОстаткі);

Функція КонОст=КонОст (КолОстаткі);

Функція Прихід=Прихід (КолОстаткі);

Угрупування Номенклатура без груп;

//Угруповання Документ;

|" //}} ЗАПИТ

;

НетОш=1;// Немає помилок при накладенні фільтрів

НетОш=НетОш * глФільтрПоПеременнойЗапроса (ТабліцаМФ,

Номенклатура , ВибТМЦ, ВибТМЦ raquo ;,

ТекстЗапроса2,Загол,laquo;СвойстваНоменклатурыraquo;);

НетОш=НетОш * глФільтрПоПеременнойЗапроса (ТабліцаМФ,

Постачальник , ВибПоставщік, ВибПоставщік raquo ;, ТекстЗапроса2, , );


Якщо НетОш=0 Тоді

Повернення;

КонецЕсли;


//Якщо помилка в запиті, то вихід з процедури

Якщо Запрос2.Виполніть (ТекстЗапроса2)=0 Тоді

Повернення;

КонецЕсли;

//тз=создатьобъект(laquo;ТаблицаЗначенийraquo;);//Создание об'єкта типу

Запрос'

//запрос.вигрузіть (тз);

//тз.вибратьстроку ();


ПечЗаголовок= Планування закупівель ТМЦ raquo ;;

ПечЗаголовокСтолбца= ТМЦ raquo ;;

глЧіслоСтрок=0;

Таб.ВивестіСекцію ( Кнопки );

Таб.ВивестіСекцію ( Шапка );

Таб.ВивестіСекцію ( ШапкаТабліци );


//виводимо шапку на кожній сторінці

НачПовт=Таб.ВисотаСекціі ( Кнопки ) +

Таб.ВисотаСекціі ( Шапка );

КонПовт=НачПовт + Таб.ВисотаСекціі ( ШапкаТабліци );

Таб.ПовторятьПріПечатіСтрокі (НачПовт + 1, КонПовт);

глОжівіть (1);

//Якщо потрібен порядок за списком елементів МФ Тоді

//Організувати цикл по елементах списку МФ і позиціону...


Назад | сторінка 35 з 39 | Наступна сторінка





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

  • Реферат на тему: Регістр арифметичного пристрою ЕОМ
  • Реферат на тему: Кредитний регістр Національного банку Республіки Білорусь, його діяльність ...
  • Реферат на тему: Структура команди мови запитів SQL. Простий запит. Багатотабличного запит
  • Реферат на тему: Якщо на товар закінчився термін придатності
  • Реферат на тему: Якщо імпортний товар на митному складі