⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 apsmp.c.bak

📁 CASIO
💻 BAK
📖 第 1 页 / 共 2 页
字号:
                ret=read_str(6,5,0,buff,15);
	        lcd_csr_set((H)LCD_CSR_OFF);
                if(ret==E_KEY_CLR) return;    /*按CLS 返回*/                
                
                
                if(strlen(buff)<15)
                 {     
                  space_str(buff,15);
                  memcpy(barcode,buff,15);
                 }
                else
                 {
                  strcpy(barcode,buff);
                 }           

	      memset(reco,0x00,sizeof(reco));             	
              ercd=search("data.txt",0,29,0,15,barcode,reco,&fjlh);               	
             	 
                 if (ercd!=0) 
                 { cls();
   	           Dsp_str("商品编码:",2,0);
                   Dsp_str(barcode,5,4);
                   Dsp_str("文件 data.txt 无此码" ,8,0);
                   WAIT
                   continue;
                 }

                 memset(zsl,0x00,sizeof(zsl));
                 memcpy(zsl,reco+15,12);
                 
                 cls();
                 Dsp_str("== 扫描查询 ==",2,3);
                 Dsp_str("编码:",5,0);
                 Dsp_str(barcode,5,5);
                 Dsp_str("库存:",8,0);
                 Dsp_str(zsl,8,5); 
                 
                 WAIT

             }


}
void find_start2(void)
{
 
     ER       kind,ret,ercd;
     UB       f_bm[16],f_kc[13];
     UB       reco[51];
     int      i=0,j,f;
     W        zjs,jls,len,ffff,fjlh,fjfj,eeee,nnnn;


 
 
          if(Is_file("data.txt")==1)
            {     
	     cls();
             Dsp_str("文件 data.txt 不存在",2,0);
             Dsp_str(" 请执行数据传输功能:",5,0);
	     Dsp_str(" 将文件传入盘点机中:",8,0);
	     beep(1);
	     Wait(2);
	     return;
            }

           cls();
	   Dsp_str("   3.  向前翻页    ",2,0);
	   Dsp_str("  ENT. 向后翻页    ",5,0);
	   Dsp_str("  CLS.  返  回     ",8,0);      
           WAIT      
           
        while(1)
         {
        
          zjs=get_file_bit("data.txt");
	  jls=(zjs/29);           
           
	   if((f=open("data.txt",O_RDONLY))==E_LOWERR)	
	     {
    		cls();
    		Dsp_str("文件 data 打开错误",5,1);
    		WAIT
    		return;
	     }          
        
        memset(reco,0x00,sizeof(reco));
         
	if((ercd=lseek(f,i*29,0))!=E_LOWERR) 
          ercd=read(f,(char *)reco,29);

         close(f);

         memset(f_bm,0x00,sizeof(f_bm));
         memset(f_kc,0x00,sizeof(f_kc));
         memcpy(f_bm,reco,15);
         memcpy(f_kc,reco+15,12);


                 cls();
                 Dsp_str("== 依次查询 ==",2,3);
                 Dsp_str("编码:",5,0);
                 Dsp_str(f_bm,5,5);
                 Dsp_str("库存:",8,0);
                 Dsp_str(f_kc,8,5);          
         
         
	        kind=getkey();        	
        	switch  (kind)
        	{        		
        	         case '3':{
        	         	      if(i<=0)
        	         	      {     cls();
        	         	            Dsp_str("此记录为第一条记录!!",2,0);
        	         	            WAIT
        	         	      }
        	         	      else
        	         	      {
        	         	            i--;
        	         	      }
        	         	      break;
        	         	  }
        	         case  13:{
        	         	       if(i>=jls-1)
        	         	       {
        	         	       	     cls();
        	         	       	     Dsp_str("此记录为最后一条记录!!",2,0);
        	         	       	     WAIT
        	         	       	}
        	         	       	else
        	         	       	{
        	         	       		i++;
        	         	       	}
        	         	       	break;
        	         	  } 
        	         	     
        	         case  12:{
        	         	       close(f);
        	         	       return;
        	         	  }
        	}         
         
         
         } 
  
  close(f);

}


