📄 dt900.c
字号:
lcd_cls();
Dsp_str("chuku.txt Error!",1,0); getkey(); close(fidx); close(fnew); return; /*
No Files */
}
for(;;)
{
lcd_cls(); Dsp_str("**** 产品出库 ****",1,0);
Dsp_str("部门代号:",3,0); memset(temp,0x0,daihaolen);
ret=read_str(9,3,2,temp,daihaolen); templen=strlen(temp); if(ret==E_KEY_CLR)
break; if(templen<4) continue; addspace(temp,templen,daihaolen);
memset(daihao,0x0,daihaolen); strcpy(daihao,temp); memset(data,0x0,80);
ret=Dat_F_Search(fidx,0,bumenlen,0,daihaolen,daihao,data,&lno);
if(ret!=E_OK){ lcd_cls(); Dsp_str(daihao,1,0); Dsp_str("此部门代号不存在",3,0);
s_sound(2250,15); continue;
}
for(i=daihaolen,j=0;j<16;i++,j++)
bumenname[j]=data[i];
bumenname[j]=0x0;
for(;;)
{
lcd_cls();
Dsp_str("部门代号:",1,0); Dsp_str(daihao,1,9); Dsp_str2(bumenname,3,0);
Dsp_str("单号:",5,0); Dsp_str("货位号:",5,10); Dsp_str("[CLR]返回 ",9,0);
memset(temp,0x0,danhaolen); ret=read_str(5,5,2,temp,danhaolen);
templen=strlen(temp); if(ret==E_KEY_CLR) break; if(templen<3) continue;
addspace(temp,templen,danhaolen); memset(danhao,0x0,danhaolen);
strcpy(danhao,temp);
for(;;)
{
lcd_cls(); Dsp_str("部门代号:",1,0);
Dsp_str(daihao,1,9); Dsp_str2(bumenname,3,0); Dsp_str("单号:",5,0);
Dsp_str(danhao,5,5); Dsp_str("货位号:",5,10); Dsp_str("[CLR]返回 ",9,0);
memset(temp,0x0,huoweilen); ret=read_str(17,5,2,temp,huoweilen);
templen=strlen(temp); if(ret==E_KEY_CLR) break; if(templen<3) continue;
addspace(temp,templen,huoweilen); memset(huowei,0x0,huoweilen);
strcpy(huowei,temp); memset(temp,0x0,KeyLen);
for(;;)
{
lcd_cls();
Dsp_str("部门代号:",1,0); Dsp_str(daihao,1,9); Dsp_str2(bumenname,3,0);
Dsp_str("单号:",5,0); Dsp_str(danhao,5,5); Dsp_str("货位号:",5,10);
Dsp_str(huowei,5,17); Dsp_str("扫条码:",7,0); Dsp_str("[CLR]返回 ",9,0);
ret=read_str(7,7,0,temp,KeyLen); templen=strlen(temp); if(ret==E_KEY_CLR) break;
if(templen==0) continue; addspace(temp,templen,KeyLen);
memset(BarCode,0x0,KeyLen); strcpy(BarCode,temp);
ret=dat_F_Search(fchuku,0,chukulen,daihaolen+danhaolen+huoweilen,KeyLen,BarCode,data,&lno);
if(ret==E_OK)
{
lcd_cls(); Dsp_str(BarCode,1,0); Dsp_str("此条码已存在",3,0);
Dsp_str("是否继续写入?",5,0); Dsp_str("是[ENT] 否[CLR]",9,0); s_sound(2250,15);
do {
code=getkey();
}while(code!=13&&code!=12);
if(code==12) continue;
}
lseek(fnew,0,2); write(fnew,daihao,daihaolen); write(fnew,danhao,danhaolen);
write(fnew,huowei,huoweilen); write(fnew,BarCode,KeyLen);
write(fnew,"\x0d\x0a",2);
}
}
}
}
close(fidx);
close(fnew); FNC_Init();
}
void Pandian(void)
{
ER i,j,ret,fidx,fnew; ER templen,code; W lno; int num; B
temp[50],record[50]; int numtemp; FNC_Update();
if((fidx=open(fcangku,O_RDONLY))== E_LOWERR)
{ lcd_cls(); Dsp_str("cangku.txt Error!",1,0); getkey(); close(fidx); return; /* No Files */ }
if((fnew=open(fpandian,O_CREAT | O_RDWR | O_APPEND))== E_LOWERR)
{ lcd_cls(); Dsp_str("pandian.txt Error!",1,0); getkey(); close(fidx); close(fnew); return; /* No Files */ }
for(;;)
{
lcd_cls(); Dsp_str("**** 产品盘点 ****",1,0);
Dsp_str("输入仓库号:",3,0); memset(temp,0x0,daihaolen);
ret=read_str(9,3,2,temp,daihaolen); templen=strlen(temp); if(ret==E_KEY_CLR)
break; if(templen<4) continue; addspace(temp,templen,daihaolen);
memset(daihao,0x0,daihaolen); strcpy(daihao,temp); memset(data,0x0,80);
ret=Dat_F_Search(fidx,0,cangkulen,0,daihaolen,daihao,data,&lno);
if(ret!=E_OK){ lcd_cls(); Dsp_str(daihao,1,0); Dsp_str("此仓库代号不存在",3,0);
s_sound(2250,15); continue;
}
for(i=daihaolen,j=0;j<16;i++,j++)
cangkuname[j]=data[i]; cangkuname[j]=0x0;
for(;;)
{
lcd_cls();
Dsp_str("仓库代号:",1,0); Dsp_str(daihao,1,9); Dsp_str2(cangkuname,3,0);
Dsp_str("货位号:",5,0); Dsp_str("[CLR]返回 ",9,0); memset(temp,0x0,huoweilen);
ret=read_str(7,5,2,temp,huoweilen); templen=strlen(temp); if(ret==E_KEY_CLR)
break;
if(templen==0)
{
memset(huowei,0x0,huoweilen); strcpy(huowei,"000");
}
else{ addspace(temp,templen,huoweilen); memset(huowei,0x0,huoweilen);
strcpy(huowei,temp);
}
memset(temp,0x0,KeyLen);
for(;;)
{
lcd_cls();
Dsp_str("部门代号:",1,0); Dsp_str(daihao,1,9); Dsp_str2(bumenname,3,0);
Dsp_str("货位号:",5,0); Dsp_str(huowei,5,7); Dsp_str("扫条码:",7,0); Dsp_str("[CLR]返回",9,0); ret=read_str(7,7,0,temp,KeyLen); templen=strlen(temp);
if(ret==E_KEY_CLR) break; if(templen==0) continue;
addspace(temp,templen,KeyLen); memset(BarCode,0x0,KeyLen); strcpy(BarCode,temp);
ret=dat_F_Search(fpandian,0,pandianlen,daihaolen+huoweilen,KeyLen,BarCode,data,&lno);
if(ret==E_OK)
{
lcd_cls(); Dsp_str(BarCode,1,0); Dsp_str("此条码已存在",3,0);
Dsp_str("是否继续写入?",5,0); Dsp_str("是[ENT] 否[CLR]",9,0); s_sound(2250,15);
do{
code=getkey();
}
while(code!=13&&code!=12);
if(code==12) continue;
}
lseek(fnew,0,2); write(fnew,daihao,daihaolen); write(fnew,huowei,huoweilen);
write(fnew,BarCode,KeyLen); write(fnew,"\x0d\x0a",2);
}
}
}
close(fidx);
close(fnew); FNC_Init();
}
void ModifyNew()
{
ER code;
for(;;)
{
lcd_cls();
Dsp_str("***** 数据查询 *****",1,0); Dsp_str("1:入库查询",3,0); Dsp_str("2:出库查询",5,0);
Dsp_str("3:盘点查询",7,0); Dsp_str("<CLR>返回",9,0);
while(1)
{
code=getkey();
if(code=='1'||code=='2'||code=='3'||code==12) break;
}
switch (code)
{
case '1':
RuKu_Modify(); break;
case '2': ChuKu_Modify(); break;
case '3':
Pandian_Modify(); break; case 12: return;
}
}
}
void RuKu_Modify()
{
ER i,j,ret,fidx,fnew; ER templen,code; W lno,end; int num; B temp[50],record[50];
int numtemp; FNC_Update();
if((fnew=open(fruku,O_RDONLY))== E_LOWERR)
{
lcd_cls(); Dsp_str("ruku.txt Error!",1,0); getkey(); close(fnew); return; /* No
Files */
}
end=lseek(fnew,0,2);
if(!end){
lcd_cls(); Dsp_str("NO DATA!",1,0);
getkey(); close(fnew); return; /* No Files */
} lno=0;
memset(daihao,0x0,sizeof(daihao)); memset(danhao,0x0,sizeof(danhao));
memset(huowei,0x0,sizeof(huowei)); memset(BarCode,0x0,sizeof(BarCode));
do{
lseek(fnew,lno,0); memset(data,0x0,sizeof(data)); read(fnew,data,rukulen);
for(i=0,j=0;j<DAIHAOLEN;I++,J++) if(code="=0x1&&lno" code="getkey();"
do
{
Dsp_str(BarCode,7,5); Dsp_str(huowei,5,7); Dsp_str(danhao,3,5);
Dsp_str(daihao,1,9); 下翻?,9,0); F7]上翻 Dsp_str(?[F6 Dsp_str(?条码:?,7,0);
Dsp_str(?货位号:?,5,0); Dsp_str(?单号:?,3,0); Dsp_str(?部门代号:?,1,0); lcd_cls();
BarCode[j]="data[i];"
for(i="daihaolen,j=0;j<danhaolen;i++,j++)"
huowei[j]="data[i];" danhao[j]="data[i];" daihao[j]="data[i];">0){ lno-=rukulen;
break; } if(code==0x2&&lno<END-RUKULEN){ if(code="=0x1&&lno"
code="getkey();" do{ Dsp_str(BarCode,7,5); Dsp_str(huowei,5,7);
Dsp_str(danhao,3,5); Dsp_str(daihao,1,9); 下翻?,9,0); F7]上翻 Dsp_str(?[F6
Dsp_str(?条码:?,7,0); Dsp_str(?货位号:?,5,0); Dsp_str(?单号:?,3,0);
Dsp_str(?部门代号:?,1,0); lcd_cls(); BarCode[j]="data[i];"
for(i="0,j=0;j<daihaolen;i++,j++)" huowei[j]="data[i];" danhao[j]="data[i];"
daihao[j]="data[i];" read(fnew,data,chukulen); memset(data,0x0,sizeof(data));
lseek(fnew,lno,0); memset(BarCode,0x0,sizeof(BarCode));
memset(huowei,0x0,sizeof(huowei)); memset(danhao,0x0,sizeof(danhao));
memset(daihao,0x0,sizeof(daihao)); lno="0;" } * Files No return; close(fnew);
getkey(); DATA!?,1,0); Dsp_str(?NO if(!end){ end="lseek(fnew,0,2);"
Error!?,1,0); Dsp_str(?chuku.txt { E_LOWERR) if((fnew="open(fchuku,O_RDONLY))=="
FNC_Update(); numtemp; int temp[50]; B num; lno,end; W templen,code; ER
i,j,ret,fidx,fnew; ChuKu_Modify(){ void FNC_Init(); }while(code!="12);" break;
lno+="rukulen;">0){ lno-=chukulen; break; }
if(code==0x2&&lno<END-CHUKULEN){ if(code="=0x1&&lno"
code="getkey();" do{ Dsp_str(daihao,1,9); 下翻?,9,0); F7]上翻 Dsp_str(?[F6
Dsp_str(?部门代号:?,1,0); lcd_cls(); BarCode[j]="data[i];"
for(i="0,j=0;j<daihaolen;i++,j++)" huowei[j]="data[i];" daihao[j]="data[i];"
memset(data,0x0,sizeof(data)); lseek(fnew,lno,0);
memset(BarCode,0x0,sizeof(BarCode)); memset(huowei,0x0,sizeof(huowei));
memset(daihao,0x0,sizeof(daihao)); lno="0;" } * Files No return; close(fnew);
getkey(); DATA!?,1,0); Dsp_str(?NO if(!end){ end="lseek(fnew,0,2);"
Error!?,1,0); { E_LOWERR) if((fnew="open(fpandian,O_RDONLY))==" FNC_Update();
numtemp; int temp[50]; B num; lno,end; W templen,code; ER i,j,ret,fidx,fnew;
void FNC_Init(); }while(code!="12);" break; lno+="chukulen;"
Dsp_str(BarCode,5,5); Dsp_str(huowei,3,7); Dsp_str(?条码:?,5,0);
Dsp_str(?货位号:?,3,0); read(fnew,data,pandianlen); Dsp_str(?pandian.txt
Pandian_Modify(){>0){ lno-=pandianlen; break; }
if(code==0x2&&lno<END-PANDIANLEN){ lcd_cls(); for(i="0;i<2;i++)" } *
close(fnew); getkey(); { FNC_Update(); int B ER void FNC_Init();
}while(code!="12);" break; lno+="pandianlen;" if(j k++;j++; ret1="getkey3();"
Dsp_str(?*?,7,k); password[j]="ret1;" ret1!="0x0c)" && while(ret1!="0x0d"
k="5;j=0;" Dsp_str(?请输入口令:?,3,0); *****?,1,0); 口令确认 Dsp_str(?***** bb: for(;;)
times="0;" strcpy(password1,?1685?); i,j,k; fm,ret,ret1,times,lp;
password[10],password1[10]; CheckId() Dsp_str(?按任意键退出?,9,0);
Dsp_str(?Byte?,5,0); Dsp_str(sizenum,3,0); Dsp_str(?剩余容量:?,1,0);
sprintf(sizenum,?%d?,size); memset(sizenum,0x0,10); size="0;" sizenum[20]; size;
UW Calculate(void) strcat(fcheck,?.txt?); strcpy(fcheck,checkName);
strcat(checkName,Id); strcpy(checkName,?check?); strcat(fstock,?.txt?);
strcpy(fstock,stockName); strcat(stockName,Id); strcpy(stockName,?stock?);
exit(0); Dsp_str(?请先设置机号?,3,4); if(strcmp(Id,????)="=0)"
Id[i]="dat_set.sys_id[i+4];" memset(Id,0,7); ); &dat_set SYSD_SYS,
SYSD_FNC_READ, dat_system( strcpy(fpandian,?pandian.txt?);
strcpy(fchuku,?chuku.txt?); strcpy(fruku,?ruku.txt?);
strcpy(fygk,?b:\\yhm.txt?); strcpy(fbumen,?b:\\bumen.txt?);
strcpy(fcangku,?b:\\cangku.txt?); KeyLen="13;" huoweilen="3;" danhaolen="3;"
daihaolen="4;" pandianlen="22;" chukulen="25;" rukulen="25;" bumenlen="22;"
cangkulen="22;" userlen="18;" dat_set; DAT_SYS_STR temp[15]; ret,i,j;
Initial(void)>4) break; } password[j]=0x0; if(strcmp(password,password1)!=0) {
if(times>=1) { sound_get(); Dsp_str("二次输入密码错误!",7,0); Dsp_str("按任意键退出",9,0);
getkey(); return(0) ; } else if( times<1) { sound_get();
Dsp_str("密码错误!",9,2); getkey(); times=times+1; goto bb; } } return(1); }
FNC_Init(); return(0); } void set_machineid() { B mechinetitle[10]; int i; ER
ret,ret1; dat_system( SYSD_FNC_READ, SYSD_SYS, &dat_set );
memset(mechinetitle,0,7); for(i=0;i<6;i++) mechinetitle[i]=dat_set.sys_id[i];
mechinetitle[i]=0x0; ret1=CheckId(); if (ret1!=1) return; lcd_cls(); Dsp_str3("
农工商超市",1,0); Dsp_str("********************",3,0); Dsp_str("原机号:",5,0);
Dsp_str(mechinetitle,5,7); Dsp_str("新机号:",7,0); memset(mechinetitle,0,7);
ret=read_str(7,7,2,mechinetitle,6); if(ret==E_KEY_CLR) return;
zeroadd(mechinetitle,strlen(mechinetitle),6); for(i=0;i<6;i++)
dat_set.sys_id[i]=mechinetitle[i]; dat_system( SYSD_FNC_WRITE, SYSD_SYS,
&dat_set ); } void Dsp_num() { B mechinetitle[10]; B
spjl_no[12],syjl_no[12],ddjl_no[12]; int i,j; ER ret; sprintf(spjl_no,"%d",N);
sprintf(syjl_no,"%d",NI); sprintf(ddjl_no,"%d",NJ); lcd_cls();
Dsp_str("商品记录数:",1,0); Dsp_str(spjl_no,1,11); Dsp_str("索引记录数:",3,0);
Dsp_str(syjl_no,3,11); Dsp_str("订单记录数:",5,0); Dsp_str(ddjl_no,5,11);
Dsp_str("按任意键退出",9,0); getkey(); } int IdCheck(int ICflag) { B
password[20],verify[20],memberman[20]; B
workername[20],workerNo[10],workerpw[10]; ER fm,ret,ret1,times,lp; W lno; int
i,j,k; char rreett; FNC_Update(); for(;;) { lcd_cls(); Dsp_str("***** 登录界面
*****",1,0); Dsp_str("工号:",3,0); Dsp_str2("<CLR> 下传员工资料",9,0);
memset(memberman,0x0,4); ret=read_str(5,3,2,memberman,4); if(ret==E_KEY_CLR) {
close(fm); lp=recvfile(); return (0); } addspace(memberman,strlen(memberman),4);
if(ICflag==9&&strcmp(memberman,workernum)!=0) { sound_get(); lcd_cls();
Dsp_str(memberman,1,0); Dsp_str("此操作员无权删除!",3,0); Dsp_str("按任意键继续!",5,0);
getkey(); continue; } memset(data,0x0,18); if(strcmp(memberman,"NGS ")!=0) {
if(( fm = open(fygk, O_RDONLY))== E_LOWERR ) { close(fm); sound_get();
lcd_cls(); Dsp_str("yhm.txt Err!",1,0); Dsp_str("无法打开或不存在!",3,0);
Dsp_str("无任何员工信息!",5,0); Dsp_str("请先下传员工库信息!",7,0); getkey(); return(0); }
ret=Dat_F_Search(fm,0L,userlen,0,4,memberman,data,&lno); if(ret!=E_OK) {
close(fm); sound_get(); lcd_cls(); Dsp_str(memberman,1,0);
Dsp_str("无此操作员!",3,0); Dsp_str("按任意键继续!",5,0); getkey(); continue; } close(fm);
for(i=0,j=0;j<4;i++,j++) workerNo[j]=data[i]; workerNo[j]=0x0;
for(i=4,j=0;j<8;i++,j++) workername[j]=data[i]; workername[j]=0x0;
for(i=12,j=0;j<4;i++,j++) workerpw[j]=data[i]; workerpw[j]=0x0;
}/*if(strcmp(memberman,"NGS ")!=0)*/ else {strcpy(workerNo,"NGS
");strcpy(workername,"超级用户");} cd: lcd_cls(); Dsp_str("***** 登录界面 *****",1,0);
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -