IDEMPIERE-6229: 2Pack / Data : fill table field using SQL Statement content (#2451)

org.adempiere.base.callout/src/org/adempiere/base/callout/PackageExpDetail.java

@@ -0,0 +1,59 @@
+/***********************************************************************
+ * This file is part of iDempiere ERP Open Source                      *
+ * http://www.idempiere.org                                            *
+ *                                                                     *
+ * Copyright (C) Contributors                                          *
+ *                                                                     *
+ * This program is free software; you can redistribute it and/or       *
+ * modify it under the terms of the GNU General Public License         *
+ * as published by the Free Software Foundation; either version 2      *
+ * of the License, or (at your option) any later version.              *
+ *                                                                     *
+ * This program is distributed in the hope that it will be useful,     *
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of      *
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the        *
+ * GNU General Public License for more details.                        *
+ *                                                                     *
+ * You should have received a copy of the GNU General Public License   *
+ * along with this program; if not, write to the Free Software         *
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,          *
+ * MA 02110-1301, USA.                                                 *
+ *                                                                     *
+ * Contributors:                                                       *
+ * - Nicolas Micoud (TGI)                                              *
+ **********************************************************************/
+package org.adempiere.base.callout;
+
+import java.util.Properties;
+
+import org.adempiere.base.IColumnCallout;
+import org.adempiere.base.annotation.Callout;
+import org.compiere.model.GridField;
+import org.compiere.model.GridTab;
+import org.compiere.model.MTable;
+
+/**
+ * 
+ * @author Nicolas Micoud (TGI)
+ *
+ */
+@Callout(tableName = "AD_Package_Exp_Detail", columnName = {"SQLStatement"})
+public class PackageExpDetail implements IColumnCallout {
+	@Override
+	public String start(Properties ctx, int WindowNo, GridTab mTab, GridField mField, Object value, Object oldValue) {
+
+		if (value != null && mTab.getValue("AD_Table_ID") == null) {
+			String sql = value.toString();
+			if (sql.startsWith("SELECT ") && sql.contains(" FROM ")) {
+				int start = sql.indexOf(" FROM ") + 6;
+				int end = sql.indexOf(" ", start + 1);
+
+				String tablename = sql.substring(start, end);
+
+				if (MTable.get(ctx, tablename) != null)
+					mTab.setValue("AD_Table_ID", MTable.get(ctx, tablename).getAD_Table_ID());
+			}
+		}
+		return null;
+	}
+}