Index: TAOR rework/TAOR rework/controllers/Domeincontroller.vb
===================================================================
diff -u -r2034 -r2073
--- TAOR rework/TAOR rework/controllers/Domeincontroller.vb	(.../Domeincontroller.vb)	(revision 2034)
+++ TAOR rework/TAOR rework/controllers/Domeincontroller.vb	(.../Domeincontroller.vb)	(revision 2073)
@@ -79,7 +79,7 @@
     End Function
 
     Public Sub addRework(ByVal barcode As String, ByVal reden() As String, ByVal onderdeel As String, ByVal voorVoorraad As String)
-        reworkRep.addRework(New Rework(barcode, reden, onderdeel, voorVoorraad))
+        reworkRep.addRework(New Rework(barcode, reden, onderdeel, voorVoorraad, Configs.GeefOorsprongIdAlias()))
     End Sub
 
     Public Sub verwijderRework(ByVal barcode As String)
Index: TAOR rework/TAOR rework/TAOR rework.vbproj
===================================================================
diff -u -r2067 -r2073
--- TAOR rework/TAOR rework/TAOR rework.vbproj	(.../TAOR rework.vbproj)	(revision 2067)
+++ TAOR rework/TAOR rework/TAOR rework.vbproj	(.../TAOR rework.vbproj)	(revision 2073)
@@ -111,6 +111,9 @@
     <Compile Include="Configuraties\config text mappers\WaardenHoogteVerschilTextMapper.vb" />
     <Compile Include="Configuraties\config text mappers\WaardenKleurVervangenTextMapper.vb" />
     <Compile Include="Configuraties\config text mappers\WaardenSpecialsTextMapper.vb" />
+    <Compile Include="Configuraties\IMapper.vb" />
+    <Compile Include="Configuraties\OorsprongIdAliasMapperXML.vb" />
+    <Compile Include="Configuraties\XmlMapper.vb" />
     <Compile Include="controllers\SifonLadeController.vb" />
     <Compile Include="formulieren\FormConfigsWijzigen.Designer.vb">
       <DependentUpon>FormConfigsWijzigen.vb</DependentUpon>
Index: TAOR rework/TAOR rework/databases/Cache/CacheMapper.vb
===================================================================
diff -u -r2068 -r2073
--- TAOR rework/TAOR rework/databases/Cache/CacheMapper.vb	(.../CacheMapper.vb)	(revision 2068)
+++ TAOR rework/TAOR rework/databases/Cache/CacheMapper.vb	(.../CacheMapper.vb)	(revision 2073)
@@ -416,7 +416,7 @@
         'Huidige datum registreren.
         Dim datum As String = Now.ToString("yyyy-MM-dd HH:mm:ss")
         'De query opbouwen.
-        Dim query As String = $"insert into APPS_Halux_Opvolging_ProductieStap_TAOR_dto.ProductieStapLogItem (BatchID, DossierCode, DueOut, IsRework, Kar, MachineID, Onderdeel, PartijID, ProductID, SequentieNummer, StapNummer, TijdstipCreatie, TijdstipProductie, ToeleveringID, VerwerkingID, ReworkReden, OorsprongID) values ('{rework.batch}', '{rework.dossierCode}', '{rework.DueOut}', '{rework.IsRework}', '{rework.kar}', '{rework.MachineID}', '{rework.OrigineelOnderdeel}', '{rework.PartijID}', '{rework.ProductID}', '{rework.SequentieNummer}', '{rework.StapNummer}', '{datum}', '{datum}' ,'{rework.ToeleveringID}', '{rework.barcode}', '{rework.reden}', '{Environ("computername")}')"
+        Dim query As String = $"insert into APPS_Halux_Opvolging_ProductieStap_TAOR_dto.ProductieStapLogItem (BatchID, DossierCode, DueOut, IsRework, Kar, MachineID, Onderdeel, PartijID, ProductID, SequentieNummer, StapNummer, TijdstipCreatie, TijdstipProductie, ToeleveringID, VerwerkingID, ReworkReden, OorsprongID) values ('{rework.batch}', '{rework.dossierCode}', '{rework.DueOut}', '{rework.IsRework}', '{rework.kar}', '{rework.MachineID}', '{rework.OrigineelOnderdeel}', '{rework.PartijID}', '{rework.ProductID}', '{rework.SequentieNummer}', '{rework.StapNummer}', '{datum}', '{datum}' ,'{rework.ToeleveringID}', '{rework.barcode}', '{rework.reden}', '{rework.OorsprongID}')"
         Try
             'Voer het commando uit.
             ExecuteCommand(query)