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

neu

Browse Source
This commit is contained in:
Andreas Luxbauer
2020-05-31 22:24:36 +02:00
parent 2d28680ad0
commit bf4f36a8f2
22 changed files with 3963 additions and 527 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
Aviso/Classes/cSendungsoptions.vb
View File

@@ -182,8 +182,10 @@ Public Class SendungOptions
End If
End If
VALUES.Avisierer_KdNr = IIf(AVISO.Auftraggeber_KdNr > 0, AVISO.Auftraggeber_KdNr, "")
VALUES.Avisierer_Firma = AVISO.Auftraggeber
'VALUES.Avisierer_KdNr = IIf(AVISO.Auftraggeber_KdNr > 0, AVISO.Auftraggeber_KdNr, "")
'VALUES.Avisierer_Firma = AVISO.Auftraggeber
VALUES.Avisierer_KdNr = IIf(SENDUNG.tblSnd_AvisiererKdNr > 0, SENDUNG.tblSnd_AvisiererKdNr, "")
VALUES.Avisierer_Firma = SENDUNG.tblSnd_Avisierer
VALUES.Auftraggeber_KdNr = IIf(SENDUNG.tblSnd_AuftraggeberKdNr > 0, SENDUNG.tblSnd_AuftraggeberKdNr, "")
VALUES.Auftraggeber_Firma = SENDUNG.tblSnd_Auftraggeber
@@ -212,8 +214,10 @@ Public Class SendungOptions
VALUES.Absender_KdNr = IIf(SENDUNG.tblSnd_AbsenderKdNr > 0, SENDUNG.tblSnd_AbsenderKdNr, "")
VALUES.Absender_Firma = SENDUNG.tblSnd_Absender
VALUES.Frachtfuehrer_KdNr = IIf(AVISO.Frächter_KdNr > 0, AVISO.Frächter_KdNr, "")
VALUES.Frachtfuehrer_Firma = AVISO.Frächter
'VALUES.Frachtfuehrer_KdNr = IIf(AVISO.Frächter_KdNr > 0, AVISO.Frächter_KdNr, "")
' VALUES.Frachtfuehrer_Firma = AVISO.Frächter
VALUES.Frachtfuehrer_KdNr = IIf(SENDUNG.tblSnd_FrachtfuehrerKdNr > 0, SENDUNG.tblSnd_FrachtfuehrerKdNr, "")
VALUES.Frachtfuehrer_Firma = SENDUNG.tblSnd_Frachtfuehrer
VALUES.LKWKennzeichen = AVISO.LKW_Nr
VALUES.Warenbezeichnung = SENDUNG.tblSnd_Warenbezeichnung