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

📄 dhtgg.cpp

📁 企业合同管理系统:以企业合同为主线
💻 CPP
字号:
// Dhtgg.cpp : implementation file
//

#include "stdafx.h"
#include "htglxt.h"
#include "Dhtgg.h"
#include "DBaseQuery.h"
#include "externDllHeader.h"
#include "MyDoc.h"
#include "HtggView.h"
#include "MainFrm.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif
extern CHtglxtApp theApp;
/////////////////////////////////////////////////////////////////////////////
// CDhtgg dialog


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


void CDhtgg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CDhtgg)
	DDX_Control(pDX, IDC_COMHTBH, m_ComHTBH);
	DDX_Control(pDX, IDC_EDTXMZG, m_Edtxmzg);
	DDX_Control(pDX, IDC_EDTXMMC, m_Edtxmmc);
	DDX_Control(pDX, IDC_EDTQSR, m_Edtqsr);
	DDX_Control(pDX, IDC_EDTHTGGQSR, m_Edthtggqsr);
	DDX_Control(pDX, IDC_EDTGGNR, m_Edtggnr);
	DDX_Control(pDX, IDC_EDTBZ, m_Edtbz);
	DDX_Control(pDX, IDC_EDTBH, m_Edtbh);
	DDX_Control(pDX, IDC_DTSXRQ, m_Dtsxrq);
	DDX_Control(pDX, IDC_DTCSRQ, m_Dtcsrq);
	DDX_Control(pDX, IDC_COMZBBM, m_Comzbbm);
	DDX_Control(pDX, IDC_BUTSAVE1, m_ButSave);
	DDX_Control(pDX, IDC_BUTDELE, m_ButDele);
	DDX_Control(pDX, IDC_BUTPRINT, m_ButPrint);
	DDX_Control(pDX, IDC_BUTEXIT1, m_ButExit);
	DDX_Control(pDX, IDC_BUTADD, m_ButAdd);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CDhtgg, CDialog)
	//{{AFX_MSG_MAP(CDhtgg)
	ON_BN_CLICKED(IDC_BUTADD, OnButadd)
	ON_CBN_KILLFOCUS(IDC_COMHTBH, OnKillfocusComhtbh)
	ON_BN_CLICKED(IDC_BUTDELE, OnButdele)
	ON_BN_CLICKED(IDC_BUTSAVE1, OnButsave1)
	ON_BN_CLICKED(IDC_BUTEXIT1, OnButexit1)
	ON_BN_CLICKED(IDC_BUTPRINT, OnButprint)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CDhtgg message handlers

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

BOOL CDhtgg::OnInitDialog() 
{
	CDialog::OnInitDialog();
	
	CDBaseQuery* ParentWnd=(CDBaseQuery*)FindWindow(NULL,"合同更改查询");
	m_sID=ParentWnd->m_Grid.GetItemText(ParentWnd->m_Grid.GetRow(),0);
	rst.Open("合同签订记录");
	m_ComHTBH.SetRecordset(rst,"编号");
	if(m_sID.IsEmpty())
		this->m_ButDele.EnableWindow(false);
	this->Display(m_sID);
	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}

void CDhtgg::Clear()
{
	CTime time;
	time=time.GetCurrentTime();
	m_Edtxmzg.SetWindowText("");
	m_Edtxmmc.SetWindowText("");
	m_Edtqsr.SetWindowText("");
	m_Edthtggqsr.SetWindowText("");
	m_ComHTBH.SetWindowText("");
	m_Edtggnr.SetWindowText("");
	m_Edtbz.SetWindowText("");
	m_Edtbh.SetWindowText("");
	m_Dtsxrq.SetTime(&time);
	m_Dtcsrq.SetTime(&time);
	m_Comzbbm.SetWindowText("");
}

void CDhtgg::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 sHTBH,sXMMC,sGGNR,sHTQSR,sHTGGQSR,sZBBM,sXMZG,sHTGGSXRQ,sCSRQ,sBZ;
	sHTBH=drst.GetFieldValue("合同编号");
	sXMMC=drst.GetFieldValue("项目名称");
	sGGNR=drst.GetFieldValue("更改内容");
	sHTQSR=drst.GetFieldValue("合同签署人");
	sHTGGQSR=drst.GetFieldValue("合同更改签署人");
	sZBBM=drst.GetFieldValue("主办部门");
	sHTGGSXRQ=drst.GetFieldValue("合同更改生效日期");
	sCSRQ=drst.GetFieldValue("抄送日期");
	sBZ=drst.GetFieldValue("备注");
	sXMZG=drst.GetFieldValue("项目主管");

	m_Edtbh.SetWindowText(m_sID);
	m_ComHTBH.SetWindowText(sHTBH);
	m_Edtxmmc.SetWindowText(sXMMC);
	m_Edtggnr.SetWindowText(sGGNR);
	m_Edtqsr.SetWindowText(sHTQSR);
	m_Edthtggqsr.SetWindowText(sHTGGQSR);
	m_Comzbbm.SetWindowText(sZBBM);
	m_Edtbz.SetWindowText(sBZ);
	m_Edtxmzg.SetWindowText(sXMZG);
	CTime tHTGGSXRQ,tCSRQ;
	tHTGGSXRQ=CStringTOCTime(sHTGGSXRQ);
	tCSRQ=CStringTOCTime(sCSRQ);
	m_Dtsxrq.SetTime(&tHTGGSXRQ);
	m_Dtcsrq.SetTime(&tCSRQ);
}
	
