ownSoft/BeWoPlaner
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Squashed commit of the following:

Browse Source 
commit 1b9efb8f79
Author: Rene Evertz <rene.evertz@ownsoft.de>
Date:   Thu Jun 20 12:16:00 2024 +0200

    Squashed commit of the following:

    commit af28476b76
    Merge: b76e16946 c3b6a1e9c
    Author: Marcel Hirschle <marcel.hirschle@ownsoft.de>
    Date:   Thu Jun 20 11:53:31 2024 +0200

        Merge branch 'master' of ssh://float.ownsoft.de/git/beyondSoft/BeWo

        # Conflicts:
        #	ReportImp/VkmHamm/CustomerMitarbeiterstundenkontoBerechnung.cs

    commit b76e169462
    Author: Marcel Hirschle <marcel.hirschle@ownsoft.de>
    Date:   Thu Jun 20 11:40:08 2024 +0200

        MH: vkm hamm stundenkonto

    commit c3b6a1e9c0
    Author: Christian <christian.baeurle@beyondsoft.de>
    Date:   Thu Jun 20 10:58:05 2024 +0200

        Mergemarker entfernt

    commit 5ff8fe343b
    Merge: c1aa61f05 fc57725f4
    Author: Christian <christian.baeurle@beyondsoft.de>
    Date:   Thu Jun 20 10:52:16 2024 +0200

        Merge branch 'master' of ssh://float.beyondsoft.de/git/beyondSoft/BeWo

    commit c1aa61f058
    Merge: 12faccb71 1c0a94c60
    Author: Christian <christian.baeurle@beyondsoft.de>
    Date:   Thu Jun 20 10:51:59 2024 +0200

        Merge branch 'master' of ssh://float.beyondsoft.de/git/beyondSoft/BeWo

        # Conflicts:
        #	BeWo/ServiceProxy/Generated.cs
        #	Data/Security/UserRightHelper.cs
        #	Shared/BeWoEntityEnums.cs
        #	Shared/Core/EnumTranslations.cs

    commit 12faccb71b
    Author: Christian <christian.baeurle@beyondsoft.de>
    Date:   Wed Jun 19 16:13:56 2024 +0200

        Perseh Hilfeplan Import + KI Prototyp,

commit 22fea2ec7f
Author: Rene Evertz <rene.evertz@ownsoft.de>
Date:   Thu Jun 20 11:50:22 2024 +0200

    SentSuccess

commit 64b77b0d30
Merge: 022ff3956 fc57725f4
Author: Rene Evertz <rene.evertz@ownsoft.de>
Date:   Thu Jun 20 09:36:49 2024 +0200

    Merge branch 'master' of ssh://float.ownsoft.de/git/beyondSoft/BeWo into feature_rene_13_dakota

commit 022ff3956e
Author: Rene Evertz <rene.evertz@ownsoft.de>
Date:   Thu Jun 20 09:25:58 2024 +0200

    Test on App8 GkvAbrechnungView Process start

commit c04052cde7
Author: Rene Evertz <rene.evertz@ownsoft.de>
Date:   Wed Jun 19 08:55:07 2024 +0200

    BeWo Error Window

# Conflicts:
#	Host/Host.csproj.user
This commit is contained in:
Rene Evertz
2024-06-20 12:35:04 +02:00
parent af28476b76
commit 49cd4a6818
12 changed files with 91 additions and 50 deletions
Download Patch File Download Diff File Expand all files Collapse all files

32
BeWo/View/Controls/GkvAbrechnungDetailControl.xaml
View File

