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 @@ + + + + + + + + + + + + + + + + + + + + + + + + +