Rechnungsnummern LTD Jahreswechsel

This commit is contained in:
2023-01-21 10:36:19 +01:00
parent 90e1d86b48
commit 895f0019d3
3 changed files with 16 additions and 18 deletions

View File

@@ -128,7 +128,7 @@ Partial Class frmMain
Me.pnlLeft.Dock = System.Windows.Forms.DockStyle.Left
Me.pnlLeft.Location = New System.Drawing.Point(0, 73)
Me.pnlLeft.Name = "pnlLeft"
Me.pnlLeft.Size = New System.Drawing.Size(100, 840)
Me.pnlLeft.Size = New System.Drawing.Size(100, 831)
Me.pnlLeft.TabIndex = 27
'
'MenuStripSDL
@@ -179,19 +179,19 @@ Partial Class frmMain
'ArtikelTarifierenToolStripMenuItem
'
Me.ArtikelTarifierenToolStripMenuItem.Name = "ArtikelTarifierenToolStripMenuItem"
Me.ArtikelTarifierenToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
Me.ArtikelTarifierenToolStripMenuItem.Size = New System.Drawing.Size(158, 22)
Me.ArtikelTarifierenToolStripMenuItem.Text = "Artikel tarifieren"
'
'SpeditionsbuchToolStripMenuItem
'
Me.SpeditionsbuchToolStripMenuItem.Name = "SpeditionsbuchToolStripMenuItem"
Me.SpeditionsbuchToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
Me.SpeditionsbuchToolStripMenuItem.Size = New System.Drawing.Size(158, 22)
Me.SpeditionsbuchToolStripMenuItem.Text = "Speditionsbuch"
'
'AuswertungToolStripMenuItem
'
Me.AuswertungToolStripMenuItem.Name = "AuswertungToolStripMenuItem"
Me.AuswertungToolStripMenuItem.Size = New System.Drawing.Size(180, 22)
Me.AuswertungToolStripMenuItem.Size = New System.Drawing.Size(158, 22)
Me.AuswertungToolStripMenuItem.Text = "Auswertung"
'
'mnueMDM
@@ -360,7 +360,7 @@ Partial Class frmMain
Me.Panel1.Controls.Add(Me.btnExit)
Me.Panel1.Controls.Add(Me.Button1)
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Bottom
Me.Panel1.Location = New System.Drawing.Point(0, 612)
Me.Panel1.Location = New System.Drawing.Point(0, 603)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(100, 228)
Me.Panel1.TabIndex = 30
@@ -713,7 +713,7 @@ Partial Class frmMain
'ToolStripSeparator3
'
Me.ToolStripSeparator3.Name = "ToolStripSeparator3"
Me.ToolStripSeparator3.Size = New System.Drawing.Size(177, 6)
Me.ToolStripSeparator3.Size = New System.Drawing.Size(57, 6)
'
'StatistikToolStripMenuItem
'
@@ -918,7 +918,7 @@ Partial Class frmMain
Me.pnlMain.Dock = System.Windows.Forms.DockStyle.Fill
Me.pnlMain.Location = New System.Drawing.Point(100, 73)
Me.pnlMain.Name = "pnlMain"
Me.pnlMain.Size = New System.Drawing.Size(1184, 840)
Me.pnlMain.Size = New System.Drawing.Size(1184, 831)
Me.pnlMain.TabIndex = 29
'
'cntxtZOLL
@@ -955,7 +955,7 @@ Partial Class frmMain
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(96.0!, 96.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Dpi
Me.ClientSize = New System.Drawing.Size(1284, 913)
Me.ClientSize = New System.Drawing.Size(1284, 904)
Me.Controls.Add(Me.pnlMain)
Me.Controls.Add(Me.pnlLeft)
Me.Controls.Add(Me.pnlHeader)

View File

@@ -51,8 +51,8 @@ Public Class cRechnungsnummern
VonRechnungsNr = "5000000"
BisRechnungsNr = "5999999"
Case 26 ' VERAG-UNISPED
VonRechnungsNr = "0000001"
BisRechnungsNr = "9999999"
VonRechnungsNr = Now.ToString("yy") & "0000001"
BisRechnungsNr = Now.ToString("yy") & "9999999"
End Select
LfdRechnungsNr = VonRechnungsNr
'-------------------------------------
@@ -179,5 +179,4 @@ Public Class cRechnungsnummern
End Function
End Class

View File

@@ -24,7 +24,6 @@ Partial Class frmMessenger
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle()
@@ -39,11 +38,11 @@ Partial Class frmMessenger
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmMessenger))
Me.SplitContainer = New System.Windows.Forms.SplitContainer()
Me.SplitContainer2 = New System.Windows.Forms.SplitContainer()
Me.dgvChats = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
Me.dgvChats = New VERAG_PROG_ALLGEMEIN.MyDatagridview()
Me.Panel6 = New System.Windows.Forms.Panel()
Me.lblLKWChat_MsgCntInaktiv = New System.Windows.Forms.Label()
Me.cbxInaktiveChats = New System.Windows.Forms.CheckBox()
Me.DGVSonstige = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
Me.DGVSonstige = New VERAG_PROG_ALLGEMEIN.MyDatagridview()
Me.Panel5 = New System.Windows.Forms.Panel()
Me.MyTextBox2 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.PictureBox2 = New System.Windows.Forms.PictureBox()
@@ -64,7 +63,7 @@ Partial Class frmMessenger
Me.btnNeu = New System.Windows.Forms.Button()
Me.Button1 = New System.Windows.Forms.Button()
Me.SplitContainer1 = New System.Windows.Forms.SplitContainer()
Me.MyFlowLayoutPanel1 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
Me.MyFlowLayoutPanel1 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel()
Me.UsrCntlMessenger_ChatElement1 = New VERAG_PROG_ALLGEMEIN.usrCntlMessenger_ChatElement()
Me.Panel3 = New System.Windows.Forms.Panel()
Me.btnTeilnehmer = New System.Windows.Forms.Button()
@@ -91,9 +90,9 @@ Partial Class frmMessenger
Me.btnSendAtt = New System.Windows.Forms.Button()
Me.btnSenden = New System.Windows.Forms.Button()
Me.rtbChatMessage = New System.Windows.Forms.RichTextBox()
Me.TimerNEW_MESSAGE = New System.Windows.Forms.Timer(Me.components)
Me.Timer_REFRESH = New System.Windows.Forms.Timer(Me.components)
Me.cntxt = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.TimerNEW_MESSAGE = New System.Windows.Forms.Timer()
Me.Timer_REFRESH = New System.Windows.Forms.Timer()
Me.cntxt = New System.Windows.Forms.ContextMenuStrip()
Me.ChatDeaktivierenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.toolChatReminder = New System.Windows.Forms.ToolStripMenuItem()
Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()