Разработка информационной системы для учета материальных средств предприятия малого бизнеса Республики Казахстан

Обзор и анализ информационных систем по учету материальных ценностей в международной практике. Информационная система для учёта материальных средств ООО "Железногорский комбикормовый завод". Выбор средств, инструментов для создания информационной системы.

Рубрика Программирование, компьютеры и кибернетика
Вид дипломная работа
Язык русский
Дата добавления 23.12.2014
Размер файла 1,2 M

Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.

ADOQuery2->SQL->Add ("Select p1. Code_op,p4. NameKat,p1. Colvo,p1. Price,p1. Data, p3. NameF from Prihod_Rashod p1, tovar p2, firm p3, Kategory p4 where (p1. CodeTov=p2. CodeTov) and (p1. kodef=p3. codef) and (p4. CodeKat=p2. CodeKat) and (p1. Data>=: d) and (p1. Data<=: t) and (p4. NameKat=: r)");

ADOQuery2->Parameters->Items [0] - >Value=DateTimePicker2->Date;

ADOQuery2->Parameters->Items [1] - >Value=DateTimePicker3->Date;

// ADOQuery2->SQL->Add ("Select p1. Code_op,p4. NameKat,p1. Colvo,p1. Price,p1. Data, p3. NameF from Prihod_Rashod p1, tovar p2, firm p3, Kategory p4 where (p1. CodeTov=p2. CodeTov) and (p1. kodef=p3. codef) and (p4. CodeKat=p2. CodeKat) and (p4. NameKat=: z)");

ADOQuery2->Parameters->Items [2] - >Value=ComboBox6->Text;

ADOQuery2->Open ();

}

if (RadioButton5->Checked)

{

// ADOQuery2->Close ();

Form1->QRLabel2->Caption="Отчетинвентаря"+ComboBox7->Text+" Покатегорий "+ComboBox6->Text+"Надату"+Date ();

ADOQuery2->SQL->Clear ();

ADOQuery2->SQL->Add ("Select p1. Code_op,p2. NameTov, p1. Colvo,p1. Price, p1. Data, p3. NameF from Prihod_Rashod p1, tovar p2, firm p3, Kategory p4 where (p1. CodeTov=p2. CodeTov) and (p1. kodef=p3. codef) and (p2. CodeKat=p4. CodeKat) and (p1. Data>=: d) and (p1. Data<=: t) and (p4. NameKat=: p) and (p2. NameTov=: r)");

ADOQuery2->Parameters->Items [0] - >Value=DateTimePicker2->Date;

ADOQuery2->Parameters->Items [1] - >Value=DateTimePicker3->Date;

// ADOQuery2->SQL->Add ("Select p1. Code_op,p2. NameTov, p1. Colvo,p1. Price, p1. Data, p3. NameF from Prihod_Rashod p1, tovar p2, firm p3, Kategory p4 where (p1. CodeTov=p2. CodeTov) and (p1. kodef=p3. codef) and (p2. CodeKat=p4. CodeKat) and (p4. NameKat=: x) and (p2. NameTov=: y)");

ADOQuery2->Parameters->Items [2] - >Value=ComboBox6->Text;

ADOQuery2->Parameters->Items [3] - >Value=ComboBox7->Text;

ADOQuery2->Open ();

}

// ADOQuery2->Open ();

// Form1->ADODataSet1->Active=True;

Form1->QuickRep2->Preview ();

}

Размещено на Allbest.ru


Подобные документы

Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д.
PPT, PPTX и PDF-файлы представлены только в архивах.
Рекомендуем скачать работу.