Add some missing info to the job map so remote procs get their app_rank

Author: Ralph Castain

orte/runtime/data_type_support/orte_dt_packing_fns.c

@@ -346,6 +346,13 @@ int orte_dt_pack_proc(opal_buffer_t *buffer, const void *src,
             return rc;
         }
 
+        /* pack the app rank */
+        if (ORTE_SUCCESS != (rc = opal_dss_pack_buffer(buffer,
+                         (void*)(&(procs[i]->app_rank)), 1, OPAL_UINT32))) {
+            ORTE_ERROR_LOG(rc);
+            return rc;
+        }
+
         /* pack the attributes that will go */
         count = 0;
         OPAL_LIST_FOREACH(kv, &procs[i]->attributes, orte_attribute_t) {

orte/runtime/data_type_support/orte_dt_unpacking_fns.c

@@ -380,6 +380,14 @@ int orte_dt_unpack_proc(opal_buffer_t *buffer, void *dest,
             return rc;
         }
 
+        /* unpack the app_rank */
+        n = 1;
+        if (ORTE_SUCCESS != (rc = opal_dss_unpack_buffer(buffer,
+                         (&(procs[i]->app_rank)), &n, OPAL_UINT32))) {
+            ORTE_ERROR_LOG(rc);
+            return rc;
+        }
+
         /* unpack the attributes */
         n=1;
         if (ORTE_SUCCESS != (rc = opal_dss_unpack_buffer(buffer, &count,