invoice.cpp

VC平台下开发的门诊信息管理系统 数据库ACCEES

// InVoice.cpp : implementation file
//

#include "stdafx.h"
#include "Hospital.h"
#include "InVoice.h"

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

/////////////////////////////////////////////////////////////////////////////
// CInVoice dialog


CInVoice::CInVoice(CWnd* pParent /*=NULL*/)
	: CDialog(CInVoice::IDD, pParent)
{
	//{{AFX_DATA_INIT(CInVoice)
	m_sName = _T("");
	m_fPrice = 0.0f;
	//}}AFX_DATA_INIT
	m_nCount = 0;
}


void CInVoice::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CInVoice)
	DDX_Control(pDX, IDC_LIST, m_ctrlList);
	DDX_Text(pDX, IDC_NAME, m_sName);
	DDX_Text(pDX, IDC_PRICE, m_fPrice);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CInVoice, CDialog)
	//{{AFX_MSG_MAP(CInVoice)
	ON_EN_KILLFOCUS(IDC_NAME, OnKillfocusName)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CInVoice message handlers

void CInVoice::OnKillfocusName() 
{
	// 更新数据 
	UpdateData(TRUE);

	// 构造SQL查询语句
	CString strSQL = "SELECT * FROM 病人信息 WHERE 姓名 = '" + m_sName + "'";

	// 得到病人ID
	CString sPersonID;
	try
	{
		// 用构造的SQL语句打开记录集
		if (m_pRecordSet->IsOpen())
			m_pRecordSet->Close();
		m_pRecordSet->Open(dbOpenDynaset, strSQL);
		
		if (m_pRecordSet->GetRecordCount() > 0)
		{
			COleVariant varValue;
			m_pRecordSet->GetFieldValue(0, varValue);

			// 将得到的OLE变量转换为字符串变量
			const VARIANT* variant = LPCVARIANT(varValue);
			if (variant->vt & VT_BYREF)
				return;
			sPersonID.Format("%d", variant->lVal);
		}
		else
		{
			AfxMessageBox("病人姓名有误!");
		
			// 关闭记录集
			m_pRecordSet->Close();
			return;
		}

		// 关闭记录集
		m_pRecordSet->Close();
	}
	catch (CDaoException *e)
	{   
		AfxMessageBox(e->m_pErrorInfo->m_strDescription, MB_ICONEXCLAMATION);
		delete m_pRecordSet;
		e->Delete();
		return;
	}

	// 打开划价信息表
	int nMedicamentID[100];
	int nDiagnose[100];
	float fPrice[100];
	COleVariant varValue;
	m_nCount = 0;
	try
	{
		// 构造SQL查询语句
		strSQL = "SELECT * FROM 划价记录 WHERE 病人ID = " + sPersonID;
		
		// 用构造的SQL语句打开记录集
		m_pRecordSet->Open(dbOpenDynaset, strSQL);

		if (m_pRecordSet->GetRecordCount() > 0)
		{
			// 移动到第一条记录
			m_pRecordSet->MoveFirst();

			// 得到记录集中的值
			do 
			{
				try
				{
					// 得到药剂ID
					m_pRecordSet->GetFieldValue(2, varValue);
					const VARIANT* variant1 = LPCVARIANT(varValue);
					if (variant1->vt & VT_BYREF)
						return;
					nMedicamentID[m_nCount] = varValue.lVal;

					// 得到剂量
					m_pRecordSet->GetFieldValue(3, varValue);
					const VARIANT* variant2 = LPCVARIANT(varValue);
					if (variant2->vt & VT_BYREF)
						return;
					nDiagnose[m_nCount] = varValue.lVal;

					// 得到金额
					m_pRecordSet->GetFieldValue(4, varValue);
					const VARIANT* variant3 = LPCVARIANT(varValue);
					if (variant3->vt & VT_BYREF)
						return;
					VARIANT varPrice;
					varPrice.cyVal = varValue.cyVal;
					varPrice.vt = varValue.vt;
					COleCurrency price(varPrice);
					CString sPrice = price.Format();
					fPrice[m_nCount] = (float)atof(sPrice);

					// 更新显示
					UpdateData(FALSE);
				}
				catch (CDaoException* e)
				{
					AfxMessageBox(e->m_pErrorInfo->m_strDescription, MB_ICONEXCLAMATION);
					e->Delete();
					return;
				}
				m_pRecordSet->MoveNext();
				m_nCount++;
			} while (m_pRecordSet->IsEOF() == FALSE);
		}

		// 关闭记录集
		m_pRecordSet->Close();
	}
	catch (CDaoException *e)
	{   
		AfxMessageBox(e->m_pErrorInfo->m_strDescription, MB_ICONEXCLAMATION);
		delete m_pRecordSet;
		e->Delete();
		return;
	}

	CString sTemp;
	m_fPrice = 0.0f;
	for (int i = 0; i < m_nCount; i++)
	{
		try
		{
			// 构造SQL查询语句
			sTemp.Format("%d", nMedicamentID[i]);
			strSQL = "SELECT * FROM 药剂信息 WHERE 药剂ID = " + sTemp;
			
			// 用构造的SQL语句打开记录集
			m_pRecordSet->Open(dbOpenDynaset, strSQL);

			if (m_pRecordSet->GetRecordCount() > 0)
			{
				// 得到药品名称
				m_pRecordSet->GetFieldValue(2, varValue);
				const VARIANT* variant1 = LPCVARIANT(varValue);
				if (variant1->vt & VT_BYREF)
					return;
				m_sList[i] = varValue.pcVal;
				sTemp.Format("%d", nDiagnose[i]);
				m_sList[i] += sTemp;

				// 得到药品单位
				m_pRecordSet->GetFieldValue(9, varValue);
				const VARIANT* variant2 = LPCVARIANT(varValue);
				if (variant2->vt & VT_BYREF)
					return;
				m_sList[i] += varValue.pcVal;
				
				m_fPrice += fPrice[i];
				sTemp.Format(" %0.2f元", fPrice[i]);
				m_sList[i] += sTemp;

				// 添加到列表
				m_ctrlList.AddString(m_sList[i]);
			}
			
			// 关闭记录集
			m_pRecordSet->Close();
		}
		catch (CDaoException *e)
		{   
			AfxMessageBox(e->m_pErrorInfo->m_strDescription, MB_ICONEXCLAMATION);
			delete m_pRecordSet;
			e->Delete();
			return;
		}
	}

	// 更新显示
	UpdateData(FALSE);
}