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

ActiveReports

Browse Source
This commit is contained in:
Andreas Luxbauer
2025-08-14 11:32:13 +02:00
parent 0ca060b7c0
commit 93fd68c058
35 changed files with 8571 additions and 11127 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
UID/rptAktendeckelDISPO.vb
View File

@@ -1,5 +1,5 @@
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Imports GrapeCity.ActiveReports.Document
Public Class rptAktendeckelDISPO
Sub New()
@@ -76,7 +76,7 @@ Public Class rptAktendeckelDISPO
Me.txtSonstigeLeistungTxt2.Text = VALUES.Auftraggeber_Sonstiges2Txt
Me.txtAuftraggeber_Sonstiges1.Text = VALUES.Auftraggeber_Sonstiges1
Me.txtAuftraggeber_Sonstiges2.Text = VALUES.Auftraggeber_Sonstiges2
Me.cbxEntladung.Text = If(VALUES.Auftraggeber_Entladung, "X", "")
Me.cbxLagerung.Text = If(VALUES.Auftraggeber_Lagerung, "X", "")
@@ -243,7 +243,7 @@ Public Class rptAktendeckelDISPO
Me.cbxVerwahrung.Text = If(Me.txtAuftraggeber_Verwahrung.Text <> "", "X", "")
Dim barcode As Image = Code128Rendering.MakeBarcodeImage("/" & VALUES.atr_FilialenNr & "-" & VALUES.atr_frachtpos & "-" & 0 & "/", 1, True, 18)
barcode.RotateFlip(RotateFlipType.Rotate90FlipNone)