Erneute Senden

Host/GkvAbrechnungClient.aspx.cs

@@ -1,5 +1,6 @@
 using BeWo.Data.Access;
 using BeWo.Data.Entities;
+using BeWo.Service.ServiceImplementations;
 using BS.Shared;
 using BS.Shared.AppSender;
 using BS.Shared.DataContracts.GkvAbrechnung;
@@ -78,7 +79,29 @@ namespace Host
 				{
 					HandleResult(result);
 				}
-				
+
+				var follows = req.ResultDCs.Where(x => x.ResultType == GkvTransferResultType.FailFollowUp);
+
+				if (follows.Any())
+				{
+					var service = new AccountingServiceImp();
+					foreach (var follow in follows)
+					{
+						var protokoll_oid = follow.ProtokollOid;
+						var protokoll = DAOFactory.GenericDAO.LoadByID<GkvTransferProtokoll>(protokoll_oid);
+						var abrechnung_oid = protokoll.GkvAbrechnungOid;
+
+						var new_req = new GkvAbrechnungSendRequestDC() {
+							GkvAbrechnungOid = abrechnung_oid
+						};
+
+						var res = service.SendNewGkvAbrechnung(new_req);
+
+						if (!res.Success)
+							throw new GkvException(res.Message);
+					}
+				}
+
 				response.Success = true;
 			}
 			catch (GkvException e)