persistent PRGACNTs,APPS.TBXWeb,TECH.Error 1 %Persistent,%XML.Adaptor 0 1 1 mID 1 KLNummer WebDomain ShowInHist IsInGroepOrder ID van het object %Integer 0 Taal van de aanvrager %String %String %String %String %String %String %String %String %String %String %String %String %String %String OPGELET !!! KortingPercentage als getal tussen 0 en 100 !!! %String %String %String %String %TimeStamp %String 1 %String %String %String Waarde wordt on-the-flight berekend en ingevuld (proxy) %String 1 %Integer %String 1 Logt de SubmitToVHEPN acties: Format: $LB($LB($H,info),$LB(prev $H, ...), ...) Bij een nieuwe SubmitToVHEPN wordt de log steeds vooraan toegevoegd. Gebruik hiervoor de method AddToSubmitToVHLog() %List Logt de WSOrdToAdmin() acties: Format: $LB($LB($H,OffID,info),$LB(prev $H, prev OffID,...), ...) Bij een nieuwe transfer wordt de log steeds vooraan toegevoegd. Gebruik hiervoor de method AddToTransferLog() %List Waarde wordt on-the-flight berekend en ingevuld (proxy) %String 1 Berekende properties voor Proxy-klasse. %String 1 De optie Niet Meeleveren wordt toegepast op alle lijnen van het order. Vandaar als propt. van de hoofding i.p.v. de lijnen Bevat ";"-gescheiden waarden : bvb. "NMCP;NMAK" Uitzondering voor NMFB : Frontbevestiging niet meeleveren wordt per lijn gekozen : oLijn.ItemFB="NM" %String %Boolean 0 %String 1 1 set {*}=##class(WS.TBX.OrderAbstract).%OpenId({ID}).GeefOrderReferentie() 1 %String IsNew:%Library.Boolean=1 0 %Library.Status $G($$$StorageIndexNode)) $$$StorageIndexNode=id Set:(id'=..mID) ..mID=id Set:('IsNew) sc=..ControleerWaarden() Quit $$$OK ]]> %Status 0 %String 1 Nr:%String 0 %String 1 EDINr:%String,blnCheckID:%Boolean=1 %String 1000000):(EDINr-1000000), 1:EDINr) Quit $S('$G(blnCheckID,1):ID, ..%ExistsId(ID):ID, 1:"") ]]> 1 %String 1 %String 1 %ListOfDataTypes 1 %ListOfDataTypes 1 %Boolean 1 %Boolean %Boolean APPS.TBXWeb.enu.BonType 1 BonType:APPS.TBXWeb.enu.BonType DollarH:%String=$H 0 %String Tijdelijk actief in de periode rond 30 september 2017 (tot 30 dagen later) 1 %Status ($$$DollarH30Sept2017-1)) ]]> Status:%String,Info:%String 1 %Status OffID:%String,SOAPDest:%String,Info:%String %Status Geeft 1 (true) terug als : - SubmitTS ingevuld is; m.a.w. offerte als BBON doorgestuurd - of indien IsTransferredToAdmin() 1 %Boolean 0 ) || ( ..IsTransferredToAdmin() ) ]]> Gaat na of het Order reeds naar Admin ge-transferred is: indien minstens 1 OffID in TransferLog gevonden wordt; m.a.w. WSOrdToAdmin() heeft een ID van Flow.Offerte.Hoofding opgeleverd 1 %Boolean 0) blnOK=1 Quit blnOK ]]> 1 %Boolean 1 %Boolean 1 %Boolean 1 NewValue:%String %String 1 %Boolean %Library.CacheStorage ^WS.TBX.OrderAbstractD OrderAbstractDefaultData ^WS.TBX.OrderAbstractD ^WS.TBX.OrderAbstractI ^WS.TBX.OrderAbstractS %%CLASSNAME BonType LeverTijd LeverTijdID Taal WebDomain KLBTWNr KLEMail KLFax KLKorting KLNaam KLNummer KLPostNr KLPrijsKlasse KLStraatNrBus KLTelefoon KLWoonPlaats Opmerking1 Commissie IngaveTijdStip SubmitTS TotAantal TotPrijs ShowInHist TransferLog NietMeeleveren IsInGroepOrder SubmitToVHLog LeverAdres CommissieReferentie