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

📄 防错料.c

📁 CPT8000 防错料管理程序!对初学者帮助较大
💻 C
📖 第 1 页 / 共 2 页
字号:
		
				m = 0;
        		while (1)
        		{
        			if (Decode ())
          			{
            			on_beeper (beep2);
            			HaltScanner1();
            			flag=1;
            			break;
          			}
        			else
        			{
        				if (kbhit())
						{
							key=getchar();
							if (key==KEY_ESC)
							{
									break;
								
							}
						}
							
        			}
        		}
        		if (flag==0)
        		{
        			break;
        		}
        		else if (flag==1)
        		{
        			for (i=0;i<CodeLen;i++)
        			{
        				zyd[i]=CodeBuf[i];
        			}
        			while (i<30)
					{
						zyd[i]=' ';
						i++;
					}
        			zyd[i]=0x00;
        		}
        		
        		
        		i=0;
        		memset(all,0x00,170);
				for (ijk=0;part[ijk]!=0x00;)
				{	all[i]=part[ijk];
					i++;
					ijk++;
				}
				for (;i<30;)
				{	
					all[i]=' ';
					i++;
				}
				for (ijk=0;slot[ijk]!=0x00;)
				{	all[i]=slot[ijk];
					i++;
					ijk++;
				}
				for (;i<60;ijk++)
				{	
					all[i]=' ';
					i++;
				}
				for (ijk=0;zyd[ijk]!=0x00;)
				{	all[i]=zyd[ijk];
					i++;
					ijk++;
				}
				for (;i<90;i++)
				{	
					all[i]=' ';
				}
				all[i]=0x00;
				get_time(cur_time);

        		filehandle=open_DBF((char *)"demoDBF");
        		searchflag=0;
        		searchflag=has_member (filehandle,1,(char *)all);
        		if (searchflag==1)
        		{
        			close_DBF(filehandle);
        		}
        		else
        		{
        			clr_scr ();	
					jj=1;
        			on_beeper (beep3);
        			DispString (0, 1, (char *)"===错 误===", 0);
        			DispString (0, 5, (char *)"按ESC键继续", 0);
        			while((stop=getchar())!=KEY_ESC);
        			close_DBF(filehandle);
        			
        		}

	//***************************保存记录*****************************//
			        		strcat(all,oper);
			        		all[130]=0x00;
//			        		strcat(all,cur_time);
//			        		all[150]=0x00;
							if(jj==1)
							{
								jj=0;
								strcat(all," err");
								all[135]=0x00;

							}
							filehandle=open_DBF((char *)"saveDBF");
							add_member(filehandle,all);
							close_DBF(filehandle);
							goto slot;
							
						}else
						
//******************还料*****************************//						
						if(h=='2')
						{
							
					if (!access("resaveDBF"))
					{
						ref_hd = create_DBF ((char *)"resaveDBF", 200);		
						create_index (ref_hd, 1, 0, 30);
						close_DBF(ref_hd);		
					}
					if (!access("demoDBF"))
					{
						filehandle = create_DBF ((char *)"demoDBF", 95);
	    				create_index (filehandle, 1, 0, 90);
	    				close_DBF(filehandle);
	   				 	
					}else
					if (access("demoDBF"))
					{
						slothandle=open_DBF((char *)"demoDBF");
						if(rebuild_index(slothandle,2,0,30,31)==1)
						{
						}else
						{
							clr_scr ();
							on_beeper (beep3);
							DispString (0, 1, (char *)"未创建索引1", 0);
        					while((stop=getchar())!=KEY_ESC);
        					goto start;
						}
						close_DBF(slothandle);
					}
					
//************************PART NO******************************//        	

				
				clr_scr ();
				DispString (0, 1, (char *)"输操作员号", 0);
				saveflag=0;
				InitScanner1();
		
				m = 0;
        		while (1)
        		{
        			if (Decode ())
          			{
            			on_beeper (beep2);
            			HaltScanner1();
            			flag=1;
            			break;
          			}
        			else
        			{
        				if (kbhit())
						{
							key=getchar();
							if (key==KEY_ESC)
							{
									goto start;
								
							}
						}
							
        			}
        		}
        		if (flag==0)
        		{
        			break;
        		}
        		else if (flag==1)
        		{
					partlen=CodeLen;
        			for (i=0;i<CodeLen;i++)
        			{
        				oper[i]=CodeBuf[i];
        			}
        			while (i<30)
					{
						oper[i]=' ';
						i++;
					}
        			oper[i]=0x00;    			
        		}
				
part1:					
				clr_scr ();
				DispString (0, 1, (char *)"请扫PART No:", 0);
				saveflag=0;
				InitScanner1();
		
				m = 0;
        		while (1)
        		{
        			if (Decode ())
          			{
            			on_beeper (beep2);
            			HaltScanner1();
            			flag=1;
            			break;
          			}
        			else
        			{
        				if (kbhit())
						{
							key=getchar();
							if (key==KEY_ESC)
							{
									goto start;
								
							}
						}
							
        			}
        		}
        		if (flag==0)
        		{
        			break;
        		}
        		else if (flag==1)
        		{
					partlen=CodeLen;
        			for (i=0;i<CodeLen;i++)
        			{
        				part[i]=CodeBuf[i];
        			}
        			while (i<30)
					{
						part[i]=' ';
						i++;
					}
        			part[i]=0x00;
        			

        			
        		}

slot1:	
        		clr_scr ();
				memset(slot,0x00,30);
				DispString (0, 1, (char *)"请扫SLOT No:", 0);
				InitScanner1();
				
				m = 0;
        		while (1)
        		{
        			if (Decode ())
          			{
            			on_beeper (beep2);
            			HaltScanner1();
            			flag=1;
            			break;
          			}
        			else
        			{
        				if (kbhit())
						{
							key=getchar();
							if (key==KEY_ESC)
							{
									goto part1;
								
							}
						}
							
        			}
        		}
        		if (flag==0)
        		{
        			break;
        		}
        		else if (flag==1)
        		{
        			for (i=0;i<CodeLen;i++)
        			{
        				slot[i]=CodeBuf[i];
        			}
        			while (i<30)
					{
						slot[i]=' ';
						i++;
					}
        			slot[i]=0x00;
		}
zyd1:        		clr_scr ();
					memset(zyd,0x00,30);
				DispString (0, 1, (char *)"请扫领料号:", 0);
				saveflag=0;
				InitScanner1();
		
				m = 0;
        		while (1)
        		{
        			if (Decode ())
          			{
            			on_beeper (beep2);
            			HaltScanner1();
            			flag=1;
            			break;
          			}
        			else
        			{
        				if (kbhit())
						{
							key=getchar();
							if (key==KEY_ESC)
							{
									goto part1;
							}
						}
							
        			}
        		}
        		if (flag==0)
        		{
        			goto slot1;
        		}
        		else if (flag==1)
        		{
        			for (i=0;i<CodeLen;i++)
        			{
        				zyd[i]=CodeBuf[i];
        			}
        			while (i<30)
					{
						zyd[i]=' ';
						i++;
					}
        			zyd[i]=0x00;
        		}
        		
        		
        		i=0;
        		memset(all,0x00,170);
				for (ijk=0;part[ijk]!=0x00;)
				{	all[i]=part[ijk];
					i++;
					ijk++;
				}
				for (;i<30;)
				{	
					all[i]=' ';
					i++;
				}
				for (ijk=0;slot[ijk]!=0x00;)
				{	all[i]=slot[ijk];
					i++;
					ijk++;
				}
				for (;i<60;ijk++)
				{	
					all[i]=' ';
					i++;
				}
				for (ijk=0;zyd[ijk]!=0x00;)
				{	all[i]=zyd[ijk];
					i++;
					ijk++;
				}
				for (;i<90;i++)
				{	
					all[i]=' ';
				}
				all[i]=0x00;
				get_time(cur_time);
        		filehandle=open_DBF((char *)"demoDBF");
        		searchflag=0;
        		searchflag=has_member (filehandle,1,(char *)all);
        		if (searchflag==1)
        		{

        			close_DBF(filehandle);
        		}
        		else
        		{
        			clr_scr ();	
					jj=1;
        			on_beeper (beep3);
        			DispString (0, 1, (char *)"===错 误===", 0);
        			DispString (0, 5, (char *)"按ESC键继续", 0);
        			while((stop=getchar())!=KEY_ESC);
        			close_DBF(filehandle);
					memset(zb1,' ',29);
        			goto all;
        		}
        		
zb1:       		
        		clr_scr ();
				memset(zb1,0x00,30);
				DispString (0, 1, (char *)"请扫退料号:", 0);
				saveflag=0;
				InitScanner1();
		
				m = 0;
        		while (1)
        		{
        			if (Decode ())
          			{
            			on_beeper (beep2);
            			HaltScanner1();
            			flag=1;
            			break;
          			}
        			else
        			{
        				if (kbhit())
						{
							key=getchar();
							if (key==KEY_ESC)
							{
									goto slot1;
								
							}
						}
							
        			}
        		}
        		if (flag==0)
        		{
        			break;
        		}
        		else if (flag==1)
        		{
        			for (i=0;i<CodeLen;i++)
        			{
        				zb1[i]=CodeBuf[i];
        			}
        			while (i<30)
					{
						zb1[i]=' ';
						i++;
					}
        			zb1[i]=0x00;
        		}

////*****************对比条形码******************//
	

    			if(strcmp(zyd,zb1)==0)
    			{
    				clr_scr ();
					jj=1;
    				on_beeper (beep3);
					DispString (0, 1, (char *)"料号错误", 0);
					DispString (0, 3, (char *)"禁扫同一料号", 0);
					DispString (0, 5, (char *)"ESC返回", 0);
					while((stop=getchar())!=KEY_ESC);
    			}
		        		
		



all:
	//***************************保存记录*****************************//
						
							strcat(all,zb1);
				    		all[122]=0x00;
				    		strcat(all,oper);
			        		all[150]=0x00;
//				    		strcat(all,cur_time);
//				    		all[160]=0x00;
							if(jj==1)
							{
								jj=0;
								strcat(all," err");
								all[185]=0x00;

							}
							filehandle=open_DBF((char *)"resaveDBF");
							add_member(filehandle,all);
							close_DBF(filehandle);
							goto slot1;
						}
						else
						if(h==KEY_ESC)
						{
							goto start;
						}
					}
					
        		
        	
			}
			else if(c == '2')
			{
				
				DownloadLookup ();
				break;
			
			}
			else if (c == '3')
			{
				
			clr_scr ();
			DispString (0, 1, (char *)"1.上传巡检库", 0);
			DispString (0, 3, (char *)"2.上传还料库", 0);
			
			while(1)
			{
				jk = getchar();
				if(jk == '1')
				{
					if (!access("saveDBF"))
					{
						clr_scr ();
						DispString (0, 1, (char *)"数据不存在", 0);
						DispString (0, 4, (char *)"按蓝键返回", 0);
						while((stop=getchar())!=KEY_CR);
						goto start;
					}
					f_hd=open_DBF((char *)"saveDBF");
					if(UploadDBF (f_hd, 2) == TRUE )
					{
						remove ((char*)"saveDBF");
					}else
					{
						close_DBF(f_hd);
						goto start;
					}
					
					close_DBF(f_hd);
		
					goto start;
				}else
				if(jk == '2')
				{
					if (!access("resaveDBF"))
					{
						clr_scr ();
						DispString (0, 1, (char *)"数据不存在", 0);
						DispString (0, 4, (char *)"按蓝键返回", 0);
						while((stop=getchar())!=KEY_CR);
						goto start;
					}
					f_hd=open_DBF((char *)"resaveDBF");
					if(UploadDBF (f_hd, 2) == TRUE )
					{
						remove ((char*)"resaveDBF");
					}else
					{close_DBF(f_hd);
						goto start;
						}
					
					close_DBF(f_hd);
		
					goto start;
				}
				else
				if(jk==KEY_ESC){goto start;}
				}
			}		
		}	
	} 
} 

⌨️ 快捷键说明

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