casio dt-930程序

按照需求开发对应的程序，开发金蝶、用友、管家婆、速达、浪潮、至商、Erp、POS机SCM 、WMS 、MES盘点机程序，智能PDA设备上的信息系统软件开发，结合条形码应用技术，可以把PDA设备离线进行条形码数据采集器。
欢迎大家咨询开发

void ap_start ( void )
{
SysInit(0); /*可读条码类型*/
main_menu();
}

/************************************/
/* 主菜单函数 */
/************************************/

void main_menu(void)
{
int kind,uspw;
ER ret;
while(1)
{
cls();
Dsp_str("1. 数据采集",3,0);
Dsp_str("2. 采集器->电脑",5,0);
Dsp_str("3. 资料删除",7,0);
Dsp_str("4. 电脑->采集器",9,0);
/**********************************************************/
/*判断数据文件是否存在 不存在建立 */
if(Is_file(cishu)==1) creat_file(cishu);
if(Is_file(RUKU)==1) creat_file(RUKU);
if(Is_file(RUKU1)==1) creat_file(RUKU1);
if(Is_file(CHUKU)==1) creat_file(CHUKU);
if(Is_file(CHUKU1)==1) creat_file(CHUKU1);
if(Is_file(PANDIAN)==1) creat_file(PANDIAN);

/**********************************************************/

do
{ret=get_chr(NONE);}
while(ret!=49&&ret!=50&&ret!=51&&ret!=52&&ret!=53&&ret!=54);
if (ret == 49)
{
shangjia_menu2();
continue;
}
if (ret == 50)
{
shangjia_menu3();
continue;
}
if (ret == 51)
{
LuiLan();
continue;
}
if (ret == 52)
{
menu2();
continue;
}
}/*end while*/
}/*end main_menu*/

