📄 yszmcxdlg.cpp
字号:
}
else{
fread(&(tzm.reserve[0]),sizeof(zmstrt),1,qfpe);
}
strcpy(jfxs,tzm.jfxs);
strcpy(yzf,tzm.yzf);
strcpy(kcbh,tzm.rkbh);
strcpy(pyjx,tzm.pyjx);
strcpy(gdbh,tzm.gdbh);
strcpy(yqdm,tzm.yqdm);
strcpy(sbmc,tzm.sbmc);
strcpy(scdm,tzm.scdm);
strcpy(cjpp,tzm.cjpp);
strcpy(xhgg,tzm.xhgg);
strcpy(wpdj,tzm.wpdj);
strcpy(wpsl,tzm.wpsl);
strcpy(zje,tzm.zje);
strcpy(rkfs,tzm.rkfs);
strcpy(sfdzp,tzm.sfdzp);
strcpy(ssbm,tzm.ssbm);
strcpy(jbr,tzm.jbr);
strcpy(ghdw,tzm.ghdw);
strcpy(rkn,tzm.rkn);
strcpy(rky,tzm.rky);
strcpy(rkr,tzm.rkr);
t0 = atoi(rkn);
t1 = atoi(rky);
t2 = atoi(rkr);
t1 = t0*10000L + t1*100L + t2;
t2 = t_kcn*10000L + t_kcy*100L + t_kcr;
if (t1 <= t2){
if (yszmcx_if_valid(this)){
sl1 = atof(wpsl);
bh1 = atoi(kcbh);
sl1 = atof(wpsl);
for (k=0;k<end_of_sbck_recs;k++){
bh = atoi(sbck_rkbh[k]);
if (((i < num)&&(bh > 10000))||
((i >= num)&&(bh < 10000))){
if (bh > 10000)
bh -= 10000;
if (bh == bh1){
sl = atof(sbck_cksl[k]);
sl1 -= sl;
}
}
if (sl1 < 0){
strcpy(buf,"您的出入库帐目存在混乱,请检查.");
strcat(buf,sbmc);
MessageBox(buf,"",MB_OK);
fclose(fpe);
return ;
}
}
if (sl1 > 0){
f = atof(wpdj);
tjzje += f*sl1;
f = f * sl1;
f1 = atof(yzf);
t = atoi(jfxs);
tjzsl += sl1;
order_of_result_recs[end_result_recs] = i;
l = end_result_recs + 2;
strcpy(g_buf[0][end_result_recs],kcbh);
strcpy(g_buf[1][end_result_recs],sbmc);
strcpy(g_buf[2][end_result_recs],wpdj);
sprintf(buf,"%.2lf",sl1);
if ((buf[strlen(buf)-1] == '0')&&(buf[strlen(buf)-2] == '0')&&(buf[strlen(buf)-3] == '.'))
buf[strlen(buf)-3] = 0;
strcpy(g_buf[3][end_result_recs],buf);
f1 = atof(wpdj);
f = sl1 * f1;
sprintf(buf,"%.2lf",f);
strcpy(g_buf[4][end_result_recs],buf);
n = atoi(rkn);
y = atoi(rky);
r = atoi(rkr);
g_rksj[end_result_recs] = n*10000+y*100+r;
strcpy(buf,rkn);
strcat(buf,"年");
strcat(buf,rky);
strcat(buf,"月");
strcat(buf,rkr);
strcat(buf,"日");
strcpy(g_buf[5][end_result_recs],buf);
strcpy(g_buf[6][end_result_recs],xhgg);
strcpy(g_buf[7][end_result_recs],jbr);
strcpy(g_buf[8][end_result_recs],gdbh);
strcpy(g_buf[9][end_result_recs],sfdzp);
strcpy(g_buf[10][end_result_recs],cjpp);
strcpy(g_buf[11][end_result_recs],ghdw);
strcpy(g_buf[12][end_result_recs],ssbm);
strcpy(g_buf[13][end_result_recs],rkfs);
end_result_recs ++;
}
}
}
}
sprintf(buf,"%10.2lf",tjzsl);
SetDlgItemText(IDC_tjzsl,buf);
sprintf(buf,"%10.2lf",tjzje);
SetDlgItemText(IDC_tjzje,buf);
if (fpe != NULL)
fclose(fpe);
if (qfpe != NULL)
fclose(qfpe);
show_result();
}
void yield_kucun()
{
// TODO: Add your control notification handler code here
FILE *fpe;
long l,t1,t2;
int num,i,j,k,t;
char bu[500];
char buf[100];
float tjzje,tjzsl;
double f,f1,f2,f3,sl,sl1;
int jqck_flag,bh,bh1,num1;
FILE *cfpe,*qfpe;
int jslsk_flag,n,y,r;
int t_kcn,t_cur_year;
FILE *tofpe;
tofpe = fopen("c:\\xxsbgl\\kucun.dat","wb");
t_kcn = g_kcn;
int year;
time_t ltime;
struct tm *pti;
time(<ime);
pti = gmtime(<ime);
year = pti->tm_year + 1900;
t_cur_year = year;
if (t_kcn != t_cur_year){
g_lishi_flag = 1;
strcpy(g_cur_year,buf);
}
else
g_lishi_flag = 0;
if (g_lishi_flag == 1){
strcpy(buf,"c:\\xxsbgl\\");
strcat(buf,g_cur_year);
strcat(buf,"sbckzm.dat");
cfpe = fopen(buf,"rb");
}
else
cfpe = fopen("c:\\xxsbgl\\sbckzm.dat","rb");
if (cfpe == NULL){
end_of_sbck_recs = 0;
}
else{
fseek(cfpe,0L,SEEK_END);
l = ftell(cfpe);
num = l/280;
fseek(cfpe,0L,SEEK_SET);
for (i=0;i<num;i++){
fread(&(sbckunit.reserve[0]),sizeof(sbckstrt),1,cfpe);
strcpy(ckbh,sbckunit.ckbh);
strcpy(wpdj,sbckunit.wpdj);
strcpy(sbmc,sbckunit.sbmc);
strcpy(cksl,sbckunit.cksl);
strcpy(ckfs,sbckunit.ckfs);
strcpy(zje,sbckunit.zje);
strcpy(ckn,sbckunit.ckn);
strcpy(cky,sbckunit.cky);
strcpy(ckr,sbckunit.ckr);
strcpy(jbr,sbckunit.jbr);
strcpy(yqdm,sbckunit.yqdm);
strcpy(ssbm,sbckunit.ssbm);
strcpy(gdbh,sbckunit.gdbh);
strcpy(pyjx,sbckunit.pyjx);
strcpy(ckfx,sbckunit.ckfx);
strcpy(rkbh,sbckunit.rkbh);
strcpy(sbck_ckbh[i],ckbh);
strcpy(sbck_wpdj[i],wpdj);
strcpy(sbck_sbmc[i],sbmc);
strcpy(sbck_cksl[i],cksl);
// strcpy(sbck_ckfs[i],ckfs);
strcpy(sbck_zje[i],zje);
// strcpy(sbck_ckn[i],ckn);
// strcpy(sbck_cky[i],cky);
// strcpy(sbck_ckr[i],ckr);
// strcpy(sbck_jbr[i],jbr);
// strcpy(sbck_yqdm[i],yqdm);
// strcpy(sbck_ssbm[i],ssbm);
strcpy(sbck_gdbh[i],gdbh);
// strcpy(sbck_pyjx[i],pyjx);
// strcpy(sbck_ckfx[i],ckfx);
strcpy(sbck_rkbh[i],rkbh);
}
end_of_sbck_recs = num;
fclose(cfpe);
}
tjzje = tjzsl = 0;
end_result_recs = 0;
if (g_lishi_flag == 1){
strcpy(buf,"c:\\xxsbgl\\");
strcat(buf,g_cur_year);
strcat(buf,"sbrkzm.dat");
fpe = fopen(buf,"rb");
}
else
fpe = fopen("c:\\xxsbgl\\sbrkzm.dat","rb");
if (fpe != NULL){
fseek(fpe,0L,SEEK_END);
l = ftell(fpe);
num = l/453;
fseek(fpe,0L,SEEK_SET);
}
else
num = 0;
num1 = 0;
qfpe = NULL;
if (g_lishi_flag == 1){
strcpy(buf,"c:\\xxsbgl\\");
strcat(buf,g_cur_year);
strcat(buf,"qczm.dat");
qfpe = fopen(buf,"rb");
}
else
qfpe = fopen("c:\\xxsbgl\\qczm.dat","rb");
if (qfpe != NULL){
fseek(qfpe,0L,SEEK_END);
l = ftell(qfpe);
num1 = l/453;
fseek(qfpe,0L,SEEK_SET);
}
else
num1 = 0;
l = num + num1 + 2;
for (i=0;i<num+num1;i++){
if (i < num){
fread(&(tzm.reserve[0]),sizeof(zmstrt),1,fpe);
}
else{
fread(&(tzm.reserve[0]),sizeof(zmstrt),1,qfpe);
}
strcpy(jfxs,tzm.jfxs);
strcpy(yzf,tzm.yzf);
strcpy(kcbh,tzm.rkbh);
strcpy(pyjx,tzm.pyjx);
strcpy(gdbh,tzm.gdbh);
strcpy(yqdm,tzm.yqdm);
strcpy(sbmc,tzm.sbmc);
strcpy(scdm,tzm.scdm);
strcpy(cjpp,tzm.cjpp);
strcpy(xhgg,tzm.xhgg);
strcpy(wpdj,tzm.wpdj);
strcpy(wpsl,tzm.wpsl);
strcpy(zje,tzm.zje);
strcpy(rkfs,tzm.rkfs);
strcpy(sfdzp,tzm.sfdzp);
strcpy(ssbm,tzm.ssbm);
strcpy(jbr,tzm.jbr);
strcpy(ghdw,tzm.ghdw);
strcpy(rkn,tzm.rkn);
strcpy(rky,tzm.rky);
strcpy(rkr,tzm.rkr);
t1 = atoi(rky);
t2 = atoi(rkr);
t1 = t1*100L + t2;
t2 = g_kcy*100L + g_kcr;
if (t1 <= t2){
bh1 = atoi(kcbh);
sl1 = atof(wpsl);
for (k=0;k<end_of_sbck_recs;k++){
bh = atoi(sbck_rkbh[k]);
if (((i < num)&&(bh > 10000))||
((i >= num)&&(bh < 10000))){
if (bh > 10000)
bh -= 10000;
if (bh == bh1){
sl = atof(sbck_cksl[k]);
sl1 -= sl;
}
}
if (sl1 < 0){
strcpy(buf,"您的出入库帐目存在混乱,请检查.");
strcat(buf,sbmc);
MessageBox(NULL,buf,"",MB_OK);
fclose(fpe);
return ;
}
}
if (sl1 > 0){
f = atof(wpdj);
tjzje += f*sl1;
f = f * sl1;
f1 = atof(yzf);
t = atoi(jfxs);
tjzsl += sl1;
order_of_result_recs[end_result_recs] = i;
l = end_result_recs + 2;
strcpy(g_buf[0][end_result_recs],kcbh);
strcpy(g_buf[1][end_result_recs],sbmc);
strcpy(g_buf[2][end_result_recs],wpdj);
sprintf(buf,"%.2lf",sl1);
if ((buf[strlen(buf)-1] == '0')&&(buf[strlen(buf)-2] == '0')&&(buf[strlen(buf)-3] == '.'))
buf[strlen(buf)-3] = 0;
strcpy(g_buf[3][end_result_recs],buf);
f1 = atof(wpdj);
f = sl1 * f1;
sprintf(buf,"%.2lf",f);
strcpy(g_buf[4][end_result_recs],buf);
n = atoi(rkn);
y = atoi(rky);
r = atoi(rkr);
g_rksj[end_result_recs] = n*10000+y*100+r;
strcpy(buf,rkn);
strcat(buf,"年");
strcat(buf,rky);
strcat(buf,"月");
strcat(buf,rkr);
strcat(buf,"日");
strcpy(g_buf[5][end_result_recs],buf);
strcpy(g_buf[6][end_result_recs],xhgg);
strcpy(g_buf[7][end_result_recs],jbr);
strcpy(g_buf[8][end_result_recs],gdbh);
strcpy(g_buf[9][end_result_recs],sfdzp);
strcpy(g_buf[10][end_result_recs],cjpp);
strcpy(g_buf[11][end_result_recs],ghdw);
strcpy(g_buf[12][end_result_recs],ssbm);
strcpy(g_buf[13][end_result_recs],rkfs);
strcpy(buf,"~");
fprintf(tofpe,"%71s\n",buf);
if (jfxs[0] == 0)
strcpy(jfxs,"~");
fprintf(tofpe,"%4s\n",jfxs);
if (yzf[0] == 0)
strcpy(yzf,"~");
fprintf(tofpe,"%11s\n",yzf);
if (kcbh[0] == 0)
strcpy(kcbh,"~");
fprintf(tofpe,"%11s\n",kcbh);
if (pyjx[0] == 0)
strcpy(pyjx,"~");
fprintf(tofpe,"%10s\n",pyjx);
if (gdbh[0] == 0)
strcpy(gdbh,"~");
fprintf(tofpe,"%10s\n",gdbh);
if (yqdm[0] == 0)
strcpy(yqdm,"~");
fprintf(tofpe,"%10s\n",yqdm);
if (sbmc[0] == 0)
strcpy(sbmc,"~");
fprintf(tofpe,"%50s\n",sbmc);
if (scdm[0] == 0)
strcpy(scdm,"~");
fprintf(tofpe,"%10s\n",scdm);
if (cjpp[0] == 0)
strcpy(cjpp,"~");
fprintf(tofpe,"%40s\n",cjpp);
if (xhgg[0] == 0)
strcpy(xhgg,"~");
fprintf(tofpe,"%40s\n",xhgg);
if (wpdj[0] == 0)
strcpy(wpdj,"~");
fprintf(tofpe,"%12s\n",wpdj);
if (g_buf[3][end_result_recs][0] == 0)
strcpy(g_buf[3][end_result_recs],"~");
fprintf(tofpe,"%14s\n",g_buf[3][end_result_recs]);
if (g_buf[4][end_result_recs][0] == 0)
strcpy(g_buf[4][end_result_recs],"~");
fprintf(tofpe,"%14s\n",g_buf[4][end_result_recs]);
if (rkfs[0] == 0)
strcpy(rkfs,"~");
fprintf(tofpe,"%20s\n",rkfs);
if (sfdzp[0] == 0)
strcpy(sfdzp,"~");
fprintf(tofpe,"%6s\n",sfdzp);
if (ssbm[0] == 0)
strcpy(ssbm,"~");
fprintf(tofpe,"%40s\n",ssbm);
if (jbr[0] == 0)
strcpy(jbr,"~");
fprintf(tofpe,"%10s\n",jbr);
if (ghdw[0] == 0)
strcpy(ghdw,"~");
fprintf(tofpe,"%40s\n",ghdw);
if (rkn == 0)
strcpy(rkn,"~");
fprintf(tofpe,"%4s\n",rkn);
if (rky == 0)
strcpy(rky,"~");
fprintf(tofpe,"%2s\n",rky);
if (rkr == 0)
strcpy(rkr,"~");
fprintf(tofpe,"%2s\n",rkr);
end_result_recs ++;
}
}
}
if (fpe != NULL)
fclose(fpe);
if (qfpe != NULL)
fclose(qfpe);
fclose(tofpe);
}
void Cyszmcxdlg::get_status()
{
char buf[100];
CWnd *wd;
int len;
GetDlgItemText(IDC_rkn,buf,50);
if (strlen(buf) == 0){
s_qrksj_flag = 0;
}
else{
s_qrksj_flag = 1;
strcpy(g_yszmcx_qsrksjn,buf);
GetDlgItemText(IDC_qrky,buf,50);
if (strlen(buf) > 0){
strcpy(s_qrksj,buf);
strcpy(g_yszmcx_qsrksjy,buf);
GetDlgItemText(IDC_qrkr,buf,50);
if (buf[0] == 0){
strcat(s_qrksj,"01");
strcpy(g_yszmcx_qsrksjr,"1");
}
else{
strcat(s_qrksj,buf);
strcpy(g_yszmcx_qsrksjr,buf);
}
}
else{
strcpy(s_qrksj,"0101");
}
}
GetDlgItemText(IDC_jrkn,buf,50);
if (strlen(buf) == 0){
s_jrksj_flag = 0;
}
else{
s_jrksj_flag = 1;
strcpy(g_yszmcx_jsrksjn,buf);
GetDlgItemText(IDC_jrky,buf,50);
if (strlen(buf) > 0){
strcpy(s_jrksj,buf);
strcpy(g_yszmcx_jsrksjy,buf);
GetDlgItemText(IDC_jrkr,buf,50);
if (buf[0] == 0){
strcat(s_jrksj,"31");
strcpy(g_yszmcx_jsrksjr,"31");
}
else{
strcat(s_jrksj,buf);
strcpy(g_yszmcx_jsrksjr,buf);
}
}
else{
strcpy(s_jrksj,"1231");
}
}
GetDlgItemText(IDC_sbs,buf,50);
if (strlen(buf) == 0){
s_sbs_flag = 0;
}
else{
if (strlen(s_sbs) != 0){
s_sbs_flag = 1;
SetDlgItemText(IDC_sbs,s_sbs);
}
else{
s_sbs_flag = 0;
SetDlgItemText(IDC_sbs,"");
}
}
GetDlgItemText(IDC_sbmc,buf,50);
if (strlen(buf) == 0){
s_sbmc_flag = 0;
}
else{
s_sbmc_flag = 1;
strcpy(s_sbmc,buf);
}
GetDlgItemText(IDC_qrkbh,buf,10);
len = strlen(buf);
if (len == 0){
s_qrkbh_flag = 0;
}
else {
s_qrkbh_flag = 1;
strcpy(s_qrkbh,buf);
}
GetDlgItemText(IDC_jrkbh,buf,10);
len = strlen(buf);
if (len == 0){
s_jrkbh_flag = 0;
}
else {
s_jrkbh_flag = 1;
strcpy(s_jrkbh,buf);
}
GetDlgItemText(IDC_ssbm,buf,40);
if (strlen(buf) == 0){
s_ssbm_flag = 0;
}
else{
s_ssbm_flag = 1;
strcpy(s_ssbm,buf);
}
GetDlgItemText(IDC_dzp,buf,40);
if (strlen(buf) == 0){
s_dzp_flag = 0;
}
else{
s_dzp_flag = 1;
strcpy(s_dzp,buf);
}
GetDlgIte⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -