FieldByName('POTREB')


перейти к полному списку дипломных проектов

Ссылка на скачивания файла в формате .doc находится в конце странички

FieldByName('POTREB')

AsInteger,

CDS_Mats.FieldByName('MAT_OKP').AsInteger,

CDS_Mats.FieldByName('MR_NAME').AsString,

CDS_Mats.FieldByName('POTREB').AsString,

CDS_Mats.FieldByName('GM_NAME').AsString);

Zamen_Refresh;

end;

procedure TFRep_Mats.N15Click(Sender: TObject);

begin

V.Mat_Zamen_Delete(CDS_Zamen.FieldByName('mz_id').AsInteger);

Zamen_Refresh;

Contr_Refresh;

end;

Печать отчета

procedure TFRep_Mats.N8Click(Sender: TObject);

begin

Mat_Zamen_Rep(Application, SharedConnection, Kat_Id, 1, Kat_ZCO_NAME, Kat_Name);

end;

2.5.2. Модуль Mat_Zamen_New.pas

На форму модуля Mat_Zamen_New вынесены следующие компоненты: TDBGridEh, TbitBtn, TdataSource, TclientDataSet, Tedit, TradioGroup (рис.5).



Рис.5. Модуль Mat_Zamen_New

TDBGridEh – таблица в которую заносятся данные , TbitBtn – кнопки ввода замены и отмены, TdataSource и TclientDataSet – для соединения с базой данных, Tedit – строки с материалами, TradioGroup – выбор полной или частичной замены.

Процедура выбора типа замены:

rocedure TFNew_Zamen.RGClick(Sender: TObject);

begin

if RG.ItemIndex = 1 then

begin

DBN_OldKol.Enabled := True;

end

else if RG.ItemIndex = 0 then

begin

DBN_OldKol.Enabled := False;

DBN_OldKol.Value := Old_Kol;

end;

Zamen_Type := RG.ItemIndex;

end;

Процедура ввода замены:

procedure TFNew_Zamen.BitBtn1Click(Sender: TObject);

var Old, Max, New : WideString;

begin

Old := FloatToStr(DBN_OldKol.Value);

Max := FloatToStr(Max_Kol);

New := FloatToStr(DBN_NewKol.Value);

V.Mat_Zamen_Create(Kat_Id,

Mat_Id,

CDS_Mats.FieldByName('MATERIAL_ID').AsInteger,

Old,

Max,

New,

Zamen_Type);

Close;end;

2.

скачать бесплатно Системы MRP и MRP с замкнутым циклом

Содержание дипломной работы

Спецификации продукции (данные о составе изделий и нормах расхода сырья, материалов, компонентов, инструмента на единицу готовой продукции)
Основной упор в программе должен быть сделан на реализацию максимального числа функций на уровне СУБД Oracle, на уровне СВП Delphi должен быть реализован лишь удобный интерфейс
Эти структуры следующие: блоки данных – Это наименьшая единица хранения данных в БД Oracle
Кроме того, в ОМТС ведется карточка на материал, в которой вручную заносится потребность под запуск, лимит для выдачи материалов в цеха
Безопасность доступа к данным Идентификация Идентификация и проверка подлинности пользователей или аутентификация - основное средство защиты информационных систем от постороннего вмешательства
Предоставляемое право определяет, какие службы связаны с правилом политики и какие условия применимы к предоставляемому праву
После добавления контрагента необходимо ввести количество материала (в пределах ранее рассчитанной величины), требуемого на закупку, а так же единицу измерения (килограмм, метр, кубометр, литр и т
Структура таблицы «закупок» «Таблица закупок» содержит информацию о заменах (табл
Он обеспечивает взаимодействие набора данных с компонентами отображения данных
4, выполняет следущие процедуры: Ввод / удаление контрагента; Ввод / удаление замены; Печать отчета  Рис
FieldByName('POTREB')
При запуске сервера приложений на панели задач появляется иконка сервера приложений
Материал можно заменять на несколько других, но общее количество замены не должно превышать рассчитанное по норме
Косвенные расходы: амортизация основных фондов; прочие затраты (спецрасходы)
на этапе предварительных исследований; МЭ - затраты на электроэнергию; МРМ - затраты на расходные материалы
Итого затраты на подготовительном этапе на выплаты заработной платы и единого социального налога составят: руб
Итого затраты на выплаты заработной платы и единого социального налога на этапе разработки составят: руб
КЗЧ – количество часов, затраченных на разработку документации одним кладовщиком: КЗЧ = 40000 * 0,1 = 4000 н/часов
Электромагнитные поля вызывают поляризацию молекул, из которых состоит тело человека, нарушение циркуляции жидкости, нагрев тканей
При длительном воздействии шума на организм происходят нежелательные явления: снижается острота зрения и слуха, повышается кровяное давление, снижается внимание
При использовании обыкновенного стола высотой 750 мм необходимо использовать кресло с регулируемой высотой сидения и подставку для ног
= 25 градусов - температура на рабочем месте; Н = 3 м - высота помещения; tприход = 18 градусов
Очистка сточных вод от твердых частиц осуществляется путем процеживания, отстаивания, отделения твердых частиц в поле действия центробежных сил и фильтрования
Проведен расчет затрат на разработку программы и расчет экономического эффекта от внедрения подсистемы

заработать

Закачай файл и получай деньги