void shangjia_menu3(void)/*对比出库*/
{
char Temp[100],strzl[6]; /*变量*/
W zjs,jls,zjs1;
long sum=0;
long sum1=0;
ER ret,ret1,ercdd;
char buffcw[100]; /*变量*/
char buffcw1[100]; /*变量*/
char buffcw2[100]; /*变量*/
char buffcw3[100]; /*变量*/
char buffcw4[100]; /*变量*/
char buffcw5[100]; /*变量*/
char buffcw6[100]; /*数量*/
char buffcw7[100]; /*数量*/
char sdata[200];
char buffcw8[100]; /*数量*/
char buffcw9[100]; /*数量*/
char buffcw10[100]; /*数量*/

/*显示名称*/
char buffcw40[50];
char buffcw41[50];
char buffcw42[50];
char buffcw43[50];
char buffcw44[50];
char buffcw45[50];
char buffcw46[50];
char buffcw47[50];
char buffcw48[50];
char buffcw49[50];
/*显示名称*/

memset(buffcw40,0x00,sizeof(buffcw40));
buffcw40[35]=0x00;
memset(buffcw41,0x00,sizeof(buffcw41));
buffcw41[35]=0x00;
memset(buffcw42,0x00,sizeof(buffcw42));
buffcw42[35]=0x00;
memset(buffcw43,0x00,sizeof(buffcw43));
buffcw43[35]=0x00;
memset(buffcw44,0x00,sizeof(buffcw44));
buffcw44[35]=0x00;

memset(buffcw9,0x00,sizeof(buffcw9));
buffcw9[35]=0x00;
memset(buffcw10,0x00,sizeof(buffcw10));
buffcw10[35]=0x00;
memset(buffcw8,0x00,sizeof(buffcw8));
buffcw8[35]=0x00;
memset(buffcw7,0x00,sizeof(buffcw7));
buffcw7[35]=0x00;
memset(buffcw,0x00,sizeof(buffcw));
buffcw[35]=0x00;
memset(buffcw1,0x00,sizeof(buffcw1));
buffcw1[50]=0x00;
memset(buffcw2,0x00,sizeof(buffcw2));
buffcw2[100]=0x00;
memset(buffcw3,0x00,sizeof(buffcw3));
buffcw3[100]=0x00;
memset(buffcw4,0x00,sizeof(buffcw4));
buffcw4[100]=0x00;
memset(buffcw5,0x00,sizeof(buffcw5));
buffcw5[100]=0x00;
memset(buffcw6,0x00,sizeof(buffcw6));
buffcw6[100]=0x00;
if(Is_file(RUKU)==1) creat_file(RUKU);
if(Is_file(RUKU1)==1) creat_file(RUKU1);

lb:
cls();
Dsp_str("条码:",1,0);
Dsp_str(buffcw1,5,0);

memset(buffcw,0x00,sizeof(buffcw));
buffcw[35]=0x00;
zjs=get_file_bit(RUKU);
zjs=zjs/17;

zjs1=get_file_bit(RUKU1);
zjs1=zjs1/17;

memset(buffcw40,0x00,sizeof(buffcw40));
buffcw40[35]=0x00;
memset(buffcw41,0x00,sizeof(buffcw41));
buffcw41[35]=0x00;
memset(buffcw42,0x00,sizeof(buffcw42));
buffcw42[35]=0x00;
memset(buffcw43,0x00,sizeof(buffcw43));
buffcw43[35]=0x00;
memset(buffcw44,0x00,sizeof(buffcw44));
buffcw44[35]=0x00;

sprintf(buffcw40,"%ld",zjs);
sprintf(buffcw41,"%ld",zjs1);

memcpy(buffcw44,buffcw40,strlen(buffcw40));
memcpy(buffcw44+strlen(buffcw40),"/",1);
memcpy(buffcw44+strlen(buffcw40)+1,buffcw41,strlen(buffcw41));
space_str(buffcw44,10);
buffcw44[10]=0x00;

Dsp_str("数量:",9,0);
Dsp_str(buffcw44,9,5);
lcd_csr_put(1,5); /*光标定位*/
lcd_csr_set((H)LCD_CSR_UNDER);/*光标类型*/
key_clear();
ret=read_str(1,5,0,buffcw,15);/*扫描条码*/
lcd_csr_set((H)LCD_CSR_OFF);
if(ret==E_KEY_CLR) /*按 CLR 键处理方式*/
{
return; /*goto lb;按CLS 返回*/
}

if(strlen(buffcw)!=15)
{
space_str(buffcw,15);
buffcw[15]=0x00;
/*处理空格*/
memset(buffcw7,0x00,sizeof(buffcw7));
space_str(buffcw7,15);
buffcw7[15]=0x00;
if (strcmp(buffcw7,buffcw)==0)
{
goto lb;
}
memcpy(buffcw1,buffcw,15);
buffcw1[15]=0x00;

/*处理空格*/
}
else
{
strcpy(buffcw1,buffcw);
buffcw1[15]=0x00;
}
strcpy(buffcw1,buffcw);
buffcw1[15]=0x00;
buffcw1[15]=0x00;

memset(sdata,0x00,sizeof(sdata));
sdata[100]=0x00;
ret1=search(RUKU1,0,17,0,15,buffcw1,sdata,&fpos);
memset(buffcw6,0x00,sizeof(buffcw6));
if(ret1==E_OK)
{
cls();
Dsp_str("正确",5,0);
Wait2( 10L );
ok_sound();
Wait2( 30L );

goto lb;
}
else
{
cls();
Dsp_str("无效数据",5,0);
warning_sound1();
Wait2( 30L );
goto lb;
}
}

