dqyqhtps.cpp

合同管理系统

// Dqyqhtps.cpp : implementation file
//

#include "stdafx.h"
#include "htglxt.h"
#include "Dqyqhtps.h"
#include "ExternDllHeader.h"
#include "DBaseQuery.h"
#include "MyDoc.h"
#include "PrintView.h"
#include "MainFrm.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif
extern CHtglxtApp theApp;
/////////////////////////////////////////////////////////////////////////////
// CDqyqhtps dialog


CDqyqhtps::CDqyqhtps(CWnd* pParent /*=NULL*/)
	: CDialog(CDqyqhtps::IDD, pParent)
{
	//{{AFX_DATA_INIT(CDqyqhtps)
	//}}AFX_DATA_INIT
}


void CDqyqhtps::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CDqyqhtps)
	DDX_Control(pDX, IDC_COMBO1, m_Comxmyz);
	DDX_Control(pDX, IDC_BUTDELE, m_ButDele);
	DDX_Control(pDX, IDC_BUTPRINT, m_ButPrint);
	DDX_Control(pDX, IDC_DTTBSJ, m_Dttbsj);
	DDX_Control(pDX, IDC_DTPSSJ, m_Dtpssg);
	DDX_Control(pDX, IDC_EDTXMGB, m_Edtxmgb);
	DDX_Control(pDX, IDC_EDTTPWTJFZ, m_Edttpwtjfz);
	DDX_Control(pDX, IDC_EDTTPFZE, m_Edttpfze);
	DDX_Control(pDX, IDC_EDTTBR, m_Edttbr);
	DDX_Control(pDX, IDC_EDTSSFS, m_Edtssfs);
	DDX_Control(pDX, IDC_EDTSPQM, m_Edtspqm);
	DDX_Control(pDX, IDC_EDTSHHBR, m_Edtshhbr);
	DDX_Control(pDX, IDC_EDTQT, m_Edtqt);
	DDX_Control(pDX, IDC_EDTPSZCR, m_Edtpszcr);
	DDX_Control(pDX, IDC_EDTPSYJ, m_Edtpsyj);
	DDX_Control(pDX, IDC_EDTPSDD, m_Edtpsdd);
	DDX_Control(pDX, IDC_EDTPSCJR, m_Edtpscjr);
	DDX_Control(pDX, IDC_EDTHTE, m_Edtthte);
	DDX_Control(pDX, IDC_EDTBZ2, m_Edtbz2);
	DDX_Control(pDX, IDC_EDTBZ, m_Edtbz);
	DDX_Control(pDX, IDC_EDTBH, m_Edtbh);
	DDX_Control(pDX, IDC_DTTPSJ, m_Dttpsj);
	DDX_Control(pDX, IDC_COMXMMC, m_Comxmmc);
	DDX_Control(pDX, IDC_BUTSAVE1, m_ButSave);
	DDX_Control(pDX, IDC_BUTEXIT1, m_ButExit);
	DDX_Control(pDX, IDC_BUTADD, m_ButAdd);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CDqyqhtps, CDialog)
	//{{AFX_MSG_MAP(CDqyqhtps)
	ON_BN_CLICKED(IDC_BUTADD, OnButadd)
	ON_BN_CLICKED(IDC_BUTSAVE1, OnButsave1)
	ON_BN_CLICKED(IDC_BUTEXIT1, OnButexit1)
	ON_BN_CLICKED(IDC_BUTPRINT, OnButprint)
	ON_WM_PAINT()
	ON_BN_CLICKED(IDC_BUTDELE, OnButdele)
	ON_CBN_KILLFOCUS(IDC_COMBO1, OnKillfocusCombo1)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CDqyqhtps message handlers

void CDqyqhtps::OnOK() 
{
	// TODO: Add extra validation here
	
	//CDialog::OnOK();
}

