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