persistent 0 DataM %Library.Persistent 0 1 0 Leverancier,ToeleveringNr,LijnNr 1 Het bijhouden van dit lijnnummer is nodig voor de opleiding in backorders van een bepaalde orderlijn. Dit veld wordt ingevuld tijdens de overdracht van de Toeleveringslijst van BLUM Waarde: copy van CIPOSN %Library.String 0 0 0 0 0 0 0 0 Format: Numeric:6 %Library.Integer 0 0 0 0 0 0 0 0 %Library.Integer 0 0 0 0 0 0 0 0 Format: Char: 8 Waarde KTRPL: Productlijn KTO11: Tekstlijn %Library.String 0 0 0 0 0 0 0 0 Format: 12,2 BrutoPrijs per grootteorde %Library.Float 0 0 0 0 0 0 0 0 E,H,M %Library.String 0 0 0 0 0 0 0 0 Flow.Toelev.Hoofding 0 0 0 0 0 0 0 1 Korting 1 # Korting 2 %Library.String 0 0 0 0 0 0 0 0 Derde.Lev.Lev 0 0 0 0 0 0 0 0 Format: Char: 1 %Library.String 0 0 0 0 0 0 0 0 Format: WW/JJ %String 0 0 0 0 0 0 0 0 %Date 1 Set {*}=##class(Flow.Toelev.Lijn).VoorzieneLeveringsDatumCalc({Leverancier},{ToeleveringNr},{LijnNr}) 1 %String 0 0 0 0 0 0 0 0 %Library.Numeric 0 0 0 0 0 0 0 0 Uniek nummer dat doorgegeven wordt aan BLUM %Library.Numeric 0 0 0 0 0 0 0 0 Format: Numeric: 12,2 %Library.Float 0 0 0 0 0 0 0 0 Format: Char: 3 Res.Munt 0 0 0 0 0 0 0 0 Res.Munt 0 0 0 0 0 0 0 1 Format: Numeric: 12,2 %Library.Float 0 0 0 0 0 0 0 0 Format: Char: 40 Bij manuele lijn = korttekst van 25 char %Library.String 0 0 0 0 0 0 0 0 Flow.Order.Hoofding 0 0 0 0 0 0 0 0 Flow.Order.Hoofding 0 0 0 0 0 0 0 0 4 cijfers Prod.Product 0 0 0 0 0 0 0 0 Format: Char: 1 Leeg = Normale prijs * = Speciale prijs %Library.String 0 0 0 0 0 0 0 0 Met dit veld wordt er door het systeem een mail gegenereerd als de levertermijn gewijzigd wordt Waarde: G; M = Gewijzigd; Gewijzigd en Mailed of blanco %Library.String 0 0 0 0 0 0 0 0 %Integer Flow.Toelev.Hoofding 0 0 0 0 0 0 0 1 Format: Numeric: 12,2 Eenheidsprijs/Grootteorde*Aantal %Library.Float 0 0 0 0 0 0 0 0 Format: Numeric: 6 Bepaalt uniek de orderlijn, dit nummer is opgebouw uit drie delen: Orderlijn : 2 cijfers Backorder : 2 cijfers Kindlijn : 2 cijfers %Library.Integer 0 0 0 0 0 0 0 0 Format: Numeric: 1 Leeg = Normaal 1 = Urgent %Library.Integer %String %String %String %String 1 Set {*}=##class(Flow.Toelev.LijnProductieStatus).FetchAll({Leverancier},{ToeleveringNr},{LijnNr},{UniekLijnNr},{Product},{AxInventTransId}) 1 %String 1 Set {*}={ToeleveringNr}_";"_({UniekLijnNr}\100*100) 1 1 %Status 1 1 LEVNr,TOENr,TLNr %CacheSQLStorage ^Flow.Toe.LijnS data ^KTO delimited {Leverancier} {ToeleveringNr} {LijnNr} 100 "\" 14 "\" 3 "\" 56 "\" 55 "\" 57 "\" 23 "\" 17 "\" 6 "\" 21 "\" 7 "\" 12 "\" 25 "\" 29 "\" 13 "\" 10 "\" 22 "\" 9 "\" 5 "\" 28 "\" 27 "\" 2 "\" 26 "\" 24 "\" 16 "\" 15 "\" 31