?? inq_tfe.c
字號:
#include <dos.h>
#include <bios.h>
#include <stdlib.h>
#include <string.h>
#include <graphics.h>
#include <bio.inc>
#include <menu.inc>
#include <key.inc>
#include "feedef.h"
#define BK_CLR 7
#define CHR_CLR 0
#define HEAD_CLR 0
FE_STAT_STRUCT Statsfee;
TIME_STRUCT Ts_time, Te_time;
/* function : calculating the total fee of PABX
* date : 1993.10.11
*/
void stats_fee(void)
{
int i, flag;
FILE *fp;
PHONE_STRUCT *phone;
AUTHCD_STRUCT *authcd;
FE_STAT_STRUCT statsfee={ 0,
0,
0,
0,
0,
0,
0,
0,
0,
0,
{0, 0, 0, 0, 0}
};
load_phone_tbl();
Newlen = phone_tbl_len();
phone = Phone_top;
message_disp(8,"正在統計，請稍候..."); /* statsing, please wait... */
for(i=0; i<Newlen; i++)
{
statsfee.month_lease += phone->month_lease;
statsfee.addfee[0] += phone->addfee[0];
statsfee.addfee[1] += phone->addfee[1];
statsfee.addfee[2] += phone->addfee[2];
statsfee.addfee[3] += phone->addfee[3];
statsfee.addfee[4] += phone->addfee[4];
statsfee.local_charge += phone->local_charge;
statsfee.local_time += phone->local_time;
statsfee.local_count += phone->local_count;
statsfee.intern_charge+= phone->intern_charge;
statsfee.intern_time += phone->intern_time;
statsfee.intern_count += phone->intern_count;
statsfee.nation_charge+= phone->nation_charge;
statsfee.nation_time += phone->nation_time;
statsfee.nation_count += phone->nation_count;
phone++;
}
unload_phone_tbl();
flag = load_authcd_tbl(0);
if(flag == TRUE)
{
ANewlen = authcd_tbl_len();
authcd = Auth_cd_top;
for(i=0; i<ANewlen; i++)
{
statsfee.month_lease += authcd->month_lease;
statsfee.addfee[4] += authcd->addfee;
statsfee.local_charge += authcd->local_charge;
statsfee.local_time += authcd->local_time;
statsfee.local_count += authcd->local_count;
statsfee.intern_charge+= authcd->intern_charge;
statsfee.intern_time += authcd->intern_time;
statsfee.intern_count += authcd->intern_count;
statsfee.nation_charge+= authcd->nation_charge;
statsfee.nation_time += authcd->nation_time;
statsfee.nation_count += authcd->nation_count;
authcd++;
}
unload_authcd_tbl();
}
fp = fopen("gfsdata\\totfee.dat","wb");
fwrite(&statsfee,sizeof(FE_STAT_STRUCT),1,fp);
fclose(fp);
message_end();
return;
}
/* function : inquire total fee
* called by : stat_prt()
* date : 1993.10.18
*/
void inq_total_fee(void)
{
FILE *fp;
UI input;
UNIT_STRUCT cur_unit;
TABLE_STRUCT tfee_tbl1 = { 28, 115, 35, 35, 3, 5,
{80, 135, 135, 135, 96},
GREEN
};
TABLE_STRUCT tfee_tbl2 = { 28, 261, 35, 35, 1, 7,
{80, 81, 80, 81, 80, 81, 96},
GREEN
};
TABLE_STRUCT tfee_tbl3 = { 28, 335, 35, 35, 1, 4,
{162, 162, 162, 96},
GREEN
};
fp = fopen("gfsdata\\totfee.dat","rb");
if(fp == NULL)
{
message(TFEE_FILE_ERR);
return;
}
fread(&Statsfee, sizeof(FE_STAT_STRUCT), 1, fp);
fclose(fp);
fp = fopen(TotTimeFileName,"rb");
if(fp == NULL)
{
message(TFEE_FILE_ERR);
return;
}
fread(&Ts_time, sizeof(TIME_STRUCT), 1, fp);
fread(&Te_time, sizeof(TIME_STRUCT), 1, fp);
fclose(fp);
clr_DialWin(2);
disp_tfee_head(TOTAL_FEE); /* display table head */
draw_table(&tfee_tbl1); /* draw the table frame */
disp_tfee_detl1();
draw_table(&tfee_tbl2); /* draw the table frame */
disp_tfee_detl2();
draw_table(&tfee_tbl3); /* draw the table frame */
disp_tfee_detl3();
message_disp(8,"Esc 終止 ");
while(1)
{
input=get_key1();
get_current(&cur_unit);
switch(input)
{
case ESC: /* QUIT */
recover_screen(2);
message_end();
return;
default:
sound_bell();
break;
}
}/* END OF WHILE */
}
/* function : display the DBCS head for the total fee table
* called by : inq_total_fee()
* date : 1993.9.22
*/
void disp_tfee_head(UC opflg)
{
if(opflg == TOTAL_FEE)
outf(232, 78+5, BK_CLR, HEAD_CLR, "話 費 匯 總 報 告");
else if(opflg == PHONE_FEE)
outf(232, 78+5, BK_CLR, HEAD_CLR, "分 機 話 費 報 告");
else if(opflg == DEPT_FEE)
outf(232, 78+5, BK_CLR, HEAD_CLR, "分 戶 話 費 報 告");
else
outf(232, 78+5, BK_CLR, HEAD_CLR, "授 權 用 戶 話 費 報 告");
outf(46, 116+10, BK_CLR, HEAD_CLR, "項 目");
outf(146, 116+10, BK_CLR, HEAD_CLR, "國際長途");
outf(281, 116+10, BK_CLR, HEAD_CLR, "國內長途");
outf(414, 116+10, BK_CLR, HEAD_CLR, "市 話");
outf(542, 116+10, BK_CLR, HEAD_CLR, "合 計");
outf(46, 162, BK_CLR, HEAD_CLR, "話 費");
outf(46, 208-10, BK_CLR, HEAD_CLR, "時 長");
outf(46, 254-20, BK_CLR, HEAD_CLR, "次 數");
outf(46, 300-29, BK_CLR, HEAD_CLR, "月租費");
outf(119, 300-29, BK_CLR, HEAD_CLR, "新業務費");
outf(200, 300-29, BK_CLR, HEAD_CLR, "人工長途");
outf(288, 300-29, BK_CLR, HEAD_CLR, "維修費");
outf(370, 300-29, BK_CLR, HEAD_CLR, "其它費");
outf(451, 300-29, BK_CLR, HEAD_CLR, "附加費");
outf(542, 300-29, BK_CLR, HEAD_CLR, "合 計");
if(opflg == TOTAL_FEE)
{
outf(77-16, 395-49, BK_CLR, HEAD_CLR, "匯總貨幣單位");
outf(240-16, 395-49, BK_CLR, HEAD_CLR, "匯總起始時間");
outf(404-16, 395-49, BK_CLR, HEAD_CLR, "匯總終止時間");
}
else
{
outf(77-16, 395-49, BK_CLR, HEAD_CLR, "結算貨幣單位");
outf(240-16, 395-49, BK_CLR, HEAD_CLR, "結算起始時間");
outf(404-16, 395-49, BK_CLR, HEAD_CLR, "結算終止時間");
}
outf(542, 395-49, BK_CLR, HEAD_CLR, "總 費");
return;
}
/* function : display the detail for the total fee table
* called by : inq_total_fee()
* date : 1993.9.22
*/
void disp_tfee_detl1(void)
{
char *traned;
UI i, j;
UI x, y;
UL th, tm, ttm, tcu;
double tch;
UNIT_STRUCT cer_unit;
for(i=0; i<3; i++)
{
for(j=1; j<5; j++)
{
cer_unit.unit_x = i;
cer_unit.unit_y = j;
get_certain(&cer_unit);
x = cer_unit.dot_sx+27;
y = cer_unit.dot_sy+9;
switch(j)
{
case 1:
if(i == 0 )
{
traned=fdigt_tran((double)(Statsfee.intern_charge)/100);
outf(x, y, BK_CLR, CHR_CLR, "%-s", traned);
}
else if(i == 1)
{
if( Statsfee.intern_time % 60 != 0)
tm = ((UL)(Statsfee.intern_time)/60 + 1) % 60;
else
tm = ((UL)(Statsfee.intern_time)/60) % 60;
th = ((UL)(Statsfee.intern_time)/60 + 1) / 60;
traned=ldigt_tran(th);
outf(x, y, BK_CLR, CHR_CLR, "%-sh%2um", traned, tm);
}
else
{
traned=ldigt_tran((UL)Statsfee.intern_count);
outf(x, y, BK_CLR, CHR_CLR, "%-s", traned);
}
break;
case 2:
if(i == 0 )
{
traned=fdigt_tran((double)(Statsfee.nation_charge)/100);
outf(x, y, BK_CLR, CHR_CLR, "%-s", traned);
}
else if(i == 1)
{
if( Statsfee.nation_time % 60 != 0)
tm = ((UL)(Statsfee.nation_time)/60 + 1) % 60;
else
tm = ((UL)(Statsfee.nation_time)/60) % 60;
th = ((UL)(Statsfee.nation_time)/60 + 1) / 60;
traned=ldigt_tran(th);
outf(x, y, BK_CLR, CHR_CLR, "%-sh%2um", traned, tm);
}
else
{
traned=ldigt_tran((UL)Statsfee.nation_count);
outf(x, y, BK_CLR, CHR_CLR, "%-s", traned);
}
break;
case 3:
if(i == 0 )
{
traned=fdigt_tran((double)(Statsfee.local_charge)/100);
outf(x, y, BK_CLR, CHR_CLR, "%-s", traned);
}
else if(i == 1)
{
if( Statsfee.local_time % 60 != 0)
tm = ((UL)(Statsfee.local_time)/60 + 1) % 60;
else
tm = ((UL)(Statsfee.local_time)/60) % 60;
th = ((UL)Statsfee.local_time/60 + 1) / 60;
traned=ldigt_tran(th);
outf(x, y, BK_CLR, CHR_CLR, "%-sh%2um", traned, tm);
}
else
{
traned=ldigt_tran((UL)(Statsfee.local_count));
outf(x, y, BK_CLR, CHR_CLR, "%-s", traned);
}
break;
case 4:
if(i == 0 )
{
tch = ((double)(Statsfee.intern_charge + Statsfee.nation_charge +\
Statsfee.local_charge))/100;
traned=fdigt_tran(tch);
outf(x-19, y, BK_CLR, CHR_CLR, "%-s", traned);
}
else if(i == 1)
{
ttm = (UL)Statsfee.intern_time + (UL)Statsfee.nation_time +\
(UL)Statsfee.local_time;
if(ttm % 60 != 0)
tm = (ttm/60 + 1) % 60;
else
tm = (ttm/60) % 60;
th = (ttm/60 + 1) / 60;
traned=ldigt_tran(th);
outf(x-19, y, BK_CLR, CHR_CLR, "%-sh%2um", traned, tm);
}
else
{
tcu = (UL)(Statsfee.intern_count + Statsfee.nation_count +\
Statsfee.local_count);
traned=ldigt_tran(tcu);
outf(x-19, y, BK_CLR, CHR_CLR, "%-s", traned);
}
break;
default:
break;
} /* END SWITCH */
}
}
return;
}
/* function : display the detail for the total fee table
* called by : inq_total_fee()
* date : 1993.9.22
*/
void disp_tfee_detl2(void)
{
char *traned;
UI i, j, k;
UI x, y;
double tch;
UNIT_STRUCT cer_unit;
i=0;
for(j=0; j<7; j++)
{
cer_unit.unit_x = i;
cer_unit.unit_y = j;
get_certain(&cer_unit);
x = cer_unit.dot_sx+8;
y = cer_unit.dot_sy+9;
switch(j)
{
case 0:
traned=fdigt_tran((double)(Statsfee.month_lease)/100);
outf(x, y, BK_CLR, CHR_CLR, "%-s", traned);
break;
case 1:
case 2:
case 3:
case 4:
case 5:
traned=fdigt_tran((double)(Statsfee.addfee[j-1])/100);
outf(x, y, BK_CLR, CHR_CLR, "%-s", traned);
break;
case 6:
tch = Statsfee.month_lease;
for(k=0; k<5; k++)
tch += Statsfee.addfee[k];
traned=fdigt_tran(tch/100);
outf(x, y, BK_CLR, CHR_CLR, "%-s", traned);
break;
default:
break;
} /* END SWITCH */
}
return;
}
/* function : display the detail for the total fee table
* called by : inq_total_fee()
* date : 1993.9.22
*/
void disp_tfee_detl3(void)
{
char *traned;
UI i, j, k;
UI x, y;
double tch;
UNIT_STRUCT cer_unit;
i=0;
for(j=0; j<4; j++)
{
cer_unit.unit_x = i;
cer_unit.unit_y = j;
get_certain(&cer_unit);
x = cer_unit.dot_sx+8;
y = cer_unit.dot_sy+9;
switch(j)
{
case 0:
outf(77, y, BK_CLR, CHR_CLR, "人民幣元");
break;
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -