Scripts using SQLAppendStatement
DataCollectionZero = 0;
TotalWeight25-Added = sRMS25-TotalAutoAdded + TotalDrumDump25-SP;
{Create Database Connection}
IF DBConnection_SR_Batch == 0 THEN
DBResultCodeConn_SR_Batch = SQLConnect( DBConnID_SR_Batch, "DSN=dsn;SRVR=sever;DB=database" );
ENDIF;
IF DBConnection_SR_Batch == 0 THEN
DBResultCodeConn_SR_Batch = SQLConnect( DBConnID_SR_Batch, "DSN=dsn;SRVR=server;DB=database;UID=user; PWD=password" );
ENDIF;
IF DBResultCodeConn_SR_Batch == 0 THEN
DBConnection_SR_Batch = 1; {Database is connected}
TestConnect = 1;
ELSE
DBConnection_SR_Batch = 0; {Database is NOT connected}
ENDIF;
DIM SQLString AS MESSAGE;
DIM SQLString2 AS MESSAGE;
DIM SQLString3 AS MESSAGE;
DIM SQLString4 AS MESSAGE;
DIM SQLString5 AS MESSAGE;
DIM SQLString6 AS MESSAGE;
DIM SQLString7 AS MESSAGE;
SQLString = "EXEC prc_RunData_Insert "+"'"+HMI_ID+"'" +","
+"'"+StringFromReal(TotalWeight25-Added,1,"f")+"'"+","
+"'"+StringFromReal(TotalWeight25-LC,1,"f")+"'"+","
+"'"+StringFromReal(CondimentWeight25-LC,1,"f")+"'"+","
+"'"+StringFromReal(PressureFinal25,1,"f")+"'"+","
+"'"+StringFromReal(FinalTemperature25,1,"f")+"'"+","
+"'"+StringFromReal(FinalConductivity25,1,"f")+"'"+","
+"'"+StringFromReal(FBFinalPressureLong25,1,"f")+"'"+","
+"'"+StringFromReal(FBFinalPressureShort25,1,"f")+"'"+","
+"'"+StringFromReal(FBFinalDensity25,1,"f")+"'"+","
+"'"+StringFromReal(FBFinalWeight25,1,"f")+"'";
SQLString2 =
"'"+StringFromReal(sRMSCH2O25-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSCH2O25-TotalTopOffAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSCH2O25-TotalHoseAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSCH2O25-TotalAmountAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSHH2O25-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSHH2O25-TotalTopOffAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSHH2O25-TotalHoseAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSHH2O25-TotalAmountAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSChillH2O25-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSChillH2O25-TotalTopOffAdded,1,"f")+"'";
SQLString3 =
"'"+StringFromReal(sRMSChillH2O25-TotalHoseAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSChillH2O25-TotalAmountAdded,1,"f")+"'"+","
+"'"+StringFromReal(TotalSpargeStm25-AutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSCS25-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSCS25-TotalAmountAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSTP25-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSTP25-TotalAmountAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSBr25-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSBr25-TotalAmountAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSEmul25-TotalAutoAdded,1,"f")+"'";
SQLString4 =
"'"+StringFromReal(sRMSEmul25-TotalAmountAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSCond25-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSCond25-TotalAmountAdded,1,"f")+"'"+","
+"'"+StringFromReal(CondDSI25-LastDensity,1,"f")+"'"+","
+"'"+StringFromReal(CondDSI25-AvgDensity,1,"f")+"'"+","
+"'"+StringFromReal(CondDSI25-DensityStdv,1,"f")+"'"+","
+"'"+StringFromReal(CondDSI25-DensityCount,1,"f")+"'"+","
+"'"+StringFromReal(CondDSI25-TotalSteam,1,"f")+"'"+","
+"'"+StringFromReal(sRMSThick25-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSThick25-TotalAmountAdded,1,"f")+"'";
SQLString5 =
"'"+StringFromReal(sRMSBS25-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSBS25-TotalAmountAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSCM125-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSCM125-TotalAmountAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSPS25-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSPS25-TotalAmountAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSCornSyr25-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSCornSyr25-TotalAmountAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSFruct25-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSFruct25-TotalAmountAdded,1,"f")+"'";
SQLString6 =
"'"+StringFromReal(sRMSBroth25-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSBroth25-TotalAmountAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSTS25-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSTS25-TotalAmountAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSButter25-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSButter25-TotalAmountAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSCheese25-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSCheese25-TotalAmountAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSCream25-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSCream25-TotalAmountAdded,1,"f")+"'";
SQLString7 =
"'"+StringFromReal(sRMSV725-TotalAutoAdded,1,"f")+"'"+","
+"'"+StringFromReal(sRMSV725-TotalAmountAdded,1,"f")+"'";
DBResultCodeGen_SR_Batch = SQLSetStatement (DBConnID_SR_Batch, SQLString);
DBResultCodeGen_SR_Batch = SQLAppendStatement (DBConnID_SR_Batch, SQLString2);
DBResultCodeGen_SR_Batch = SQLAppendStatement (DBConnID_SR_Batch, SQLString3);
DBResultCodeGen_SR_Batch = SQLAppendStatement (DBConnID_SR_Batch, SQLString4);
DBResultCodeGen_SR_Batch = SQLAppendStatement (DBConnID_SR_Batch, SQLString5);
DBResultCodeGen_SR_Batch = SQLAppendStatement (DBConnID_SR_Batch, SQLString6);
DBResultCodeGen_SR_Batch = SQLAppendStatement (DBConnID_SR_Batch, SQLString7);
DBResultCodeGen_SR_Batch = SQLExecute( DBConnID_SR_Batch, "BatchCompleteCapture", 0 );
DBResultCodeGen_SR_Batch =SQLEnd(DBConnID_SR_Batch);
{Close Database Connection}
DBResultCodeConn_SR_Batch = SQLDisconnect(DBConnID_SR_Batch);
IF DBResultCodeConn_SR_Batch == 0 OR DBResultCodeConn_SR_Batch == -1002 THEN
DBConnection_SR_Batch = 0; {Database is Disconnected}
ENDIF;