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

📄 bank_svr.c

📁 转发交易接口
💻 C
📖 第 1 页 / 共 3 页
字号:
      sql_setdlist[0].sqldata = (void*)termno;
#line 282 "bank_svr.sqc"
      sql_setdlist[0].sqlind = 0L;
#line 282 "bank_svr.sqc"
      sql_setdlist[1].sqltype = 460; sql_setdlist[1].sqllen = 32;
#line 282 "bank_svr.sqc"
      sql_setdlist[1].sqldata = (void*)pc;
#line 282 "bank_svr.sqc"
      sql_setdlist[1].sqlind = 0L;
#line 282 "bank_svr.sqc"
      sqlasetdata(2,0,2,sql_setdlist,NULL,0L);
    }
#line 282 "bank_svr.sqc"
  sqlaaloc(3,1,6,0L);
    {
      struct sqla_setdata_list sql_setdlist[1];
#line 282 "bank_svr.sqc"
      sql_setdlist[0].sqltype = 496; sql_setdlist[0].sqllen = 4;
#line 282 "bank_svr.sqc"
      sql_setdlist[0].sqldata = (void*)&Records;
#line 282 "bank_svr.sqc"
      sql_setdlist[0].sqlind = 0L;
#line 282 "bank_svr.sqc"
      sqlasetdata(3,0,1,sql_setdlist,NULL,0L);
    }
#line 282 "bank_svr.sqc"
  sqlacall((unsigned short)24,3,2,3,0L);
#line 282 "bank_svr.sqc"
  sqlastop(0L);
}

