101
Список использованной литературы
1. ГОСТ Р ИСО/МЭК 12207/99. Государственный стандарт РФ.
Информационная технология. Процессы жизненного цикла информационных
систем. Издание официальное. - М., 1999
2. Схемы алгоритмов, программ, данных и систем. Условные
обозначения и правила выполнения. ГОСТ 19.701-90 (ИСО 5807-85) /
Государственный комитет СССР по управлению качеством продукции и
стандартам, 01.01.1992.
3. Автоматизированные информационные системы, базы и банки
данных. Вводный курс: Учебное пособие, М.: Гелиос АРВ, 2007. - 368 с., ил
4. Астелс, Дэвид; Миллер Гранвилл; Новак, Мирослав, Практическое
руководство по экстремальному программированию, Пер. с англ. - М.:
Издательский дом "Вильямс", 2008. - 320 с.: ил. - Парал. тит. англ
5. Баженова И. Ю. , Основы проектирования приложений баз данных,
Издательства: Бином. Лаборатория знаний, Интернет-университет
информационных технологий, 2008 г., , 328 стр.
6. Вендров А.М., CASE-технологии. Современные методы и средства
проектирования информационных систем - М.: Финансы и статистика, 2007 г,
456 стр.
7. Вигерс Карл, Разработка требований к программному обеспечению,
Пер, с англ. - М.:Издательско-торговый дом "Русская Редакция", 2008. -576с.: ил
8. Гашков С. Б., Э. А. Применко, М. А. Черепнев Криптографические
методы защиты информации, М, Издательство: Академия, 2010 г., 304 стр.
9. Гвоздева Т. В., Б. А. Баллод, Проектирование информационных
систем, М, Издательство: Феникс, 2009 г., 512 стр.
10. Голицына О. Л., И. И. Попов, Н. В. Максимов, Т. Л. Партыка,
Информационные технологии, М, Издательство Инфра-М, 2009 г., 608 стр.
11. Дейв Крейн, Эрик Паскарелло, Даррен Джеймс. AJAX в действии:
Учебник – М.: Вильямс, 2007. 450 – 490 с.
12. Дэвид Флэнаган. JavaScript. Подробное руководство: Учебник – М.:
Символ Плюс, 2008. 243 – 249 с.
102
13. Емельянова Н. З., Партыка Т. Л., И. И. Попов, Проектирование
информационных систем, М, Издательство: Форум, 2009 г., 432 стр.
14. Емельянова Н. З., Т. Л. Партыка, И. И. Попов, М, Издательство
Форум, 2007 г., , 416 стр.
15. Илюшечкин В. М. , Основы использования и проектирования баз
данных, М, Издательство Юрайт, 2010 г., 224 стр.
16. Котляров В. П., Т. В. Коликова, Основы тестирования
программного обеспечения, Издательства: Интернет-университет
информационных технологий, Бином. Лаборатория знаний, 2009 г., 288 стр.
17. Кристиан Дари, Богдан Бринзаре, Филип Черчез-Тоза, Михай
Бусика. AJAX и PHP. Разработка динамических веб-приложений: Учебник – М.:
Символ Плюс, 2007, 289 стр.
18. Кузин А. В., С. В. Левонисова, Базы данных, М, Издательство:
Академия, 2008 г., 320 стр.
19. Кузнецов С. Д., Основы баз данных, М, Издательства: Бином.
Лаборатория знаний, Интернет-университет информационных технологий, 2007
г., 488 стр.
20. Молчанов А. Ю., Системное программное обеспечение, М,
Издательство: Питер, 2010 г., 400 стр.
21. Незнанов А. А., Программирование и алгоритмизация, М,
Издательство: Академия, 2010 г., 304 стр.
22. Пирогов В. Ю., Информационные системы и базы данных. М,
Организация и проектирование, Издательство: БХВ-Петербург, 2009 г.528 стр.
23. Предметно-ориентированные экономические информационные
системы, М, Издательство: Финансы и статистика, 2007 г., 224 стр.
24. Реляционные базы данных: практические приемы оптимальных
решений. – СПб.: БХВ-Петербург, 2009 – 400с.:ил;
25. Симионов Ю.Ф., Боромотов В.В. Информационный менеджмент. —
Ростов н.Д: Феникс, 2008, 250с., ил.;
26. Чипига А. Ф., Информационная безопасность автоматизированных
систем, М, Издательство: Гелиос АРВ, 2010 г., 336 стр.
103
Приложение. Листинг программных модулей
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.IO;
using System.Text;
using System.Windows.Forms;
namespace Sklad
{
public partial class eAktPP : zEditX
{
public int TypOS, TypA, Id_Sdal, Id_Fr, Id_Prin, Id_MH, Id_A, Sgn;
protected ds_OSAPP dsOS;
protected ds_Akt dsA;
protected xTables.tABody TTypA;
protected FileInfo[] FI;
public static NameValue[] Rv = null;
public eAktPP(IPY_BindingSource BS, ezStyle eStyle, int typos)
: base(BS, (eStyle | ezStyle.ezMngBS))
{
TypOS = typos;
dsA = (ds_Akt)BS.DataSource;
dsOS = new ds_OSAPP();
TTypA = new xTables.tABody(3);
dsA.taTypA.FillByStrFLTR(TTypA, "", "Id");
InitializeComponent();
InitComponent(); // ----------------
if (TypOS == 1) this.Text = this.Text + "Основные средства";
if (TypOS == 2) this.Text = this.Text + "Товарно-материальные
ценности";
if (TypOS == 3) this.Text = this.Text + "Расходные материаллы";
InitFinished = true;
btSave.Enabled = this.CanSave();
}
protected override void InitBindings()
{ // для прибіндювання візуальних компонентів
((System.ComponentModel.ISupportInitialize)(bs)).BeginInit();
cbTypA.DataSource = TTypA;
cbTypA.DisplayMember = "XName";
cbTypA.ValueMember = "Id";
cbTypOS.DataSource = bs.DataSource;
104
cbTypOS.DisplayMember = "TypOS.XName";
cbTypOS.ValueMember = "TypOS.Id";
cbTypSg.DataSource = bs.DataSource;
cbTypSg.DisplayMember = "TypSg.XName";
cbTypSg.ValueMember = "TypSg.Id";
((System.ComponentModel.ISupportInitialize)(bs)).EndInit();
BindedOnce = true;
}
protected override void InitNotBindings()
{
cbTypA.Enabled = cbTypA.Enabled && mode;
Id_A = (int)R["Id_A"];
dsOS.Id_A = Id_A;
zGridPnl.ZLoad();
EId.Text = R["Id_A"].ToString();
EName.Text = R["NDoc"].ToString();
EComent.Text = R["Coment"].ToString();
Id_Sdal = 0;
if (!R.IsNull("Id_Sdal"))
{
Id_Sdal = (int)R["Id_Sdal"];
ESdal.Text = string.Format("[{0}]{1}", Id_Sdal, R["SdalName"]);
}
Id_Fr = 0;
if (!R.IsNull("Id_Fr"))
{
Id_Fr = (int)R["Id_Fr"];
EFr.Text = string.Format("[{0}]{1}", Id_Fr, R["FrName"]);
}
Id_Prin = 0;
if (!R.IsNull("Id_Prin"))
{
Id_Prin = (int)R["Id_Prin"];
EPrin.Text = string.Format("[{0}]{1}", Id_Prin, R["PrinName"]);
}
Id_MH = 0;
if (!R.IsNull("Id_MH"))
{
Id_MH = (int)R["Id_MH"];
EMH.Text = string.Format("[{0}]{1}", Id_MH, R["MHName"]);
}
cbTypA.SelectedValue = (int)R["TypA"];
if (R.IsNull("TypOS")) cbTypOS.SelectedValue = -1;
105
else cbTypOS.SelectedValue = (int)R["TypOS"];
Sgn = 0;
if (!R.IsNull("Sgn")) Sgn = (int)R["Sgn"];
cbTypSg.SelectedValue = Sgn;
if (R.IsNull("RDat")) DTR.Value = null;
else DTR.ValueDay = (int)R["RDat"];
if (!mode)
{
if (zGridPnl.dgv != DGV)
{
dsOS.TypOS = TypOS;
dsOS.Id_A = Id_A;
dsOS.FillByStrFLTR(string.Format("skl_AktD.Id_A={0}", Id_A),
"Id_AD");
DGV.AutoGenerateColumns = false;
DGV.DataSource = dsOS;
DGV.DataMember = "skl_OS";
ZGridPanelStyle ST;
if (Sgn > 0) ST = ZGridPanelStyle.ZSRefresh;
else ST = ZGridPanelStyle.ZSAdd | ZGridPanelStyle.ZSEdit |
ZGridPanelStyle.ZSDel;
zGridPnl.InitPanel(ST, ZGridPanelAlign.Top
, DGV
, ""
, "", false
, new NameValue[] { new NameValue("Id_AD", (int)0) }
, null, ref Rv, Program.FndList);
IPY_BindingSource xbs = new IPY_BindingSource();
xbs.DataSource = dsOS;
xbs.DataMember = "skl_OSMet";
xbs.Sort = "Id_DM";
DGVM.AutoGenerateColumns = false;
DGVM.DataSource = xbs;
}
}
}
protected override void PrepareNewRow()
{
TypA = 3;
R["Id_A"] = -1;
R["Sgn"] = 0;
R["TypOS"] = TypOS;
R["RDat"] = IPY_Util.Dat2Int(DateTime.Now);
if ((BR != null) && (BR is DataRow))
106
{ // заповнити за зразком
TypA = 3;
dsA.taTypA.FillByStrFLTR(TTypA, "Id>1", "Id");
cbTypA.Enabled = true;
}
else cbTypA.Enabled = false;
R["TypA"] = TypA;
}
protected override void PrepareToSave()
{
R["NDoc"] = EName.Text.Trim();
R["Coment"] = EComent.Text.Trim();
int x = (int)cbTypA.SelectedValue;
if (1 != x) // не постановка на учёт
{
R["Id_Sdal"] = Id_Sdal;
R["Id_Fr"] = Id_Fr;
}
else // постановка на учёт
{
R["Id_Sdal"] = DBNull.Value;
R["Id_Fr"] = DBNull.Value;
}
if (2 != x) // не списание
{
R["Id_Prin"] = Id_Prin;
R["Id_MH"] = Id_MH;
}
else // списание
{
R["Id_Prin"] = Id_Sdal;
R["Id_MH"] = Id_Fr;
}
if (cbTypA.SelectedValue != null) R["TypA"] =
(int)cbTypA.SelectedValue;
else R["TypA"] = DBNull.Value;
if (cbTypOS.SelectedValue != null) R["TypOS"] =
(int)cbTypOS.SelectedValue;
else R["TypOS"] = DBNull.Value;
if (DTR.Value.HasValue) R["RDat"] = DTR.ValueDay;
else R["RDat"] = DBNull.Value;
}
protected override bool IsChanged()
{ // визначає чи змінював користувач дані на формі
bool RetValue = (
107
(R["NDoc"].ToString() != EName.Text.Trim())
|| (R["Coment"].ToString() != EComent.Text.Trim())
|| (!R["TypA"].Equals(cbTypA.SelectedValue))
|| (!R["TypOS"].Equals(cbTypOS.SelectedValue))
);
if (!RetValue)
if (R.IsNull("Id_Fr")) RetValue = Id_Fr>0;
else RetValue = (Id_Fr != (int)R["Id_Fr"]);
if (!RetValue)
if (R.IsNull("Id_MH")) RetValue = Id_MH > 0;
else RetValue = (Id_MH != (int)R["Id_MH"]);
if (!RetValue)
if (R.IsNull("Id_Sdal")) RetValue = Id_Sdal > 0;
else RetValue = (Id_Sdal != (int)R["Id_Sdal"]);
if (!RetValue)
if (R.IsNull("Id_Prin")) RetValue = Id_Prin > 0;
else RetValue = (Id_Prin != (int)R["Id_Prin"]);
if (!RetValue)
if (R.IsNull("RDat")) RetValue = DTR.Value.HasValue;
else RetValue = !(DTR.Value.HasValue &&
(R["RDat"].Equals(DTR.ValueDay)));
return RetValue;
}
protected override bool CanSave()
{
int i = 0;
bool RetValue = false;
if (InitFinished)
{
if (InitFinished && cbTypA.SelectedIndex >= 0)
{
btSdal.Enabled = (1 != (int)cbTypA.SelectedValue);
btPrin.Enabled = (2 != (int)cbTypA.SelectedValue);
}
if (cbTypA.SelectedIndex >= 0)
{
i = (int)cbTypA.SelectedValue;
}
if (// перевірка на коректність-наявність мінімально необхідних
даних
(EName.Text.Trim().Length > 0)
&& (i > 0)
&& (DTR.Value.HasValue)
&& (i == 1 || (Id_Sdal > 0 && Id_Fr > 0))
&& (i == 2 || (Id_Prin > 0 && Id_MH > 0))
&&
(
mode || // новий запис або
108
this.IsChanged() // є дані, що змінювались
)
)
RetValue = true;
// Попередження про обовязкові поля
EPNeeded = false;
EPSetError(EName, (EName.Text.Trim().Length > 0) ? "" :
Properties.Resources.ResourceManager.GetString("zEdit_EPReq"));
EPSetError(DTR, (DTR.Value.HasValue) ? "" :
Properties.Resources.ResourceManager.GetString("zEdit_EPReq"));
EPSetError(cbTypA, ((cbTypA.SelectedValue != null) &&
((int)cbTypA.SelectedValue > 0)) ? "" :
Properties.Resources.ResourceManager.GetString("zEdit_EPReq"));
EPSetError(btSdal, (i == 1 || (Id_Sdal > 0 && Id_Fr > 0)) ? "" :
Properties.Resources.ResourceManager.GetString("zEdit_EPReq"));
EPSetError(btPrin, (i == 2 || (Id_Prin > 0 && Id_MH > 0)) ? "" :
Properties.Resources.ResourceManager.GetString("zEdit_EPReq"));
if ((EPNeeded) && (string.IsNullOrEmpty(EP.GetError(EPL))))
EP.SetError(EPL, EPL.Text);
if (TypA != (int)cbTypA.SelectedValue || cbFrom.Items.Count == 0)
{
TypA = (int)cbTypA.SelectedValue;
string s = TypOS.ToString() + TypA.ToString();
DirectoryInfo di = new DirectoryInfo(Application.StartupPath +
"\\RPT");
FI = di.GetFiles(s + "*.xml");
if (FI != null) foreach (FileInfo f in FI) {
cbFrom.Items.Add(Path.ChangeExtension(f.Name, null).Substring(3)); }
if (cbFrom.Items.Count > 0)
{
cbFrom.SelectedIndex = 0;
btRPT.Enabled = true;
btRPT.Visible = true;
}
}
}
return RetValue;
}
private void EName_TextChanged(object sender, EventArgs e)
{
btSave.Enabled = this.CanSave();
}
private void EName_KeyPress(object sender, KeyPressEventArgs e)
{
if (e.KeyChar == 13) this.Enter2Tab(sender, e);
109
}
private void btSdal_Click(object sender, EventArgs e)
{
NameValue[] NVFind = new NameValue[] { new
NameValue("Id_MH", Id_Sdal) };
NameValue[] NVReturn = new NameValue[] { new
NameValue("Id_MH", 0), new NameValue("MHName", ""), new
NameValue("Id_US", 0), new NameValue("USName", "") };
using (gMH F = new gMH(ZGridPanelStyle.ZSAll,
ZGridPanelAlign.Top, "", "Id_MH", true, NVFind, ref NVReturn, Program.FndList))
{
DialogResult DR = F.ShowDialog(this);
if ((DR == DialogResult.OK) || (DR == DialogResult.Yes))
{
Id_Fr = (int)NVReturn[0].Value;
EFr.Text = string.Format("[{0}]{1}", Id_Fr, NVReturn[1].Value);
Id_Sdal = (int)NVReturn[2].Value;
ESdal.Text = string.Format("[{0}]{1}", Id_Sdal,
NVReturn[3].Value);
this.SelectNextControl(btSdal, true, true, true, true);
btSave.Enabled = this.CanSave();
}
}
}
private void btPrin_Click(object sender, EventArgs e)
{
NameValue[] NVFind = new NameValue[] { new
NameValue("Id_MH", Id_Prin) };
NameValue[] NVReturn = new NameValue[] { new
NameValue("Id_MH", 0), new NameValue("MHName", ""), new
NameValue("Id_US", 0), new NameValue("USName", "") };
using (gMH F = new gMH(ZGridPanelStyle.ZSAll,
ZGridPanelAlign.Top, "", "Id_MH", true, NVFind, ref NVReturn, Program.FndList))
{
DialogResult DR = F.ShowDialog(this);
if ((DR == DialogResult.OK) || (DR == DialogResult.Yes))
{
Id_MH = (int)NVReturn[0].Value;
EMH.Text = string.Format("[{0}]{1}", Id_MH,
NVReturn[1].Value);
Id_Prin = (int)NVReturn[2].Value;
EPrin.Text = string.Format("[{0}]{1}", Id_Prin,
NVReturn[3].Value);
this.SelectNextControl(btPrin, true, true, true, true);
btSave.Enabled = this.CanSave();
}
110
}
}
private void zGridPnl_OnEditRow(object sender, ezEditRowEventArgs e)
{
if (Id_Sdal > 0 && Id_Fr > 0)
{
using (eOSP ED = new eOSP(zGridPnl.bs, (e.Style | ezStyle.ezCAS),
TypOS, Id_A, Id_Sdal, Id_Fr, (int)DTR.ValueDay))
{
ED.ShowDialog(this);
}
}
else IPY_Util.YNBox("Не задано место хранения либо сдающее
материально ответственное лицо.");
}
private void zGridPnl_OnRefreshComent(object sender, EventArgs e)
{
OSComent.Text = null;
if (DGV.DataSource != null)
{
IPY_BindingSource bs = (IPY_BindingSource)DGV.DataSource;
if ((bs.Current != null) && (bs.Current is DataRowView))
{
DataRow RW = ((DataRowView)bs.Current).Row;
OSComent.Text = RW["Coment"].ToString();
dsOS.taOM.FillByStrFLTR(dsOS.Tables["skl_OSMet"],
string.Format("Id_OS={0}", RW["Id_OS"]), "Id_DM");
}
else dsOS.Tables["skl_OSMet"].Clear();
}
}
protected override void Save()
{
base.Save(); //int i=0;
}
private void btRPT_Click(object sender, EventArgs e)
{
int HN, HK, i, Npp;
string s, DTL, fname, zz;
decimal m;
StringBuilder sb, xml, dtl;
DataRow RC, RX;
xTables.tOSMet_01 T;
NameValue[] NV, ND;