Index: DOM/common/enu/Bedrijf.cls.xml
===================================================================
diff -u
--- DOM/common/enu/Bedrijf.cls.xml (revision 0)
+++ DOM/common/enu/Bedrijf.cls.xml (revision 2048)
@@ -0,0 +1,31 @@
+
+
+
+datatype
+1
+%String
+0
+
+
+;VanHoecke;Halux
+
+
+
+;Van Hoecke;Halux
+
+
+
+1
+DOM.common.enu.Bedrijf
+
+
+
+
+1
+DOM.common.enu.Bedrijf
+
+
+
+
Index: DOM/ProdRes/dto/ReservatieVoorVerwachteInvoer.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/dto/ReservatieVoorVerwachteInvoer.cls.xml (revision 0)
+++ DOM/ProdRes/dto/ReservatieVoorVerwachteInvoer.cls.xml (revision 2048)
@@ -0,0 +1,25 @@
+
+
+
+1
+%RegisteredObject
+0
+
+
+DOM.ProdRes.dto.Reservatie
+
+
+
+%String
+
+
+
+%String
+
+
+
+DOM.common.enu.Bedrijf
+1
+
+
+
Index: DOM/ProdRes/enu/ReservatieFase.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/enu/ReservatieFase.cls.xml (revision 0)
+++ DOM/ProdRes/enu/ReservatieFase.cls.xml (revision 2048)
@@ -0,0 +1,31 @@
+
+
+
+datatype
+1
+%String
+0
+
+
+;InOrder;InUitvoering
+
+
+
+;In order,In uitvoering
+
+
+
+1
+DOM.ProdRes.enu.ReservatieFase
+
+
+
+
+1
+DOM.ProdRes.enu.ReservatieFase
+
+
+
+
Index: DOM/ProdRes/impl/VerwachteUitvoerImpl.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/impl/VerwachteUitvoerImpl.cls.xml (revision 0)
+++ DOM/ProdRes/impl/VerwachteUitvoerImpl.cls.xml (revision 2048)
@@ -0,0 +1,146 @@
+
+
+
+persistent
+1
+DOM.ProdRes.VerwachteUitvoer
+0
+
+
+DOM.ProdRes.Reservatie
+1
+
+
+
+DOM.common.enu.Bedrijf
+1
+
+
+
+%String
+1
+
+
+
+%String
+1
+
+
+
+bitmap
+Bedrijf
+
+
+
+TransactieReferentie
+
+
+
+TransactieLijnReferentie
+
+
+
+Bedrijf,TransactieReferentie,TransactieLijnReferentie
+1
+
+
+
+ReservatieVoorVerwachteInvoer:DOM.ProdRes.dto.ReservatieVoorVerwachteInvoer
+1
+1
+%Status
+
+
+
+
+DOM.common.enu.Bedrijf
+
+
+
+
+DOM.ProdRes.Reservatie
+
+
+
+
+%String
+
+
+
+
+%String
+
+
+
+
+Reservatie:DOM.ProdRes.dto.Reservatie
+1
+DOM.ProdRes.Reservatie
+
+
+
+
+1
+oid:%ObjectIdentity
+1
+%Status
+
+
+
+
+%Library.CacheStorage
+VerwachteUitvoerImplDefaultData
+
+listnode
+"VerwachteUitvoerImpl"
+
+Reservaties
+
+
+Reservatie
+
+
+Bedrijf
+
+
+TransactieLijnReferentie
+
+
+TransactieReferentie
+
+
+IsTransferOrder
+
+
+
+
+
Index: vhUnitTest/DOM/ProdRes/TestVerwachteUitvoerAPI.cls.xml
===================================================================
diff -u
--- vhUnitTest/DOM/ProdRes/TestVerwachteUitvoerAPI.cls.xml (revision 0)
+++ vhUnitTest/DOM/ProdRes/TestVerwachteUitvoerAPI.cls.xml (revision 2048)
@@ -0,0 +1,232 @@
+
+
+
+
+Do ##class(vhUnitTest.Manager).RunTest("/debug/display=all","DOM.ProdRes.TestVerwachteUitvoerAPI")
+1
+vhUnitTest.TestCase
+0
+
+
+
+
+
+
+0,"De dueout is ingesteld")
+ Do $$$AssertEquals(Reservatie1.GeefPrioriteitGroep(),##class(DOM.ProdRes.enu.PrioriteitGroep).Halux(),"De prioriteitsgroep")
+ Do $$$AssertTrue($Length(Reservatie1.GeefAangemaaktOp())>0,"De aanmaakdatum is ingevuld")
+ Do $$$AssertFalse(Reservatie1.IsTransferReservatie(),"Geen transferreservatie")
+ Do $$$AssertFalse(Reservatie1.IsLeaf,"De reservatie is geen blad")
+
+ Set ReservatieIterator = Reservatie1.GeefReservatieIterator()
+ Set Reservatie2 = ReservatieIterator.Next()
+ Do $$$AssertTrue($IsObject(Reservatie2),"De tweede reservatie werd opgeslagen")
+ Do $$$AssertEquals(Reservatie2.GeefProductID(),"Unittest product 2")
+ Do $$$AssertFalse(Reservatie2.IsLeaf,"De reservatie is geen blad")
+
+ Set Reservatie4 = ReservatieIterator.Next()
+ Do $$$AssertTrue($IsObject(Reservatie4),"De vierde reservatie werd opgeslagen")
+ Do $$$AssertEquals(Reservatie4.GeefProductID(),"Unittest product 4")
+ Do $$$AssertTrue(Reservatie4.IsLeaf,"De reservatie is een blad")
+
+ Set ReservatieIterator = Reservatie2.GeefReservatieIterator()
+ Set Reservatie3 = ReservatieIterator.Next()
+ Do $$$AssertTrue($IsObject(Reservatie3),"De derde reservatie werd opgeslagen")
+ Do $$$AssertEquals(Reservatie3.GeefProductID(),"Unittest product 3")
+ Do $$$AssertTrue(Reservatie3.IsLeaf,"De reservatie is een blad")
+
+ Set Reservaties = VerwachteUitvoerAPI.GeefReservatieSamenvatting(VerwachteUitvoer.%Id())
+
+ Do $$$AssertEquals(Reservaties.Count(),2,"Er zijn 2 'blad'reservaties")
+ Do $$$AssertEquals(Reservaties.GetAt(1).GeefProductID(),"Unittest product 4","De eerste echte fysieke reservatie")
+ Do $$$AssertEquals(Reservaties.GetAt(2).GeefProductID(),"Unittest product 3","De tweede echte fysieke reservatie")
+
+ Do VerwachteUitvoer.%DeleteId(VerwachteUitvoer.%Id())
+ Do Reservatie1.%DeleteId(Reservatie1.%Id())
+ Do Reservatie2.%DeleteId(Reservatie2.%Id())
+ Do Reservatie3.%DeleteId(Reservatie3.%Id())
+ Do Reservatie4.%DeleteId(Reservatie4.%Id())
+]]>
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+%Status
+
+
+
+
Index: DOM/ProdRes/impl/VerwachteUitvoerAPIimpl.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/impl/VerwachteUitvoerAPIimpl.cls.xml (revision 0)
+++ DOM/ProdRes/impl/VerwachteUitvoerAPIimpl.cls.xml (revision 2048)
@@ -0,0 +1,117 @@
+
+
+
+1
+DOM.ProdRes.VerwachteUitvoerAPI,%RegisteredObject
+0
+
+
+VerwachteUitvoerID:%String
+DOM.ProdRes.VerwachteUitvoer
+
+
+
+
+ReservatieVoorVerwachteInvoer:DOM.ProdRes.dto.ReservatieVoorVerwachteInvoer
+DOM.ProdRes.VerwachteUitvoer
+
+
+
+
+TransactieReferentie:%String,Bedrijf:DOM.common.enu.Bedrijf
+DOM.ProdRes.VerwachteUitvoeren
+
+
+
+
+TransactieReferentie:%String,TransactieLijnReferentie:%String,Bedrijf:DOM.common.enu.Bedrijf
+DOM.ProdRes.VerwachteUitvoer
+
+
+
+
+VerwachteUitvoerID:%String
+
+
+
+
+VerwachteUitvoerID:%String
+
+
+
+
+VerwachteUitvoerID:%String
+DOM.ProdRes.Reservaties
+
+
+
+
Index: DOM/PM/TBXProduct/impl/TBXBodemImpl.cls.xml
===================================================================
diff -u -r2022 -r2048
--- DOM/PM/TBXProduct/impl/TBXBodemImpl.cls.xml (.../TBXBodemImpl.cls.xml) (revision 2022)
+++ DOM/PM/TBXProduct/impl/TBXBodemImpl.cls.xml (.../TBXBodemImpl.cls.xml) (revision 2048)
@@ -20,7 +20,7 @@
%Boolean
-
Index: DOM/ProdRes/impl/ReservatieImpl.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/impl/ReservatieImpl.cls.xml (revision 0)
+++ DOM/ProdRes/impl/ReservatieImpl.cls.xml (revision 2048)
@@ -0,0 +1,224 @@
+
+
+
+persistent
+1
+DOM.ProdRes.Reservatie
+0
+
+
+DOM.ProdRes.VerwachteUitvoer
+1
+
+
+
+%String
+1
+
+
+
+%Integer
+1
+
+
+
+%TimeStamp
+1
+
+
+
+DOM.ProdRes.enu.PrioriteitGroep
+1
+
+
+
+DOM.ProdRes.enu.ReservatieFase
+1
+
+
+
+DOM.ProdRes.Reservatie
+list
+1
+
+
+
+%TimeStamp
+1
+
+
+
+%Boolean
+1
+
+
+
+
+Geeft aan of een reservatie een blad is in de boomstructuur van reservaties.
+Deze property moet niet worden gewijzigd van buitenaf.
+%Boolean
+
+
+
+bitmap
+IsLeaf
+
+
+
+VerwachteUitvoer
+
+
+
+VerwachteUitvoer:DOM.ProdRes.VerwachteUitvoer,ProductID:%String,Aantal:%Integer,DueOut:%TimeStamp,PrioriteitGroep:DOM.ProdRes.enu.PrioriteitGroep,IsTransferReservatie:%Boolean
+1
+1
+%Status
+
+
+
+
+%String
+
+
+
+
+%Boolean
+
+
+
+
+%Float
+
+
+
+
+Aantal:%Float
+
+
+
+
+TECH.Iterator
+
+
+
+
+DOM.ProdRes.VerwachteUitvoer
+
+
+
+
+DOM.ProdRes.enu.PrioriteitGroep
+
+
+
+
+%TimeStamp
+
+
+
+
+DOM.ProdRes.enu.ReservatieFase
+
+
+
+
+ReservatieFase:DOM.ProdRes.enu.ReservatieFase
+
+
+
+
+Reservatie:DOM.ProdRes.Reservatie
+
+
+
+
+%TimeStamp
+
+
+
+
+1
+oid:%ObjectIdentity
+1
+%Status
+
+
+
+
+%Library.CacheStorage
+ReservatieImplDefaultData
+
+listnode
+"ReservatieImpl"
+
+Aantal
+
+
+DueOut
+
+
+PrioriteitGroep
+
+
+ProductID
+
+
+VerwachteUitvoer
+
+
+ReservatieFase
+
+
+Reservaties
+
+
+AangemaaktOp
+
+
+IsTransferReservatie
+
+
+IsLeaf
+
+
+
+
+
Index: DOM/ProdRes/VerwachteUitvoer.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/VerwachteUitvoer.cls.xml (revision 0)
+++ DOM/ProdRes/VerwachteUitvoer.cls.xml (revision 2048)
@@ -0,0 +1,50 @@
+
+
+
+persistent
+1
+%Persistent
+0
+
+
+1
+%String
+
+
+
+1
+%String
+
+
+
+1
+DOM.common.enu.Bedrijf
+
+
+
+1
+DOM.ProdRes.VerwachteInvoer
+
+
+
+1
+DOM.ProdRes.Reservatie
+
+
+
+%Library.CacheStorage
+^DOM.ProdRes.VerwachteUitvoerD
+VerwachteUitvoerDefaultData
+^DOM.ProdRes.VerwachteUitvoerD
+^DOM.ProdRes.VerwachteUitvoerI
+^DOM.ProdRes.VerwachteUitvoerS
+
+listnode
+
+
+%%CLASSNAME
+
+
+
+
+
Index: DOM/ProdRes/Reservatie.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/Reservatie.cls.xml (revision 0)
+++ DOM/ProdRes/Reservatie.cls.xml (revision 2048)
@@ -0,0 +1,85 @@
+
+
+
+persistent
+1
+%Persistent
+0
+
+
+1
+%String
+
+
+
+1
+DOM.ProdRes.enu.ReservatieFase
+
+
+
+1
+ReservatieFase:DOM.ProdRes.enu.ReservatieFase
+
+
+
+1
+%Float
+
+
+
+1
+Aantal:%Float
+
+
+
+1
+%TimeStamp
+
+
+
+1
+DOM.ProdRes.enu.PrioriteitGroep
+
+
+
+1
+%TimeStamp
+
+
+
+1
+DOM.ProdRes.enu.InvoerUitvoerLinkStatus
+
+
+
+1
+%Boolean
+
+
+
+1
+DOM.ProdRes.VerwachteUitvoer
+
+
+
+1
+TECH.Iterator
+
+
+
+%Library.CacheStorage
+^DOM.ProdRes.ReservatieD
+ReservatieDefaultData
+^DOM.ProdRes.ReservatieD
+^DOM.ProdRes.ReservatieI
+^DOM.ProdRes.ReservatieS
+
+listnode
+
+
+%%CLASSNAME
+
+
+
+
+
Index: DOM/ProdRes/Reservaties.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/Reservaties.cls.xml (revision 0)
+++ DOM/ProdRes/Reservaties.cls.xml (revision 2048)
@@ -0,0 +1,17 @@
+
+
+
+serial
+1
+%ListOfObjects
+0
+
+
+DOM.ProdRes.Reservatie
+
+
+
+%Library.CompleteCustomStorage
+
+
+
Index: DOM/DomeinContext.cls.xml
===================================================================
diff -u -r2021 -r2048
--- DOM/DomeinContext.cls.xml (.../DomeinContext.cls.xml) (revision 2021)
+++ DOM/DomeinContext.cls.xml (.../DomeinContext.cls.xml) (revision 2048)
@@ -50,6 +50,11 @@
1
+
+TECH.Stack
+1
+
+
DOM.OV.OrderAPI
1
@@ -90,6 +95,11 @@
1
+
+DOM.ProdRes.VerwachteUitvoerAPI
+1
+
+
1
DOM.DomeinContext
@@ -114,6 +124,7 @@
Set ..VerkoopPrijsAPINamen = ##class(TECH.Stack).%New()
Set ..VKPPrijsUitzAPINamen = ##class(TECH.Stack).%New()
Set ..IngegevenKenmerkenAPINamen = ##class(TECH.Stack).%New()
+ Set ..VerwachteUitvoerAPINamen = ##class(TECH.Stack).%New()
// Initialize the stacks
Do ..Reset()
Quit $$$OK
@@ -216,6 +227,18 @@
]]>
+
+DOM.ProdRes.VerwachteUitvoerAPI
+
+
+
@@ -287,6 +311,14 @@
]]>
+
+%String
+
+
+
Naam:%String
+
+
+Naam:%String
+
+
Index: DOM/ProdRes/VerwachteUitvoerAPI.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/VerwachteUitvoerAPI.cls.xml (revision 0)
+++ DOM/ProdRes/VerwachteUitvoerAPI.cls.xml (revision 2048)
@@ -0,0 +1,61 @@
+
+
+
+1
+1
+0
+
+
+
+Gaat zelf na of een ID bestaat en gooit een exceptie indien dit niet het geval is
+1
+VerwachteUitvoerID:%String
+DOM.ProdRes.VerwachteUitvoer
+
+
+
+
+Bewaart zelf het object dat wordt teruggegeven. Gooit een exceptie indien dit faalt.
+1
+ReservatieVoorVerwachteInvoer:DOM.ProdRes.dto.ReservatieVoorVerwachteInvoer
+DOM.ProdRes.VerwachteUitvoer
+
+
+
+1
+TransactieReferentie:%String,Bedrijf:DOM.common.enu.Bedrijf
+DOM.ProdRes.VerwachteUitvoeren
+
+
+
+
+Gooit een exceptie indien meerdere resultaten werden gevonden.
+1
+TransactieReferentie:%String,TransactieLijnReferentie:%String,Bedrijf:DOM.common.enu.Bedrijf
+DOM.ProdRes.VerwachteUitvoer
+
+
+
+
+Gooit een error indien de uitvoer niet kan worden geannuleerd
+1
+VerwachteUitvoerID:%String
+
+
+
+
+Gooit een error indien de uitvoer niet kan worden gewist
+1
+VerwachteUitvoerID:%String
+
+
+
+
+Geeft een lijst van de basisreservaties die fysiek moeten uitgevoerd worden.
+Dit komt neer op alle halffabrikaten van een moederproduct.
+1
+VerwachteUitvoerID:%String
+DOM.ProdRes.Reservaties
+
+
+
Index: DOM/ProdRes/VerwachteInvoer.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/VerwachteInvoer.cls.xml (revision 0)
+++ DOM/ProdRes/VerwachteInvoer.cls.xml (revision 2048)
@@ -0,0 +1,30 @@
+
+
+
+persistent
+1
+%Persistent
+0
+
+
+1
+DOM.ProdRes.VerwachteUitvoer
+
+
+
+%Library.CacheStorage
+^DOM.ProdRes.VerwachteInvoerD
+VerwachteInvoerDefaultData
+^DOM.ProdRes.VerwachteInvoerD
+^DOM.ProdRes.VerwachteInvoerI
+^DOM.ProdRes.VerwachteInvoerS
+
+listnode
+
+
+%%CLASSNAME
+
+
+
+
+
Index: DOM/ProdRes/dto/Reservatie.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/dto/Reservatie.cls.xml (revision 0)
+++ DOM/ProdRes/dto/Reservatie.cls.xml (revision 2048)
@@ -0,0 +1,41 @@
+
+
+
+1
+%RegisteredObject
+0
+
+
+%String
+1
+
+
+
+%TimeStamp
+1
+
+
+
+%Integer
+1
+
+
+
+DOM.ProdRes.enu.PrioriteitGroep
+1
+
+
+
+
+Bij een transferorder is het belangrijk deze property in te schakelen.
+Dit voorkomt dubbele reservatietellingen wanneer reservaties over verschillende bedrijven verlopen.
+%Boolean
+1
+
+
+
+DOM.ProdRes.dto.Reservatie
+list
+
+
+
Index: DOM/ProdRes/VerwachteInvoerAPI.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/VerwachteInvoerAPI.cls.xml (revision 0)
+++ DOM/ProdRes/VerwachteInvoerAPI.cls.xml (revision 2048)
@@ -0,0 +1,9 @@
+
+
+
+
+
+1
+1
+
+
Index: DOM/ProdRes/enu/PrioriteitGroep.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/enu/PrioriteitGroep.cls.xml (revision 0)
+++ DOM/ProdRes/enu/PrioriteitGroep.cls.xml (revision 2048)
@@ -0,0 +1,34 @@
+
+
+
+datatype
+1
+%String
+0
+
+
+;Halux;Industrie;KS
+
+
+
+1
+DOM.ProdRes.enu.PrioriteitGroep
+
+
+
+
+1
+DOM.ProdRes.enu.PrioriteitGroep
+
+
+
+
+1
+DOM.ProdRes.enu.PrioriteitGroep
+
+
+
+
Index: DOM/ProdRes/VerwachteUitvoeren.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/VerwachteUitvoeren.cls.xml (revision 0)
+++ DOM/ProdRes/VerwachteUitvoeren.cls.xml (revision 2048)
@@ -0,0 +1,17 @@
+
+
+
+serial
+1
+%ListOfObjects
+0
+
+
+DOM.ProdRes.VerwachteUitvoer
+
+
+
+%Library.CompleteCustomStorage
+
+
+
Index: DOM/ProdRes/enu/InvoerUitvoerLinkStatus.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/enu/InvoerUitvoerLinkStatus.cls.xml (revision 0)
+++ DOM/ProdRes/enu/InvoerUitvoerLinkStatus.cls.xml (revision 2048)
@@ -0,0 +1,34 @@
+
+
+
+datatype
+1
+%String
+0
+
+
+;Geen;Wachtend;Voldaan
+
+
+
+1
+DOM.ProdRes.enu.InvoerUitvoerLinkStatus
+
+
+
+
+1
+DOM.ProdRes.enu.InvoerUitvoerLinkStatus
+
+
+
+
+1
+DOM.ProdRes.enu.InvoerUitvoerLinkStatus
+
+
+
+
Index: CSC Reservaties.prj.xml
===================================================================
diff -u
--- CSC Reservaties.prj.xml (revision 0)
+++ CSC Reservaties.prj.xml (revision 2048)
@@ -0,0 +1,25 @@
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+