Index: APPS/Halux/Opvolging/ProductieStap/TAOR/impl/ProductieZijkantFrees.cls.xml =================================================================== diff -u --- APPS/Halux/Opvolging/ProductieStap/TAOR/impl/ProductieZijkantFrees.cls.xml (revision 0) +++ APPS/Halux/Opvolging/ProductieStap/TAOR/impl/ProductieZijkantFrees.cls.xml (revision 39903) @@ -0,0 +1,101 @@ + + + +vhLib.Macro +APPS.Halux.Opvolging.ProductieStap.TAOR.impl.ProductieStapLogger + + +APPS.Halux.Opvolging.ProductieStap.TAOR.dto.ProductieStapLogItem + + + +APPS.Halux.Opvolging.ProductieStap.TAOR.dto.ProductieStapLogItem + + + +APPS.Halux.Opvolging.ProductieStap.TAOR.enu.Machines + + + +%TimeStamp + + + +%TimeStamp + + + +%Status + + + + + +Do ##class(APPS.Halux.Opvolging.ProductieStap.TAOR.impl.ProductieZijkantFrees).%New().VerwerkRecente() +..VanafTijdstip ..VanafTijdstip=..ZijkantFreesTijdstip + } +]]> + + + +1 +? ") + Set sc=rs.Execute(..VanafTijdstip) + Set it=##class(TECH.ResultSetIterator).%New(rs) + Quit it +]]> + + + +1 + + + + + +vermits de SQL verwerking maar om de X minuten wordt uitgevoerd met er getest worden of er reeds andere triggers zijn uitgevoerd (rework of +1 + + + + + + + +1 + + + + + + Index: APPS/Halux/Opvolging/ProductieStap/TAOR/impl/ProductieStapLogger.cls.xml =================================================================== diff -u -r39872 -r39903 --- APPS/Halux/Opvolging/ProductieStap/TAOR/impl/ProductieStapLogger.cls.xml (.../ProductieStapLogger.cls.xml) (revision 39872) +++ APPS/Halux/Opvolging/ProductieStap/TAOR/impl/ProductieStapLogger.cls.xml (.../ProductieStapLogger.cls.xml) (revision 39903) @@ -57,6 +57,7 @@ 1 @@ -65,8 +66,11 @@ 1 Index: APPS/Halux/Opvolging/ProductieStap/TAOR/enu/Machines.cls.xml =================================================================== diff -u -r39872 -r39903 --- APPS/Halux/Opvolging/ProductieStap/TAOR/enu/Machines.cls.xml (.../Machines.cls.xml) (revision 39872) +++ APPS/Halux/Opvolging/ProductieStap/TAOR/enu/Machines.cls.xml (.../Machines.cls.xml) (revision 39903) @@ -36,6 +36,20 @@ + + +1 +APPS.Halux.Opvolging.ProductieStap.TAOR.enu.Machines + + + + +1 +APPS.Halux.Opvolging.ProductieStap.TAOR.enu.Machines + + Index: APPS/Halux/Opvolging/ProductieStap/TAOR/impl/CopieerBatch.cls.xml =================================================================== diff -u -r39872 -r39903 --- APPS/Halux/Opvolging/ProductieStap/TAOR/impl/CopieerBatch.cls.xml (.../CopieerBatch.cls.xml) (revision 39872) +++ APPS/Halux/Opvolging/ProductieStap/TAOR/impl/CopieerBatch.cls.xml (.../CopieerBatch.cls.xml) (revision 39903) @@ -109,7 +109,7 @@ Set rs=it.Next() Set ID=rs.Data("ID") } - w ..LogItem.VerwerkingID," ",ID,! + ;w ..LogItem.VerwerkingID," ",ID,! Quit ID'="" ]]> Index: APPS/Halux/Opvolging/ProductieStap/impl/StatusOpvragen.cls.xml =================================================================== diff -u -r39872 -r39903 --- APPS/Halux/Opvolging/ProductieStap/impl/StatusOpvragen.cls.xml (.../StatusOpvragen.cls.xml) (revision 39872) +++ APPS/Halux/Opvolging/ProductieStap/impl/StatusOpvragen.cls.xml (.../StatusOpvragen.cls.xml) (revision 39903) @@ -11,20 +11,17 @@ %SQLQuery BatchId:%String -select ui.BatchID, klant.Naam,ui.ToeleveringID, ui.DossierCode, ui.VerwerkingID, TijdstipCreatie,machineID,StapNummer -, Onderdeel,Kar,log.DueOut from APPS_Halux_PPS_Activiteit_impl_TAOR_dto.OpdeelzaagUitvoeringInfo UI -left join APPS_Halux_Opvolging_ProductieStap_TAOR_dto.ProductieStapLogItem log on ui.batchId=log.batchID and ui.verwerkingId=log.verwerkingID and log.laatsttoegevoegd=1 -join Derde_Klant.Klant klant on $Piece(ui.PartijID,'||',2)=klant.ID -where ui.batchid=? +select BatchID, ToeleveringID, Klant.naam,VerwerkingID, Onderdeel,TijdstipCreatie, MachineID,StapNummer,HerwerkAantal , LaatstToegevoegd,Kar,DueOut from APPS_Halux_Opvolging_ProductieStap_TAOR_dto.ProductieStapLogItem log +join Derde_Klant.Klant klant on $Piece(log.PartijID,'||',2)=klant.ID +where log.batchid=? %SQLQuery ToeLeveringID:%String - select ui.BatchID, klant.Naam,ui.ToeleveringID, ui.DossierCode, ui.VerwerkingID, TijdstipCreatie,machineID from APPS_Halux_PPS_Activiteit_impl_TAOR_dto.OpdeelzaagUitvoeringInfo UI - left join APPS_Halux_Opvolging_ProductieStap_TAOR_dto.ProductieStapLogItem log on ui.batchId=log.batchID and ui.verwerkingId=log.verwerkingID and log.laatsttoegevoegd=1 - join Derde_Klant.Klant klant on $Piece(ui.PartijID,'||',2)=klant.ID - where ui.ToeleveringId=? +select BatchID, ToeleveringID, Klant.naam,VerwerkingID, Onderdeel,TijdstipCreatie, MachineID,StapNummer,HerwerkAantal , LaatstToegevoegd,Kar,DueOut from APPS_Halux_Opvolging_ProductieStap_TAOR_dto.ProductieStapLogItem log +join Derde_Klant.Klant klant on $Piece(log.PartijID,'||',2)=klant.ID +where log.toelevering=? Index: WSimpl/Halux/PPS/ProductieStap/LoggerService.cls.xml =================================================================== diff -u -r39872 -r39903 --- WSimpl/Halux/PPS/ProductieStap/LoggerService.cls.xml (.../LoggerService.cls.xml) (revision 39872) +++ WSimpl/Halux/PPS/ProductieStap/LoggerService.cls.xml (.../LoggerService.cls.xml) (revision 39903) @@ -77,11 +77,11 @@ d ##class(WSimpl.Halux.PPS.ProductieStap.LoggerService).test() 1 Index: APPS/Halux/Opvolging/ProductieStap/TAOR/enu/StapNummer.cls.xml =================================================================== diff -u -r39872 -r39903 --- APPS/Halux/Opvolging/ProductieStap/TAOR/enu/StapNummer.cls.xml (.../StapNummer.cls.xml) (revision 39872) +++ APPS/Halux/Opvolging/ProductieStap/TAOR/enu/StapNummer.cls.xml (.../StapNummer.cls.xml) (revision 39903) @@ -5,10 +5,10 @@ TAOR productie machines datatype 1 -%String +%Integer -,0,1,8,9 +,0,1,2,3,4,5,6,7,8,9 @@ -32,6 +32,13 @@ ]]> + +1 +APPS.Halux.Opvolging.ProductieStap.TAOR.enu.Onderdeel + + + 1 APPS.Halux.Opvolging.ProductieStap.TAOR.enu.Onderdeel Index: APPS/Halux/Machine/ZijkantFrees/data/ZijkantFreesHistoriekRemote.cls.xml =================================================================== diff -u --- APPS/Halux/Machine/ZijkantFrees/data/ZijkantFreesHistoriekRemote.cls.xml (revision 0) +++ APPS/Halux/Machine/ZijkantFrees/data/ZijkantFreesHistoriekRemote.cls.xml (revision 39903) @@ -0,0 +1,332 @@ + + + +persistent +0 +1 +ZijkantFreesHistoriekRemote +GSQLStorage +%Library.Persistent + + +BIESSE_KAMERFREES,NOCREATE + + + +dbo.History + + + +%String +12 +BatchID + + + + + + +%String +15 +Color + + + + + + +%TimeStamp +10 +DropTimeStamp + + + + + +%String +7 +FeedbackERP + + + + + + +%TimeStamp +11 +InsertTimeStamp + + + + + +%String +1 +6 +LeftRight + + + + + + +%TimeStamp +9 +MillingTimeStamp + + + + + +%Float +1 +18 +NettoHeight + + + + + +%Float +1 +17 +NettoLength + + + + + +%Float +1 +20 +OversizeHeight + + + + + +%Float +1 +19 +OversizeLength + + + + + +%String +1 +4 +PalletID + + + + + + +%String +16 +PickListID + + + + + + +%String +1 +3 +PickPlace + + + + + + +%SmallInt +1 +2 +PickSequence + + + + + + + +%TimeStamp +8 +PickTimeStamp + + + + + +%String +25 +PrintBarcodeLeft + + + + + + +%String +26 +PrintBarcodeRight + + + + + + +%String +27 +PrintTextLeft1 + + + + + + +%String +28 +PrintTextLeft2 + + + + + + +%String +29 +PrintTextLeft3 + + + + + + +%String +33 +PrintTextLeft4 + + + + + + +%String +30 +PrintTextRight1 + + + + + + +%String +31 +PrintTextRight2 + + + + + + +%String +32 +PrintTextRight3 + + + + + + +%String +34 +PrintTextRight4 + + + + + + +%String +14 +ProductCode + + + + + + +%String +21 +ProgramLeftInner + + + + + + +%String +22 +ProgramLeftOuter + + + + + + +%String +23 +ProgramRightInner + + + + + + +%String +24 +ProgramRightOuter + + + + + + +%String +13 +SequenceNbr + + + + + + +%SmallInt +1 +5 +SlotNbr + + + + + + + +1 +1 +PalletID,SlotNbr + + + +%CacheSQLStorage +^APPS.HaluxDED.ZijkantFreeD2ABS + + + + +