BOOL CDqyqhtps::OnInitDialog() 
{
	CDialog::OnInitDialog();
	CDBaseQuery* ParentWnd=(CDBaseQuery*)FindWindow(NULL,"签约前合同评审查询");
	m_sID=ParentWnd->m_Grid.GetItemText(ParentWnd->m_Grid.GetRow(),0);
	this->Display(m_sID);
	RxRecordset rst;
	rst.Open("项目信息表");
	this->m_Comxmmc.SetRecordset(rst,"名称");
	rst.Open("往来单位信息表");
	m_Comxmyz.SetRecordset(rst,"名称");
	this->ShowWindow(SW_SHOWMAXIMIZED);
	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}
void CDqyqhtps::Enabled(bool bEnabled)
{
	m_Comxmyz.EnableWindow(bEnabled);
	m_Edtxmgb.EnableWindow(bEnabled);
	m_Edttpwtjfz.EnableWindow(bEnabled);
	m_Edttpfze.EnableWindow(bEnabled);
	m_Edttbr.EnableWindow(bEnabled);
	m_Edtssfs.EnableWindow(bEnabled);
	m_Edtspqm.EnableWindow(bEnabled);
	m_Edtshhbr.EnableWindow(bEnabled);
	m_Edtqt.EnableWindow(bEnabled);
	m_Edtpszcr.EnableWindow(bEnabled);
	m_Edtpsyj.EnableWindow(bEnabled);
	m_Edtpsdd.EnableWindow(bEnabled);
	m_Edtpscjr.EnableWindow(bEnabled);
	m_Edtthte.EnableWindow(bEnabled);
	m_Edtbz2.EnableWindow(bEnabled);
	m_Edtbz.EnableWindow(bEnabled);
	m_Dttpsj.EnableWindow(bEnabled);
	m_Dtpssg.EnableWindow(bEnabled);
	m_Dttbsj.EnableWindow(bEnabled);

	m_Comxmmc.EnableWindow(bEnabled);
	m_ButSave.EnableWindow(bEnabled);
	m_ButExit.EnableWindow(!bEnabled);
	m_ButAdd.EnableWindow(!bEnabled);
	m_ButPrint.EnableWindow(!bEnabled);
	m_ButDele.EnableWindow(!bEnabled);
}
void CDqyqhtps::Clear()
{
	m_Comxmyz.SetWindowText("");
	m_Edtxmgb.SetWindowText("");
	m_Edttpwtjfz.SetWindowText("");
	m_Edttpfze.SetWindowText("");
	m_Edttbr.SetWindowText("");
	m_Edtssfs.SetWindowText("");
	m_Edtspqm.SetWindowText("");
	m_Edtshhbr.SetWindowText("");
	m_Edtqt.SetWindowText("");
	m_Edtpszcr.SetWindowText("");
	m_Edtpsyj.SetWindowText("");
	m_Edtpsdd.SetWindowText("");
	m_Edtpscjr.SetWindowText("");
	m_Edtthte.SetWindowText("");
	m_Edtbz2.SetWindowText("");
	m_Edtbz.SetWindowText("");
	m_Comxmmc.SetWindowText("");
	CTime date;
	date=date.GetCurrentTime();
	m_Dttpsj.SetTime(&date);
	m_Dtpssg.SetTime(&date);
	m_Dttbsj.SetWindowText("");

}
void CDqyqhtps::Display(CString sID)
{
	if(sID.IsEmpty())
		return;
	CString sSQL;
	RxRecordset drst;
	sSQL.Format("SELECT * FROM 签约前合同评审视图 WHERE 编号='%s'",sID);
	drst.Open(sSQL,adCmdText);
	if(drst.GetRecordCount()<1)
		return;
	CString sXmmc,sXmgb,sXmyz,sHte,sDwbz,sTprq,sTpfze,sTpwtjfa,
		sSsfagy,sQt,sPszcr,sShhbr,sPscjr,sPsyj,sSpqm,sSpdd,
		sSpsj,sTbr,sTbsj,sBz;
	CTime tSpsj,tTpsj,tTbsj;

	sXmmc=drst.GetFieldValue("名称");
	sXmyz=drst.GetFieldValue("项目业主");
	sXmgb=drst.GetFieldValue("项目国别");
	sHte=drst.GetFieldValue("合同额");
	sDwbz=drst.GetFieldValue("单位币种");
	sTprq=drst.GetFieldValue("谈判日期");
	sTpfze=drst.GetFieldValue("谈判负责人");
	sTpwtjfa=drst.GetFieldValue("谈判问题及方案");
	sSsfagy=drst.GetFieldValue("实施方案概要");
	sQt=drst.GetFieldValue("其他");
	sPszcr=drst.GetFieldValue("评审主持人");
	sShhbr=drst.GetFieldValue("评审汇报人");
	sPscjr=drst.GetFieldValue("评审参加人");
	sPsyj=drst.GetFieldValue("审批意见");
	sSpqm=drst.GetFieldValue("审批签名");
	sSpdd=drst.GetFieldValue("审评地点");
	sSpsj=drst.GetFieldValue("审评时间");
	sTbr=drst.GetFieldValue("填表人");
	sTbsj=drst.GetFieldValue("填表时间");
	sBz=drst.GetFieldValue("备注");
	tSpsj=CStringTOCTime(sSpsj);
	tTbsj=CStringTOCTime(sTbsj);
	tTpsj=CStringTOCTime(sTprq);
	m_Edtbh.SetWindowText(sID);
	m_Comxmyz.SetWindowText(sXmyz);
	m_Edtxmgb.SetWindowText(sXmgb);
	m_Edttpwtjfz.SetWindowText(sTpwtjfa);
	m_Edttpfze.SetWindowText(sTpfze);
	m_Edttbr.SetWindowText(sTbr);
	m_Edtssfs.SetWindowText(sSsfagy);
	m_Edtspqm.SetWindowText(sSpqm);
	m_Edtshhbr.SetWindowText(sShhbr);
	m_Edtqt.SetWindowText(sQt);
	m_Edtpszcr.SetWindowText(sPszcr);
	m_Edtpsyj.SetWindowText(sPsyj);
	m_Edtpsdd.SetWindowText(sSpdd);
	m_Edtpscjr.SetWindowText(sPscjr);
	m_Edtthte.SetWindowText(sHte);
	m_Edtbz2.SetWindowText(sBz);
	m_Edtbz.SetWindowText(sDwbz);
	m_Comxmmc.SetWindowText(sXmmc);
	m_Dttpsj.SetTime(&tTpsj);
	m_Dtpssg.SetTime(&tSpsj);
	m_Dttbsj.SetTime(&tTbsj);

}