@@ -104,37 +104,39 @@
<TabItem Header="Protokoll">
<dxg:GridControl Margin="3" x:Name="datagrid_transfer" DataSource="{Binding TransferProtokolle}" VerticalAlignment="Stretch" HorizontalAlignment="Stretch">
<dxg:GridControl.Columns>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="GkvTransferProtokollOid" Header="Protokoll Oid" Tag="Debug"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="GkvTransferProtokollVersion" Header="Protokoll Version" Tag="Debug"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="AbsenderBezeichnung" Header="Absender Bezeichnung"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="EmpfangerBezeichnung" Header="Empfanger Bezeichnung"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="IKLeistungserbringer" Header="IK Leistungserbringer"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="IKKrankenkasse" Header="IK Krankenkasse"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="IKKostentrager" Header="IK Kostentrager"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="Rechnungsnummer" Header="Rechnungsnummer"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="Datenaustauschreferenz" Header="Datenaustauschreferenz"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="Transfernummer" Header="Transfernummer"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="Transfername" Header="Transfername"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="GkvTransferProtokollOid" Header="Oid" Tag="Debug"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="GkvTransferProtokollVersion" Header="Version" Tag="Debug"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="AbsenderBezeichnung" Header="Absender"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="EmpfangerBezeichnung" Header="Empfanger"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="IKLeistungserbringer" Header="Leistungserbringer"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="IKKrankenkasse" Header="Krankenkasse"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="IKKostentrager" Header="Kostentrager"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="Rechnungsnummer" Header="Rec.Nr."></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="Datenaustauschreferenz" Header="Dat. ref."></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="Transfernummer" Header="TNr."></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="Transfername" Header="TName"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="ErstelltAm" Header="Erstellt">
<dxg:GridColumn.EditSettings>
<dxe:TextEditSettings DisplayFormat="g" Mask="c" MaskType="DateTime"></dxe:TextEditSettings>
</dxg:GridColumn.EditSettings>
</dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="Dateityp" Header="Dateityp"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="Dateityp" Header="Typ"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="Dateiname" Header="Dateiname"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="Dateigrosse" Header="Dateigrosse"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="Dateigrosse" Header="Größe"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="SentSuccess" Header="Dakota Übertragen"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="Fehlertitel" Header="Fehlertitel"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="Fehlernachricht" Header="Fehlernachricht"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="Fehlerdatum" Header="Fehlerdatum">
<dxg:GridColumn.EditSettings>
<dxe:TextEditSettings DisplayFormat="g" Mask="c" MaskType="DateTime"></dxe:TextEditSettings>
</dxg:GridColumn.EditSettings>
</dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="Fehlernachricht" Header="Fehlernachricht"></dxg:GridColumn>
<dxg:GridColumn ReadOnly="True" AllowEditing="False" FieldName="Fehlerlevel" Header="Fehlerlevel"></dxg:GridColumn>
</dxg:GridControl.Columns>
<dxg:GridControl.View>
<dxg:TableView NavigationStyle="Cell" BestFitMode="Smart"
<dxg:TableView NavigationStyle="Cell" BestFitMode="Smart" x:Name="gridView2"
AllowBestFit="True" ShowGroupPanel="False" ScrollingMode="Smart" SnapsToDevicePixels="True"
Loaded="gridView_Loaded"
Margin="3,22,3,3"/>
</dxg:GridControl.View>
</dxg:GridControl>

2
BeWo/View/Detail/Accounting/GkvAbrechnungOverview.xaml
View File

@@ -50,7 +50,7 @@
<!--<Button Click="btn_nutz_Click" Content="¥" Padding="0" Margin="1" ToolTip="Nutzdatendatei" Foreground="#BBBBBB" FontSize="10" FontFamily="Webdings" x:Name="btn_nutz" Height="17" Width="20" VerticalAlignment="Center" />
<Button Click="btn_auf_Click" Content="¥" Padding="0" Margin="1" ToolTip="Auftragsdatei" Foreground="#BBBBBB" FontSize="10" FontFamily="Webdings" x:Name="btn_auf" Height="17" Width="20" VerticalAlignment="Center" />-->
<Button Click="btn_send_Click" Content="*" Padding="0" Margin="1" ToolTip="Senden" Foreground="#ffffff" FontSize="11" FontFamily="Wingdings" x:Name="btn_send" Height="18" Width="20" VerticalAlignment="Center"/>
<Button Click="btn_force_send_Click" Content="r" Padding="0" Margin="1" ToolTip="DEBUG: Protokolle Löschen" Foreground="#FFFF00" FontSize="11" FontFamily="Wingdings" x:Name="btn_force_send" Height="18" Width="20" VerticalAlignment="Center" />
<Button Click="btn_force_send_Click" Content="r" Padding="0" Margin="1" ToolTip="DEBUG: Protokolle Löschen" Foreground="#FFFF00" FontSize="11" FontFamily="Wingdings" x:Name="btn_force_send" Height="18" Width="20" VerticalAlignment="Center" Visibility="Collapsed"/>
<Button Click="btn_delete_Click" Content="r" Padding="0" Margin="1" ToolTip="Löschen" Foreground="#FF0000" FontSize="11" FontFamily="Webdings" x:Name="btn_delete" Height="18" Width="20" VerticalAlignment="Center" />
</StackPanel>
</ControlTemplate>

36
BeWo/ViewModel/GkvAbrechnungVM.cs
View File

