479 lines
		
	
	
		
			13 KiB
		
	
	
	
		
			C#
		
	
	
	
	
	
			
		
		
	
	
			479 lines
		
	
	
		
			13 KiB
		
	
	
	
		
			C#
		
	
	
	
	
	
/*********************************************************************************************
 | 
						|
 * Copyright 2004 - Volian Enterprises, Inc. All rights reserved.
 | 
						|
 * Volian Enterprises - Proprietary Information - DO NOT COPY OR DISTRIBUTE
 | 
						|
 * ------------------------------------------------------------------------------
 | 
						|
 * $Workfile: vdb_ROUsage.cs $     $Revision: 6 $
 | 
						|
 * $Author: Kathy $   $Date: 5/01/06 11:17a $
 | 
						|
 *
 | 
						|
 * $History: vdb_ROUsage.cs $
 | 
						|
 * 
 | 
						|
 * *****************  Version 6  *****************
 | 
						|
 * User: Kathy        Date: 5/01/06    Time: 11:17a
 | 
						|
 * Updated in $/LibSource/VDB
 | 
						|
 * Fix B2006-018: single quote in proc number causes problem on data
 | 
						|
 * request
 | 
						|
 * 
 | 
						|
 * *****************  Version 5  *****************
 | 
						|
 * User: Kathy        Date: 8/16/05    Time: 2:54p
 | 
						|
 * Updated in $/LibSource/VDB
 | 
						|
 * B2005-030: error if missing ndx
 | 
						|
 * 
 | 
						|
 * *****************  Version 4  *****************
 | 
						|
 * User: Kathy        Date: 4/21/05    Time: 10:19a
 | 
						|
 * Updated in $/LibSource/VDB
 | 
						|
 * always write inf file & remove upgrade2005 define
 | 
						|
 * 
 | 
						|
 * *****************  Version 3  *****************
 | 
						|
 * User: Kathy        Date: 3/08/05    Time: 1:48p
 | 
						|
 * Updated in $/LibSource/VDB
 | 
						|
 * Approval
 | 
						|
 * 
 | 
						|
 * *****************  Version 2  *****************
 | 
						|
 * User: Jsj          Date: 8/23/04    Time: 10:12a
 | 
						|
 * Updated in $/LibSource/VDB
 | 
						|
 * Fixed replace of single quote
 | 
						|
 * 
 | 
						|
 * *****************  Version 1  *****************
 | 
						|
 * User: Kathy        Date: 7/27/04    Time: 8:40a
 | 
						|
 * Created in $/LibSource/VDB
 | 
						|
 *********************************************************************************************/
 | 
						|
 | 
						|
using System;
 | 
						|
using System.Data;
 | 
						|
using System.Text;
 | 
						|
using System.Collections.Specialized;
 | 
						|
using System.IO;
 | 
						|
using System.Windows.Forms;
 | 
						|
using VDB;
 | 
						|
using VDB_ConnType;
 | 
						|
 | 
						|
