Index: ActiviteitenOpvolging/ProductiePitching/KCA-W10_DynamicConfigs.txt =================================================================== diff -u -r1787 -r1790 --- ActiviteitenOpvolging/ProductiePitching/KCA-W10_DynamicConfigs.txt (.../KCA-W10_DynamicConfigs.txt) (revision 1787) +++ ActiviteitenOpvolging/ProductiePitching/KCA-W10_DynamicConfigs.txt (.../KCA-W10_DynamicConfigs.txt) (revision 1790) @@ -1,35 +1,45 @@ % Zichtbare naam van de applicatie (Voormontage, Matten, Karton, Zijkanten, Onderdelen, ...) -AppName=Voormontage +AppName=Lijnen LBX&TBX % Gebruikt voor webservice (Voormontage, Matten, Karton, Zijkanten, Onderdelen, ...) -AppID=Voormontage LBX&TBX +AppID=Lijnen LBX&TBX % Grootte scherm van de applicatie breedte x hoogte (in pixels) AppDimension=1280x1024 % Aantal grids -NumberOfGrids=2 +NumberOfGrids=4 % Zichtbare naam voor grid 1 tot AantalGrid -GridLabel1=Lijn -GridLabel2=Klantorder +GridLabel1=Lijn 1 +GridLabel2=Lijn 2 +GridLabel3=Lijn 3 +GridLabel4=Lijn 4 % Afmetingen grids breedte x hoogte (in pixels) -DimensionsGrid1=725x550 -DimensionsGrid2=500x550 +DimensionsGrid1=300x550 +DimensionsGrid2=300x550 +DimensionsGrid3=300x550 +DimensionsGrid4=300x550 % Kolom header namen voor elke grid. '-' betekent onzichtbaar. % De kolommen zijn: Batch, DueOut, Product, Naar, Opmerking -ColumnHeaderGrid1=Batch,DueOut,Product,Naar,- -ColumnHeaderGrid2=Batch,Tijd,Product,Naar,- +ColumnHeaderGrid1=Batch,DueOut,Product,-,- +ColumnHeaderGrid2=Batch,Tijd,-,-,- +ColumnHeaderGrid3=Batch,Tijd,-,-,- +ColumnHeaderGrid4=Batch,Tijd,-,-,- % Aantal activiteiten per grid -NumberOfActivitiesGrid1=5 -NumberOfActivitiesGrid2=2 +NumberOfActivitiesGrid1=1 +NumberOfActivitiesGrid2=1 +NumberOfActivitiesGrid3=1 +NumberOfActivitiesGrid4=1 % Definitie van de SQL query voor grid 1 tot AantalGrid -SQL1=SQL1 -SQL2=SQL2 +SQL1=LIJN1 +SQL2=LIJN2 +SQL3=LIJN3 +SQL4=LIJN4 % Aantal gebruikers die acties kunnen uitvoeren -NumberOfEmployees=2 \ No newline at end of file +NumberOfEmployees=0 \ No newline at end of file Index: ActiviteitenOpvolging/ProductiePitching/mappers/CacheMapper.vb =================================================================== diff -u -r1785 -r1790 --- ActiviteitenOpvolging/ProductiePitching/mappers/CacheMapper.vb (.../CacheMapper.vb) (revision 1785) +++ ActiviteitenOpvolging/ProductiePitching/mappers/CacheMapper.vb (.../CacheMapper.vb) (revision 1790) @@ -170,14 +170,7 @@ If (.QuantityToProduce > 0) Then stateValue = ActivityStateEnumMapper.GetActivityStateFromLetter(ExtractItemFromDataReader(Of Char)(dr, $"Status_{i}")) If (employee Is Nothing) Then - employee = New Employee() - With employee - .FirstName = "VH" - .LastName = "Automation" - .PersonelNumber = 0 - .Number = 0 - .Initials = "" - End With + employee = DummyEmployee() End If End If .State = ConvertEnumValueToActivityState(stateValue, activity, employee) @@ -190,6 +183,18 @@ Return activities End Function + Private Function DummyEmployee() As Employee + Dim dummy As Employee = New Employee() + With dummy + .FirstName = "VH" + .LastName = "Automation" + .PersonelNumber = 0 + .Number = 0 + .Initials = "" + End With + Return dummy + End Function + ''' ''' Get the correct amount of activities. '''