@@ -18,22 +18,6 @@ namespace BeWo.ViewModel
{
public class GkvAbrechnungVM : AbstractDCMapperVM<GkvAbrechnungDC>
{
/*
Notice
Kundennummer
IKDatenannahmestelle
IKEmpfang
IKLeistungserbringer
AbrechnungsZeitraumStart
AbrechnungsZeitraumEnde
Nutzdatendatei
Auftragsdatei
Transfername
VerschluesseltAm
UebertragenAm
AntwortErhaltenAm
AntwortEntschluesseltAm
*/
public static string PropertyName_AbrechnungsZeitraumStart = "AbrechnungsZeitraumStart";
public static string PropertyName_AbrechnungsZeitraumEnde = "AbrechnungsZeitraumEnde";
@@ -383,11 +367,25 @@ AntwortEntschluesseltAm
{
GkvAbrechnungVersion = dc.GkvAbrechnungVersion;
TransferProtokolle = dc.TransferProtokolle.ToList();
}
if (cb.Message is object)
var protokoll = cb.TransferProtokoll;
if (cb.TransferProtokoll.Fehlerlevel == GkvTransferFehlerlevel.Soft)
{
MessageBox.Show(Application.Current.MainWindow, cb.TransferProtokoll.Fehlernachricht, cb.TransferProtokoll.Fehlertitel);
}
else if (cb.TransferProtokoll.Fehlerlevel == GkvTransferFehlerlevel.Fatal)
{
BeWoApp.ShowError(cb.TransferProtokoll.Fehlertitel + ": " + cb.TransferProtokoll.Fehlernachricht, null, false);
}
else
{
MessageBox.Show(Application.Current.MainWindow, "Ihre Sendung wurde korrekt übertragen");
}
}
else
{
MessageBox.Show(Application.Current.MainWindow, cb.Message);
MessageBox.Show(Application.Current.MainWindow, "Unerwarteter Übertragungsfehler");
}
}), true);
}

4
Data/Access/SearchDAO.cs
View File

