⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 payitems.cpp

📁 该程序医院信息管理系统
💻 CPP
字号:
// PayItems.cpp: implementation of the CPayItems class.
//
//////////////////////////////////////////////////////////////////////

#include "stdafx.h"
#include "HosptialMan.h"
#include "ADOConn.h"
#include "PayItems.h"

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

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

CPayItems::CPayItems()
{

}

CPayItems::~CPayItems()
{

}
void CPayItems::SetPayId(int iPId)
{
	PayId = iPId;
}
int CPayItems::GetPayId()
{
	return PayId;
}
void CPayItems::SetRegId(int iRId)
{
	RegId = iRId;
}
int CPayItems::GetRegId()
{
	return PayId;
}
void CPayItems::SetItemId(int iItemId)
{
	ItemId = iItemId;
}
int CPayItems::GetItemId()
{
	return PayId;
}
void CPayItems::SetPNum(double dPNum)
{
	PNum = dPNum;
}
double CPayItems::GetPNum()
{
	return PNum;
}
void CPayItems::SetPrice(float fPrc)
{
	Price = fPrc;
}
float CPayItems::GetPrice()
{
	return Price;
}
void CPayItems::SetPType(int iPType)
{
	PType = iPType;
}
int CPayItems::GetPType()
{
	return PType;
}
//********************************************************//
//
//				方法:添加、修改、删除
//
//********************************************************//
void CPayItems::sql_Insert()
{
	try
	{
		//连接数据库
		ADOConn m_AdoConn;
		//设置INSERT语句, 将数值转换为字符串
		CString cSql,cRId,cItemId,cNum,cPrc,cTId;
		_bstr_t bSql;
		cRId.Format("%d",RegId);
		cItemId.Format("%d",ItemId);
		cNum.Format("%f",PNum);
		cPrc.Format("%f",Price);
		cTId.Format("%d",PType);
		// 更新语句
		cSql = "Insert Into PayItems(RegId,ItemId,PNum,Price,PType) Values("+cRId+","+cItemId+",";
		cSql += cNum+","+cPrc+","+cTId+")";
//		AfxMessageBox(cSql);
		bSql = (LPCTSTR)(_bstr_t)cSql;
		m_AdoConn.ExecuteSQL(bSql);
		//断开与数据库的连接
		m_AdoConn.ExitConnect();
	}
	// 捕捉异常
	catch(_com_error e)
	{
		// 显示错误信息
		AfxMessageBox(e.Description());
	}
}
void CPayItems::sql_Update(CString cPId)
{
	try
	{
		//连接数据库
		ADOConn m_AdoConn;
		//设置Update语句, 将数值转换为字符串
		CString cSql,cRId,cItemId,cNum,cPrc,cTId;
		_bstr_t bSql;
		cRId.Format("%d",RegId);
		cItemId.Format("%d",ItemId);
		cNum.Format("%f",PNum);
		cPrc.Format("%f",Price);
		cTId.Format("%f",PType);
		// 更新语句
		cSql = "Update PayItems Set RegId="+cRId+",ItemId="+cItemId+",PNum="+cNum+",";
		cSql += "PType="+cTId+",Price="+cPrc+" Where PayId="+cPId;
		bSql = (LPCTSTR)(_bstr_t)cSql;
		m_AdoConn.ExecuteSQL(bSql);
		//断开与数据库的连接
		m_AdoConn.ExitConnect();
	}
	// 捕捉异常
	catch(_com_error e)
	{
		// 显示错误信息
		AfxMessageBox(e.Description());
	}
}
// 删除单个记录
void CPayItems::sql_Delete(CString cPId)
{
	try
	{
		//连接数据库
		ADOConn m_AdoConn;
		//设置Delete语句
		_bstr_t bSql;
		bSql = "Delete From PayItems Where PayId="+cPId;
		m_AdoConn.ExecuteSQL(bSql);
		//断开与数据库的连接
		m_AdoConn.ExitConnect();
	}
	// 捕捉异常
	catch(_com_error e)
	{
		// 显示错误信息
		AfxMessageBox(e.Description());
	}
}
// 删除多个记录
void CPayItems::sql_DeleteRecords(CString cRId)
{
	try
	{
		//连接数据库
		ADOConn m_AdoConn;
		//设置Delete语句
		_bstr_t bSql;
		bSql = "Delete From PayItems Where RegId="+cRId;
		m_AdoConn.ExecuteSQL(bSql);
		//断开与数据库的连接
		m_AdoConn.ExitConnect();
	}
	// 捕捉异常
	catch(_com_error e)
	{
		// 显示错误信息
		AfxMessageBox(e.Description());
	}
}

double CPayItems::GetSum(CString cRId)
{
	double dRSum = 0;
	try
	{
		_variant_t vRSum;
		// 指明数据类型为double
		vRSum.vt = VT_R8;
		_RecordsetPtr m_pRecordset;
		// 连接数据库
		ADOConn m_AdoConn;
		_bstr_t bSQL;
		bSQL = "SELECT SUM(Price*PNum) AS RSum FROM PayItems WHERE RegId="+cRId+" GROUP BY RegId";
		// 执行SELETE语句
		m_pRecordset = m_AdoConn.GetRecordSet(bSQL);
		// 如果结果集为空则返回0
		if(!m_pRecordset->adoEOF)
		{
			vRSum = m_pRecordset->GetCollect("RSum");
			dRSum = vRSum.dblVal;
		}
		//断开与数据库的连接
		m_AdoConn.ExitConnect();
		return dRSum;
	}
	// 捕捉异常
	catch(_com_error e)
	{
		// 显示错误信息
		AfxMessageBox(e.Description());
	}
	return dRSum;
}

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -