mediinfo.cpp

一个ＶＣ写的药品管理系统

// MediInfo.cpp: implementation of the CMediInfo class.
//
//////////////////////////////////////////////////////////////////////

#include "stdafx.h"
#include "medicine.h"
#include "MediInfo.h"
#include "ADOConn.h"
#include "ioStream.h"

#ifdef _DEBUG
#undef THIS_FILE
static char THIS_FILE[]=__FILE__;
#define new DEBUG_NEW
#endif

//////////////////////////////////////////////////////////////////////
// Construction/Destruction
//////////////////////////////////////////////////////////////////////

CMediInfo::CMediInfo()
{

}

CMediInfo::~CMediInfo()
{

}

void CMediInfo::sql_insert()
{
	//连接数据库
	ADOConn m_AdoConn;
	m_AdoConn.OnInitADOConn();
	/*float InPrice,InAmout;
	CString InDate,WorkNo,SalerId;*/
	//设置INSERT语句
	_bstr_t vSQL;
	
	CString iPrice,iAmout;
	iPrice.Format("%f",InPrice);
	iAmout.Format("%f",InAmout);
	vSQL = "INSERT INTO MediStore(MediId, InPrice,InAmout,InDate,WorkNo,SalerId) VALUES('" 
		+MediId +"',"+ iPrice + "," + iAmout +",'" + InDate+ "','" 
		+ WorkNo+ "','" + SalerId+ "')";//+ Illustration+ "','" 
	m_AdoConn.ExecuteSQL(vSQL);	
	//断开与数据库的连接
	m_AdoConn.ExitConnect();
}

void CMediInfo::sql_insertMedi()
{
	//连接数据库
	ADOConn m_AdoConn;
	m_AdoConn.OnInitADOConn();
	/*CString MediName,Short,Unit;
	float MediPrice,LeastAmout, AllAmout,VipDisc;
	CString LastDate,Detail;*/
	//设置INSERT语句
	_bstr_t vSQL;
		
	CString mPrice,lAmout,aAmout,vDisc;
	mPrice.Format("%f",MediPrice);
	lAmout.Format("%f",LeastAmout);
	vDisc.Format("%f",VipDisc);
	aAmout.Format("%f",AllAmout);
	vSQL = "INSERT INTO MediInfo(MediId,MediName,Short,Unit,MediPrice,LeastAmout, AllAmout,VipDisc,LastDate,Detail)VALUES('" 
		+MediId+"','"+ MediName+"','"+ Short+"','"+ Unit+"',"
		+ mPrice+","+ lAmout+","+ aAmout+","+ vDisc+",'"+ LastDate+"','"+ Detail + "')";
	m_AdoConn.ExecuteSQL(vSQL);	
	
	//断开与数据库的连接
	m_AdoConn.ExitConnect();

}

void CMediInfo::sql_deleteSale()
{
	//连接数据库
	ADOConn m_AdoConn;
	m_AdoConn.OnInitADOConn();
	/*CString MediName,Short,Unit;
	float MediPrice,LeastAmout, AllAmout,VipDisc;
	CString LastDate,Detail;*/
	//设置INSERT语句
	_bstr_t vSQL;
		
	vSQL = "delete from SaleInfo where SaleId='"+SaleId+"'";
	m_AdoConn.ExecuteSQL(vSQL);	
	
	//断开与数据库的连接
	m_AdoConn.ExitConnect();

}
void CMediInfo::sql_deleteMediInfo()
{
	//连接数据库
	ADOConn m_AdoConn;
	m_AdoConn.OnInitADOConn();
	//设置INSERT语句
	_bstr_t vSQL;
		
	vSQL = "delete from MediInfo where MediId='"+MediId+"'";
	m_AdoConn.ExecuteSQL(vSQL);	
	
	//断开与数据库的连接
	m_AdoConn.ExitConnect();

}



void CMediInfo::sql_insertSale()
{
	//连接数据库
	ADOConn m_AdoConn;
	m_AdoConn.OnInitADOConn();
	/*CString SaleId,SaleDate;
	float MediAmout,SalePrice;
	int PayType;
	//MediId,MediPrice, WorkNo,VipDisc*/
	//设置INSERT语句
	_bstr_t vSQL;
		
	CString mAmout,mPrice,pType,vDisc;
	mPrice.Format("%f",MediPrice);
	mAmout.Format("%f",MediAmout);
	vDisc.Format("%f",VipDisc);
	pType.Format("%d",PayType);
	vSQL = "INSERT INTO SaleInfo(SaleId,MediId,SaleDate,WorkNo,PayType,MediAmout,VipDisc)VALUES('" 
		+SaleId+"','"+ MediId+"','"+ SaleDate+"','"
		+ WorkNo+"',"+ pType+","+ mAmout +","+ vDisc + ")";
	m_AdoConn.ExecuteSQL(vSQL);	
	
	//断开与数据库的连接
	m_AdoConn.ExitConnect();

}


void CMediInfo::sql_updata()
{
	//连接数据库
	ADOConn m_AdoConn;
	m_AdoConn.OnInitADOConn();
	_bstr_t vSQL;
	/*float InPrice,InAmout;
	CString InDate,WorkNo,SalerId;;*/
	CString iPrice,iAmout;
	iPrice.Format("%f",InPrice);
	iAmout.Format("%f",InAmout);

	vSQL = "update MediStore set InPrice="+iPrice+",InAmout="
		+iAmout+",InDate='"+InDate+"',WorkNo='"+WorkNo+"',SalerId='"
		+SalerId+"' where MediId='"+MediId
		+"' and InDate='"+InDate+"'";
	m_AdoConn.ExecuteSQL(vSQL);	
	//断开与数据库的连接
	m_AdoConn.ExitConnect();
}

