diagnose.cpp

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

// Diagnose.cpp : implementation file
//

#include "stdafx.h"
#include "Hospital.h"
#include "Diagnose.h"

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

/////////////////////////////////////////////////////////////////////////////
// CDiagnose dialog


CDiagnose::CDiagnose(CWnd* pParent /*=NULL*/)
	: CDialog(CDiagnose::IDD, pParent)
{
	//{{AFX_DATA_INIT(CDiagnose)
	m_sDept = _T("");
	m_sDoctor = _T("");
	m_sName = _T("");
	m_sPast = _T("");
	m_sNow = _T("");
	m_sReason = _T("");
	m_sResult = _T("");
	//}}AFX_DATA_INIT
}


void CDiagnose::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CDiagnose)
	DDX_CBString(pDX, IDC_DEPT, m_sDept);
	DDX_Text(pDX, IDC_DOCTOR, m_sDoctor);
	DDX_Text(pDX, IDC_NAME, m_sName);
	DDX_Text(pDX, IDC_PAST, m_sPast);
	DDX_Text(pDX, IDC_NOW, m_sNow);
	DDX_Text(pDX, IDC_REASON, m_sReason);
	DDX_Text(pDX, IDC_RESULT, m_sResult);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CDiagnose, CDialog)
	//{{AFX_MSG_MAP(CDiagnose)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CDiagnose message handlers

void CDiagnose::OnOK() 
{
	// 更新数据
	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;
	}

	// 打开就诊信息表
	try
	{
		// 构造SQL查询语句
		strSQL = "SELECT * FROM 就诊信息";

		// 用构造的SQL语句打开记录集
		m_pRecordSet->Open(dbOpenDynaset, strSQL);
	}
	catch (CDaoException *e)
	{   
		AfxMessageBox(e->m_pErrorInfo->m_strDescription, MB_ICONEXCLAMATION);
		delete m_pRecordSet;
		e->Delete();
		return;
	}

	try
	{
		// 滚动到最后一条记录
		if (m_pRecordSet->IsEOF() == FALSE)
			m_pRecordSet->MoveLast();

		// 准备添加新记录
		m_pRecordSet->AddNew();
	}
	catch (CDaoException* e)
	{
		AfxMessageBox(e->m_pErrorInfo->m_strDescription, MB_ICONEXCLAMATION);
		e->Delete();
		return;
	}

	// 得到并插入字段名
	CDaoFieldInfo m_fieldinfo;

	// 将对话框内容填写到数据库各字段
	for (int i = 1; i < m_pRecordSet->GetFieldCount(); i++)
	{    
		// 获取各字段信息
		m_pRecordSet->GetFieldInfo(i, m_fieldinfo);
		
		// 设置字段内容
		switch (i)
		{
		case 1:
			m_pRecordSet->SetFieldValue((LPCTSTR)m_fieldinfo.m_strName, (LPCTSTR)sPersonID);
			break;
		case 2:
			m_pRecordSet->SetFieldValue((LPCTSTR)m_fieldinfo.m_strName, (LPCTSTR)m_sReason);
			break;
		case 3:
			m_pRecordSet->SetFieldValue((LPCTSTR)m_fieldinfo.m_strName, (LPCTSTR)m_sDept);
			break;
		case 4:
			m_pRecordSet->SetFieldValue((LPCTSTR)m_fieldinfo.m_strName, (LPCTSTR)m_sDoctor);
			break;
		case 5:
			m_pRecordSet->SetFieldValue((LPCTSTR)m_fieldinfo.m_strName, (LPCTSTR)m_sResult);
			break;
		case 6:
			m_pRecordSet->SetFieldValue((LPCTSTR)m_fieldinfo.m_strName, (LPCTSTR)m_sNow);
			break;
		case 7:
			m_pRecordSet->SetFieldValue((LPCTSTR)m_fieldinfo.m_strName, (LPCTSTR)m_sPast);
			break;
		case 8:
			{
				CString sTemp;
				CTime tmDate = CTime::GetCurrentTime();
				sTemp.Format("%4d-%2d-%2d", tmDate.GetYear(), tmDate.GetMonth(), tmDate.GetDay());
				m_pRecordSet->SetFieldValue((LPCTSTR)m_fieldinfo.m_strName, (LPCTSTR)sTemp);
				break;
			}
		}		
	}
	
	// 更新数据
	if (m_pRecordSet->CanUpdate() == TRUE)
		m_pRecordSet->Update();

	// 刷新
	if (m_pRecordSet->CanRestart() == TRUE)
		m_pRecordSet->Requery();
	
	// 关闭记录集
	if (m_pRecordSet->IsOpen())
		m_pRecordSet->Close();

	CDialog::OnOK();
}