void CDqyqhtps::OnButadd() 
{
	CString sNewID;
	sNewID=ado.AutoNumber("签约前合同评审表","编号","PS",3);
	this->Clear();
	this->Enabled(true);
	this->m_Edtbh.SetWindowText(sNewID);
	this->m_Dttpsj.SetFocus();
	CTime time;
	time=time.GetCurrentTime();
	this->m_Dtpssg.SetTime(&time);
	this->m_Dttbsj.SetTime(&time);
	this->m_Dttpsj.SetTime(&time);
}

void CDqyqhtps::OnButsave1() 
{
	if(MessageBox("确定要保存记录吗？","系统提示",MB_OKCANCEL|MB_ICONQUESTION)!=1)
		return;
	CString sSQL,sID,sXmmcID,sXmmc,sXmgb,sXmyz,sHte,sDwbz,sTprq,sTpfze,sTpwtjfa,
		sSsfagy,sQt,sPszcr,sShhbr,sPscjr,sPsyj,sSpqm,sSpdd,
		sSpsj,sTbr,sTbsj,sBz;
	CTime tTpsj,tSpsj,tTbsj;

	m_Edtbh.GetWindowText(sID);
	m_Comxmyz.GetWindowText(sXmyz);
	m_Edtxmgb.GetWindowText(sXmgb);
	m_Edttpwtjfz.GetWindowText(sTpwtjfa);
	m_Edttpfze.GetWindowText(sTpfze);
	m_Edttbr.GetWindowText(sTbr);
	m_Edtssfs.GetWindowText(sSsfagy);
	m_Edtspqm.GetWindowText(sSpqm);
	m_Edtshhbr.GetWindowText(sShhbr);
	m_Edtqt.GetWindowText(sQt);
	m_Edtpszcr.GetWindowText(sPszcr);
	m_Edtpsyj.GetWindowText(sPsyj);
	m_Edtpsdd.GetWindowText(sSpdd);
	m_Edtpscjr.GetWindowText(sPscjr);
	m_Edtthte.GetWindowText(sHte);
	m_Edtbz2.GetWindowText(sBz);
	m_Edtbz.GetWindowText(sDwbz);
	m_Comxmmc.GetWindowText(sXmmc);
	m_Dttpsj.GetTime(tTpsj);
	m_Dtpssg.GetTime(tSpsj);
	m_Dttbsj.GetTime(tTbsj);
	sTprq=CTimeToCString(tTpsj);
	sSpsj=CTimeToCString(tSpsj);
	sTbsj=CTimeToCString(tTbsj);
	sXmmcID=ado.FieldToOtherField("项目信息表","名称",sXmmc,"编号",1);
	if(sXmmcID.IsEmpty())
	{
		MessageBox("您输入的项目名称不存在！请确定此项目在 [基础信息]/[项目信息] 中已经添加!","系统提示",MB_OK|MB_ICONSTOP);
		m_Comxmmc.SetFocus();
		return;
	}
	sSQL.Format("Insert Into 签约前合同评审表 Values('%s','%s','%s','%s',%s,'%s','%s','%s','%s','%s','%s','%s','%s','%s','%s','%s','%s','%s','%s','%s','%s')",sID,sXmmcID,sXmgb,sXmyz,sHte,sDwbz,sTprq,sTpfze,sTpwtjfa,sSsfagy,sQt,sPszcr,sShhbr,sPscjr,sPsyj,sSpqm,sSpdd,sSpsj,sTbr,sTbsj,sBz);
	RxRecordset arst;
	arst.Open(sSQL,adCmdText);
	this->Enabled(false);
	this->m_ButAdd.SetFocus();

}

