📄 db.pc.not_sp
字号:
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_MAILFILE.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_MAILFILE.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_MAILFILE);
}
int CSeqEmail::getS_TR_T_MAILINFO()
{
EXEC SQL BEGIN DECLARE SECTION;
int i_id;
EXEC SQL END DECLARE SECTION;
EXEC SQL SELECT S_TR_T_MAILINFO.NEXTVAL INTO :i_id FROM DUAL ;
m_iS_TR_T_MAILINFO=i_id;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_MAILINFO.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_MAILINFO.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_MAILINFO);
}
int CSeqEmail::getS_TR_T_MAILACCOUNT()
{
EXEC SQL BEGIN DECLARE SECTION;
int i_id;
EXEC SQL END DECLARE SECTION;
EXEC SQL SELECT S_TR_T_MAILACCOUNT.NEXTVAL INTO :i_id FROM DUAL ;
m_iS_TR_T_MAILACCOUNT=i_id;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_MAILACCOUNT.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_MAILACCOUNT.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_MAILACCOUNT);
}
int CSeqEmail::getS_TR_T_MAILTEXT()
{
EXEC SQL BEGIN DECLARE SECTION;
int i_id;
EXEC SQL END DECLARE SECTION;
EXEC SQL SELECT S_TR_T_MAILTEXT.NEXTVAL INTO :i_id FROM DUAL ;
m_iS_TR_T_MAILTEXT=i_id;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_MAILTEXT.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_MAILTEXT.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_MAILTEXT);
}
int CSeqEmail::getS_TR_T_SPEMAILFILE()
{
EXEC SQL BEGIN DECLARE SECTION;
int i_id;
EXEC SQL END DECLARE SECTION;
EXEC SQL SELECT S_TR_T_SPEMAILFILE.NEXTVAL INTO :i_id FROM DUAL ;
m_iS_TR_T_SPEMAILFILE=i_id;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_SPEMAILFILE.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_SPEMAILFILE.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_SPEMAILFILE);
}
int CSeqEmail::getS_TR_T_SPEMAILINFO()
{
EXEC SQL BEGIN DECLARE SECTION;
int i_id;
EXEC SQL END DECLARE SECTION;
EXEC SQL SELECT S_TR_T_SPEMAILINFO.NEXTVAL INTO :i_id FROM DUAL ;
m_iS_TR_T_SPEMAILINFO=i_id;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_SPEMAILINFO.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_SPEMAILINFO.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_SPEMAILINFO);
}
int CSeqEmail::getS_TR_T_SPEMAILADDRESS()
{
EXEC SQL BEGIN DECLARE SECTION;
int i_id;
EXEC SQL END DECLARE SECTION;
EXEC SQL SELECT S_TR_T_SPEMAILADDRESS.NEXTVAL INTO :i_id FROM DUAL ;
m_iS_TR_T_SPEMAILADDRESS=i_id;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_SPEMAILADDRESS.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_SPEMAILADDRESS.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_SPEMAILADDRESS);
}
int CSeqEmail::getS_TR_T_SPEMAILTEXT()
{
EXEC SQL BEGIN DECLARE SECTION;
int i_id;
EXEC SQL END DECLARE SECTION;
EXEC SQL SELECT S_TR_T_SPEMAILTEXT.NEXTVAL INTO :i_id FROM DUAL ;
m_iS_TR_T_SPEMAILTEXT=i_id;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_SPEMAILTEXT.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_SPEMAILTEXT.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_SPEMAILTEXT);
}
/*int CSeqEmail::getS_TR_T_MAILADDRESS()
{
EXEC SQL BEGIN DECLARE SECTION;
int i_id;
EXEC SQL END DECLARE SECTION;
EXEC SQL EXECUTE getseq_S_TR_T_MAILADDRESS USING :i_id;
m_iS_TR_T_MAILADDRESS=i_id;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_MAILADDRESS.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_MAILADDRESS.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_MAILADDRESS);
}
int CSeqEmail::getS_TR_T_MAILFILE()
{
EXEC SQL BEGIN DECLARE SECTION;
int i_id;
EXEC SQL END DECLARE SECTION;
EXEC SQL EXECUTE getseq_S_TR_T_MAILFILE USING :i_id;
m_iS_TR_T_MAILFILE=i_id;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_MAILFILE.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_MAILFILE.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_MAILFILE);
}
int CSeqEmail::getS_TR_T_MAILINFO()
{
EXEC SQL BEGIN DECLARE SECTION;
int i_id;
EXEC SQL END DECLARE SECTION;
EXEC SQL EXECUTE getseq_S_TR_T_MAILINFO USING :i_id;
m_iS_TR_T_MAILINFO=i_id;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_MAILINFO.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_MAILINFO.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_MAILINFO);
}
int CSeqEmail::getS_TR_T_MAILACCOUNT()
{
EXEC SQL BEGIN DECLARE SECTION;
int i_id;
EXEC SQL END DECLARE SECTION;
EXEC SQL EXECUTE getseq_S_TR_T_MAILACCOUNT USING :i_id;
m_iS_TR_T_MAILACCOUNT=i_id;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_MAILACCOUNT.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_MAILACCOUNT.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_MAILACCOUNT);
}
int CSeqEmail::getS_TR_T_MAILTEXT()
{
EXEC SQL BEGIN DECLARE SECTION;
int i_id;
EXEC SQL END DECLARE SECTION;
EXEC SQL EXECUTE getseq_S_TR_T_MAILTEXT USING :i_id;
m_iS_TR_T_MAILTEXT=i_id;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_MAILTEXT.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_MAILTEXT.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_MAILTEXT);
}
int CSeqEmail::getS_TR_T_SPEMAILFILE()
{
EXEC SQL BEGIN DECLARE SECTION;
int i_id;
EXEC SQL END DECLARE SECTION;
EXEC SQL EXECUTE getseq_S_TR_T_SPEMAILFILE USING :i_id;
m_iS_TR_T_SPEMAILFILE=i_id;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_SPEMAILFILE.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_SPEMAILFILE.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_SPEMAILFILE);
}
int CSeqEmail::getS_TR_T_SPEMAILINFO()
{
EXEC SQL BEGIN DECLARE SECTION;
int i_id;
EXEC SQL END DECLARE SECTION;
EXEC SQL EXECUTE getseq_S_TR_T_SPEMAILINFO USING :i_id;
m_iS_TR_T_SPEMAILINFO=i_id;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_SPEMAILINFO.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_SPEMAILINFO.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_SPEMAILINFO);
}
int CSeqEmail::getS_TR_T_SPEMAILADDRESS()
{
EXEC SQL BEGIN DECLARE SECTION;
int i_id;
EXEC SQL END DECLARE SECTION;
EXEC SQL EXECUTE getseq_S_TR_T_SPEMAILADDRESS USING :i_id;
m_iS_TR_T_SPEMAILADDRESS=i_id;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_SPEMAILADDRESS.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_SPEMAILADDRESS.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_SPEMAILADDRESS);
}
int CSeqEmail::getS_TR_T_SPEMAILTEXT()
{
EXEC SQL BEGIN DECLARE SECTION;
int i_id;
EXEC SQL END DECLARE SECTION;
EXEC SQL EXECUTE getseq_S_TR_T_SPEMAILTEXT USING :i_id;
m_iS_TR_T_SPEMAILTEXT=i_id;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_SPEMAILTEXT.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_SPEMAILTEXT.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_SPEMAILTEXT);
}
*/
int CSeqEmail::getfkS_TR_T_MAILADDRESS()
{
return m_iS_TR_T_MAILADDRESS;
}
int CSeqEmail::getfkS_TR_T_MAILFILE()
{
return m_iS_TR_T_MAILFILE;
}
int CSeqEmail::getfkS_TR_T_MAILINFO()
{
return m_iS_TR_T_MAILINFO;
}
int CSeqEmail::getfkS_TR_T_MAILACCOUNT()
{
return m_iS_TR_T_MAILACCOUNT;
}
int CSeqEmail::getfkS_TR_T_MAILTEXT()
{
return m_iS_TR_T_MAILTEXT;
}
int CSeqEmail::getfkS_TR_T_SPEMAILFILE()
{
return m_iS_TR_T_SPEMAILFILE;
}
int CSeqEmail::getfkS_TR_T_SPEMAILINFO()
{
return m_iS_TR_T_SPEMAILINFO;
}
int CSeqEmail::getfkS_TR_T_SPEMAILADDRESS()
{
return m_iS_TR_T_SPEMAILADDRESS;
}
int CSeqEmail::getfkS_TR_T_SPEMAILTEXT()
{
return m_iS_TR_T_SPEMAILTEXT;
}
CSeqWeb::CSeqWeb()
{
//prepare();
m_iS_TR_T_SUBMITCONTENT=getS_TR_T_SUBMITCONTENT();
m_iS_TR_T_SENPAGE=getS_TR_T_SENPAGE();
}
CSeqWeb::~CSeqWeb()
{
}
/*void CSeqWeb::prepare()
{
EXEC SQL BEGIN DECLARE SECTION;
char c_sql[512];
EXEC SQL END DECLARE SECTION;
strcpy(c_sql, "SELECT S_TR_T_SUBMITCONTENT.NEXTVAL INTO :gi_id FROM DUAL");
EXEC SQL PREPARE getseq_S_TR_T_SUBMITCONTENT FROM :c_sql;
if(checkSqlCode()!=0)
{
printf("prepare [%s] [%d]\n",c_sql,sqlca.sqlcode);
TLog::toErr("prepare [%s] [%d]\n",c_sql,sqlca.sqlcode);
}
strcpy(c_sql, "SELECT S_TR_T_SENPAGE.NEXTVAL INTO :gi_id FROM DUAL");
EXEC SQL PREPARE getseq_S_TR_T_SENPAGE FROM :c_sql;
if(checkSqlCode()!=0)
{
TLog::toErr("prepare [%s] [%d]\n",c_sql,sqlca.sqlcode);
}
}
*/
int CSeqWeb::getS_TR_T_SUBMITCONTENT()
{
EXEC SQL BEGIN DECLARE SECTION;
int i_id;
EXEC SQL END DECLARE SECTION;
EXEC SQL SELECT S_TR_T_SUBMITCONTENT.NEXTVAL INTO :i_id FROM DUAL ;
m_iS_TR_T_SUBMITCONTENT=i_id;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_SUBMITCONTENT.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_SUBMITCONTENT.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_SUBMITCONTENT);
}
int CSeqWeb::getS_TR_T_SENPAGE()
{
EXEC SQL BEGIN DECLARE SECTION;
int i_id;
EXEC SQL END DECLARE SECTION;
EXEC SQL SELECT S_TR_T_SENPAGE.NEXTVAL INTO :i_id FROM DUAL ;
m_iS_TR_T_SENPAGE=i_id;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_SENPAGE.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_SENPAGE.NEXTVAL [%d]\n",sqlca.sqlcode);
}
return (m_iS_TR_T_SENPAGE);
}
/*int CSeqWeb::getS_TR_T_SUBMITCONTENT()
{
EXEC SQL EXECUTE getseq_S_TR_T_SUBMITCONTENT ;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_SUBMITCONTENT.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_SUBMITCONTENT.NEXTVAL [%d]\n",sqlca.sqlcode);
}
printf("S_TR_T_SUBMITCONTENT= [%d]\n",gi_id);
m_iS_TR_T_SUBMITCONTENT=gi_id;
return (m_iS_TR_T_SUBMITCONTENT);
}
int CSeqWeb::getS_TR_T_SENPAGE()
{
EXEC SQL EXECUTE getseq_S_TR_T_SENPAGE ;
if(checkSqlCode()!=0)
{
printf("SELECT S_TR_T_SENPAGE.NEXTVAL [%d]\n",sqlca.sqlcode);
TLog::toErr("SELECT S_TR_T_SENPAGE.NEXTVAL [%d]\n",sqlca.sqlcode);
}
m_iS_TR_T_SENPAGE=gi_id;
return (m_iS_TR_T_SENPAGE);
}
*/
int CSeqWeb::getfkS_TR_T_SUBMITCONTENT()
{
return (m_iS_TR_T_SUBMITCONTENT);
}
int CSeqWeb::getfkS_TR_T_SENPAGE()
{
return (m_iS_TR_T_SENPAGE);
}
void CTblEmail::prepare()
{
EXEC SQL BEGIN DECLARE SECTION;
char c_sql[512];
EXEC SQL END DECLARE SECTION;
strcpy(c_sql, "INSERT INTO TR_T_MAILACCOUNT VALUES (:v1,:v2,:v3,:v4,:v5,:v6,:v7)");
EXEC SQL PREPARE ins_TR_T_MAILACCOUNT from :c_sql;
if(checkSqlCode()!=0)
{
TLog::toErr("prepare [%s] [%d]\n",c_sql,sqlca.sqlcode);
}
strcpy(c_sql, "INSERT INTO TR_T_MAILFILE VALUES (:v1,:v2,:v3,:v4)");
EXEC SQL PREPARE ins_TR_T_MAILFILE from :c_sql;
if(checkSqlCode()!=0)
{
TLog::toErr("prepare [%s] [%d]\n",c_sql,sqlca.sqlcode);
}
strcpy(c_sql, "INSERT INTO TR_T_MAILINFO VALUES (:v1,:v2,:v3,:v4,:v5,:v6,:v7,:v8,:v9,:v10,:v11)");
EXEC SQL PREPARE ins_TR_T_MAILINFO from :c_sql;
if(checkSqlCode()!=0)
{
TLog::toErr("prepare [%s] [%d]\n",c_sql,sqlca.sqlcode);
}
strcpy(c_sql, "INSERT INTO TR_T_MAILADDRESS VALUES (:v1,:v2,:v3,:v4,:v5,:v6)");
EXEC SQL PREPARE ins_TR_T_MAILADDRESS from :c_sql;
if(checkSqlCode()!=0)
{
TLog::toErr("prepare [%s] [%d]\n",c_sql,sqlca.sqlcode);
}
strcpy(c_sql, "INSERT INTO TR_T_MAILTEXT VALUES (:v1,:v2,:v3,:v4,:v5)");
EXEC SQL PREPARE ins_TR_T_MAILTEXT from :c_sql;
if(checkSqlCode()!=0)
{
TLog::toErr("prepare [%s] [%d]\n",c_sql,sqlca.sqlcode);
}
strcpy(c_sql, "INSERT INTO TR_T_SPEMAILFILE VALUES (:v1,:v2,:v3,:v4)");
EXEC SQL PREPARE ins_TR_T_SPEMAILFILE from :c_sql;
if(checkSqlCode()!=0)
{
TLog::toErr("prepare [%s] [%d]\n",c_sql,sqlca.sqlcode);
}
strcpy(c_sql, "INSERT INTO TR_T_SPEMAILINFO VALUES (:v1,:v2,:v3,:v4,:v5,:v6,:v7,:v8,:v9,:v10,:v11,:v12)");
EXEC SQL PREPARE ins_TR_T_SPEMAILINFO from :c_sql;
if(checkSqlCode()!=0)
{
TLog::toErr("prepare [%s] [%d]\n",c_sql,sqlca.sqlcode);
}
strcpy(c_sql, "INSERT INTO TR_T_SPEMAILADDRESS VALUES (:v1,:v2,:v3,:v4,:v5,:v6)");
EXEC SQL PREPARE ins_TR_T_SPEMAILADDRESS from :c_sql;
if(checkSqlCode()!=0)
{
TLog::toErr("prepare [%s] [%d]\n",c_sql,sqlca.sqlcode);
}
strcpy(c_sql, "INSERT INTO TR_T_SPEMAILTEXT VALUES (:v1,:v2,:v3,:v4,:v5)");
EXEC SQL PREPARE ins_TR_T_SPEMAILTEXT from :c_sql;
if(checkSqlCode()!=0)
{
TLog::toErr("prepare [%s] [%d]\n",c_sql,sqlca.sqlcode);
}
}
//1:邮件账号
int CTblEmail::insRecord(STRU_TR_T_MAILACCOUNT * prec)
{
EXEC SQL BEGIN DECLARE SECTION;
DBSTRU_TR_T_MAILACCOUNT rec;
EXEC SQL END DECLARE SECTION;
memcpy((char *)(void *)&rec,(char *)(void *)prec,sizeof(rec));
EXEC SQL execute ins_TR_T_MAILACCOUNT using :rec;
if(checkSqlCode()!=0)
{
printf("INSERT INTO TR_T_MAILACCOUNT[%d]\n",sqlca.sqlcode);
TLog::toErr("INSERT INTO TR_T_MAILACCOUNT[%d]\n",sqlca.sqlcode);
TLog::toErr("[%d]\n",rec.MAC_ID);
TLog::toErr("[%s]\n",rec.MAC_USERID);
TLog::toErr("[%s]\n",rec.MAC_PASSWORD);
TLog::toErr("[%s]\n",rec.MAC_SERVERIP);
TLog::toErr("[%s]\n",rec.MAC_DOMAINNAME);
TLog::toErr("[%d]\n",rec.MAC_SERVICE);
TLog::toErr("[%s]\n",rec.MAC_CAPTIME);
}
else
EXEC SQL COMMIT WORK;
return sqlca.sqlcode;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -