/* ***** General Information ***** Creator: coresystems software USA, laja Create Date: 2012 07 10   ***** StartConfDesc ***** Test query groups that are marked as "Y" before updating/adding marketing document ***** EndConfDesc *****   ***** Updates ***** YYYY-MM-DD, name: Update Comment */ string ruleName = pVal.RuleInfo.RuleName.ToString(); string errorMessage = "Error in [Optimizer Rule] '" + ruleName + "'"; string carriageReturn = "\r\n"; string mySQL=""; string myErrorMessage=""; System.Globalization.CultureInfo ci = SwissAddonFramework.Utils.Misc.GetSAPCulture(); try { string cardCode = TextEdit.GetFromUID(pVal.Form, "4").Value; for (int i = 1; i <= 64; i++) { if (i >= 2) {mySQL = mySQL + " UNION ALL " + carriageReturn;} mySQL = mySQL + @"SELECT TOP 1 OCRD.QryGroup" + i.ToString() + @", OCQG.GroupName, OCQG.GroupCode FROM OCRD, OCQG WHERE CardCode = '" + cardCode + "' and OCQG.GroupCode = '" + i.ToString() + "' AND QryGroup" + i.ToString() + " = 'Y'" + carriageReturn; } System.Data.SqlClient.SqlCommand cmd = new System.Data.SqlClient.SqlCommand(); cmd.CommandText = mySQL; using (System.Data.SqlClient.SqlDataReader sdr = SwissAddonFramework.B1Connector.GetB1Connector().ExecuteQuery(cmd)){ if (sdr.HasRows) { bool firstRow = true; while (sdr.Read()){ if (firstRow) { myErrorMessage = "The following properties have been selected for this business partner: " + carriageReturn; firstRow = false; } myErrorMessage = myErrorMessage + sdr["GroupCode"] + " - " + sdr["GroupName"] + carriageReturn; } MessageBox.Show(myErrorMessage, "OK "); } } } catch (System.Exception ex) { MessageBox.Show(errorMessage + ": \n" + ex.Message, "OK"); StatusBar.WriteError(errorMessage + ": " + ex.Message); Debug.WriteMessage(errorMessage + ": " + ex.Message, Debug.DebugLevel.Exception); return false; } return true;