📄 dhtgg.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 + -