void CDqyqhtps::OnButexit1() 
{
	this->OnCancel();	
}




void CDqyqhtps::OnButprint() 
{
	m_Edtbh.GetWindowText(PrintID);
	theApp.m_pDocManager=NULL;
	theApp.m_pMainWnd=NULL;
	CSingleDocTemplate* pDocTemplate;
	pDocTemplate = new CSingleDocTemplate(
		IDR_MAINFRAME,
		RUNTIME_CLASS(CMyDoc),
		RUNTIME_CLASS(CMainFrame),       // main SDI frame window
		RUNTIME_CLASS(CPrintView));
	theApp.AddDocTemplate(pDocTemplate);
	CCommandLineInfo cmdInfo;
	theApp.ParseCommandLine(cmdInfo);
	if (!theApp.ProcessShellCommand(cmdInfo))
		return ;
	theApp.m_pMainWnd->ShowWindow(SW_SHOWMAXIMIZED);
	theApp.m_pMainWnd->UpdateWindow();
}


void CDqyqhtps::OnPaint() 
{
	CPaintDC dc(this); // device context for painting
	// Do not call CDialog::OnPaint() for painting messages
}

void CDqyqhtps::OnButdele() 
{
	CString sSQL,sID;
	m_Edtbh.GetWindowText(sID);

	if(MessageBox("确定要删除记录吗？","系统提示",MB_OKCANCEL|MB_ICONQUESTION)!=1)
		return;
	sSQL.Format("DELETE 签约前合同评审表 WHERE 编号 ='%s'",sID);
	RxRecordset drst;
	drst.Open(sSQL,adCmdText);
	this->OnCancel();	
}

void CDqyqhtps::OnKillfocusCombo1() 
{
	CString sSQL,sJfmc;
	m_Comxmyz.GetWindowText(sJfmc);
	if(sJfmc.IsEmpty())
		return;
	sSQL.Format("SELECT * FROM 往来单位信息表 WHERE 名称='%s'",sJfmc);
	RxRecordset rst;
	rst.Open(sSQL,adCmdText);

	if(rst.GetRecordCount()<1)
	{
		MessageBox("您输入的往来单位名称不正确，请确定在[基础信息]\[往来单位管理]中已添加!","系统提示",MB_OK|MB_ICONSTOP);
		m_Comxmyz.SetWindowText("");
		m_Comxmyz.SetFocus();
	}
	
}