Index: AXimpl/Utils.cls.xml =================================================================== diff -u -r46302 -r46306 --- AXimpl/Utils.cls.xml (.../Utils.cls.xml) (revision 46302) +++ AXimpl/Utils.cls.xml (.../Utils.cls.xml) (revision 46306) @@ -235,7 +235,7 @@ #dim HoofdGroepBevatTA As %Boolean = ##class(TECH.StringUtils).Contains(HoofdGroep,"TA") #dim SubGroepBevatCAT As %Boolean = ##class(TECH.StringUtils).Contains(SubGroep,"CAT") #dim ScanType As %String = Product.Basis.ScanType - #dim SubGroepLaatsteDrieKarakters As %String = $Extract(SubGroep,$Length(SubGroep)-2,$Length(SubGroep)) + #dim SubGroepLaatsteDrieKarakters As %String = $Extract(SubGroep,$Length(SubGroep)-3,$Length(SubGroep)-1) // SubGroep eindigt met een spatie #dim VoorraadInstelling As AX.Uitgaand.PM.VrijgegProduct.impl.VoorraadInstelling = ..VoorraadInstellingCalculator.Calculate(Product.BasisGetObjectId()) #dim LeveringsDagen As %Integer = $$$If(ScanType="L",6,$$$If(VoorraadInstelling.LeveringsDagen=5,6,VoorraadInstelling.LeveringsDagen)) // Voor Logsteuer hardcoded op 6 en sowieso 5 ook op 6 zetten volgens sprint 12 analyse #dim Exceptiestring As %String = "Voor product "_Product.BasisGetObjectId()_" zijn er meer dan 99 LeveringsDagen berekend, nml.: "_LeveringsDagen