/*盘点作业*/
void LuiLan(void)
{
W zjs,jls;
char kind;
int i,j,i1,j1;
char buffcw1[50],buffcw2[50],buffcw3[50],buffcw4[50],buffcw5[50]; /*变量*/
char reco[100],temp1[100];
ER ercd;

zjs=get_file_bit(RUKU);
zjs=zjs/17;
i=0;
j=1;
if(zjs>0)
{
memset(buffcw1,0x00,sizeof(buffcw1)); /*开辟地址*/
buffcw1[5]=0x00;
sprintf(buffcw1,"%ld",zjs);

while(1)
{
cls();
memset(buffcw2,0x00,sizeof(buffcw2)); /*开辟地址*/
buffcw2[5]=0x00;
sprintf(buffcw2,"%ld",j);

memset(buffcw3,0x00,sizeof(buffcw3)); /*开辟地址*/

memcpy(buffcw3,buffcw2,strlen(buffcw2));
memcpy(buffcw3+strlen(buffcw2),"/",1);
memcpy(buffcw3+strlen(buffcw2)+1,buffcw1,strlen(buffcw1));
space_str(buffcw3,10);
buffcw3[10]=0x00;
Dsp_str(buffcw3 ,1,0);
Dsp_str("条记录" ,1,10);

Dsp_str("F2上" ,9,0);
Dsp_str("F3下" ,9,5);
Dsp_str("ESC返回" ,9,10);

memset(reco,0x00,sizeof(reco));
ercd=dat_F_Read(RUKU,i,reco,17);
memset(buffcw4,0x00,sizeof(buffcw4));
buffcw4[17]=0x00;
memcpy(buffcw4,reco,17);
Dsp_str("条码:",3,0);
Dsp_str(buffcw4,3,5);
do
{ret=get_chr(FUN_ALL);}
while(ret!=CLS&&ret!=E_KEY_CLR&&ret!=F2&&ret!=F3);

if(ret==CLS)
{
return;
}
if(ret==E_KEY_CLR)
{
return;
}
if(ret==F2)
{
if(i >=17)
{
i=i-17;
j=j-1;
}
}
if(ret==F3)
{
if(i <zjs*17-17)
{
i=i+17;
j=j+1;
}
}
}
}
else
{
cls();
Dsp_str("没有数据",3,1);
/*WAIT;*/
kind=getkey();
}

}