namespace VDB_ROUsage
 | 
						|
{
 | 
						|
	/// <summary>
 | 
						|
	/// Open, Create, Delete, Update functions for RO Usage files (tables)
 | 
						|
	/// </summary>
 | 
						|
	public class vdb_ROUsage:VDB_Base
 | 
						|
	{
 | 
						|
		public enum SortTypes {NotSorted,ProcSort,ROIDsort}; // list of sorting types
 | 
						|
 | 
						|
		public string UsageROndx = "";
 | 
						|
		public string UsagROIDndx = "";
 | 
						|
 | 
						|
		public vdb_ROUsage(String strPath):base(strPath)
 | 
						|
		{
 | 
						|
			// if no table (file name) specified, then default to USAGERO (USAGERO.DBF)
 | 
						|
			if (DBTable.Equals(""))
 | 
						|
				DBTable = "USAGERO";
 | 
						|
		}
 | 
						|
 | 
						|
		// Build a SQL statement. Optionally sort and filter the select statement.
 | 
						|
		private void BuildSelectCommand(int SortingType,string WhereStr)
 | 
						|
		{
 | 
						|
			StringBuilder tmp = new StringBuilder();
 | 
						|
			tmp.Append("SELECT [NUMBER], [SEQUENCE], [INSTANCE], [ROID] FROM [");
 | 
						|
			tmp.Append(DBTable);
 | 
						|
			tmp.Append("]");
 | 
						|
			
 | 
						|
			if (WhereStr.Length > 0) // Was a WHERE clause passed in?
 | 
						|
			{
 | 
						|
				// Add " WHERE " to the beginning if it is not already there
 | 
						|
				string tmpstr = WhereStr; //.ToUpper();
 | 
						|
 | 
						|
				if (tmpstr[0] != ' ')
 | 
						|
				{
 | 
						|
					tmp.Append(" ");
 | 
						|
					if (!tmpstr.StartsWith("WHERE "))
 | 
						|
						tmp.Append("WHERE ");
 | 
						|
				}
 | 
						|
				else if (!tmpstr.StartsWith(" WHERE "))
 | 
						|
					tmp.Append(" WHERE");
 | 
						|
				// add the passed in WHERE clause
 | 
						|
				tmp.Append(tmpstr);
 | 
						|
			}
 | 
						|
 | 
						|
			switch (SortingType)
 | 
						|
			{
 | 
						|
				case 0: //NotSorted
 | 
						|
					break;
 | 
						|
				case 1: // ProcSort - sorted by procedure number
 | 
						|
					tmp.Append(" GROUP BY [NUMBER],[SEQUENCE],[INSTANCE],[ROID]");
 | 
						|
					break;
 | 
						|
				case 2: // ROIDsort - sorted by ROID
 | 
						|
					tmp.Append(" GROUP BY [ROID],[NUMBER],[SEQUENCE],[INSTANCE]");
 | 
						|
					break;
 | 
						|
			}
 | 
						|
 | 
						|
			SelectCmd = tmp.ToString();		
 | 
						|
		}
 | 
						|
 | 
						|
 | 
						|
		private void BuildNDXFileNames()
 | 
						|
		{
 | 
						|
			UsageROndx = DBTable;
 | 
						|
			UsagROIDndx = DBTable.Substring(0,4)+"ROID";
 | 
						|
		}
 | 
						|
 | 
						|
 | 
						|
		// Build the SQL command needed to update a row in the USAGERO file
 | 
						|
		public override string GetRecUpdateStr(DataTable tbl,DataRow row)
 | 
						|
		{
 | 
						|
			int j = 0;
 | 
						|
			bool FirstOne = true;
 | 
						|
			StringBuilder updateStr = new StringBuilder();
 | 
						|
			string strNumber = "";
 | 
						|
			string strSequence = "";
 | 
						|
			string strInstance = "";
 | 
						|
 | 
						|
			updateStr.Append("UPDATE [");
 | 
						|
			updateStr.Append(DBTable);
 | 
						|
			updateStr.Append("] SET");
 | 
						|
 | 
						|
			foreach (DataColumn col in tbl.Columns)
 | 
						|
			{
 | 
						|
				bool isString = (col.DataType == Type.GetType("System.String"));
 | 
						|
 | 
						|
				if (col.ColumnName.Equals("NUMBER"))
 | 
						|
				{
 | 
						|
					strNumber = row.ItemArray[j].ToString();
 | 
						|
					strNumber = strNumber.Replace("'","''");
 | 
						|
				}
 | 
						|
				else if (col.ColumnName.Equals("SEQUENCE"))
 | 
						|
				{
 | 
						|
					strSequence = row.ItemArray[j].ToString();
 | 
						|
					strSequence = strSequence.Replace("'","''");
 | 
						|
				}
 | 
						|
				else if (col.ColumnName.Equals("INSTANCE"))
 | 
						|
				{
 | 
						|
					strInstance = row.ItemArray[j].ToString();
 | 
						|
					strInstance = strInstance.Replace("'","''");
 | 
						|
				}
 | 
						|
 | 
						|
				if (FirstOne)
 | 
						|
				{
 | 
						|
					updateStr.Append(" [");
 | 
						|
					FirstOne = false;
 | 
						|
				}
 | 
						|
				else
 | 
						|
					updateStr.Append(", [");
 | 
						|
 | 
						|
				updateStr.Append(col.ColumnName);
 | 
						|
				updateStr.Append("]=");
 | 
						|
 | 
						|
				if (row.ItemArray[j].ToString().Equals(""))
 | 
						|
				{
 | 
						|
					updateStr.Append("NULL");
 | 
						|
				}
 | 
						|
				else if (isString)
 | 
						|
				{
 | 
						|
					String tmpstr = row.ItemArray[j].ToString();
 | 
						|
					updateStr.Append("'");
 | 
						|
					tmpstr = tmpstr.Replace("'","''");
 | 
						|
					updateStr.Append(tmpstr);
 | 
						|
					updateStr.Append("'");
 | 
						|
				}
 | 
						|
				j++;
 | 
						|
			}
 | 
						|
			// Add the WHERE clause
 | 
						|
			updateStr.Append(" WHERE [NUMBER] = '");
 | 
						|
			updateStr.Append(strNumber.ToString());
 | 
						|
			updateStr.Append("' AND [SEQUENCE] = '");
 | 
						|
			updateStr.Append(strSequence.ToString());
 | 
						|
			updateStr.Append("' AND [INSTANCE] = '");
 | 
						|
			updateStr.Append(strInstance.ToString());
 | 
						|
			updateStr.Append("'");
 | 
						|
			return updateStr.ToString();
 | 
						|
		}
 | 
						|
 | 
						|
 | 
						|
		// Build the SQL command needed to insert a row in the USAGERO file
 | 
						|
		public override string GetRecInsertStr(DataTable tbl,DataRow row)
 | 
						|
		{
 | 
						|
			int j = 0;
 | 
						|
			StringBuilder insrtStr = new StringBuilder();
 | 
						|
			StringBuilder valueStr = new StringBuilder();
 | 
						|
 | 
						|
			insrtStr.Append("INSERT INTO [");
 | 
						|
			insrtStr.Append(DBTable);
 | 
						|
			insrtStr.Append("] (");
 | 
						|
 | 
						|
			valueStr.Append(" VALUES (");
 | 
						|
 | 
						|
			foreach (DataColumn col in tbl.Columns)
 | 
						|
			{
 | 
						|
				bool isString = (col.DataType == Type.GetType("System.String"));
 | 
						|
				insrtStr.Append("[");
 | 
						|
				insrtStr.Append(col.ColumnName);
 | 
						|
				insrtStr.Append("],");
 | 
						|
 | 
						|
				if (row.ItemArray[j].ToString().Equals(""))
 | 
						|
				{
 | 
						|
					valueStr.Append("NULL");
 | 
						|
				}
 | 
						|
				else if (isString)
 | 
						|
				{
 | 
						|
					String tmpstr = row.ItemArray[j].ToString();
 | 
						|
					tmpstr = tmpstr.Replace("'","''");
 | 
						|
					valueStr.Append("'");
 | 
						|
					valueStr.Append(tmpstr);
 | 
						|
					valueStr.Append("'");
 | 
						|
				}
 | 
						|
				else
 | 
						|
				{
 | 
						|
					valueStr.Append(row.ItemArray[j].ToString());
 | 
						|
				}
 | 
						|
				valueStr.Append(",");
 | 
						|
				j++;
 | 
						|
			}
 | 
						|
 | 
						|
			insrtStr = insrtStr.Replace(',',')',insrtStr.Length-1,1);
 | 
						|
			valueStr = valueStr.Replace(',',')',valueStr.Length-1,1);
 | 
						|
			insrtStr.Append(valueStr.ToString());
 | 
						|
 | 
						|
			return insrtStr.ToString();
 | 
						|
		}
 | 
						|
 | 
						|
		// Build the SQL command needed to delete a row in the USAGERO file
 | 
						|
		public override string RecDeleteStr(DataTable tbl,DataRow row)
 | 
						|
		{
 | 
						|
			int j = 0;
 | 
						|
			string strNumber = "";
 | 
						|
			string strSequence = "";
 | 
						|
			string strInstance = "";
 | 
						|
			StringBuilder deleteStr = new StringBuilder();
 | 
						|
 | 
						|
			deleteStr.Append("DELETE FROM [");
 | 
						|
			deleteStr.Append(DBTable);
 | 
						|
			deleteStr.Append("]");
 | 
						|
 | 
						|
			row.RejectChanges();
 | 
						|
			foreach (DataColumn col in tbl.Columns)
 | 
						|
			{
 | 
						|
				if (col.ColumnName.Equals("NUMBER"))
 | 
						|
				{
 | 
						|
					strNumber = row.ItemArray[j].ToString();
 | 
						|
					strNumber = strNumber.Replace("'","''");
 | 
						|
				}
 | 
						|
				else if (col.ColumnName.Equals("SEQUENCE"))
 | 
						|
				{
 | 
						|
					strSequence = row.ItemArray[j].ToString();
 | 
						|
					strSequence = strSequence.Replace("'","''");
 | 
						|
				}
 | 
						|
				else if (col.ColumnName.Equals("INSTANCE"))
 | 
						|
				{
 | 
						|
					strInstance = row.ItemArray[j].ToString();
 | 
						|
					strInstance = strInstance.Replace("'","''");
 | 
						|
				}
 | 
						|
				j++;
 | 
						|
			}
 | 
						|
			// Add the WHERE clause
 | 
						|
			deleteStr.Append(" WHERE [NUMBER] = '");
 | 
						|
			deleteStr.Append(strNumber.ToString());
 | 
						|
			deleteStr.Append("' AND [SEQUENCE] = '");
 | 
						|
			deleteStr.Append(strSequence.ToString());
 | 
						|
			deleteStr.Append("' AND [INSTANCE] = '");
 | 
						|
			deleteStr.Append(strInstance.ToString());
 | 
						|
			deleteStr.Append("'");
 | 
						|
 | 
						|
			return deleteStr.ToString();
 | 
						|
 | 
						|
		}
 | 
						|
 | 
						|
		public override string GetCreateIndx1String()
 | 
						|
		{
 | 
						|
			StringBuilder index1Str = new StringBuilder();
 | 
						|
			index1Str.Append("CREATE INDEX [");
 | 
						|
			index1Str.Append(UsageROndx);
 | 
						|
			index1Str.Append("] ON ");
 | 
						|
			index1Str.Append(DBTable);
 | 
						|
			index1Str.Append(".DBF ([NUMBER],[SEQUENCE],[INSTANCE])");
 | 
						|
			return (index1Str.ToString());
 | 
						|
		}
 | 
						|
 | 
						|
		public override string GetCreateIndx2String()
 | 
						|
		{
 | 
						|
			StringBuilder index2Str = new StringBuilder();
 | 
						|
			index2Str.Append("CREATE INDEX [");
 | 
						|
			index2Str.Append(UsagROIDndx);
 | 
						|
			index2Str.Append("] ON ");
 | 
						|
			index2Str.Append(DBTable);
 | 
						|
			index2Str.Append(".DBF ([ROID])");
 | 
						|
			return (index2Str.ToString());
 | 
						|
		}
 | 
						|
 | 
						|
		public override bool IndexFilesExist()
 | 
						|
		{
 | 
						|
			if (UsageROndx==""||UsagROIDndx=="") BuildNDXFileNames();
 | 
						|
			if(!File.Exists(DBPath+"\\"+UsageROndx+".NDX") || !File.Exists(DBPath+"\\"+UsagROIDndx+".NDX")) return false;
 | 
						|
			return true;
 | 
						|
		}
 | 
						|
 | 
						|
		public override void DeleteIndexFiles()
 | 
						|
		{
 | 
						|
			if(File.Exists(DBPath+"\\"+UsageROndx+".NDX")) File.Delete(DBPath+"\\"+UsageROndx+".NDX");
 | 
						|
			if(File.Exists(DBPath+"\\"+UsagROIDndx+".NDX")) File.Delete(DBPath+"\\"+UsagROIDndx+".NDX");
 | 
						|
			if(File.Exists(DBPath+"\\"+DBTable+".INF")) File.Delete(DBPath+"\\"+DBTable+".INF");
 | 
						|
		}
 | 
						|
 | 
						|
		public override StringCollection CreateIndexFilesStatements()
 | 
						|
		{
 | 
						|
			if (isdBaseFile())
 | 
						|
			{
 | 
						|
				StringCollection rtnStrColl = new StringCollection();
 | 
						|
				string indx1 = GetCreateIndx1String();
 | 
						|
				rtnStrColl.Add(indx1);
 | 
						|
				string indx2 = GetCreateIndx2String();
 | 
						|
				rtnStrColl.Add(indx2);
 | 
						|
				return rtnStrColl;
 | 
						|
			}
 | 
						|
			return null;
 | 
						|
		}
 | 
						|
 | 
						|
		// Build a list of SQL commands needed to create a new USAGERO table (file)
 | 
						|
		// and add the first row
 | 
						|
		public override StringCollection CreateTableStatements(string strTblName)
 | 
						|
		{
 | 
						|
			StringCollection rtnStrColl = new StringCollection();
 | 
						|
			StringBuilder createStr = new StringBuilder();
 | 
						|
			//StringBuilder index1Str = new StringBuilder();
 | 
						|
			//StringBuilder index2Str = new StringBuilder();
 | 
						|
 | 
						|
			if (strTblName.Length > 0) // was a table name passd in?
 | 
						|
			{
 | 
						|
				DBTable = strTblName;
 | 
						|
			}
 | 
						|
 | 
						|
			if (DBTable.Equals(""))
 | 
						|
			{
 | 
						|
				MessageBox.Show("Trying to Create a new Table without a Name","Create Table Error");
 | 
						|
				return rtnStrColl;
 | 
						|
			}
 | 
						|
 | 
						|
			// Build the command that creates a new SET table (file)
 | 
						|
			createStr.Append("CREATE TABLE [");
 | 
						|
			createStr.Append(DBTable);
 | 
						|
			createStr.Append("] ");
 | 
						|
			createStr.Append("([NUMBER] Char(20), [SEQUENCE] Char(12), ");
 | 
						|
			createStr.Append("[INSTANCE] Char(1), [ROID] Char(16))");
 | 
						|
 | 
						|
			rtnStrColl.Add(createStr.ToString()); // add create table
 | 
						|
 | 
						|
			if (isdBaseFile())
 | 
						|
			{
 | 
						|
				// build the ndx file names (w/o extensions)
 | 
						|
//				BuildNDXFileNames();
 | 
						|
 | 
						|
				// Build the command that creates the first index file
 | 
						|
				
 | 
						|
 | 
						|
				rtnStrColl.Add(GetCreateIndx1String()); // add create 1st index
 | 
						|
 | 
						|
				// Build the commmand that creates the second index file
 | 
						|
				string tmp = DBTable;
 | 
						|
				
 | 
						|
 | 
						|
				rtnStrColl.Add(GetCreateIndx2String()); // add create 2nd index
 | 
						|
			}
 | 
						|
 | 
						|
			return rtnStrColl;
 | 
						|
		}
 | 
						|
 | 
						|
		// After the table is created, create the associated INF file
 | 
						|
		public override int PostCreateTableFunction()
 | 
						|
		{
 | 
						|
			CreateINF(); // should already be created
 | 
						|
			return 0;
 | 
						|
		}
 | 
						|
 | 
						|
		// This is called in the class constructor and
 | 
						|
		// if the table name is assigned to the DBTable property
 | 
						|
		public override int CreateINF()
 | 
						|
		{
 | 
						|
			// if we are using dBase files, create an INF file containing
 | 
						|
			// a list of the associated NDX files.
 | 
						|
			if (isdBaseFile())
 | 
						|
			{
 | 
						|
				StreamWriter infFile;
 | 
						|
				string infFileStr;
 | 
						|
				StringBuilder tmp = new StringBuilder();
 | 
						|
 | 
						|
				// build the ndx file names (w/o extensions)
 | 
						|
				BuildNDXFileNames();
 | 
						|
 | 
						|
				//build INF file name
 | 
						|
				tmp.Append(DBPath);
 | 
						|
				tmp.Append("\\");
 | 
						|
				tmp.Append(DBTable);
 | 
						|
				tmp.Append(".INF");
 | 
						|
 | 
						|
				infFileStr = tmp.ToString();
 | 
						|
 | 
						|
				// if the INF file does not already exist create it
 | 
						|
				//if (!File.Exists(infFileStr))
 | 
						|
				//{
 | 
						|
				// always recreate it. Some plants' data had invalid files
 | 
						|
				// and it was felt that it would be quicker to recreate always
 | 
						|
				// rather than 
 | 
						|
				infFile = new StreamWriter(infFileStr,false);
 | 
						|
				infFile.Write("NDX1=");
 | 
						|
				infFile.Write(UsageROndx); // USAGERO.NDX
 | 
						|
				infFile.Write(".NDX\r\n");
 | 
						|
				infFile.Write("NDX2=");
 | 
						|
				infFile.Write(UsagROIDndx); //USAGROID.NDX
 | 
						|
				infFile.Write(".NDX\r\n");
 | 
						|
				infFile.Close();
 | 
						|
				//}
 | 
						|
			}
 | 
						|
			return 0;
 | 
						|
		}
 | 
						|
 | 
						|
		// return a list of SQL commands that will drop (delete) a database table (file)
 | 
						|
		public override StringCollection DeleteTableStatements(string strTblName)
 | 
						|
		{
 | 
						|
			StringCollection rtnStrColl = new StringCollection();
 | 
						|
			StringBuilder DropTableStr = new StringBuilder();
 | 
						|
 | 
						|
			DropTableStr.Append("Drop Table [");
 | 
						|
			DropTableStr.Append(DBTable);
 | 
						|
			DropTableStr.Append("]");
 | 
						|
 | 
						|
			rtnStrColl.Add(DropTableStr.ToString());
 | 
						|
			return rtnStrColl;
 | 
						|
		}
 | 
						|
 | 
						|
		// return a dataset of RO Usage records, not sorted
 | 
						|
		public System.Data.DataSet GetNotSorted(string WhereStr)
 | 
						|
		{
 | 
						|
			BuildSelectCommand((int)SortTypes.NotSorted,WhereStr);
 | 
						|
			return DB_Data;
 | 
						|
		}
 | 
						|
 | 
						|
		// return a dataset of RO Usage records, sorted by the [NUMBER] field
 | 
						|
		public System.Data.DataSet GetSortedByProc(string WhereStr)
 | 
						|
		{
 | 
						|
			BuildSelectCommand((int)SortTypes.ProcSort,WhereStr);
 | 
						|
			return DB_Data;
 | 
						|
		}
 | 
						|
 | 
						|
		// return a dataset of RO Usage records, sorted by the [ROID] field
 | 
						|
		public System.Data.DataSet GetSortedByROID(string WhereStr)
 | 
						|
		{
 | 
						|
			BuildSelectCommand((int)SortTypes.ROIDsort,WhereStr);
 | 
						|
			return DB_Data;
 | 
						|
		}
 | 
						|
 | 
						|
		public void UpdateProcNumber(string oldnum, string newnum)
 | 
						|
		{
 | 
						|
			// Change fromnumber first, then tonumber
 | 
						|
			StringBuilder updateStr = new StringBuilder();
 | 
						|
			updateStr.Append("UPDATE [");
 | 
						|
			updateStr.Append(DBTable);
 | 
						|
			updateStr.Append("] SET [NUMBER] = '");
 | 
						|
			updateStr.Append(newnum.Replace("'","''"));
 | 
						|
			updateStr.Append("' WHERE [NUMBER] = '");
 | 
						|
			updateStr.Append(oldnum.Replace("'","''"));
 | 
						|
			updateStr.Append("'");
 | 
						|
			ProcessACommand(updateStr.ToString());
 | 
						|
		}
 | 
						|
	}
 | 
						|
}
 |