1 persistent 1 %Persistent 0 Uniek ID van het object; zie ook property StorageStatus %String Bepaalt in welke mode de data opgeslagen wordt Bij StorageStatus "KPR" loopt het ID synchroon met PRNr van ^KPR %String De berekeningswijze of de defaulting is afhankelijk van de Source (type van data): WSORD / VBA / VHISIE %String Voor Versie-controle %String Omschrijving van het product %String Klant Referentie van het product. Wordt o.a. voor TBXLade getoond bij info "Diverse" %String Aantal is noodzakelijk om de staffel te berekenen %Integer Alfabetisch DossierNr dat bij KPRCreate wordt aangemaakt %String This property should be overriden in each derived class with the default value specified Generisch Type van het product. Bvb. TBX, KAD, TLM, SDM, %String " " Data gelinkt aan de klant Derde.Klant.Klant Wordt automatisch geinitialiseerd bij eerste oproep zie method BLGet() BL.Prod.GAData.AbstractBuild 1 ======================================== /// Calculated Properties /// ======================================== /// %String 1 1 1 ID 1 Maakt een nieuw GAData-object en initialiseert het bijhorende BL-object 1 BLClassName:%String="" AbstractBasis Instantiëren en initializeren van het bijhorende BL-object. De Oref wordt bijgehouden in de property BL (transient/niet opgeslagen). De parameter BLClassName alleen invullen indien afwijkend van de standaard BL-klasse. BLClassName:%String="" BL.Prod.GAData.AbstractBuild Voert method InitBL() uit indien nog niet BL geinitialiseerd is. BL.Prod.GAData.AbstractBuild ID is optional; if empty, gets a new UniqueID ID:%String="" Method NewID via "generator method" Increments the counter that provides the next UniqueID and returns the new value 1 objectgenerator 999999 Set "_GlobalName_"=1 ; Reset counter") DO %code.WriteLine(" Quit ID") QUIT $$$OK ]]> %Library.CacheStorage ^Prod.GAData.NewProdD AbstractBasisDefaultData ^Prod.GAData.NewProdD ^Prod.GAData.NewProdI ^Prod.GAData.NewProdS %%CLASSNAME StorageStatus Source Versie Dossier Aantal Omschrijving Klant GenType KlantRef