persistent vhLib.Macro 0 DataM %Library.Persistent %Integer 26 Uniekheid index voor property ProductNr 1 ProductNr 1 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 26 %Library.String 0 0 0 0 0 0 0 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 0 0 0 0 0 0 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 26 %Library.String 0 0 0 0 0 0 0 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 0 0 0 0 0 0 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 26 %Library.String 0 0 0 0 0 0 0 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 0 0 0 0 0 0 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 26 %Library.String 0 0 0 0 0 0 0 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 0 0 0 0 0 0 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 Format: String: 44 %Library.String 0 %Library.Integer 0 Omschrijving Taal = "BR" -> Bestelreferentie]]> Taal:%String="N",Sep:%String %String Opgelet : Het eerste gedeelte kan langer zijn dan 26 characters indien er een kleur aanwezig is. De kleur wordt toegevoefd vanaf 45 tot 26, als kleur langer is wordt geprobeerd die naar voor op te schuiven. Indien langer, wordt de kleurnaam afgekapt als er geen plaats meer is. Taal:%String="N",Sep:%String %String 45 { Set Kleur = " "_$Extract(Kleur,0,(45-..#LengteEersteDeelLangtekst+1)) } Set $Piece(Omschrijving,Sep,1) = ##class(TECH.StringUtils).AddTrailingSpace(OmschrijvingDeel,(45-$Length(Kleur)-1))_Kleur Quit Omschrijving ]]> 1 %Integer 1 PRNr:%String,Taal:DOM.enu.Taal 1 DOM.PM.impl.ProductLangtekst Omschrijving Taal = BR -> Bestelreferentie Array via .Local]]> Taal:%String="N",Array:%String,Sep:%String Omschrijving Taal = "BR" -> Bestelreferentie MetKleurEnFSC : toevoegen van de kleur en/of FSCCode aan de Omsc, 1 = Kleur, 2 = FSCCode, 3 = Kleur en FSCCode]]> 1 PRNr:%Integer,Taal:%String="N",Sep:%String,MetKleurEnFSC:%Integer %String Omschrijving Taal = BR -> Bestelreferentie Array via .Local doorgeven MetKleurEnFSC : toevoegen van de kleur en/of FSCCode aan de Omsc, 1 = Kleur, 2 = FSCCode, 3 = Kleur en FSCCode UseTaalOrDFL : indien de omsch leeg is voor de gevraagde taal, dan omsch ophalen via Default taal.]]> 1 1 Array:%String,Sep:%String Taal:%String="N" %String %CacheSQLStorage ^Prod.ProductBasisS data ^KPR delimited {ProductNr} 0.1 "\" 4 1 "\" 4 7 "\" 4 8 "\" 4 9 "\" 4 10 "\" 5 4 "\" 5 5 "\" 5 6 "\" 5 7 "\" 5 8 "\" 5 9 "\" 4 2 "\" 5 10 "\" 4 3 "\" 5 1 "\" 5 2 "\" 5 3 "\" 4 4 "\" 4 5 "\" 4 6 "\" 2 2 "\" 10 8 "\" 10 9 "\" 10 10 "\" 11 1 "\" 11 2 "\" 11 3 "\" 11 4 "\" 11 5 "\" 11 6 "\" 11 7 "\" 3 23 "\" 11 8 "\" 11 9 "\" 11 10 "\" 10 1 "\" 10 2 "\" 10 3 "\" 10 4 "\" 10 5 "\" 10 6 "\" 10 7 "\" 2 1 "\" 12 8 "\" 12 9 "\" 12 10 "\" 13 1 "\" 13 2 "\" 13 3 "\" 13 4 "\" 13 5 "\" 13 6 "\" 13 7 "\" 3 22 "\" 13 8 "\" 13 9 "\" 13 10 "\" 12 1 "\" 12 2 "\" 12 3 "\" 12 4 "\" 12 5 "\" 12 6 "\" 12 7 "\" 1 22 "\" 8 8 "\" 8 9 "\" 8 10 "\" 9 1 "\" 9 2 "\" 9 3 "\" 9 4 "\" 9 5 "\" 9 6 "\" 9 7 "\" 3 21 "\" 9 8 "\" 9 9 "\" 9 10 "\" 8 1 "\" 8 2 "\" 8 3 "\" 8 4 "\" 8 5 "\" 8 6 "\" 8 7 "\" 0 2 "\" 6 8 "\" 6 9 "\" 6 10 "\" 7 1 "\" 7 2 "\" 7 3 "\" 7 4 "\" 7 5 "\" 7 6 "\" 7 7 "\" 0 11 "\" 7 8 "\" 7 9 "\" 7 10 "\" 6 1 "\" 6 2 "\" 6 3 "\" 6 4 "\" 6 5 "\" 6 6 "\" 6 7