void menu2(void)/*对比出库*/
{
cls();
Dsp_str("1. 采集器->电脑",3,0);
Dsp_str("2. 资料删除",5,0);
Dsp_str("3. 电脑->采集器",7,0);
Dsp_str("确认键退出",9,0);

kind=getkey();
if (kind == 49)
{
Chuan_32();
}
if (kind == 50)
{
del_menu();
}
if (kind == 51)
{
Chuan_30();
}

}
void shangjia_menu2(void)/*对比出库*/
{
char Temp[100],strzl[6]; /*变量*/
W zjs,jls,zjs1;
long sum=0;
long sum1=0;
ER ret,ret1,ercdd;
char buffcw[100]; /*变量*/
char buffcw1[100]; /*变量*/
char buffcw2[100]; /*变量*/
char buffcw3[100]; /*变量*/
char buffcw4[100]; /*变量*/
char buffcw5[100]; /*变量*/
char buffcw6[100]; /*数量*/
char buffcw7[100]; /*数量*/
char sdata[200];
char buffcw8[100]; /*数量*/
char buffcw9[100]; /*数量*/
char buffcw10[100]; /*数量*/

/*显示名称*/
char buffcw40[50];
char buffcw41[50];
char buffcw42[50];
char buffcw43[50];
char buffcw44[50];
char buffcw45[50];
char buffcw46[50];
char buffcw47[50];
char buffcw48[50];
char buffcw49[50];
/*显示名称*/

memset(buffcw40,0x00,sizeof(buffcw40));
buffcw40[35]=0x00;
memset(buffcw41,0x00,sizeof(buffcw41));
buffcw41[35]=0x00;
memset(buffcw42,0x00,sizeof(buffcw42));
buffcw42[35]=0x00;
memset(buffcw43,0x00,sizeof(buffcw43));
buffcw43[35]=0x00;
memset(buffcw44,0x00,sizeof(buffcw44));
buffcw44[35]=0x00;

memset(buffcw9,0x00,sizeof(buffcw9));
buffcw9[35]=0x00;
memset(buffcw10,0x00,sizeof(buffcw10));
buffcw10[35]=0x00;
memset(buffcw8,0x00,sizeof(buffcw8));
buffcw8[35]=0x00;
memset(buffcw7,0x00,sizeof(buffcw7));
buffcw7[35]=0x00;
memset(buffcw,0x00,sizeof(buffcw));
buffcw[35]=0x00;
memset(buffcw1,0x00,sizeof(buffcw1));
buffcw1[50]=0x00;
memset(buffcw2,0x00,sizeof(buffcw2));
buffcw2[100]=0x00;
memset(buffcw3,0x00,sizeof(buffcw3));
buffcw3[100]=0x00;
memset(buffcw4,0x00,sizeof(buffcw4));
buffcw4[100]=0x00;
memset(buffcw5,0x00,sizeof(buffcw5));
buffcw5[100]=0x00;
memset(buffcw6,0x00,sizeof(buffcw6));
buffcw6[100]=0x00;
if(Is_file(RUKU)==1) creat_file(RUKU);
if(Is_file(RUKU1)==1) creat_file(RUKU1);

lb:
cls();
Dsp_str("条码:",1,0);
Dsp_str(buffcw1,5,0);

memset(buffcw,0x00,sizeof(buffcw));
buffcw[35]=0x00;
zjs=get_file_bit(RUKU);
zjs=zjs/17;

zjs1=get_file_bit(RUKU1);
zjs1=zjs1/17;

memset(buffcw40,0x00,sizeof(buffcw40));
buffcw40[35]=0x00;
memset(buffcw41,0x00,sizeof(buffcw41));
buffcw41[35]=0x00;
memset(buffcw42,0x00,sizeof(buffcw42));
buffcw42[35]=0x00;
memset(buffcw43,0x00,sizeof(buffcw43));
buffcw43[35]=0x00;
memset(buffcw44,0x00,sizeof(buffcw44));
buffcw44[35]=0x00;

sprintf(buffcw40,"%ld",zjs);
sprintf(buffcw41,"%ld",zjs1);

memcpy(buffcw44,buffcw40,strlen(buffcw40));
memcpy(buffcw44+strlen(buffcw40),"/",1);
memcpy(buffcw44+strlen(buffcw40)+1,buffcw41,strlen(buffcw41));
space_str(buffcw44,10);
buffcw44[10]=0x00;

Dsp_str("数量:",9,0);
Dsp_str(buffcw44,9,5);
lcd_csr_put(1,5); /*光标定位*/
lcd_csr_set((H)LCD_CSR_UNDER);/*光标类型*/
key_clear();
ret=read_str(1,5,0,buffcw,15);/*扫描条码*/
lcd_csr_set((H)LCD_CSR_OFF);
if(ret==E_KEY_CLR) /*按 CLR 键处理方式*/
{
return; /*goto lb;按CLS 返回*/
}

if(strlen(buffcw)!=15)
{
space_str(buffcw,15);
buffcw[15]=0x00;
/*处理空格*/
memset(buffcw7,0x00,sizeof(buffcw7));
space_str(buffcw7,15);
buffcw7[15]=0x00;
if (strcmp(buffcw7,buffcw)==0)
{
goto lb;
}
memcpy(buffcw1,buffcw,15);
buffcw1[15]=0x00;

/*处理空格*/
}
else
{
strcpy(buffcw1,buffcw);
buffcw1[15]=0x00;
}
strcpy(buffcw1,buffcw);
buffcw1[15]=0x00;
buffcw1[15]=0x00;

memset(sdata,0x00,sizeof(sdata));
sdata[100]=0x00;
ret1=search(RUKU1,0,17,0,15,buffcw1,sdata,&fpos);
memset(buffcw6,0x00,sizeof(buffcw6));
if(ret1==E_OK)
{
memset(sdata,0x00,sizeof(sdata));
sdata[100]=0x00;
ret1=search(RUKU,0,17,0,15,buffcw1,sdata,&fpos);

if(ret1==E_OK)
{
cls();
Dsp_str("已经检测过",5,0);
warning_sound();
Wait2( 30L );
goto lb;
}
else
{
memset(buffcw5,0x00,sizeof(buffcw5));
buffcw5[100]=0x00;
memcpy(buffcw5,buffcw1,15);
memcpy(buffcw5+15,"/xd/xa",2);
buffcw5[17]=0x00;
dat_F_Write(RUKU,1,0,buffcw5,17);
cls();
Dsp_str("正确",5,0);
Wait2( 10L );
ok_sound();
Wait2( 30L );

goto lb;
}
}
else
{
cls();
Dsp_str("无效数据",5,0);
warning_sound1();
Wait2( 30L );
goto lb;
}
}

