// Medicament.cpp : implementation file
//

#include "stdafx.h"
#include "Hospital.h"
#include "Medicament.h"

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

/////////////////////////////////////////////////////////////////////////////
// CMedicament dialog


CMedicament::CMedicament(CWnd* pParent /*=NULL*/)
	: CDialog(CMedicament::IDD, pParent)
{
	//{{AFX_DATA_INIT(CMedicament)
	m_sCode = _T("");
	m_sDosage = _T("");
	m_sFactory = _T("");
	m_sForm = _T("");
	m_sName = _T("");
	m_sPrice = _T("");
	m_sType = _T("");
	m_sUnit = _T("");
	m_sUse = _T("");
	//}}AFX_DATA_INIT
}


void CMedicament::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CMedicament)
	DDX_Text(pDX, IDC_CODE, m_sCode);
	DDX_Text(pDX, IDC_DOSAGE, m_sDosage);
	DDX_Text(pDX, IDC_FACTORY, m_sFactory);
	DDX_Text(pDX, IDC_FORM, m_sForm);
	DDX_Text(pDX, IDC_NAME, m_sName);
	DDX_Text(pDX, IDC_PRICE, m_sPrice);
	DDX_CBString(pDX, IDC_TYPE, m_sType);
	DDX_CBString(pDX, IDC_UNIT, m_sUnit);
	DDX_Text(pDX, IDC_USE, m_sUse);
	//}}AFX_DATA_MAP
}


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

/////////////////////////////////////////////////////////////////////////////
// CMedicament message handlers

void CMedicament::OnOK() 
{
	// 更新數據
	UpdateData(TRUE);

	// 打開就診信息表
	try
	{
		// 構造SQL查詢語句
		CString 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)m_sType);
			break;
		case 2:
			m_pRecordSet->SetFieldValue((LPCTSTR)m_fieldinfo.m_strName, (LPCTSTR)m_sName);
			break;
		case 3:
			m_pRecordSet->SetFieldValue((LPCTSTR)m_fieldinfo.m_strName, (LPCTSTR)m_sCode);
			break;
		case 4:
			m_pRecordSet->SetFieldValue((LPCTSTR)m_fieldinfo.m_strName, (LPCTSTR)m_sFactory);
			break;
		case 5:
			m_pRecordSet->SetFieldValue((LPCTSTR)m_fieldinfo.m_strName, (LPCTSTR)m_sPrice);
			break;
		case 6:
			m_pRecordSet->SetFieldValue((LPCTSTR)m_fieldinfo.m_strName, (LPCTSTR)m_sForm);
			break;
		case 7:
			m_pRecordSet->SetFieldValue((LPCTSTR)m_fieldinfo.m_strName, (LPCTSTR)m_sUse);
			break;
		case 8:
			m_pRecordSet->SetFieldValue((LPCTSTR)m_fieldinfo.m_strName, (LPCTSTR)m_sDosage);
			break;
		case 9:
			m_pRecordSet->SetFieldValue((LPCTSTR)m_fieldinfo.m_strName, (LPCTSTR)m_sUnit);
			break;
		}		
	}
	
	// 更新數據
	if (m_pRecordSet->CanUpdate() == TRUE)
		m_pRecordSet->Update();

	// 刷新
	if (m_pRecordSet->CanRestart() == TRUE)
		m_pRecordSet->Requery();
	
	// 關閉記錄集
	m_pRecordSet->Close();

	CDialog::OnOK();
}