edv/ADMIN
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

EXG!

Browse Source
This commit is contained in:
Andreas Luxbauer
2025-01-23 09:49:29 +01:00
parent 3d83cf7878
commit 5df7785d34
2 changed files with 1595 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
initATLASAufschubkonten/cWorker_AES_EXG.vb
View File

@@ -40,6 +40,16 @@ Public Class cWorker_AES_EXG
zp = RESP.ObjektIdentifizierung.ZeitpunktEingang
End If
'----------------------------------------------------------------------
'EXZ SAVE!
'----------------------------------------------------------------------
Dim EXG As New DAKOSY_Worker.exg
'----------------------------------------------------------------------
'QULAIFIZIERUNG!
'----------------------------------------------------------------------
@@ -47,7 +57,7 @@ Public Class cWorker_AES_EXG
Dim STATUS As DAKOSY_Worker.cDakosy_Statusmeldungen = FORM.getStatusCheckTransID(VWI.Transaktion.IOReferenz, VWI.Transaktion.IODatumZeit)
STATUS.dySt_BezugsNr = readEZA_DatenZumAusgang_DataEXITDE_005
STATUS.dySt_artMitteilung = "EXG_DATA"
STATUS.dySt_dyArt = "AES"
STATUS.dySt_dyArt = "EXG"
STATUS.dySt_status = DAKOSY_Worker.cDY_Statusliste.S_00
STATUS.dySt_ergCode = "EXG_DATA"
@@ -173,7 +183,7 @@ Public Class cWorker_AES_EXG
Dim STATUS As New DAKOSY_Worker.cDakosy_Statusmeldungen
STATUS.dySt_BezugsNr = Bezugsnummer
STATUS.dySt_artMitteilung = "EXG_INFO"
STATUS.dySt_dyArt = "AES"
STATUS.dySt_dyArt = "EXG"
STATUS.dySt_status = DAKOSY_Worker.cDY_Statusliste.S_00
STATUS.dySt_ergCode = "EXG_INFO"
STATUS.dySt_ergMitteilung = "MRN:" & MRN