void del_menu(void)
{
int kind,uspw;
ER ret;

cls();
Dsp_str(" * * *数据删除* * *",1,0);
Dsp_str("1. 采集器->电脑",3,0);
Dsp_str("2. 电脑->采集器",5,0);
Dsp_str("确认键退出",9,0);

kind=getkey();

if (kind == 49)
{
cls();
Dsp_str(" 确定删除吗?",3,1);
Dsp_str("ENT 删除",7,3);
Dsp_str("任意键 不删除",9,3);
kind=getkey();
/*WAIT;*/
if (kind==13)
{
del_file(RUKU);
ok_sound();
}
}
if (kind == 50)
{
cls();
Dsp_str(" 确定删除吗?",3,1);
Dsp_str("ENT 删除",7,3);
Dsp_str("任意键 不删除",9,3);
kind=getkey();
/*WAIT;*/
if (kind==13)
{
del_file(RUKU1);
ok_sound();
}
}
}
void Chuan_32(void)
{
char kind,kind1;
ER ret,ret1,ercdd;
if(Is_file(RUKU)==1) creat_file(RUKU);
if(Is_file(RUKU1)==1) creat_file(RUKU1);
ret1=sendfile(RUKU);
if(ret1==E_OK)
{
ok_sound();
cls();
Dsp_str(" 上传成功!",2,2);
Dsp_str("是否删 RUKU.txt?",5,0);
Dsp_str("ENT 删除",7,3);
Dsp_str("任意键 不删除",9,3);
kind=getkey();
/*WAIT;*/
if (kind==13)
{
del_file(RUKU);
ok_sound();
}
}
}

void Chuan_30(void)
{
B *file_list1[]={"tiaoma.txt",0};
char kind;
rece_n_file(file_list1);

ok_sound();
cls();
Dsp_str("电脑->采集器",2,0);
Dsp_str("传输成功!",4,0);
kind=getkey();
}

int sfzc(void)
{
/*密码*/
UB code[80];
long sum=0;
ER ercd;
if(Is_file(cishu)==1)
{
creat_file(cishu);
memset(code,0x00,sizeof(code));
memcpy(code,"001",3);
space_str(code,3);
code[3]=0x00;
dat_F_Write(cishu,1,0,code,3);
}
if(Is_file(passfile)==1)
{
memset(code,0x00,sizeof(code));
memcpy(code,"00000000",8);
code[8]=0x00;
creat_file(passfile);
dat_F_Write(passfile,1,0,code,8);
}
/*密码 if (strcmp(buffcw,"10103344")==0)*/

memset(code,0x00,sizeof(code));
code[44]=0x00;
ercd=dat_F_Read(passfile,0,code,8);
code[8]=0x00;
if(strcmp(code,"10103344")==0)
{
return 1;
}
else
{
memset(code,0x00,sizeof(code));
code[3]=0x00;
ercd=dat_F_Read(cishu,0,code,3);
code[3]=0x00;

sum =atol(code);
if(sum<380)
{
sum=sum+1;
memset(code,0x00,sizeof(code));
code[3]=0x00;
sprintf(code,"%ld",sum);
space_str(code,3);
code[3]=0x00;
del_file(cishu);
dat_F_Write(cishu,1,0,code,3);
return 1;
}
else
{
return 0;
}
}
return 0;
}

/* 数据不正常发出的响声 */
void warning_sound(void)
{
s_sound( 3000, 9 );
Wait2( 5L );
s_sound( 3000, 9 );
Wait2( 5L );
s_sound( 3000, 9 );
}

/* 数据不正常发出的响声 */
void warning_sound1(void)
{
s_sound(4000,14);
Wait2( 10L );
s_sound(4000,14);
Wait2( 10L );
s_sound(4000,14);
Wait2( 10L );
}

void ok_sound(void)
{
s_sound( 3000, 9 );
}