Index: APPS/VisiDot/impl/Tech.cls.xml =================================================================== diff -u -r57606 -r57638 --- APPS/VisiDot/impl/Tech.cls.xml (.../Tech.cls.xml) (revision 57606) +++ APPS/VisiDot/impl/Tech.cls.xml (.../Tech.cls.xml) (revision 57638) @@ -117,12 +117,8 @@ // Als BatchId de 100000 overschrijdt, dan het Honderdduizendtal afsplitsen, en op positie 9 van de LadeID invoegen. // Dit om backward compatibel te blijven met de huidige LadeIDs. - #dim BatchVanMax5cijfers As %Integer = Batch - #dim BatchHonderdduizendtal As %Integer = 0 - If Batch > (..#Honderdduizend - 1) { - Set BatchHonderdduizendtal = (Batch \ ..#Honderdduizend) - Set BatchVanMax5cijfers = (Batch # ..#Honderdduizend) - } + #dim BatchVanMax5cijfers As %Integer = (Batch # ..#Honderdduizend) + #dim BatchHonderdduizendtal As %Integer = (Batch \ ..#Honderdduizend) Quit ..Justify(BatchVanMax5cijfers,5)_..Justify(VHossSeqNr,2)_..Justify(VHossZijkant,1)_..Justify(BatchHonderdduizendtal,1)_..Justify(Product,7) ]]>