08-12-2022

ECM.JobRunner.Windows/WCF/Methods/GetJobConfig.vb

@@ -17,11 +17,32 @@ Public Class GetJobConfig
                 .JobTypes = State.JobTypes,
                 .JobDefinitions = State.JobDefinitions,
                 .ProfileDefinitions = New GetJobConfigResponse.ProfileDefinitionConfig With {
-                    .ImportProfiles = State.ProfileDefintions.ImportProfiles
+                    .ImportProfiles = State.ProfileDefintions.ImportProfiles.
+                        Select(AddressOf FillJobForProfile).
+                        Select(AddressOf FillStepsForProfile).
+                        ToList()
                 },
                 .WindreamObjectTypes = State.ObjectTypes
             }
         End Function
+
+        Private Function FillJobForProfile(pProfile As ImportProfile) As ImportProfile
+            Dim oJob = State.JobDefinitions.
+                Where(Function(job) job.Id = pProfile.JobId).
+                FirstOrDefault()
+
+            pProfile.Job = oJob
+            Return pProfile
+        End Function
+
+        Private Function FillStepsForProfile(pProfile As ImportProfile) As ImportProfile
+            Dim oSteps = State.ProfileDefintions.ImportProfileSteps.
+                Where(Function(s) s.ProfileId = pProfile.Id).
+                ToList()
+
+            pProfile.Steps = oSteps
+            Return pProfile
+        End Function
     End Class
 
     Public Class GetJobConfigResponse