Feature/routes export (#29)

Co-authored-by: gorbenko.pavel <gorbenko.pavel@tansu.kz>
Reviewed-on: http://git.tnsu.kz/gorbenko.pavel/tnsu-approval-route/pulls/29

backend/Tnsu.ApprovalRoute.Infrastructure/TnsuPortal/HttpTnsuPortalClient.cs

@@ -40,7 +40,27 @@ public sealed class HttpTnsuPortalClient(
 
         return employees
             .Where(e => !string.IsNullOrWhiteSpace(e.Fio))
-            .Select(e => new EmployeeContactInfo(e.Id, e.Fio!, e.Email, e.Company ?? string.Empty))
+            .Select(e => new EmployeeContactInfo(e.Id, e.Fio!, e.Email, e.Company ?? string.Empty, e.Position))
+            .ToList();
+    }
+
+    // /Dictionary/* отдаёт «голый» массив с ключами в PascalCase (Id/Name) —
+    // PropertyNameCaseInsensitive в JsonOptions это покрывает.
+    public async Task<IReadOnlyList<CompanyInfo>> GetCompaniesAsync(CancellationToken cancellationToken)
+    {
+        var companies = await GetAsync<List<DictionaryItemResponse>>("/Dictionary/Companies", cancellationToken);
+        return (companies ?? [])
+            .Where(c => c.Id is not null && !string.IsNullOrWhiteSpace(c.Name))
+            .Select(c => new CompanyInfo(c.Id!.Value, c.Name!))
+            .ToList();
+    }
+
+    public async Task<IReadOnlyList<DepartmentInfo>> GetDepartmentsAsync(CancellationToken cancellationToken)
+    {
+        var departments = await GetAsync<List<DictionaryItemResponse>>("/Dictionary/Departments", cancellationToken);
+        return (departments ?? [])
+            .Where(d => d.Id is not null && !string.IsNullOrWhiteSpace(d.Name))
+            .Select(d => new DepartmentInfo(d.Id!.Value, d.Name!))
             .ToList();
     }
 
@@ -121,6 +141,10 @@ public sealed class HttpTnsuPortalClient(
         [property: JsonPropertyName("fio")] string? Fio,
         [property: JsonPropertyName("id")] Guid? Id = null);
 
+    private sealed record DictionaryItemResponse(
+        [property: JsonPropertyName("id")] Guid? Id,
+        [property: JsonPropertyName("name")] string? Name);
+
     private sealed record ManagerResponse(
         [property: JsonPropertyName("managerEmail")] string? ManagerEmail);