#line 282 "bank_svr.sqc"

   	}
   	if (sqlca.sqlcode != 0)   
  	{
                SqlInfoGet(errorMsg, &sqlca);
  	        debugLog(__FILE__, __LINE__, "select sql false SQLCODE = [%-d]%s\n", sqlca.sqlcode, errorMsg);
        	retcode = abs(sqlca.sqlcode)%10000; 
        	strcpy(snddata, errorMsg);
        	SendToBank(rcvSocket, retcode, strlen(snddata), snddata);
  	        return;
  	}
 
        if(Records <= 0)  
        {
  		if(pc[0] == 0x00)  
  		{
        		
/*
EXEC SQL SELECT count(*)
   	 	 	 INTO :Records
   	 	 	 FROM jqxxmx
   	 	 	 WHERE Iss21 = :termno;
*/

/*
SQL0204N  "EBCS.JQXXMX" is an undefined name.  
SQLSTATE=42704

*/

{
#line 301 "bank_svr.sqc"
  sqlastrt(sqla_program_id, &sqla_rtinfo, &sqlca);
#line 301 "bank_svr.sqc"
  sqlaaloc(2,1,7,0L);
    {
      struct sqla_setdata_list sql_setdlist[1];
#line 301 "bank_svr.sqc"
      sql_setdlist[0].sqltype = 460; sql_setdlist[0].sqllen = 8;
#line 301 "bank_svr.sqc"
      sql_setdlist[0].sqldata = (void*)termno;
#line 301 "bank_svr.sqc"
      sql_setdlist[0].sqlind = 0L;
#line 301 "bank_svr.sqc"
      sqlasetdata(2,0,1,sql_setdlist,NULL,0L);
    }
#line 301 "bank_svr.sqc"
  sqlaaloc(3,1,8,0L);
    {
      struct sqla_setdata_list sql_setdlist[1];
#line 301 "bank_svr.sqc"
      sql_setdlist[0].sqltype = 496; sql_setdlist[0].sqllen = 4;
#line 301 "bank_svr.sqc"
      sql_setdlist[0].sqldata = (void*)&Records;
#line 301 "bank_svr.sqc"
      sql_setdlist[0].sqlind = 0L;
#line 301 "bank_svr.sqc"
      sqlasetdata(3,0,1,sql_setdlist,NULL,0L);
    }
#line 301 "bank_svr.sqc"
  sqlacall((unsigned short)24,4,2,3,0L);
#line 301 "bank_svr.sqc"
  sqlastop(0L);
}

#line 301 "bank_svr.sqc"

   	 	}
   	 	else
  		{
        		
/*
EXEC SQL SELECT count(*)
   	 	 	 INTO :Records
   	 	 	 FROM jqxxmx
   	 	 	 WHERE Iss21 = :termno and Iss3 = :pc;
*/

/*
SQL0204N  "EBCS.JQXXMX" is an undefined name.  
SQLSTATE=42704

*/

{
#line 308 "bank_svr.sqc"
  sqlastrt(sqla_program_id, &sqla_rtinfo, &sqlca);
#line 308 "bank_svr.sqc"
  sqlaaloc(2,2,9,0L);
    {
      struct sqla_setdata_list sql_setdlist[2];
#line 308 "bank_svr.sqc"
      sql_setdlist[0].sqltype = 460; sql_setdlist[0].sqllen = 8;
#line 308 "bank_svr.sqc"
      sql_setdlist[0].sqldata = (void*)termno;
#line 308 "bank_svr.sqc"
      sql_setdlist[0].sqlind = 0L;
#line 308 "bank_svr.sqc"
      sql_setdlist[1].sqltype = 460; sql_setdlist[1].sqllen = 32;
#line 308 "bank_svr.sqc"
      sql_setdlist[1].sqldata = (void*)pc;
#line 308 "bank_svr.sqc"
      sql_setdlist[1].sqlind = 0L;
#line 308 "bank_svr.sqc"
      sqlasetdata(2,0,2,sql_setdlist,NULL,0L);
    }
#line 308 "bank_svr.sqc"
  sqlaaloc(3,1,10,0L);
    {
      struct sqla_setdata_list sql_setdlist[1];
#line 308 "bank_svr.sqc"
      sql_setdlist[0].sqltype = 496; sql_setdlist[0].sqllen = 4;
#line 308 "bank_svr.sqc"
      sql_setdlist[0].sqldata = (void*)&Records;
#line 308 "bank_svr.sqc"
      sql_setdlist[0].sqlind = 0L;
#line 308 "bank_svr.sqc"
      sqlasetdata(3,0,1,sql_setdlist,NULL,0L);
    }
#line 308 "bank_svr.sqc"
  sqlacall((unsigned short)24,5,2,3,0L);
#line 308 "bank_svr.sqc"
  sqlastop(0L);
}

#line 308 "bank_svr.sqc"

   	 	}
   	 	 
   		if (sqlca.sqlcode != 0)   
  		{
	            SqlInfoGet(errorMsg, &sqlca);
  		    debugLog(__FILE__, __LINE__, "select sql false SQLCODE = [%-d]%s\n", sqlca.sqlcode, errorMsg);
        	    retcode = abs(sqlca.sqlcode)%10000; 
        	    strcpy(snddata, errorMsg);
        	    SendToBank(rcvSocket, retcode, strlen(snddata), snddata);
  		    return;
  		}
  	 	if(Records <= 0)  /*没有发现记录返回错误*/
   	 	{
        	    retcode = 1001; 
        	    strcpy(snddata, "无该发卡机的库存记录");
        	    SendToBank(rcvSocket, retcode, strlen(snddata), snddata);
  		    return;   	 	
   	 	}
        	else
        	{
        		if(pc[0] == 0x00)
        		{
        			
/*
EXEC SQL SELECT max(Iss3)
   	 	 	 	 INTO :pc
   	 	 	 	 FROM jqxxmx
   	 	 	 	 WHERE Iss21 = :termno;
*/

/*
SQL0204N  "EBCS.JQXXMX" is an undefined name.  
SQLSTATE=42704

*/

{
#line 334 "bank_svr.sqc"
  sqlastrt(sqla_program_id, &sqla_rtinfo, &sqlca);
#line 334 "bank_svr.sqc"
  sqlaaloc(2,1,11,0L);
    {
      struct sqla_setdata_list sql_setdlist[1];
#line 334 "bank_svr.sqc"
      sql_setdlist[0].sqltype = 460; sql_setdlist[0].sqllen = 8;
#line 334 "bank_svr.sqc"
      sql_setdlist[0].sqldata = (void*)termno;
#line 334 "bank_svr.sqc"
      sql_setdlist[0].sqlind = 0L;
#line 334 "bank_svr.sqc"
      sqlasetdata(2,0,1,sql_setdlist,NULL,0L);
    }
#line 334 "bank_svr.sqc"
  sqlaaloc(3,1,12,0L);
    {
      struct sqla_setdata_list sql_setdlist[1];
#line 334 "bank_svr.sqc"
      sql_setdlist[0].sqltype = 460; sql_setdlist[0].sqllen = 32;
#line 334 "bank_svr.sqc"
      sql_setdlist[0].sqldata = (void*)pc;
#line 334 "bank_svr.sqc"
      sql_setdlist[0].sqlind = 0L;
#line 334 "bank_svr.sqc"
      sqlasetdata(3,0,1,sql_setdlist,NULL,0L);
    }
#line 334 "bank_svr.sqc"
  sqlacall((unsigned short)24,6,2,3,0L);
#line 334 "bank_svr.sqc"
  sqlastop(0L);
}

#line 334 "bank_svr.sqc"
 
		   		if (sqlca.sqlcode != 0)  
  				{
            				SqlInfoGet(errorMsg, &sqlca);
  	    				debugLog(__FILE__, __LINE__, "select sql false SQLCODE = [%-d]%s\n", sqlca.sqlcode, errorMsg);
        	    			retcode = abs(sqlca.sqlcode)%10000; 
        	    			strcpy(snddata, errorMsg);
        	    			SendToBank(rcvSocket, retcode, strlen(snddata), snddata);
  	    				return;
  				}
  				Alltrim(pc);
  			}
  			
/*
EXEC SQL SELECT max(Iss4)
   	 	 	 INTO :lsh
   	 	 	 FROM jqxxmx
   	 	 	 WHERE Iss21 = :termno and Iss3 = :pc;
*/

/*
SQL0204N  "EBCS.JQXXMX" is an undefined name.  
SQLSTATE=42704

*/

{
#line 349 "bank_svr.sqc"
  sqlastrt(sqla_program_id, &sqla_rtinfo, &sqlca);
#line 349 "bank_svr.sqc"
  sqlaaloc(2,2,13,0L);
    {
      struct sqla_setdata_list sql_setdlist[2];
#line 349 "bank_svr.sqc"
      sql_setdlist[0].sqltype = 460; sql_setdlist[0].sqllen = 8;
#line 349 "bank_svr.sqc"
      sql_setdlist[0].sqldata = (void*)termno;
#line 349 "bank_svr.sqc"
      sql_setdlist[0].sqlind = 0L;
#line 349 "bank_svr.sqc"
      sql_setdlist[1].sqltype = 460; sql_setdlist[1].sqllen = 32;
#line 349 "bank_svr.sqc"
      sql_setdlist[1].sqldata = (void*)pc;
#line 349 "bank_svr.sqc"
      sql_setdlist[1].sqlind = 0L;
#line 349 "bank_svr.sqc"
      sqlasetdata(2,0,2,sql_setdlist,NULL,0L);
    }
#line 349 "bank_svr.sqc"
  sqlaaloc(3,1,14,0L);
    {
      struct sqla_setdata_list sql_setdlist[1];
#line 349 "bank_svr.sqc"
      sql_setdlist[0].sqltype = 460; sql_setdlist[0].sqllen = 32;
#line 349 "bank_svr.sqc"
      sql_setdlist[0].sqldata = (void*)lsh;
#line 349 "bank_svr.sqc"
      sql_setdlist[0].sqlind = 0L;
#line 349 "bank_svr.sqc"
      sqlasetdata(3,0,1,sql_setdlist,NULL,0L);
    }
#line 349 "bank_svr.sqc"
  sqlacall((unsigned short)24,7,2,3,0L);
#line 349 "bank_svr.sqc"
  sqlastop(0L);
}

#line 349 "bank_svr.sqc"
 
		   	if (sqlca.sqlcode != 0)   
  			{
            			SqlInfoGet(errorMsg, &sqlca);
  	    			debugLog(__FILE__, __LINE__, "select sql false SQLCODE = [%-d]%s\n", sqlca.sqlcode, errorMsg);
        	    		retcode = abs(sqlca.sqlcode)%10000; 
        	    		strcpy(snddata, errorMsg);
        	    		SendToBank(rcvSocket, retcode, strlen(snddata), snddata);
  	    			return;
  			}
  			
        		
/*
EXEC SQL SELECT Iss20, Iss8, Iss11, Iss18, Iss17
   	 	 	 INTO :jgh, :gyh, :jkks, :yeks, :hsks
   	 	 	 FROM jqxxmx
   	 	 	 WHERE Iss21 = :termno and Iss3 = :pc and Iss4 = :lsh;
*/

/*
SQL0204N  "EBCS.JQXXMX" is an undefined name.  
SQLSTATE=42704

*/

{
#line 363 "bank_svr.sqc"
  sqlastrt(sqla_program_id, &sqla_rtinfo, &sqlca);
#line 363 "bank_svr.sqc"
  sqlaaloc(2,3,15,0L);
    {
      struct sqla_setdata_list sql_setdlist[3];
#line 363 "bank_svr.sqc"
      sql_setdlist[0].sqltype = 460; sql_setdlist[0].sqllen = 8;
#line 363 "bank_svr.sqc"
      sql_setdlist[0].sqldata = (void*)termno;
#line 363 "bank_svr.sqc"
      sql_setdlist[0].sqlind = 0L;
#line 363 "bank_svr.sqc"
      sql_setdlist[1].sqltype = 460; sql_setdlist[1].sqllen = 32;
#line 363 "bank_svr.sqc"
      sql_setdlist[1].sqldata = (void*)pc;
#line 363 "bank_svr.sqc"
      sql_setdlist[1].sqlind = 0L;
#line 363 "bank_svr.sqc"
      sql_setdlist[2].sqltype = 460; sql_setdlist[2].sqllen = 32;
#line 363 "bank_svr.sqc"
      sql_setdlist[2].sqldata = (void*)lsh;
#line 363 "bank_svr.sqc"
      sql_setdlist[2].sqlind = 0L;
#line 363 "bank_svr.sqc"
      sqlasetdata(2,0,3,sql_setdlist,NULL,0L);
    }
#line 363 "bank_svr.sqc"
  sqlaaloc(3,5,16,0L);
    {
      struct sqla_setdata_list sql_setdlist[5];
#line 363 "bank_svr.sqc"
      sql_setdlist[0].sqltype = 460; sql_setdlist[0].sqllen = 32;
#line 363 "bank_svr.sqc"
      sql_setdlist[0].sqldata = (void*)jgh;
#line 363 "bank_svr.sqc"
      sql_setdlist[0].sqlind = 0L;
#line 363 "bank_svr.sqc"
      sql_setdlist[1].sqltype = 460; sql_setdlist[1].sqllen = 32;
#line 363 "bank_svr.sqc"
      sql_setdlist[1].sqldata = (void*)gyh;
#line 363 "bank_svr.sqc"
      sql_setdlist[1].sqlind = 0L;
#line 363 "bank_svr.sqc"
      sql_setdlist[2].sqltype = 460; sql_setdlist[2].sqllen = 32;
#line 363 "bank_svr.sqc"
      sql_setdlist[2].sqldata = (void*)jkks;
#line 363 "bank_svr.sqc"
      sql_setdlist[2].sqlind = 0L;
#line 363 "bank_svr.sqc"
      sql_setdlist[3].sqltype = 460; sql_setdlist[3].sqllen = 32;
#line 363 "bank_svr.sqc"
      sql_setdlist[3].sqldata = (void*)yeks;
#line 363 "bank_svr.sqc"
      sql_setdlist[3].sqlind = 0L;
#line 363 "bank_svr.sqc"
      sql_setdlist[4].sqltype = 460; sql_setdlist[4].sqllen = 32;
#line 363 "bank_svr.sqc"
      sql_setdlist[4].sqldata = (void*)hsks;
#line 363 "bank_svr.sqc"
      sql_setdlist[4].sqlind = 0L;
#line 363 "bank_svr.sqc"
      sqlasetdata(3,0,5,sql_setdlist,NULL,0L);
    }
#line 363 "bank_svr.sqc"
  sqlacall((unsigned short)24,8,2,3,0L);
#line 363 "bank_svr.sqc"
  sqlastop(0L);
}

#line 363 "bank_svr.sqc"
 
		   	if (sqlca.sqlcode != 0)   
  			{
            			SqlInfoGet(errorMsg, &sqlca);
  	    			debugLog(__FILE__, __LINE__, "select sql false SQLCODE = [%-d]%s\n", sqlca.sqlcode, errorMsg);
        	    		retcode = abs(sqlca.sqlcode)%10000; 
        	    		strcpy(snddata, errorMsg);
        	    		SendToBank(rcvSocket, retcode, strlen(snddata), snddata);
  	    			return;
  			}
        	}
       	}
       	else  
       	{
  		if(pc[0] == 0x00)  
  		{
        		
/*
EXEC SQL SELECT count(*)
   	 	 	 INTO :Records
   	 	 	 FROM dr_jqxxmx
   	 	 	 WHERE Iss21 = :termno;
*/

{
#line 382 "bank_svr.sqc"
  sqlastrt(sqla_program_id, &sqla_rtinfo, &sqlca);
#line 382 "bank_svr.sqc"
  sqlaaloc(2,1,17,0L);
    {
      struct sqla_setdata_list sql_setdlist[1];
#line 382 "bank_svr.sqc"
      sql_setdlist[0].sqltype = 460; sql_setdlist[0].sqllen = 8;
#line 382 "bank_svr.sqc"
      sql_setdlist[0].sqldata = (void*)termno;
#line 382 "bank_svr.sqc"

⌨️ 快捷键说明

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