Index: APPS/Halux/Planning/impl/BatchService.cls.xml =================================================================== diff -u -r29059 -r30702 --- APPS/Halux/Planning/impl/BatchService.cls.xml (.../BatchService.cls.xml) (revision 29059) +++ APPS/Halux/Planning/impl/BatchService.cls.xml (.../BatchService.cls.xml) (revision 30702) @@ -181,32 +181,19 @@ Set ProductieService = ##class(APPS.Halux.common.ProductieService).%New() #dim Categorie As APPS.Halux.common.enu.Categorie = ProductieService.GeefCategorieVoorToelevering(Toelevering) #dim Lijnen As list of %String = ..GeefProductieLijnNamen(Categorie) - If (Lijnen.Count() = 1) - { + If (Lijnen.Count() = 1) { Set Lijn = Lijnen.GetAt(1) - } - ElseIf ( - (Categorie = ##class(APPS.Halux.common.enu.Categorie).Tandembox()) - || (Categorie = ##class(APPS.Halux.common.enu.Categorie).Legrabox()) - || (Categorie = ##class(APPS.Halux.common.enu.Categorie).TAORbox()) - ) - { + } ElseIf ##class(TECH.StringUtils).Equals(Categorie,##class(APPS.Halux.common.enu.Categorie).Tandembox(),##class(APPS.Halux.common.enu.Categorie).Legrabox(),##class(APPS.Halux.common.enu.Categorie).TAORbox()) { #dim ProductLijn As DOM.AKP.ProductToeleveringLijn = Toelevering.GeefTypeToeleveringLijnIterator(##class(DOM.AKP.enu.ToeleveringLijnType).Product()).Next() #dim ProductieGroep As APPS.Halux.common.enu.ProductieGroep = ProductieService.GeefProductieGroep(Toelevering.GeefKlantID(), ProductLijn.GeefProductID()) - - If ( - (ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Stuk()) - || (ProductieGroep = ##class(APPS.Halux.common.enu.ProductieGroep).Kast()) - ) - { + If ##class(TECH.StringUtils).Equals(ProductieGroep,##class(APPS.Halux.common.enu.ProductieGroep).Stuk(),##class(APPS.Halux.common.enu.ProductieGroep).Kast()) { Set Lijn = ##class(APPS.Halux.common.enu.ProductieLijn).Een() - } - Else - { + } Else { Set Lijn = ##class(APPS.Halux.common.enu.ProductieLijn).Twee() } } - Quit Lijn + + quit Lijn ]]>