shu
/
EDOKA_Batch
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
Branches Tags
${ item.name }
Create tag ${ searchTerm }
Create branch ${ searchTerm }
from 'edeee4db13'
${ noResults }
EDOKA_Batch/edkb12/edkb12 V14/EDKB12WS/VSdoc/HTML/topic_00000000000003ac.htm

493 lines
44 KiB
Raw Blame History Escape

This file contains invisible Unicode characters!

This file contains invisible Unicode characters that may be processed differently from what appears below. If your use case is intentional and legitimate, you can safely ignore this warning. Use the Escape button to reveal hidden characters.

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html DIR="LTR" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns:ddue="http://ddue.schemas.microsoft.com/authoring/2003/5" xmlns:MSHelp="http://msdn.microsoft.com/mshelp">
<head>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; CHARSET=UTF-8" />
<META NAME="save" CONTENT="history" />
<meta name="GENERATOR" content="Help &amp; Manual + VSdocman">
<meta name="keywords" content="ModMain.Check_Umfeld Method,EDKB12WS.ModMain.Check_Umfeld Method,Check_Umfeld Method" />
<TITLE>ModMain.Check_Umfeld Method</TITLE>
<xml>
<MSHelp:TOCTitle Title="ModMain.Check_Umfeld Method"/>
<MSHelp:RLTitle Title="ModMain.Check_Umfeld Method"/>
<MSHelp:Keyword Index="A" Term="topic_00000000000003AC"/>
<MSHelp:Keyword Index="A" Term="EDKB12WS.ModMain.Check_Umfeld"/>
<MSHelp:Keyword Index="K" Term="ModMain.Check_Umfeld Method"/>
<MSHelp:Keyword Index="K" Term="EDKB12WS.ModMain.Check_Umfeld Method"/>
<MSHelp:Keyword Index="F" Term="EDKB12WS.ModMain.Check_Umfeld"/>
<MSHelp:Keyword Index="F" Term="ModMain.Check_Umfeld"/>
<MSHelp:Keyword Index="F" Term="EDKB12WS.ModMain.ModMain.Check_Umfeld"/>
<MSHelp:Attr Name="APIType" Value="Managed" />
<MSHelp:Attr Name="TopicType" Value="apiref" />
<MSHelp:Attr Name="APIName" Value="EDKB12WS.ModMain.Check_Umfeld" />
<MSHelp:Attr Name="DocSet" Value="EDKB12WS"/>
<MSHelp:Attr Name="DocSet" Value="NetFxBCL" />
<MSHelp:Attr Name="TopicType" Value="kbSyntax" />
<MSHelp:Attr Name="DocSet" Value="NETFramework" />
<MSHelp:Attr Name="DocSet" Value="NETFrameworkXpr" />
<MSHelp:Attr Name="DocSet" Value="ExpressLibVS" />
<MSHelp:Attr Name="Technology" Value="ManagedCode" />
<MSHelp:Attr Name="TechnologyVers" Value="netframework20" />
<MSHelp:Attr Name="DevLang" Value="VJ#" />
<MSHelp:Attr Name="TargetOS" Value="Windows" />
<MSHelp:Attr Name="TopicVersion" Value="1.0.0" />
<MSHelp:Attr Name="TargetOS" Value="Windows" />
<MSHelp:Attr Name="DevLang" Value="CSharp" />
<MSHelp:Attr Name="DevLang" Value="VB" />
<MSHelp:Attr Name="DevLang" Value="C++" />
<MSHelp:Attr Name="DevLang" Value="jsharp" />
<MSHelp:Attr Name="DevLang" Value="JScript" />
<MSHelp:Attr Name="DocSet" Value="NetCompactFramework" />
<MSHelp:Attr Name="Technology" Value="kbNetFramewk" />
<MSHelp:Attr Name="Technology" Value="kbNetCompactFramewk" />
<MSHelp:Attr Name="Locale" Value="en-us" />
<MSHelp:Attr Name="AssetID" Value="EDKB12WS.ModMain.Check_Umfeld" />
<MSHelp:Attr Name="codelang" Value="kbLangVB" />
<MSHelp:Attr Name="codelang" Value="CSharp" />
<MSHelp:Attr Name="codelang" Value="kbLangCPP" />
<MSHelp:Attr Name="codelang" Value="VJ#" />
<MSHelp:Attr Name="codelang" Value="kbJScript" />
</xml>
<link rel="stylesheet" type="text/css" href="default.css"></link>
<link rel="stylesheet" type="text/css" href="ms-help://MS.VSCC.v80/dv_vscccommon/local/Classic.css" DISABLED="true"></link>
<link rel="stylesheet" type="text/css" href="ms-help://Hx/HxRuntime/HxLink.css">
</link>
<script src="ms-help://MS.VSCC.v80/MS.MSDN.v80/MS.NETDEVFX.v20.en/cpref2/local/EventUtilities.js">
</script>
<script src="ms-help://MS.VSCC.v80/MS.MSDN.v80/MS.NETDEVFX.v20.en/cpref2/local/SplitScreen.js">
</script>
<script src="ms-help://MS.VSCC.v80/MS.MSDN.v80/MS.NETDEVFX.v20.en/cpref2/local/Dropdown.js">
</script>
<script src="ms-help://MS.VSCC.v80/MS.MSDN.v80/MS.NETDEVFX.v20.en/cpref2/local/script.js">
</script>
<link rel="stylesheet" type="text/css" href="msdn2.css"></link>
<script src="msdn2.js"></script>
<link rel="stylesheet" type="text/css" href="ms-help://MS.VSCC.v90/dv_vscccommon/styles/presentation.css">
</link>
<link rel="stylesheet" type="text/css" href="ms-help://Hx/HxRuntime/HxLink.css">
</link>
<script src="ms-help://MS.VSCC.v90/dv_vscccommon/scripts/EventUtilities.js">
</script>
<script src="ms-help://MS.VSCC.v90/dv_vscccommon/scripts/SplitScreen.js">
</script>
<script src="ms-help://MS.VSCC.v90/dv_vscccommon/scripts/Dropdown.js">
</script>
<script src="ms-help://MS.VSCC.v90/dv_vscccommon/scripts/script_loc.js"> </script>
<script src="ms-help://MS.VSCC.v90/dv_vscccommon/scripts/script_manifold.js"> </script>
<script src="ms-help://MS.VSCC.v90/dv_vscccommon/scripts/CheckboxMenu.js"> </script>
<script src="ms-help://MS.VSCC.v90/dv_vscccommon/scripts/CommonUtilities.js"> </script>
<style>
/* Fix table widths if MSDN 9.0 is present */
div#mainSection table
{
width: auto;
}
div#mainSection table table
{
width: 100%;
}
</style>
<script type="text/javascript" src="jquery.js"></script>
<script type="text/javascript" src="helpman_settings.js"></script>
<script type="text/javascript" src="helpman_topicinit.js"></script>
<script type="text/javascript">
HMSyncTOC("index.html", "topic_00000000000003ac.htm");
</script>
<script type="text/javascript" src="highlight.js"></script>
<script type="text/javascript">
$(document).ready(function(){highlight();});
</script>
</HEAD>
<body>
<!--NONSCROLLING BANNER START-->
<input type="hidden" id="userDataCache" class="userDataStyle"></input>
<input type="hidden" id="hiddenScrollOffset"></input>
<img id="dropDownImage" style="display:none; height:0; width:0;" alt="DropDown image" src="dropdown.gif"></img>
<img id="dropDownHoverImage" style="display:none; height:0; width:0;" alt="DropDownHover image" src="dropdownhover.gif"></img>
<img id="collapseImage" style="display:none; height:0; width:0;" alt="Collapse image" src="collapse_all.gif"></img>
<img id="expandImage" style="display:none; height:0; width:0;" alt="Expand image" src="expand_all.gif"></img>
<img id="collapseAllImage" style="display:none; height:0; width:0;" alt="CollapseAll image" src="collall.gif"></img>
<img id="expandAllImage" style="display:none; height:0; width:0;" alt="ExpandAll image" src="expall.gif"></img>
<img id="copyImage" style="display:none; height:0; width:0;" alt="Copy image" src="copycode.gif"></img>
<img id="copyHoverImage" style="display:none; height:0; width:0;" alt="CopyHover image" src="copycodehighlight.gif"></img>
<div id="header">
<table id="bottomTable" cellspacing="0" cellpadding="0">
<tr>
<td>
<span onclick="toggleToggles(toggleAllImage)" style="cursor:default;" onkeypress="toggleToggles_CheckKey(toggleAllImage, event)" tabindex="0">
<img ID="toggleAllImage" class="toggleAll" src="collall.gif" />
<label id="collapseAllLabel" for="toggleAllImage" style="display: inline;">Collapse All</label>
<label id="expandAllLabel" for="toggleAllImage" style="display: none;">Expand All</label>
</span>
<span>&nbsp;&nbsp;&nbsp;&nbsp;</span>
<span id="devlangsDropdown" class="filter" tabindex="0">
<img id="devlangsDropdownImage" src="dropdown.gif" />
<label id="devlangsMenuNeutralLabel" for="devlangsDropdownImage" style="display: inline;"><nobr>Language Filter:</nobr></label>
<label id="devlangsMenuAllLabel" for="devlangsDropdownImage" style="display: none;"><nobr>Code: All </nobr></label>
<label id="devlangsMenuMultipleLabel" for="devlangsDropdownImage" style="display: none;"><nobr>Code: Multiple </nobr></label>
<label id="devlangsMenuVisualBasicLabel" for="devlangsDropdownImage" style="display: none;"><nobr>Code: Visual Basic </nobr></label>
<label id="devlangsMenuCSharpLabel" for="devlangsDropdownImage" style="display: none;"><nobr>Code: C# </nobr></label>
<label id="devlangsMenuManagedCPlusPlusLabel" for="devlangsDropdownImage" style="display: none;"><nobr>Code: Visual C++ </nobr></label>
<label id="devlangsMenuJSharpLabel" for="devlangsDropdownImage" style="display: none;"><nobr>Code: J# </nobr></label>
<label id="devlangsMenuJScriptLabel" for="devlangsDropdownImage" style="display: none;"><nobr>Code: JScript </nobr></label>
</span>
</td>
</tr>
</table>
<div id="devlangsMenu">
</div>
<table id="topTable" cellpadding="0" cellspacing="0">
<tr id="headerTableRow1">
<td align="left">
<span id="runningHeaderText">EDKB12WS Reference</span>
</td>
</tr>
<tr id="headerTableRow2">
<td align="left">
<span id="nsrTitle">ModMain.Check_Umfeld Method</span>
</td>
</tr>
<tr id="headerTableRow3">
<td align="left">
<a href="#seealsotoggle" onclick="try{ HMToggle('expand','seeAlsoToggleSection','$seeAlsoToggleSection_ICON') }catch(ex){}">See Also</a>
</td>
</tr>
</table>
<table id="gradientTable">
<tr>
<td class="nsrBottom" background="gradient.gif" />
</tr>
</table>
</div>
<!--NONSCROLLING BANNER END-->
<!-- Placeholder for topic body. -->
<div id="mainSection">
<div id="mainBody">
<div id="allHistory" class="saveHistory" onsave="saveAll()" onload="loadAll()">
</div>
<p>&nbsp;<br />
<span style="font-weight: bold;">Assembly:</span> EDKB12WS (in EDKB12WS.exe) </p>
<h1 class="p_Heading1"><img id="syntaxToggle_ICON" class="dropdown-toggle-icon" src="collall.gif" width="11" height="11" alt="" style="border:none" /><span class="f_Heading1"><a class="dropdown-toggle" href="javascript:HMToggle('toggle','syntaxToggle','syntaxToggle_ICON')">Syntax</a></span></h1>
<div id="syntaxToggle" style="text-align: left; text-indent: 0px; padding: 0px 0px 0px 0px; margin: 0px 0px 0px 10px;"><table class="togglesection" style="border:none; border-spacing:0px; border-collapse:collapse;">
<tr style="text-align:left;vertical-align:top;">
<td style="vertical-align:top; width:10%; background-color:#ffffff; padding:0px; border:solid 1px #ffffff;"><div style="text-align: left; text-indent: 0px; padding: 0px 0px 0px 0px; margin: 10px 0px 5px 0px;"><table class="mainsectiontable" style="width:100%; border:none; border-spacing:2px;">
<tr style="text-align:left;vertical-align:top;">
<td style="vertical-align:top; background-color:#efeff7; padding:0px;"><p class="p_TableHeadingVB"><span class="f_TableHeadingVB">Visual Basic</span></p>
</td>
</tr>
<tr style="text-align:left;vertical-align:top;">
<td style="vertical-align:top; padding:0px;"><p class="p_CodeExample"><span class="f_CodeExample">Private&nbsp;Shared&nbsp;Function&nbsp;Check_Umfeld()&nbsp;As&nbsp;</span><span class="msdn-link-container"><span class="f_CodeExample"><a href="msdn::T:System.Boolean" class="weblink">Boolean</a></span></span></p>
</td>
</tr>
</table>
</div>
<div style="text-align: left; text-indent: 0px; padding: 0px 0px 0px 0px; margin: 10px 0px 5px 0px;"><table class="mainsectiontable" style="width:100%; border:none; border-spacing:2px;">
<tr style="text-align:left;vertical-align:top;">
<td style="vertical-align:top; background-color:#efeff7; padding:0px;"><p class="p_TableHeadingCsharp"><span class="f_TableHeadingCsharp">C#</span></p>
</td>
</tr>
<tr style="text-align:left;vertical-align:top;">
<td style="vertical-align:top; padding:0px;"><p class="p_CodeExample"><span class="f_CodeExample">private&nbsp;static&nbsp;</span><span class="msdn-link-container"><span class="f_CodeExample"><a href="msdn::T:System.Boolean" class="weblink">bool</a></span></span><span class="f_CodeExample">&nbsp;Check_Umfeld()</span></p>
</td>
</tr>
</table>
</div>
<div style="text-align: left; text-indent: 0px; padding: 0px 0px 0px 0px; margin: 10px 0px 5px 0px;"><table class="mainsectiontable" style="width:100%; border:none; border-spacing:2px;">
<tr style="text-align:left;vertical-align:top;">
<td style="vertical-align:top; background-color:#efeff7; padding:0px;"><p class="p_TableHeadingCpp"><span class="f_TableHeadingCpp">C++</span></p>
</td>
</tr>
<tr style="text-align:left;vertical-align:top;">
<td style="vertical-align:top; padding:0px;"><p class="p_CodeExample"><span class="f_CodeExample">private:&nbsp;</span><br />
<span class="f_CodeExample">static&nbsp;</span><span class="msdn-link-container"><span class="f_CodeExample"><a href="msdn::T:System.Boolean" class="weblink">bool</a></span></span><span class="f_CodeExample">&nbsp;Check_Umfeld()&nbsp;</span></p>
</td>
</tr>
</table>
</div>
<div style="text-align: left; text-indent: 0px; padding: 0px 0px 0px 0px; margin: 10px 0px 5px 0px;"><table class="mainsectiontable" style="width:100%; border:none; border-spacing:2px;">
<tr style="text-align:left;vertical-align:top;">
<td style="vertical-align:top; background-color:#efeff7; padding:0px;"><p class="p_TableHeadingJscript"><span class="f_TableHeadingJscript">JScript</span></p>
</td>
</tr>
<tr style="text-align:left;vertical-align:top;">
<td style="vertical-align:top; padding:0px;"><p class="p_CodeExample"><span class="f_CodeExample">private&nbsp;static&nbsp;function&nbsp;Check_Umfeld()&nbsp;:&nbsp;</span><span class="msdn-link-container"><span class="f_CodeExample"><a href="msdn::T:System.Boolean" class="weblink">boolean</a></span></span><span class="f_CodeExample">;</span></p>
</td>
</tr>
</table>
</div>
</td>
</tr>
</table>
</div>
<p class="p_ToggleSectionParagraph"><span class="f_ToggleSectionParagraph">&nbsp;</span></p>
<h1 class="p_Heading1"><img id="TOGGLE0186A1_ICON" class="dropdown-toggle-icon" src="collall.gif" width="11" height="11" alt="" style="border:none" /><span class="f_Heading1"><a class="dropdown-toggle" href="javascript:HMToggle('toggle','TOGGLE0186A1','TOGGLE0186A1_ICON')">Source code</a></span></h1>
<div id="TOGGLE0186A1" style="text-align: left; text-indent: 0px; padding: 0px 0px 0px 0px; margin: 0px 0px 0px 10px;"><table class="togglesection" style="border:none; border-spacing:0px; border-collapse:collapse;">
<tr style="text-align:left;vertical-align:top;">
<td style="vertical-align:top; width:10%; background-color:#ffffff; padding:0px; border:solid 1px #ffffff;"><div style="text-align: left; text-indent: 0px; padding: 0px 0px 0px 0px; margin: 10px 0px 5px 0px;"><table class="codetable" style="width:100%; border:none; border-spacing:0px;">
<tr style="text-align:left;vertical-align:top;">
<td style="vertical-align:top; background-color:#efeff7; padding:0px;"><p class="p_TableHeadingVB"><span class="f_TableHeadingVB">Visual Basic</span></p>
</td>
<td style="vertical-align:top; width:1%; background-color:#efeff7; padding:0px;"><p class="p_CopyCodeLink"><span title="Copy Code" class="copyCode" onclick="CopyCode(this)" onkeypress="CopyCode_CheckKey(this, event)" onmouseover="ChangeCopyCodeIcon(this)" onmouseout="ChangeCopyCodeIcon(this)" tabindex="0"><img class="copyCodeImage" name="ccImage" align="absmiddle" alt="Copy Code" src="copycode.gif" />Copy Code</span></p>
</td>
</tr>
<tr style="text-align:left;vertical-align:top;">
<td colspan="2" style="vertical-align:top; padding:0px;"><p class="p_CodeExample"><span class="f_CodeExample">&nbsp;Private&nbsp;Function&nbsp;Check_Umfeld()&nbsp;As&nbsp;Boolean</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Param.DebugMode&nbsp;Then</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DivFnkt.InsertJournale(&quot;EDKB12:&nbsp;Start&nbsp;Check_Umfeld&quot;,&nbsp;clsDivFnkt.Enum_InfoTyp.Information)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;Try</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Param.DebugMode&nbsp;Then</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DivFnkt.InsertJournale(&quot;EDKB12:&nbsp;Start&nbsp;Check_Umfeld::Mitarbeiter&quot;,&nbsp;clsDivFnkt.Enum_InfoTyp.Information)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;xMitarbeiter.xtgnummer&nbsp;=&nbsp;tmpAction.GetParameterByName(&quot;creatorTg&quot;).Value</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Mitarbeiter.cpMainConnectionProvider&nbsp;=&nbsp;Globals.conn</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;conn.OpenConnection()</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;xMitarbeiter.cpMainConnectionProvider&nbsp;=&nbsp;Globals.conn</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Mitarbeiterdata&nbsp;=&nbsp;xMitarbeiter.SelectWithTGNummer()</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;conn.CloseConnection(True)</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Mitarbeiter.cpMainConnectionProvider&nbsp;=&nbsp;Globals.conn</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;conn.OpenConnection()</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Mitarbeiter.iMitarbeiternr&nbsp;=&nbsp;New&nbsp;SqlInt32(Mitarbeiterdata.Rows(0).Item(&quot;Mitarbeiternr&quot;))</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Mitarbeiter.SelectOne()</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;conn.CloseConnection(True)</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Param.DebugMode&nbsp;Then</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DivFnkt.InsertJournale(&quot;EDKB12:&nbsp;Start&nbsp;Check_Umfeld::Dokumenttyp&quot;,&nbsp;clsDivFnkt.Enum_InfoTyp.Information)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DokType.cpMainConnectionProvider&nbsp;=&nbsp;Globals.conn</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;conn.OpenConnection()</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DokType.iDokumenttypnr&nbsp;=&nbsp;New&nbsp;SqlInt32(tmpAction.GetParameterByName(&quot;DokumentTypNr&quot;).Value&nbsp;-&nbsp;900000000)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DokType.SelectOne()</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;conn.CloseConnection(True)</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Param.DebugMode&nbsp;Then</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DivFnkt.InsertJournale(&quot;EDKB12:&nbsp;Start&nbsp;Check_Umfeld::Partner&quot;,&nbsp;clsDivFnkt.Enum_InfoTyp.Information)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Partner.cpMainConnectionProvider&nbsp;=&nbsp;Globals.conn</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;conn.OpenConnection()</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Partner.iNRPAR00&nbsp;=&nbsp;New&nbsp;SqlInt32(tmpAction.GetParameterByName(&quot;PartnerNr&quot;).Value)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Partner.SelectOne()</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;conn.CloseConnection(True)</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Param.DebugMode&nbsp;Then</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DivFnkt.InsertJournale(&quot;EDKB12:&nbsp;Start&nbsp;Check_Umfeld::Office-Vorlage&quot;,&nbsp;clsDivFnkt.Enum_InfoTyp.Information)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;OfficeVorlage.cpMainConnectionProvider&nbsp;=&nbsp;Globals.conn</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;conn.OpenConnection()</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;OfficeVorlage.iOffice_vorlagenr&nbsp;=&nbsp;New&nbsp;SqlInt32(DokType.iOffice_vorlagenr.Value)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;OfficeVorlage.SelectOne()</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;conn.CloseConnection(True)</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Param.DebugMode&nbsp;Then</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DivFnkt.InsertJournale(&quot;EDKB12:&nbsp;Start&nbsp;Check_Umfeld::Auslesen&nbsp;Office-Vorlage&quot;,&nbsp;clsDivFnkt.Enum_InfoTyp.Information)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;'Office&nbsp;2010</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Param.DebugMode&nbsp;Then</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DivFnkt.InsertJournale(&quot;EDKB12:&nbsp;Start&nbsp;Check_Umfeld::Param.CheckOffice2010_Vorlage:&quot;&nbsp;+&nbsp;Param.CheckOffice2010_Vorlage.ToString,&nbsp;clsDivFnkt.Enum_InfoTyp.Information)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Param.CheckOffice2010_Vorlage&nbsp;=&nbsp;True&nbsp;Then</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Dim&nbsp;applnr&nbsp;As&nbsp;Integer&nbsp;=&nbsp;Get_Applikationnr(OfficeVorlage.iOffice_vorlagenr.Value)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DivFnkt.InsertJournale(&quot;EDKB12:&nbsp;Start&nbsp;Check_Umfeld::Appl-Nr:&quot;&nbsp;+&nbsp;applnr.ToString,&nbsp;clsDivFnkt.Enum_InfoTyp.Information)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Select&nbsp;Case&nbsp;applnr</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;0</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.doc&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;1</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.doc&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;2</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.xls&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;3</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.pdf&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;4</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.docx&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;5</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.docm&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;6</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.dotx&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;7</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.dotm&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;8</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.xlsx&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;9</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.xlsm&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;10</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.xltx&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;11</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.xltm&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;Select</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Else</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Select&nbsp;Case&nbsp;OfficeVorlage.iAnwendungnr.Value</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;0</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.doc&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;1</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.doc&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;2</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.xls&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;3</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.pdf&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;4</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.docx&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;5</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.docm&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;6</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.dotx&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;7</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.dotm&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;8</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.xlsx&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;9</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.xlsm&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;10</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.xltx&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Case&nbsp;11</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;FileExtension&nbsp;=&nbsp;&quot;.xltm&quot;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;Select</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Param.DebugMode&nbsp;Then</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DivFnkt.InsertJournale(&quot;EDKB12:&nbsp;Start&nbsp;Check_Umfeld::&nbsp;Office_Voralge:&nbsp;&quot;&nbsp;+&nbsp;OfficeVorlage.iOffice_vorlagenr.Value.ToString,&nbsp;clsDivFnkt.Enum_InfoTyp.Information)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DivFnkt.InsertJournale(&quot;EDKB12:&nbsp;Start&nbsp;Check_Umfeld::&nbsp;Dokumenttyp:&nbsp;&quot;&nbsp;+&nbsp;FileExtension,&nbsp;clsDivFnkt.Enum_InfoTyp.Information)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Office_Vorlage_Get_From_DB(OfficeVorlage.iOffice_vorlagenr.Value,&nbsp;Filename&nbsp;+&nbsp;FileExtension)&nbsp;=&nbsp;&quot;&quot;&nbsp;Then</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Return&nbsp;False</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DokumentFilename&nbsp;=&nbsp;Filename&nbsp;+&nbsp;FileExtension</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Param.DebugMode&nbsp;Then</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DivFnkt.InsertJournale(&quot;EDKB12:&nbsp;Start&nbsp;Check_Umfeld::Profil&quot;,&nbsp;clsDivFnkt.Enum_InfoTyp.Information)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Profile&nbsp;=&nbsp;Get_Profil(Mitarbeiter.iMitarbeiternr.Value)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Profile.Rows.Count&nbsp;&lt;&nbsp;1&nbsp;Then</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Profilnr&nbsp;=&nbsp;0</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Unterschriftlinks&nbsp;=&nbsp;0</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Unterschriftrechts&nbsp;=&nbsp;0</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Else</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Profilnr&nbsp;=&nbsp;Profile.Rows(0).Item(&quot;Profilnr&quot;)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Unterschriftlinks&nbsp;=&nbsp;Profile.Rows(0).Item(&quot;Unterschriftlinks&quot;)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Unterschriftrechts&nbsp;=&nbsp;Profile.Rows(0).Item(&quot;Unterschriftrechts&quot;)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Profile.Dispose()</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Param.DebugMode&nbsp;Then</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DivFnkt.InsertJournale(&quot;EDKB12:&nbsp;Start&nbsp;Check_Umfeld::Teams&quot;,&nbsp;clsDivFnkt.Enum_InfoTyp.Information)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Teams&nbsp;=&nbsp;Get_Team(Profilnr)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Teams.Rows.Count&nbsp;=&nbsp;0&nbsp;Then</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;teamnr&nbsp;=&nbsp;0</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Else</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;teamnr&nbsp;=&nbsp;Teams.Rows(0).Item(&quot;Teamnr&quot;)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Teams.Dispose()</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Param.DebugMode&nbsp;Then</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DivFnkt.InsertJournale(&quot;EDKB12:&nbsp;Ende&nbsp;Check_Umfeld&nbsp;(True)&quot;,&nbsp;clsDivFnkt.Enum_InfoTyp.Information)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Return&nbsp;True</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;Catch&nbsp;ex&nbsp;As&nbsp;Exception</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DivFnkt.InsertJournale(&quot;EDKB12::Fehler::&nbsp;Check_Umfeld::&quot;&nbsp;&amp;&nbsp;ex.Message,&nbsp;clsDivFnkt.Enum_InfoTyp.Fehler)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Param.DebugMode&nbsp;Then</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DivFnkt.InsertJournale(&quot;EDKB12:&nbsp;Ende&nbsp;Check_Umfeld&nbsp;(False)::&quot;&nbsp;&amp;&nbsp;ex.Message,&nbsp;clsDivFnkt.Enum_InfoTyp.Information)</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If</span><br />
<span class="f_CodeExample">&nbsp;</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Return&nbsp;False</span><br />
<span class="f_CodeExample">&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;Try</span><br />
<span class="f_CodeExample">&nbsp;End&nbsp;Function&nbsp;</span></p>
</td>
</tr>
</table>
</div>
</td>
</tr>
</table>
</div>
<h1 class="p_Heading1"><img id="TOGGLE0186A2_ICON" class="dropdown-toggle-icon" src="collall.gif" width="11" height="11" alt="" style="border:none" /><span class="f_Heading1"><a class="dropdown-toggle" href="javascript:HMToggle('toggle','TOGGLE0186A2','TOGGLE0186A2_ICON')">Platforms</a></span></h1>
<div id="TOGGLE0186A2" style="text-align: left; text-indent: 0px; padding: 0px 0px 0px 0px; margin: 0px 0px 0px 10px;"><table class="togglesection" style="border:none; border-spacing:0px; border-collapse:collapse;">
<tr style="text-align:left;vertical-align:top;">
<td style="vertical-align:top; width:10%; background-color:#ffffff; padding:0px; border:solid 1px #ffffff;"><p>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</p>
<p>The .NET Framework does not support all versions of every platform. For a list of the supported versions, see <span class="msdn-link-container"><a href="msdn::298275e2-da1d-4618-9f74-6a3567832350" class="weblink">System Requirements</a></span>.</p>
</td>
</tr>
</table>
</div>
<p class="p_ToggleSectionParagraph"><span class="f_ToggleSectionParagraph">&nbsp;</span></p>
<h1 class="p_Heading1"><img id="TOGGLE0186A3_ICON" class="dropdown-toggle-icon" src="collall.gif" width="11" height="11" alt="" style="border:none" /><span class="f_Heading1"><a class="dropdown-toggle" href="javascript:HMToggle('toggle','TOGGLE0186A3','TOGGLE0186A3_ICON')">Version Information</a></span></h1>
<div id="TOGGLE0186A3" style="text-align: left; text-indent: 0px; padding: 0px 0px 0px 0px; margin: 0px 0px 0px 10px;"><table class="togglesection" style="border:none; border-spacing:0px; border-collapse:collapse;">
<tr style="text-align:left;vertical-align:top;">
<td style="vertical-align:top; width:10%; background-color:#ffffff; padding:0px; border:solid 1px #ffffff;"><h2 class="p_Heading2"><span class="f_Heading2">.NET Framework</span></h2>
<p>Supported in: 4.5, 4, 3.5, 3.0, 2.0, 1.1, 1.0<br />
&nbsp;</p>
<h2 class="p_Heading2"><span class="f_Heading2">.NET Compact Framework</span></h2>
<p>Supported in: 3.5, 2.0, 1.0<br />
&nbsp;</p>
<h2 class="p_Heading2"><span class="f_Heading2">XNA Framework</span></h2>
<p>Supported in: 3.0, 2.0, 1.0<br />
&nbsp;</p>
</td>
</tr>
</table>
</div>
<p class="p_ToggleSectionParagraph"><span class="f_ToggleSectionParagraph">&nbsp;</span></p>
<h1 class="p_Heading1"><a id="seealsotoggle"></a><img id="seeAlsoToggleSection_ICON" class="dropdown-toggle-icon" src="collall.gif" width="11" height="11" alt="" style="border:none" /><span class="f_Heading1"><a class="dropdown-toggle" href="javascript:HMToggle('toggle','seeAlsoToggleSection','seeAlsoToggleSection_ICON')">See Also</a></span></h1>
<div id="seeAlsoToggleSection" style="text-align: left; text-indent: 0px; padding: 0px 0px 0px 0px; margin: 0px 0px 0px 10px;"><table class="togglesection" style="border:none; border-spacing:0px; border-collapse:collapse;">
<tr style="text-align:left;vertical-align:top;">
<td style="vertical-align:top; width:10%; background-color:#ffffff; padding:0px; border:solid 1px #ffffff;"><h2 class="p_Heading2"><span class="f_Heading2">Reference</span></h2>
<p> <a href="topic_000000000000038a.htm" class="topiclink" title="ModMain Class">ModMain Class</a><br />
<a href="topic_000000000000038a_members--.htm" class="topiclink" title="ModMain ModMain Members">ModMain ModMain Members</a><br />
&nbsp;</p>
</td>
</tr>
</table>
</div>
</div>
<div id="footer">
<div class="footerLine">
<img alt="Footer image" width="100%" height="3px" src="footer.gif">
</img>
</div>
Generated by VSdocman
</div>
</div>
<script type="text/javascript">
HMInitToggle('syntaxToggle_ICON','hm.type','dropdown','hm.state','1','hm.src0','expall.gif','hm.src1','collall.gif','onclick','HMToggle(\'toggle\',\'syntaxToggle\',\'syntaxToggle_ICON\')');
HMInitToggle('syntaxToggle','hm.type','dropdown','hm.state','1');
HMInitToggle('TOGGLE0186A1_ICON','hm.type','dropdown','hm.state','1','hm.src0','expall.gif','hm.src1','collall.gif','onclick','HMToggle(\'toggle\',\'TOGGLE0186A1\',\'TOGGLE0186A1_ICON\')');
HMInitToggle('TOGGLE0186A1','hm.type','dropdown','hm.state','1');
HMInitToggle('TOGGLE0186A2_ICON','hm.type','dropdown','hm.state','1','hm.src0','expall.gif','hm.src1','collall.gif','onclick','HMToggle(\'toggle\',\'TOGGLE0186A2\',\'TOGGLE0186A2_ICON\')');
HMInitToggle('TOGGLE0186A2','hm.type','dropdown','hm.state','1');
HMInitToggle('TOGGLE0186A3_ICON','hm.type','dropdown','hm.state','1','hm.src0','expall.gif','hm.src1','collall.gif','onclick','HMToggle(\'toggle\',\'TOGGLE0186A3\',\'TOGGLE0186A3_ICON\')');
HMInitToggle('TOGGLE0186A3','hm.type','dropdown','hm.state','1');
HMInitToggle('seeAlsoToggleSection_ICON','hm.type','dropdown','hm.state','1','hm.src0','expall.gif','hm.src1','collall.gif','onclick','HMToggle(\'toggle\',\'seeAlsoToggleSection\',\'seeAlsoToggleSection_ICON\')');
HMInitToggle('seeAlsoToggleSection','hm.type','dropdown','hm.state','1');
</script>
</body>
</html>
Reference in new issue View Git Blame Copy Permalink