Greenpulse, VERA_Customseclarations
This commit is contained in:
@@ -51,9 +51,20 @@ Public Class cImporter_DakosyToVERAG
|
||||
VERAG_ZA.za_Firma = eza.eza_firma
|
||||
VERAG_ZA.za_Niederlassung = eza.eza_niederlassung
|
||||
|
||||
|
||||
VERAG_ZA.za_MRN = If(eza.eza_MRN, eza.eza_ANR)
|
||||
VERAG_ZA.za_LRN = eza.eza_ObjectName
|
||||
|
||||
VERAG_PROG_ALLGEMEIN.cProgramFunctions.tryGetFirmaNiederlassung(VERAG_ZA.za_Firma, VERAG_ZA.za_Niederlassung, "", VERAG_ZA.za_LRN)
|
||||
VERAG_PROG_ALLGEMEIN.cProgramFunctions.tryGetAvisoId_SndId_ByLRN(VERAG_ZA.za_LRN, VERAG_ZA.za_AvisoId, VERAG_ZA.za_SendungsId)
|
||||
|
||||
Dim DY = cDakosy_Zollanmeldungen.LOADById(eza.eza_dyaAnmID)
|
||||
If DY IsNot Nothing Then
|
||||
If VERAG_ZA.za_AvisoId Is Nothing AndAlso DY.dy_AvisoId IsNot Nothing Then VERAG_ZA.za_AvisoId = DY.dy_AvisoId
|
||||
If VERAG_ZA.za_SendungsId Is Nothing AndAlso DY.dy_SendungsId IsNot Nothing Then VERAG_ZA.za_SendungsId = DY.dy_SendungsId
|
||||
End If
|
||||
|
||||
|
||||
If eza.eza_Anmeldedatum IsNot Nothing AndAlso eza.eza_Anmeldedatum.ToString <> "" Then
|
||||
VERAG_ZA.za_DeclarationDate = CDate(eza.eza_Anmeldedatum)
|
||||
VERAG_ZA.za_ReleaseDate = CDate(eza.eza_Anmeldedatum)
|
||||
@@ -105,12 +116,8 @@ Public Class cImporter_DakosyToVERAG
|
||||
VERAG_ZA.za_IncotermsPlace = eza.eza_LieferbedingungOrt
|
||||
|
||||
VERAG_ZA.za_Sachbearbeiter = eza.eza_AnmeldenderBearbeiterName
|
||||
VERAG_ZA.za_TotGrossMass = ToNullableDecimal(eza.eza_GesamtRohmasse)
|
||||
|
||||
Dim DY = cDakosy_Zollanmeldungen.LOADById(eza.eza_dyaAnmID)
|
||||
If DY IsNot Nothing Then
|
||||
VERAG_ZA.za_AvisoId = DY.dy_AvisoId
|
||||
VERAG_ZA.za_SendungsId = DY.dy_SendungsId
|
||||
End If
|
||||
|
||||
VERAG_ZA.za_TransportModeBorder = ToStringSafe(eza.eza_VerkehrszweigGrenze)
|
||||
|
||||
@@ -230,6 +237,7 @@ Public Class cImporter_DakosyToVERAG
|
||||
item.zaItem_Description = wp.ezaWP_Warenbezeichnung
|
||||
item.zaItem_PrevProcedure = wp.ezaWP_VerfahrensCodeVorangegangenesVerfahren
|
||||
item.zaItem_PreferentialCountry = wp.ezaWP_Praeferenzursprungsland
|
||||
item.zaItem_MainProcedure = wp.ezaWP_AnmeldeVErfahren
|
||||
|
||||
|
||||
item.zaItem_PackageColli = (wp.ezaWP_PackstueckAnzahl)
|
||||
|
||||
Reference in New Issue
Block a user