void CMediInfo::sql_updataMedi()
{
	//连接数据库
	ADOConn m_AdoConn;
	m_AdoConn.OnInitADOConn();
	_bstr_t vSQL;
	/*CString MediName,Short,Unit;
	float MediPrice,LeastAmout, AllAmout,VipDisc;
	CString LastDate,Detail;*/
	CString mPrice,lAmout,aAmout,vDisc;
	mPrice.Format("%f",MediPrice);
	lAmout.Format("%f",LeastAmout);
	vDisc.Format("%f",VipDisc);
	aAmout.Format("%f",AllAmout);

	vSQL = "update MediInfo set MediName='"+MediName+"',Short='"+Short+"',Unit='"+Unit
		+"',MediPrice="+mPrice+",LeastAmout="+lAmout+",AllAmout="+aAmout+",VipDisc="+vDisc
		+",LastDate='"+LastDate+"',Detail='"+Detail+"' where MediId='"+MediId+"'";
	m_AdoConn.ExecuteSQL(vSQL);	
	//断开与数据库的连接
	m_AdoConn.ExitConnect();
}


int CMediInfo::HaveMedi(CString sMediId)//检查药品入库记录
{
	//连接数据库
	ADOConn m_AdoConn;
	m_AdoConn.OnInitADOConn();
	//设置SELECT语句
	_bstr_t vSQL;
	vSQL = "SELECT * FROM MediStore WHERE MediId='" + sMediId+"' and InDate='"+InDate+"'";
	//执行SELETE语句
	_RecordsetPtr m_pRecordset;
	m_pRecordset = m_AdoConn.GetRecordSet(vSQL);
		
	if (m_pRecordset->adoEOF)
		return -1;
	else
		return 1;
	//断开与数据库的连接
	m_AdoConn.ExitConnect();

}



void CMediInfo::sql_getAllAmout(CString mid)
{
	//连接数据库
	ADOConn m_AdoConn;
	m_AdoConn.OnInitADOConn();
	_bstr_t vSQL;
	/*CString MediName,Short,Unit;
	float MediPrice,LeastAmout, AllAmout,VipDisc;
	CString LastDate,Detail;*/

	vSQL = "select AllAmout from MediInfo where MediId='"+mid+"'";
	//执行SELETE语句
	_RecordsetPtr m_pRecordset;
	m_pRecordset = m_AdoConn.GetRecordSet(vSQL);
	AllAmout = atof((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("AllAmout"));
	m_AdoConn.ExecuteSQL(vSQL);	
	//断开与数据库的连接
	m_AdoConn.ExitConnect();
}


CMediInfo::GetData(CString MediId)
{	
	//连接数据库
	ADOConn m_AdoConn;
	m_AdoConn.OnInitADOConn();
	//设置SELECT语句
	_bstr_t vSQL;
	vSQL = "SELECT * FROM MediStore WHERE MediId='" + MediId +"' and InDate='"+InDate+"'";
	//执行SELETE语句
	_RecordsetPtr m_pRecordset,m_pRecordset1;
	m_pRecordset = m_AdoConn.GetRecordSet(vSQL);

	CString sAmout;
	//返回各列的值
	if (m_pRecordset->adoEOF)
		CMediInfo();
	else
	{//atof()		
		InPrice = atof((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("InPrice"));
		InAmout = atof((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("InAmout"));
		//MediName = (LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("MediName");
		InDate = (LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("InDate");
		WorkNo = (LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("WorkNo");
		SalerId = (LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("SalerId");
	}
	//断开与数据库的连接
	m_AdoConn.ExitConnect();
}

CMediInfo::GetDataMedi(CString MediId)
{

	//连接数据库
	ADOConn m_AdoConn;
	m_AdoConn.OnInitADOConn();
	//设置SELECT语句
	_bstr_t vSQL;
	vSQL = "SELECT * FROM MediInfo WHERE MediId='" + MediId+"'";
	//执行SELETE语句
	_RecordsetPtr m_pRecordset;
	m_pRecordset = m_AdoConn.GetRecordSet(vSQL);

	if (m_pRecordset->adoEOF)
		CMediInfo();
	else
	{//atof()
	/*CString MediName,Short,Unit;
	float MediPrice,LeastAmout, AllAmout,VipDisc;
	CString LastDate,Detail;*/
		MediName = (LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("MediName");
		Short = (LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("Short");
		Unit = (LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("Unit");

		MediPrice = atof((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("MediPrice"));
		LeastAmout = atof((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("LeastAmout"));
		AllAmout = atof((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("AllAmout"));
		VipDisc = atof((LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("VipDisc"));
		LastDate = (LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("LastDate");
		Detail = (LPCTSTR)(_bstr_t)m_pRecordset->GetCollect("Detail");
	}
	//断开与数据库的连接
	m_AdoConn.ExitConnect();
}

int CMediInfo::MediHaveMedi(CString MediId)//检查药品信息库
{
	//连接数据库
	ADOConn m_AdoConn;
	m_AdoConn.OnInitADOConn();
	//设置SELECT语句
	_bstr_t vSQL;
	vSQL = "SELECT * FROM MediInfo WHERE MediId='" + MediId+"'";
	//执行SELETE语句
	_RecordsetPtr m_pRecordset;
	m_pRecordset = m_AdoConn.GetRecordSet(vSQL);
		
	if (m_pRecordset->adoEOF)
		return -1;
	else
		return 1;
	//断开与数据库的连接
	m_AdoConn.ExitConnect();

}