void find_start3(void)
{
           ER       ret,ercd;
           UB       buff[36],barcode[36],reco[100],zsl[13],f_date[9],f_time[7];
           W        fjlh; 
           
          if(Is_file("pd.txt")==1)
            {     
	     cls();
             Dsp_str(" 文件 pd.txt 不存在",2,0);
             Dsp_str(" 请执行开始盘点功能:",5,0);
	     Dsp_str(" 将文件建在盘点机中:",8,0);
	     beep(1);
	     Wait(2);
	     return;
            }

             while(1)
             {
             	
             	cls();
                
	        memset(barcode,0x00,sizeof(barcode));
	        Dsp_str("请扫描商品编号",2,3);
                Dsp_str("条码:",6,0);
	        lcd_csr_put(6,5);
                lcd_csr_set((H)LCD_CSR_UNDER);
                memset(buff,0x00,sizeof(buff));
                
                /****** 读入条码 **************/       
                key_clear();
                ret=read_str(6,5,0,buff,30);
	        lcd_csr_set((H)LCD_CSR_OFF);
                if(ret==E_KEY_CLR) return;    /*按CLS 返回*/                
                
                
                if(strlen(buff)<30)
                 {     
                  space_str(buff,30);
                  memcpy(barcode,buff,30);
                 }
                else
                 {
                  strcpy(barcode,buff);
                 }           

	      memset(reco,0x00,sizeof(reco));             	
              ercd=search("pd.txt",0,37,0,30,barcode,reco,&fjlh);               	
             	 
                 if (ercd!=0) 
                 { cls();
   	           Dsp_str("商品编码:",2,0);
                   Dsp_str(barcode,5,4);
                   Dsp_str("数据库 pd.txt 无此码" ,8,0);
                   WAIT
                   continue;
                 }

                 memset(zsl,0x00,sizeof(zsl));
                 memset(f_date,0x00,sizeof(f_date));
                 memset(f_time,0x00,sizeof(f_time));
                 memcpy(zsl,reco+30,5);
                 
                 
                 cls();
                 Dsp_str("== 扫描查询 ==",1,3);
                 Dsp_str("编码:",4,0);
                 Dsp_str(barcode,4,5);
                 Dsp_str("实盘:",8,0);
                 Dsp_str(zsl,8,5); 
                 
                 WAIT

          }

}


void find_start4(void)
{
     ER       kind,ret,ercd;
     UB       f_bm[36],f_kc[33],f_date[9],f_time[7];
     UB       reco[51];
     int      i=0,j,f;
     W        zjs,jls,len,ffff,fjlh,fjfj,eeee,nnnn;


 
 
          if(Is_file("pd.txt")==1)
            {     
	     cls();
             Dsp_str(" 文件 pd.txt 不存在",2,0);
             Dsp_str(" 请执行数据传输功能:",5,0);
	     Dsp_str(" 将文件建在盘点机中:",8,0);
	     beep(1);
	     Wait(2);
	     return;
            }

           cls();
	   Dsp_str("   3.  向前翻页    ",2,0);
	   Dsp_str("  ENT. 向后翻页    ",5,0);
	   Dsp_str("  CLS.  返  回     ",8,0);      
           WAIT      
           
        while(1)
         {
        
          zjs=get_file_bit("pd.txt");
	  jls=(zjs/37);           
           
	   if((f=open("pd.txt",O_RDONLY))==E_LOWERR)	
	     {
    		cls();
    		Dsp_str("文件 pd.txt 打开错误",5,1);
    		WAIT
    		return;
	     }          
        
        memset(reco,0x00,sizeof(reco));
         
	if((ercd=lseek(f,i*37,0))!=E_LOWERR) 
          ercd=read(f,(char *)reco,37);

         close(f);

         memset(f_bm,0x00,sizeof(f_bm));
         memset(f_kc,0x00,sizeof(f_kc));
         memset(f_date,0x00,sizeof(f_date));
         memset(f_time,0x00,sizeof(f_time));
 
                 memcpy(f_bm,reco,30);
                 memcpy(f_kc,reco+30,5);
                  
                 cls();
                 Dsp_str("== 依次查询 ==",1,3);
                 Dsp_str("编码:",4,0);
                 Dsp_str(f_bm,4,5);
                 Dsp_str("实盘:",8,0);
                 Dsp_str(f_kc,8,5); 
         
	        kind=getkey();        	
        	switch  (kind)
        	{        		
        	         case '3':{
        	         	      if(i<=0)
        	         	      {     cls();
        	         	            Dsp_str("此记录为第一条记录!!",2,0);
        	         	            WAIT
        	         	      }
        	         	      else
        	         	      {
        	         	            i--;
        	         	      }
        	         	      break;
        	         	  }
        	         case  13:{
        	         	       if(i>=jls-1)
        	         	       {
        	         	       	     cls();
        	         	       	     Dsp_str("此记录为最后一条记录!!",2,0);
        	         	       	     WAIT
        	         	       	}
        	         	       	else
        	         	       	{
        	         	       		i++;
        	         	       	}
        	         	       	break;
        	         	  } 
        	         	     
        	         case  12:{
        	         	       close(f);
        	         	       return;
        	         	  }
        	}         
         
         
         } 
  
  close(f);



}

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -