0048436: Add detail of lines information in WS that returns Request Status

diff --git a/src/org/openbravo/retail/api/service/RetailApiRequestStatusService.java b/src/org/openbravo/retail/api/service/RetailApiRequestStatusService.java
index eda055c..83f0464 100644
--- a/src/org/openbravo/retail/api/service/RetailApiRequestStatusService.java
+++ b/src/org/openbravo/retail/api/service/RetailApiRequestStatusService.java
@@ -9,11 +9,13 @@
 package org.openbravo.retail.api.service;
 
 import java.util.Arrays;
+import java.util.List;
 import java.util.stream.Stream;
 
 import javax.persistence.Tuple;
 import javax.servlet.http.HttpServletRequest;
 
+import org.codehaus.jettison.json.JSONArray;
 import org.codehaus.jettison.json.JSONException;
 import org.codehaus.jettison.json.JSONObject;
 import org.openbravo.base.exception.OBException;
@@ -62,9 +64,41 @@ public class RetailApiRequestStatusService extends JSONWebService {
     request.put("status", tuple.get("status"));
     request.put("creationDate", tuple.get("created"));
     request.put("executionDate", tuple.get("executed"));
+    request.put("errorLines", buildErrorLines(getErrorLinesFromRequest(edlRequestId)));
     return request;
   }
 
+  private List<Tuple> getErrorLinesFromRequest(final String edlRequestId) {
+    // @formatter:off
+    final String hql ="select e.errorMsg AS message, e.linedata AS data "
+                    + "  from OBEDL_Request_Line e "
+                    + " where e.eDLRequest.id = :id"
+                    + " and e.status = 'Error' ";
+    // @formatter:on
+
+    return OBDal.getInstance()
+        .getSession()
+        .createQuery(hql, Tuple.class)
+        .setParameter("id", edlRequestId)
+        .setMaxResults(100)
+        .list();
+  }
+
+  private JSONArray buildErrorLines(final List<Tuple> errorLines) throws JSONException {
+    final JSONArray errorLinesData = new JSONArray();
+    for (final Tuple line : errorLines) {
+      errorLinesData.put(buildErrorLine(line));
+    }
+    return errorLinesData;
+  }
+
+  private JSONObject buildErrorLine(final Tuple line) throws JSONException {
+    final JSONObject lineData = new JSONObject();
+    lineData.put("message", line.get("message"));
+    lineData.put("data", line.get("data"));
+    return lineData;
+  }
+
   @Override
   public JSONWebServiceResult doPost(String path, HttpServletRequest request) {
     throw new UnsupportedOperationException("POST requests are not supported");