ModMain.Dokumentstatus_erstellen_und_Status_Setzen Method ModMain.Dokumentstatus_erstellen_und_Status_Setzen Method EDKB12WS.ModMain.Dokumentstatus_erstellen_und_Status_Setzen Method Dokumentstatus_erstellen_und_Status_Setzen Method topic_00000000000003BB EDKB12WS.ModMain.Dokumentstatus_erstellen_und_Status_Setzen EDKB12WS.ModMain.Dokumentstatus_erstellen_und_Status_Setzen ModMain.Dokumentstatus_erstellen_und_Status_Setzen EDKB12WS.ModMain.ModMain.Dokumentstatus_erstellen_und_Status_Setzen EDKB12WS.ModMain.Dokumentstatus_erstellen_und_Status_Setzen EDKB12WS (in EDKB12WS.exe) ModMain.Dokumentstatus_erstellen_und_Status_Setzen Method EDKB12WS.ModMain topic_00000000000003BB
ModMain.Dokumentstatus_erstellen_und_Status_Setzen Method

Assembly: EDKB12WS (in EDKB12WS.exe)
Visual Basic
Private Shared Function Dokumentstatus_erstellen_und_Status_Setzen( _
  ByVal dokumentid As ]]>Stringa]]>]]>, _
  ByVal erstellen As ]]>Booleana]]>]]>, _
  Optional ByVal BLKunde As ]]>Integera]]>]]> = 0 _
) As ]]>Integera]]>]]>
C#
private static ]]>inta]]>]]> Dokumentstatus_erstellen_und_Status_Setzen(
  ]]>stringa]]>]]> dokumentid,
  ]]>boola]]>]]> erstellen,
  ]]>inta]]>]]> BLKunde = 0
)
C++
private:
static ]]>inta]]>]]> Dokumentstatus_erstellen_und_Status_Setzen(
  ]]>Stringa]]>]]>^ dokumentid,
  ]]>boola]]>]]> erstellen,
  ]]>inta]]>]]> BLKunde
)
JScript
private static function Dokumentstatus_erstellen_und_Status_Setzen(
   dokumentid : ]]>Stringa]]>]]>,
   erstellen : ]]>booleana]]>]]>,
   BLKunde : ]]>inta]]>]]>
) : ]]>inta]]>]]>;
Parametersdokumentid erstellen BLKunde
$END-IFNOTEMPTY$
Visual Basic Copy CodeCopy Code ]]>
Private Function Dokumentstatus_erstellen_und_Status_Setzen(ByVal dokumentid As String, ByVal erstellen As Boolean, Optional ByVal BLKunde As Integer = 0) As Integer
   If Param.DebugMode Then
       DivFnkt.InsertJournale("EDKB12: Start Dokumentstatus_erstellen_und_Status_Setzen", clsDivFnkt.Enum_InfoTyp.Information)
   End If
   Try

       Dim st As New System.Data.DataTable()
       Dim i As Integer
       Dim dt As DateTime = DateAdd(DateInterval.Second, -5, Now)
       Dim MitArchivfunktion As Boolean = False

       If erstellen = True Then
           Create_Dokumentstatus(BLKunde)
       End If
       st = Get_Dokumentstatus()
       For i = 0 To st.Rows.Count - 1
           Select Case Integer.Parse(st.Rows(i).Item(2).ToString)
               Case 3
                   MitArchivfunktion = True
               Case 11
                   MitArchivfunktion = True
           End Select
       Next

       If MitArchivfunktion Then
           For i = 0 To st.Rows.Count - 1
               insert_history_status(st.Rows(i).Item(0), dokumentid, Mitarbeiter.iMitarbeiternr.Value, dt)
               dt = DateAdd(DateInterval.Second, 1, dt)
               If st.Rows(i).Item(2) = 3 Or st.Rows(i).Item(2) = 11 Then
                   Return st.Rows(i).Item(0)
                   Exit Function
               End If
           Next
       Else
           'Dokumentstatusreihenfolge ohne Ausgangsarchivierung
       End If
       If Param.DebugMode Then
           DivFnkt.InsertJournale("EDKB12: Ende Dokumentstatus_erstellen_und_Status_Setzen (True)", clsDivFnkt.Enum_InfoTyp.Information)
       End If

   Catch ex As Exception

   End Try
   DivFnkt.InsertJournale("EDKB12::Fehler:: Dokumentstatus_erstellen_und_Status_Setzen::", clsDivFnkt.Enum_InfoTyp.Fehler)
   If Param.DebugMode Then
       DivFnkt.InsertJournale("EDKB12: Ende Dokumentstatus_erstellen_und_Status_Setzen (False)", clsDivFnkt.Enum_InfoTyp.Information)
   End If

End Function
Windows 8, Windows Server 2012, Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows XP SP2 x64 Edition, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2 The .NET Framework does not support all versions of every platform. For a list of the supported versions, see ]]>System Requirementsa]]>]]>.
.NET Framework Supported in: 4.5, 4, 3.5, 3.0, 2.0, 1.1, 1.0
.NET Compact Framework Supported in: 3.5, 2.0, 1.0
XNA Framework Supported in: 3.0, 2.0, 1.0
Reference ModMain ClassModMain Class
ModMain ModMain MembersModMain ModMain Members