void CDhtgg::Enabled(bool bEnabled)
{		
	m_ComHTBH.EnableWindow(bEnabled);
	m_Edtbz.EnableWindow(bEnabled);
	m_Edtggnr.EnableWindow(bEnabled);
	m_Edthtggqsr.EnableWindow(bEnabled);
	m_Dtsxrq.EnableWindow(bEnabled);
	m_ButSave.EnableWindow(bEnabled);
	m_ButDele.EnableWindow(!bEnabled);
	m_ButPrint.EnableWindow(!bEnabled);
	m_ButExit.EnableWindow(!bEnabled);
	m_ButAdd.EnableWindow(!bEnabled);
}


void CDhtgg::OnButadd() 
{
	CString sNewID;
	sNewID=ado.AutoNumber("合同更改记录表","编号","GG",3);
	this->Clear();
	this->Enabled(true);
	this->m_Edtbh.SetWindowText(sNewID);
	m_ComHTBH.SetFocus();
}

void CDhtgg::OnKillfocusComhtbh() 
{
	CString shtbh,sSQL;
	m_ComHTBH.GetWindowText(shtbh);	
	if(shtbh.IsEmpty())
		return;
	sSQL.Format("SELECT * FROM 合同签订视图 WHERE 编号='%s'",shtbh);
	rst.Open(sSQL,adCmdText);
	if(rst.GetRecordCount()<1)
	{
		MessageBox("您输入的合同编号有问题!请确定后重新输入!","系统提示",MB_OK|MB_ICONSTOP);
		m_ComHTBH.SetFocus();
		return;
	}
	else
	{
		CString sXMMC,sQSR,sBM,sXMZG;
		sXMMC=rst.GetFieldValue("项目");
		sBM=rst.GetFieldValue("部门");
		sQSR=rst.GetFieldValue("乙方代表");
		sXMZG=ado.FieldToOtherField("项目信息表","名称",sXMMC,"负责人",1);
		this->m_Edtxmmc.SetWindowText(sXMMC);
		this->m_Comzbbm.SetWindowText(sBM);
		this->m_Edtqsr.SetWindowText(sQSR);
		this->m_Edtxmzg.SetWindowText(sXMZG);
	}		
}

void CDhtgg::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 CDhtgg::OnButsave1() 
{
	if(MessageBox("确定要保存记录吗?","系统提示",MB_OKCANCEL|MB_ICONQUESTION)!=1)
		return;
	CString sSQL,sXMMC,sBMMC;
	CString sBH,sHTBH,sXMBH,sGGNR,sHTQSR,sHTGGQSR,sZBBM,sHTGGSXRQ,sCSRQ,sBZ;
	CTime tHTGGSXRQ,tCSRQ;
	m_Edtbh.GetWindowText(sBH);
	m_ComHTBH.GetWindowText(sHTBH);
	m_Edtxmmc.GetWindowText(sXMMC);
	sXMBH=ado.FieldToOtherField("项目信息表","名称",sXMMC,"编号",1);
	m_Edtggnr.GetWindowText(sGGNR);
	m_Edtqsr.GetWindowText(sHTQSR);
	m_Edthtggqsr.GetWindowText(sHTGGQSR);
	m_Comzbbm.GetWindowText(sBMMC);
	sZBBM=ado.FieldToOtherField("部门信息表","名称",sBMMC,"编号",1);
	m_Dtsxrq.GetTime(tHTGGSXRQ);
	m_Dtcsrq.GetTime(tCSRQ);	
	sHTGGSXRQ=CTimeToCString(tHTGGSXRQ);
	sCSRQ=CTimeToCString(tCSRQ);
	m_Edtbz.GetWindowText(sBZ);
	sSQL.Format("INSERT INTO 合同更改记录表 VALUES('%s','%s','%s','%s','%s','%s',%s,'%s','%s','%s')",sBH,sHTBH,sXMBH,sGGNR,sHTQSR,sHTGGQSR,sZBBM,sHTGGSXRQ,sCSRQ,sBZ);
	RxRecordset sRst;
	sRst.Open(sSQL,adCmdText);
	//更改合同签订信息
	sBZ=ado.FieldToOtherField("合同签订记录","编号",sHTBH,"备注",1);
	CString sBZ2;
	sBZ2.Format("\n%s 合同更改如下内容 :\n%s",sCSRQ,sGGNR);
	sBZ=sBZ+sBZ2;
	sSQL.Format("UPDATE 合同签订记录 SET 备注='%s' WHERE 编号='%s'",sBZ,sHTBH);
	sRst.Open(sSQL,adCmdText);
	this->Enabled(false);
	this->m_ButAdd.SetFocus();

}

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

void CDhtgg::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(CHtggView));
	theApp.AddDocTemplate(pDocTemplate);
	CCommandLineInfo cmdInfo;
	theApp.ParseCommandLine(cmdInfo);
	if (!theApp.ProcessShellCommand(cmdInfo))
		return ;
	theApp.m_pMainWnd->ShowWindow(SW_SHOWMAXIMIZED);
	theApp.m_pMainWnd->UpdateWindow();	

}

⌨️ 快捷键说明

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