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

Design Änderugnen

Browse Source
This commit is contained in:
Andreas Luxbauer
2022-10-14 08:11:50 +02:00
parent d84e99ab06
commit 7622804091
4 changed files with 80 additions and 37 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
Aviso/frmEintragAviso.vb
View File

@@ -168,6 +168,7 @@ Public Class frmEintragAviso
cboImEx.Text = "IMPORT"
Case "VERIMEX"
cboFirma.Enabled = True
End Select
If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("VERIMEX", "AVISO") Then
@@ -1704,7 +1705,7 @@ Public Class frmEintragAviso
Label1.Visible = (cboGrenzstelle._value = "WAI" Or cboGrenzstelle._value = "DTB" Or FIRMA_TMP = "IMEX" Or FIRMA_TMP = "UNISPED")
Select Case FIRMA_TMP
Case "VERAG", "FRONTOFFICE", "UNISPED", "IMEX", "AMBAR"
Case "VERAG", "FRONTOFFICE", "UNISPED", "IMEX", "AMBAR", "VERIMEX"
If cboGrenzstelle._value = "???" Then
'txtBestimmungszollstelle.initSearchBox(Me.FindForm, "[basncd_dstnr] ,[basncd_dstnr] +' - ' + [basncd_name] +' (' +[basncd_alpha]+')' as displayPARAM,[basncd_dstnr] as Nr,[basncd_name] as Dienststelle,[basncd_alpha] as Land FROM basncd", {" [basncd_dstnr]", "basncd_name"}, " [basncd_gbdat] >= getdate() ", " basncd_alpha,[basncd_name]", "basncd_dstnr", "displayPARAM", "ATLAS", , 400, 200, {"displayPARAM", "basncd_dstnr"})