@@ -5927,7 +5927,7 @@ namespace BeWo.Data.Access
public int GetNextDatenaustauschreferenz(string datenannahmestelle)
{
var criteria = CreateCriteria<GkvTransferProtokoll>()
.Add(Restrictions.Where<GkvTransferProtokoll>(x => x.IKDatenannahmestelle == datenannahmestelle))
.Add(Restrictions.Where<GkvTransferProtokoll>(x => x.SentSuccess && x.IKDatenannahmestelle == datenannahmestelle))
.SetProjection(Projections.Max("Datenaustauschreferenz"));
var t = criteria.List<int?>().SingleOrDefault();
@@ -5938,7 +5938,7 @@ namespace BeWo.Data.Access
public int GetNextTransfernummer(string datenannahmestelle)
{
var criteria = CreateCriteria<GkvTransferProtokoll>()
.Add(Restrictions.Where<GkvTransferProtokoll>(x => x.IKDatenannahmestelle == datenannahmestelle))
.Add(Restrictions.Where<GkvTransferProtokoll>(x => x.SentSuccess && x.IKDatenannahmestelle == datenannahmestelle))
.SetProjection(Projections.Max("Transfernummer"));
var t = criteria.List<int?>().SingleOrDefault();

2
Data/Entities/GkvTransferprotokoll.cs
View File

@@ -36,6 +36,8 @@ namespace BeWo.Data.Entities
public virtual string Nutzdatendatei { get; set; }
public virtual string Auftragsdatei { get; set; }
public virtual bool SentSuccess { get; set; }
public virtual string Fehlertitel { get; set; }
public virtual DateTime? Fehlerdatum { get; set; }
public virtual string Fehlernachricht { get; set; }

3
Data/Mappings/GkvTransferProtokoll.hbm.xml
View File

@@ -32,7 +32,8 @@
<property column="Datenaustauschreferenz" type="int" name="Datenaustauschreferenz" />
<property column="Transfernummer" type="int" name="Transfernummer" />
<property column="ErstelltAm" type="DateTime" name="ErstelltAm" />
<property column="SentSuccess" type="Boolean" name="SentSuccess" />
<property column="Fehlertitel" type="string" name="Fehlertitel" />
<property column="Fehlerdatum" type="DateTime" name="Fehlerdatum" />
<property column="Fehlernachricht" type="string" name="Fehlernachricht" />

14
Host/GkvAbrechnungView.aspx.cs
View File

@@ -30,6 +30,7 @@ using System.Configuration;
using Dakota.Models;
using System.Xml;
using System.Xml.Linq;
using System.Diagnostics;
namespace Host
{
@@ -155,7 +156,6 @@ namespace Host
return successful;
}
private void SendNew(GkvApp8SendNewRequest req)
{
var debug_mode = false;
@@ -174,6 +174,18 @@ namespace Host
// Dakota Send
//Process p = Process.Start(@"C:\Program Files (x86)\ITSG\dakotale\dakota30.exe", "-a");
//p.WaitForExit();
//int return_code = p.ExitCode;
//req.GkvTransferProtokoll.SentSuccess = false;
//req.GkvTransferProtokoll.Fehlerdatum = DateTime.Now;
//req.GkvTransferProtokoll.Fehlerlevel = GkvTransferFehlerlevel.Soft;
//req.GkvTransferProtokoll.Fehlertitel = "App8";
//req.GkvTransferProtokoll.Fehlernachricht = "TEST RC - " + return_code.ToString();
response.Success = true;
response.GkvTransferProtokollDC = req.GkvTransferProtokoll;

26
Host/Host.csproj.user
View File

@@ -12,5 +12,29 @@
<UseGlobalApplicationHostFile />
<ProjectView>ShowAllFiles</ProjectView>
</PropertyGroup>
<ProjectExtensions />
<ProjectExtensions>
<VisualStudio>
<FlavorProperties GUID="{349c5851-65df-11da-9384-00065b846f21}">
<WebProjectProperties>
<StartPageUrl>
</StartPageUrl>
<StartAction>CurrentPage</StartAction>
<AspNetDebugging>True</AspNetDebugging>
<SilverlightDebugging>False</SilverlightDebugging>
<NativeDebugging>False</NativeDebugging>
<SQLDebugging>False</SQLDebugging>
<ExternalProgram>
</ExternalProgram>
<StartExternalURL>
</StartExternalURL>
<StartCmdLineArguments>
</StartCmdLineArguments>
<StartWorkingDirectory>
</StartWorkingDirectory>
<EnableENC>True</EnableENC>
<AlwaysStartWebServerOnDebug>False</AlwaysStartWebServerOnDebug>
</WebProjectProperties>
</FlavorProperties>
</VisualStudio>
</ProjectExtensions>
</Project>

2
Model/Changes_2024_06_20 GKV_SentSuccess.txt Normal file
View File

@@ -0,0 +1,2 @@
ALTER TABLE `gkvtransferprotokoll`
ADD COLUMN `SentSuccess` TINYINT NULL AFTER `Auftragsdatei`;

4
Service/DCEntityMapper/GkvTransferProtokollDC_GkvTransferprotokoll.cs
View File

@@ -37,6 +37,9 @@ namespace BeWo.Service.DCEntityMapper
pDataContract.ErstelltAm = pEntity.ErstelltAm;
pDataContract.SentSuccess = pEntity.SentSuccess;
pDataContract.HasFehler = pEntity.Fehlerdatum.HasValue || !string.IsNullOrWhiteSpace(pEntity.Fehlernachricht);
pDataContract.Fehlerdatum = pEntity.Fehlerdatum;
pDataContract.Fehlerlevel = pEntity.Fehlerlevel;
pDataContract.Fehlernachricht = pEntity.Fehlernachricht;
@@ -73,6 +76,7 @@ namespace BeWo.Service.DCEntityMapper
pEntity.ErstelltAm = pDataContract.ErstelltAm;
pEntity.SentSuccess = pDataContract.SentSuccess;
pEntity.Fehlerdatum = pDataContract.Fehlerdatum;
pEntity.Fehlerlevel = pDataContract.Fehlerlevel;
pEntity.Fehlernachricht = pDataContract.Fehlernachricht;

10
Service/ServiceImplementations/AccountingServiceImp.cs
View File

@@ -904,18 +904,8 @@ namespace BeWo.Service.ServiceImplementations
DAOFactory.GenericDAO.Update(entity);
response.TransferProtokoll = MapperFactory.GkvTransferProtokollDC_GkvTransferprotokoll.MapToNewDC(protokoll);
response.GkvAbrechnungDC = MapperFactory.GkvAbrechnungDC_GkvAbrechnung.MapToNewDC(entity);
if (response.Successful)
{
}
else
{
response.Message = $"{protokoll.Fehlertitel} - {protokoll.Fehlernachricht}";
}
return response;
}

6
Shared/DataContracts/GkvAbrechnung/GkvTransferProtokollDC.cs
View File

@@ -68,6 +68,12 @@ namespace BS.Shared.DataContracts.GkvAbrechnung
[DataMember]
public string Auftragsdatei { get; set; }
[DataMember]
public bool SentSuccess { get; set; }
[DataMember]
public bool HasFehler { get; set; }
[DataMember]
public string Fehlertitel { get; set; }