Initial commit
This commit is contained in:
727
BusinessFacade/Dokumenttyp.vb
Normal file
727
BusinessFacade/Dokumenttyp.vb
Normal file
@@ -0,0 +1,727 @@
|
||||
Imports EDOKALib.Common
|
||||
|
||||
'''<summary>Diese klasse beinhaltet die Logik für die Dokumenttypen</summary>
|
||||
Public Class Dokumenttyp
|
||||
|
||||
#Region "Members"
|
||||
Private _dokumentTypNr As Integer
|
||||
Private _bezeichnung As String
|
||||
Private _beschreibung As String
|
||||
Private _zuVercolden As Boolean
|
||||
Private _isZuRetournieren As Boolean
|
||||
Private _isEingangErsetztAusgang As Boolean
|
||||
Private _isWirdImportiert As Boolean
|
||||
Private _anzahlTage As Integer
|
||||
Private _dBearbeitungsZeit As Integer
|
||||
Private _tageMutation As Integer
|
||||
Private _isPartnerSaldierungStatusAlt As Boolean
|
||||
Private _isWirdNichtGeloescht As Boolean
|
||||
Private _isVertraulichesDokument As Boolean
|
||||
Private _isUnterschriftLinks As Boolean
|
||||
Private _isUnterschriftRechts As Boolean
|
||||
Private _monateBisZurArchivierung As Integer
|
||||
Private _aufbewahrungsFristElektronisch As Integer
|
||||
Private _aufbewahrungsFristPhysisch As Integer
|
||||
Private _mandantNr As Integer 'wird nicht in den properties implemnetiert
|
||||
Private _isAktiv As Boolean
|
||||
Private _erstelltAm As DateTime
|
||||
Private _mutiertAm As DateTime
|
||||
Private _mutierer As Integer
|
||||
Private _officeVorlageNr As Integer
|
||||
Private _dokumentArtKundendossier As Integer
|
||||
Private _dokumentArtNeuerstellung As Integer
|
||||
Private _dokumentArtRetournierung As Integer
|
||||
Private _dokumentArtColdAusgang As Integer
|
||||
Private _dokumentArtColdEingang As Integer
|
||||
Private _dokumentArtHost As Integer
|
||||
Private _dokumentArtWeitere As Integer
|
||||
Private _dokumentArtNativ As Integer
|
||||
Private _prozessNr As Integer
|
||||
Private _prozessNr1 As Integer
|
||||
Private _isAmsDokument As Boolean
|
||||
Private _isHostDokument As Boolean
|
||||
Private _hostDokumenttyp As String
|
||||
Private _coldFolder As Integer
|
||||
Private _physischesArchiv As Integer
|
||||
Private _dokumentStatus As Integer
|
||||
Private _isDokumentWirdErstellt As Boolean
|
||||
Private _isDokumentWirdRetourniert As Boolean
|
||||
Private _isColdErsetzen As Boolean
|
||||
Private _isEmailVersand As Boolean
|
||||
Private _isFunktionenZuweisen As Boolean
|
||||
Private _dokumentStatusBarcode As Integer
|
||||
Private _isNurNative As Boolean
|
||||
Private _owner As Integer
|
||||
Private _isVertrag As Boolean
|
||||
Private _objektbezeichnungNr As Integer
|
||||
Private _isBedingtRetournierBar As Boolean
|
||||
Private _doktypBedingteRetournierung As Integer
|
||||
Private _tageBisVernichtungbedingteRetournierung As Integer
|
||||
Private _isAnzeigeZurDokumenterstellung As Boolean
|
||||
Private _isKundenDokument As Boolean
|
||||
Private _isSb As Boolean
|
||||
Private _isSbImport As Boolean
|
||||
Private _isSbEditUser As Boolean
|
||||
Private _isSbNur As Boolean
|
||||
Private _isBezeichnungMut As Boolean
|
||||
Private _isFarbigArchiviert As Boolean
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "Constructors"
|
||||
'''<summary>default konstruktor</summary>
|
||||
|
||||
Public Sub New()
|
||||
|
||||
End Sub
|
||||
|
||||
'''<summary>lädt den dokumenttyp mit der entsprechenden dokumenttypnr</summary>
|
||||
'''<param name="dokumentTypNr"></param>
|
||||
|
||||
Public Sub New(ByVal dokumentTypNr As Integer)
|
||||
Dim ds As New DataSet()
|
||||
DataAccess.Dokumenttyp.GetDokumenttyp(ds, dokumentTypNr)
|
||||
LoadData(ds)
|
||||
End Sub
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "Private Functions"
|
||||
|
||||
'''<summary>lädt die daten aus dem dataset in die members der klasse</summary>
|
||||
'''<param name="ds"></param>
|
||||
|
||||
Private Sub LoadData(ByRef ds As DataSet)
|
||||
Try
|
||||
If Common.Tools.ValidateDS(ds) Then
|
||||
_dokumentTypNr = Tools.CToInt32(ds.Tables(0).Rows(0)("dokumentTypNr"))
|
||||
_bezeichnung = NullHandler.CToString(ds.Tables(0).Rows(0)("bezeichnung"))
|
||||
_beschreibung = NullHandler.CToString(ds.Tables(0).Rows(0)("beschreibung"))
|
||||
_zuVercolden = Tools.CToBool(ds.Tables(0).Rows(0)("zu_vercolden"))
|
||||
_isZuRetournieren = Tools.CToBool(ds.Tables(0).Rows(0)("zu_retournieren"))
|
||||
_isEingangErsetztAusgang = Tools.CToBool(ds.Tables(0).Rows(0)("eingang_ersetzt_ausgang"))
|
||||
_isWirdImportiert = Tools.CToBool(ds.Tables(0).Rows(0)("wird_importiert"))
|
||||
_anzahlTage = Tools.CToInt32(ds.Tables(0).Rows(0)("anzahl_tage"))
|
||||
_dBearbeitungsZeit = Tools.CToInt32(ds.Tables(0).Rows(0)("dbearbeitungszeit"))
|
||||
_tageMutation = Tools.CToInt32(ds.Tables(0).Rows(0)("tage_mutation"))
|
||||
_isPartnerSaldierungStatusAlt = Tools.CToBool(ds.Tables(0).Rows(0)("partnersaldierung_statusalt"))
|
||||
_isWirdNichtGeloescht = Tools.CToBool(ds.Tables(0).Rows(0)("wird_nicht_geloescht"))
|
||||
_isVertraulichesDokument = Tools.CToBool(ds.Tables(0).Rows(0)("vertrauliches_dokument"))
|
||||
_isUnterschriftLinks = Tools.CToBool(ds.Tables(0).Rows(0)("unterschrift_links"))
|
||||
_isUnterschriftRechts = Tools.CToBool(ds.Tables(0).Rows(0)("unterschrift_rechts"))
|
||||
_monateBisZurArchivierung = Tools.CToInt32(ds.Tables(0).Rows(0)("monate_bis_zur_archivierung"))
|
||||
_aufbewahrungsFristElektronisch = Tools.CToInt32(ds.Tables(0).Rows(0)("aufbewahrungsfrist_elektronisch"))
|
||||
_aufbewahrungsFristPhysisch = Tools.CToInt32(ds.Tables(0).Rows(0)("aufbewahrungsfrist_physisch"))
|
||||
_mandantNr = NullHandler.CToInt32(ds.Tables(0).Rows(0)("mandantnr"))
|
||||
_isAktiv = Tools.CToBool(ds.Tables(0).Rows(0)("aktiv"))
|
||||
_erstelltAm = NullHandler.CToDateTime(ds.Tables(0).Rows(0)("erstellt_am"))
|
||||
_mutiertAm = NullHandler.CToDateTime(ds.Tables(0).Rows(0)("mutiert_am"))
|
||||
_mutierer = NullHandler.CToInt32(ds.Tables(0).Rows(0)("mutierer"))
|
||||
_officeVorlageNr = NullHandler.CToInt32(ds.Tables(0).Rows(0)("office_vorlagenr"))
|
||||
_dokumentArtKundendossier = NullHandler.CToInt32(ds.Tables(0).Rows(0)("dokumentart_kundendossier"))
|
||||
_dokumentArtNeuerstellung = NullHandler.CToInt32(ds.Tables(0).Rows(0)("dokumentart_neuerstellung"))
|
||||
_dokumentArtRetournierung = NullHandler.CToInt32(ds.Tables(0).Rows(0)("dokumentart_retournierung"))
|
||||
_dokumentArtColdAusgang = Tools.CToInt32(ds.Tables(0).Rows(0)("dokumentart_coldausgang"))
|
||||
_dokumentArtColdEingang = Tools.CToInt32(ds.Tables(0).Rows(0)("dokumentart_coldeingang"))
|
||||
_dokumentArtHost = NullHandler.CToInt32(ds.Tables(0).Rows(0)("dokumentart_host"))
|
||||
_dokumentArtWeitere = NullHandler.CToInt32(ds.Tables(0).Rows(0)("dokumentart_weitere"))
|
||||
_dokumentArtNativ = NullHandler.CToInt32(ds.Tables(0).Rows(0)("dokumentart_nativ"))
|
||||
_prozessNr = NullHandler.CToInt32(ds.Tables(0).Rows(0)("prozessnr"))
|
||||
_prozessNr1 = NullHandler.CToInt32(ds.Tables(0).Rows(0)("prozessnr1"))
|
||||
_isAmsDokument = Tools.CToBool(ds.Tables(0).Rows(0)("amsdokument"))
|
||||
_isHostDokument = Tools.CToBool(ds.Tables(0).Rows(0)("hostdokument"))
|
||||
_hostDokumenttyp = NullHandler.CToString(ds.Tables(0).Rows(0)("hostdokumenttyp"))
|
||||
_coldFolder = NullHandler.CToInt32(ds.Tables(0).Rows(0)("cold_folder"))
|
||||
_physischesArchiv = NullHandler.CToInt32(ds.Tables(0).Rows(0)("physisches_archiv"))
|
||||
_dokumentStatus = NullHandler.CToInt32(ds.Tables(0).Rows(0)("dokumentstatus"))
|
||||
_isDokumentWirdErstellt = Tools.CToBool(ds.Tables(0).Rows(0)("Dokument_wird_erstellt"))
|
||||
_isDokumentWirdRetourniert = Tools.CToBool(ds.Tables(0).Rows(0)("Dokument_wird_retourniert"))
|
||||
_isColdErsetzen = Tools.CToBool(ds.Tables(0).Rows(0)("cold_ersetzen"))
|
||||
_isEmailVersand = Tools.CToBool(ds.Tables(0).Rows(0)("email_versand"))
|
||||
_isFunktionenZuweisen = Tools.CToBool(ds.Tables(0).Rows(0)("funktionen_zuweisen"))
|
||||
_dokumentStatusBarcode = NullHandler.CToInt32(ds.Tables(0).Rows(0)("dokumentstatus_barcode"))
|
||||
_isNurNative = Tools.CToBool(ds.Tables(0).Rows(0)("nurnative"))
|
||||
_owner = NullHandler.CToInt32(ds.Tables(0).Rows(0)("Owner"))
|
||||
_isVertrag = Tools.CToBool(ds.Tables(0).Rows(0)("vertrag"))
|
||||
_objektbezeichnungNr = NullHandler.CToInt32(ds.Tables(0).Rows(0)("objektbezeichnungnr"))
|
||||
_isBedingtRetournierBar = Tools.CToBool(ds.Tables(0).Rows(0)("bedingtretournierbar"))
|
||||
_doktypBedingteRetournierung = NullHandler.CToInt32(ds.Tables(0).Rows(0)("doktypbedingteretournierung"))
|
||||
_tageBisVernichtungbedingteRetournierung = NullHandler.CToInt32(ds.Tables(0).Rows(0)("tagebisvernichtungbedingteretournierung"))
|
||||
_isAnzeigeZurDokumenterstellung = Tools.CToBool(ds.Tables(0).Rows(0)("AnzeigeZurDokumenterstellung"))
|
||||
_isKundenDokument = Tools.CToBool(ds.Tables(0).Rows(0)("KundenDokument"))
|
||||
_isSb = Tools.CToBool(ds.Tables(0).Rows(0)("sb"))
|
||||
_isSbImport = Tools.CToBool(ds.Tables(0).Rows(0)("sbimport"))
|
||||
_isSbEditUser = Tools.CToBool(ds.Tables(0).Rows(0)("sbedituser"))
|
||||
_isSbNur = Tools.CToBool(ds.Tables(0).Rows(0)("sbnur"))
|
||||
_isBezeichnungMut = Tools.CToBool(ds.Tables(0).Rows(0)("bezeichnungmut"))
|
||||
_isFarbigArchiviert = Tools.CToBool(ds.Tables(0).Rows(0)("istFarbigArchiviert"))
|
||||
End If
|
||||
Catch ex As Exception
|
||||
TKBLib.Errorhandling.TraceHelper.Msg("EDOKALib.BF.DokumentTyp.LoadData", ex.Message + " " + ex.StackTrace, TraceLevel.Error)
|
||||
Throw ex
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "Public Functions"
|
||||
|
||||
'''<summary>speichert einen dokumenttyp(update und insert)</summary>
|
||||
|
||||
Public Function Save(ByVal mutierer As Integer)
|
||||
Try
|
||||
Dim err As Integer
|
||||
If _dokumentTypNr = 0 Then 'create new
|
||||
err = DataAccess.Dokumenttyp.Add(_dokumentTypNr, _bezeichnung, _beschreibung, _zuVercolden, _isZuRetournieren, _
|
||||
_isEingangErsetztAusgang, _isWirdImportiert, _anzahlTage, _dBearbeitungsZeit, _tageMutation, _
|
||||
_isPartnerSaldierungStatusAlt, _isWirdNichtGeloescht, _isVertraulichesDokument, _isUnterschriftLinks, _
|
||||
_isUnterschriftRechts, _monateBisZurArchivierung, _aufbewahrungsFristElektronisch, _
|
||||
_aufbewahrungsFristPhysisch, _mandantNr, _isAktiv, _erstelltAm, _mutiertAm, mutierer, _
|
||||
_officeVorlageNr, _dokumentArtKundendossier, _dokumentArtNeuerstellung, _dokumentArtRetournierung, _
|
||||
_dokumentArtColdAusgang, _dokumentArtColdEingang, _dokumentArtHost, _dokumentArtWeitere, _
|
||||
_dokumentArtNativ, _prozessNr, _prozessNr1, _isAmsDokument, _isHostDokument, _hostDokumenttyp, _
|
||||
_coldFolder, _physischesArchiv, _dokumentStatus, _isDokumentWirdErstellt, _isDokumentWirdRetourniert, _
|
||||
_isColdErsetzen, _isEmailVersand, _isFunktionenZuweisen, _dokumentStatusBarcode, _isNurNative, _
|
||||
_owner, _isVertrag, _objektbezeichnungNr, _isBedingtRetournierBar, _doktypBedingteRetournierung, _
|
||||
_tageBisVernichtungbedingteRetournierung, _isAnzeigeZurDokumenterstellung, _isKundenDokument, _
|
||||
_isSb, _isSbImport, _isSbEditUser, _isSbNur, _isBezeichnungMut, _isFarbigArchiviert)
|
||||
|
||||
Else 'save existing
|
||||
err = DataAccess.Dokumenttyp.Update(_dokumentTypNr, _bezeichnung, _beschreibung, _zuVercolden, _isZuRetournieren, _
|
||||
_isEingangErsetztAusgang, _isWirdImportiert, _anzahlTage, _dBearbeitungsZeit, _tageMutation, _
|
||||
_isPartnerSaldierungStatusAlt, _isWirdNichtGeloescht, _isVertraulichesDokument, _isUnterschriftLinks, _
|
||||
_isUnterschriftRechts, _monateBisZurArchivierung, _aufbewahrungsFristElektronisch, _
|
||||
_aufbewahrungsFristPhysisch, _mandantNr, _isAktiv, _erstelltAm, _mutiertAm, mutierer, _
|
||||
_officeVorlageNr, _dokumentArtKundendossier, _dokumentArtNeuerstellung, _dokumentArtRetournierung, _
|
||||
_dokumentArtColdAusgang, _dokumentArtColdEingang, _dokumentArtHost, _dokumentArtWeitere, _
|
||||
_dokumentArtNativ, _prozessNr, _prozessNr1, _isAmsDokument, _isHostDokument, _hostDokumenttyp, _
|
||||
_coldFolder, _physischesArchiv, _dokumentStatus, _isDokumentWirdErstellt, _isDokumentWirdRetourniert, _
|
||||
_isColdErsetzen, _isEmailVersand, _isFunktionenZuweisen, _dokumentStatusBarcode, _isNurNative, _
|
||||
_owner, _isVertrag, _objektbezeichnungNr, _isBedingtRetournierBar, _doktypBedingteRetournierung, _
|
||||
_tageBisVernichtungbedingteRetournierung, _isAnzeigeZurDokumenterstellung, _isKundenDokument, _
|
||||
_isSb, _isSbImport, _isSbEditUser, _isSbNur, _isBezeichnungMut, _isFarbigArchiviert)
|
||||
End If
|
||||
|
||||
If err <> 0 Then
|
||||
Throw New DokumentartException(Meldungstext.GetInhaltById(40000))
|
||||
End If
|
||||
|
||||
'refresh data
|
||||
Dim ds As New DataSet()
|
||||
DataAccess.Dokumentart.GetDokumentart(ds, _dokumentTypNr)
|
||||
LoadData(ds)
|
||||
|
||||
Catch ex As Exception
|
||||
TKBLib.Errorhandling.TraceHelper.Msg("EDOKALib.BF.Dokumentart.Save", ex.Message + " " + ex.StackTrace, TraceLevel.Error)
|
||||
Throw ex
|
||||
End Try
|
||||
End Function
|
||||
|
||||
Public Function Delete(ByVal mutierer As Integer)
|
||||
Try
|
||||
|
||||
Catch ex As Exception
|
||||
TKBLib.Errorhandling.TraceHelper.Msg("EDOKALib.BF.Dokumenttyp.Delete", ex.Message + " " + ex.StackTrace, TraceLevel.Error)
|
||||
Throw ex
|
||||
End Try
|
||||
End Function
|
||||
|
||||
Public Shared Function IsMitarbeiterBerechtigt(ByVal dokumentTypNr As Integer, ByVal nrPar00 As Integer, ByVal mitarbeiterNr As Integer) As Boolean
|
||||
'If Globals.EDOKAStellvertreterPruefung = False And Globals.EDOKAFremdanwendungStellvertreter = 0 Then
|
||||
'Globals.EDOKAFremdanwendungStellvertreter = Globals.MitarbeiterNr
|
||||
'End If
|
||||
Try
|
||||
Return DataAccess.Dokumenttyp.IsMitarbeiterBerechtigt(dokumentTypNr, nrPar00, mitarbeiterNr)
|
||||
Catch ex As Exception
|
||||
TKBLib.Errorhandling.TraceHelper.Msg("EdokaLib.Dokumenttyp.IsMitarbeiterBerechtigt", ex.Message & ex.StackTrace, TraceLevel.Error)
|
||||
Throw ex
|
||||
End Try
|
||||
End Function
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "Properties"
|
||||
Public ReadOnly Property DokumentTypNr() As Integer
|
||||
Get
|
||||
Return _dokumentTypNr
|
||||
End Get
|
||||
End Property
|
||||
Public Property Bezeichnung() As String
|
||||
Get
|
||||
Return _bezeichnung
|
||||
End Get
|
||||
Set(ByVal Value As String)
|
||||
_bezeichnung = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property Beschreibung() As String
|
||||
Get
|
||||
Return _beschreibung
|
||||
End Get
|
||||
Set(ByVal Value As String)
|
||||
_beschreibung = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property ZuVercolden() As Boolean
|
||||
Get
|
||||
Return _zuVercolden
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_zuVercolden = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsZuRetournieren() As Boolean
|
||||
Get
|
||||
Return _isZuRetournieren
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isZuRetournieren = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsEingangErsetztAusgang() As Boolean
|
||||
Get
|
||||
Return _isEingangErsetztAusgang
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isEingangErsetztAusgang = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsWirdImportiert() As Boolean
|
||||
Get
|
||||
Return _isWirdImportiert
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isWirdImportiert = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property AnzahlTage() As Integer
|
||||
Get
|
||||
Return _anzahlTage
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_anzahlTage = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property DBearbeitungsZeit() As Integer
|
||||
Get
|
||||
Return _dBearbeitungsZeit
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_dBearbeitungsZeit = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property TageMutation() As Integer
|
||||
Get
|
||||
Return _tageMutation
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_tageMutation = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsPartnerSaldierungStatusAlt() As Boolean
|
||||
Get
|
||||
Return _isPartnerSaldierungStatusAlt
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isPartnerSaldierungStatusAlt = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsWirdNichtGeloescht() As Boolean
|
||||
Get
|
||||
Return _isWirdNichtGeloescht
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isWirdNichtGeloescht = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsVertraulichesDokument() As Boolean
|
||||
Get
|
||||
Return _isVertraulichesDokument
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isVertraulichesDokument = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsUnterschriftLinks() As Boolean
|
||||
Get
|
||||
Return _isUnterschriftLinks
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isUnterschriftLinks = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsUnterschriftRechts() As Boolean
|
||||
Get
|
||||
Return _isUnterschriftRechts
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isUnterschriftRechts = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property MonateBisZurArchivierung() As Integer
|
||||
Get
|
||||
Return _monateBisZurArchivierung
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_monateBisZurArchivierung = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property AufbewahrungsFristElektronisch() As Integer
|
||||
Get
|
||||
Return _aufbewahrungsFristElektronisch
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_aufbewahrungsFristElektronisch = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property AufbewahrungsFristPhysisch() As Integer
|
||||
Get
|
||||
Return _aufbewahrungsFristPhysisch
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_aufbewahrungsFristPhysisch = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsAktiv() As Boolean
|
||||
Get
|
||||
Return _isAktiv
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isAktiv = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property ErstelltAm() As DateTime
|
||||
Get
|
||||
Return _erstelltAm
|
||||
End Get
|
||||
Set(ByVal Value As DateTime)
|
||||
_erstelltAm = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property MutiertAm() As DateTime
|
||||
Get
|
||||
Return _mutiertAm
|
||||
End Get
|
||||
Set(ByVal Value As DateTime)
|
||||
_mutiertAm = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property Mutierer() As Integer
|
||||
Get
|
||||
Return _mutierer
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_mutierer = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property OfficeVorlageNr() As Integer
|
||||
Get
|
||||
Return _officeVorlageNr
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_officeVorlageNr = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property DokumentArtKundendossier() As Integer
|
||||
Get
|
||||
Return _dokumentArtKundendossier
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_dokumentArtKundendossier = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property DokumentArtNeuerstellung() As Integer
|
||||
Get
|
||||
Return _dokumentArtNeuerstellung
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_dokumentArtNeuerstellung = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property DokumentArtRetournierung() As Integer
|
||||
Get
|
||||
Return _dokumentArtRetournierung
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_dokumentArtRetournierung = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property DokumentArtColdAusgang() As Integer
|
||||
Get
|
||||
Return _dokumentArtColdAusgang
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_dokumentArtColdAusgang = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property DokumentArtColdEingang() As Integer
|
||||
Get
|
||||
Return _dokumentArtColdEingang
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_dokumentArtColdEingang = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property DokumentArtHost() As Integer
|
||||
Get
|
||||
Return _dokumentArtHost
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_dokumentArtHost = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property DokumentArtWeitere() As Integer
|
||||
Get
|
||||
Return _dokumentArtWeitere
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_dokumentArtWeitere = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property DokumentArtNativ() As Integer
|
||||
Get
|
||||
Return _dokumentArtNativ
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_dokumentArtNativ = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property ProzessNr() As Integer
|
||||
Get
|
||||
Return _prozessNr
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_prozessNr = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property ProzessNr1() As Integer
|
||||
Get
|
||||
Return _prozessNr1
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_prozessNr1 = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsAmsDokument() As Boolean
|
||||
Get
|
||||
Return _isAmsDokument
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isAmsDokument = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsHostDokument() As Boolean
|
||||
Get
|
||||
Return _isHostDokument
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isHostDokument = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property HostDokumenttyp() As String
|
||||
Get
|
||||
Return _hostDokumenttyp
|
||||
End Get
|
||||
Set(ByVal Value As String)
|
||||
_hostDokumenttyp = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property ColdFolder() As Integer
|
||||
Get
|
||||
Return _coldFolder
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_coldFolder = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property PhysischesArchiv() As Integer
|
||||
Get
|
||||
Return _physischesArchiv
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_physischesArchiv = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property DokumentStatus() As Integer
|
||||
Get
|
||||
Return _dokumentStatus
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_dokumentStatus = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsDokumentWirdErstellt() As Boolean
|
||||
Get
|
||||
Return _isDokumentWirdErstellt
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isDokumentWirdErstellt = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsDokumentWirdRetourniert() As Boolean
|
||||
Get
|
||||
Return _isDokumentWirdRetourniert
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isDokumentWirdRetourniert = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsColdErsetzen() As Boolean
|
||||
Get
|
||||
Return _isColdErsetzen
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isColdErsetzen = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsEmailVersand() As Boolean
|
||||
Get
|
||||
Return _isEmailVersand
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isEmailVersand = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsFunktionenZuweisen() As Boolean
|
||||
Get
|
||||
Return _isFunktionenZuweisen
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isFunktionenZuweisen = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property DokumentStatusBarcode() As Integer
|
||||
Get
|
||||
Return _dokumentStatusBarcode
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_dokumentStatusBarcode = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsNurNative() As Boolean
|
||||
Get
|
||||
Return _isNurNative
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isNurNative = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property Owner() As Integer
|
||||
Get
|
||||
Return _owner
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_owner = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsVertrag() As Boolean
|
||||
Get
|
||||
Return _isVertrag
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isVertrag = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property ObjektbezeichnungNr() As Integer
|
||||
Get
|
||||
Return _objektbezeichnungNr
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_objektbezeichnungNr = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsBedingtRetournierBar() As Boolean
|
||||
Get
|
||||
Return _isBedingtRetournierBar
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isBedingtRetournierBar = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property DoktypBedingteRetournierung() As Integer
|
||||
Get
|
||||
Return _doktypBedingteRetournierung
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_doktypBedingteRetournierung = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property TageBisVernichtungbedingteRetournierung() As Integer
|
||||
Get
|
||||
Return _tageBisVernichtungbedingteRetournierung
|
||||
End Get
|
||||
Set(ByVal Value As Integer)
|
||||
_tageBisVernichtungbedingteRetournierung = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsAnzeigeZurDokumenterstellung() As Boolean
|
||||
Get
|
||||
Return _isAnzeigeZurDokumenterstellung
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isAnzeigeZurDokumenterstellung = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsKundenDokument() As Boolean
|
||||
Get
|
||||
Return _isKundenDokument
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isKundenDokument = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsSb() As Boolean
|
||||
Get
|
||||
Return _isSb
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isSb = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsSbImport() As Boolean
|
||||
Get
|
||||
Return _isSbImport
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isSbImport = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsSbEditUser() As Boolean
|
||||
Get
|
||||
Return _isSbEditUser
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isSbEditUser = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsSbNur() As Boolean
|
||||
Get
|
||||
Return _isSbNur
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isSbNur = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsBezeichnungMut() As Boolean
|
||||
Get
|
||||
Return _isBezeichnungMut
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isBezeichnungMut = Value
|
||||
End Set
|
||||
End Property
|
||||
Public Property IsFarbigArchiviert() As Boolean
|
||||
Get
|
||||
Return _isFarbigArchiviert
|
||||
End Get
|
||||
Set(ByVal Value As Boolean)
|
||||
_isFarbigArchiviert = Value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
#End Region
|
||||
|
||||
End Class
|
||||
Reference in New Issue
Block a user