home *** CD-ROM | disk | FTP | other *** search
/ Power GUI Programming with VisualAge C++ / powergui.iso / trialva / ibmcppw / samples / database / car / daxsamp / car.vbe < prev    next >
Encoding:
Text File  |  1996-02-22  |  10.7 KB  |  228 lines
  1. //VBBeginPartInfo: CarDataId, "CarDataId - mapped from CAR"
  2. //VBIncludes: "Car.HPP" _Car_HPP_
  3. //VBPartDataFile: 'Car.vbb'
  4. //VBParent: IStandardNotifier
  5. //VBComposerInfo: nonvisual,6004,cppwas3u
  6. //VBAttribute: license, "license", 'char',
  7. //VB:          IString& license() const,
  8. //VB:          CarDataId& setLicense(const IString& aLicense),
  9. //VB:          licenseId
  10. //VBAttribute: licenseAsString, "license as a string", 'IString',
  11. //VB:          IString licenseAsString() const,
  12. //VB:          CarDataId& setLicense(const IString& aString),
  13. //VB:          licenseId
  14. //VBAttribute: licenseIsNull, "is license null", 'Boolean',
  15. //VB:          Boolean isLicenseNull() const,
  16. //VB:          CarDataId& setLicenseToNull(Boolean aLicense),
  17. //VB:          licenseNullId
  18. //VBAttribute: licenseIsNullable, "is license nullable", 'Boolean',
  19. //VB:          Boolean isLicenseNullable() const
  20. //VBAttribute: startingResourceId,,unsigned long,,,, noconnect
  21. //VBAttribute: asString, "All attributes separated by marker", 'IString',
  22. //VB:          IString asString(const char* marker = ".") const
  23. //VBAttribute: forDisplay, "Selected attributes separated by marker", 'IString',
  24. //VB:          virtual IString forDisplay(const char* marker = " ") const
  25. //VBEvent: ready, "ready", readyId
  26. //VBPreferredFeatures:
  27. //VB:          license,
  28. //VB:          asString, forDisplay
  29. //VBEndPartInfo: CarDataId
  30.  
  31. //VBBeginPartInfo: Car, "Car - mapped from CAR"
  32. //VBIncludes: "Car.HPP" _Car_HPP_
  33. //VBPartDataFile: 'Car.vbb'
  34. //VBParent: IStandardNotifier
  35. //VBComposerInfo: nonvisual,6002,cppwas3u
  36. //VBAttribute: objectsDatastore, "this object's Datastore", 'IDatastoreODBC*',
  37. //VB:          IDatastoreODBC* objectsDatastore() const,
  38. //VB:          Car& setObjectsDatastore(const IDatastoreODBC* aDatastore),
  39. //VB:          objectsDatastoreId
  40. //VBAttribute: currentDatastore, "this object's current Datastore", 'IDatastoreODBC*',
  41. //VB:          IDatastoreODBC* currentDatastore() const,,
  42. //VBAttribute: defaultDatastore, "the class default Datastore", 'IDatastoreODBC*',
  43. //VB:          IDatastoreODBC* defaultDatastore() const,
  44. //VB:          Car& setDefaultDatastore(const IDatastoreODBC* aDatastore),
  45. //VBAttribute: license, "license", 'char',
  46. //VB:          IString& license() const,
  47. //VB:          CarDataId& setLicense(const IString& aLicense),
  48. //VB:          licenseId
  49. //VBAttribute: licenseAsString, "license as a string", 'IString',
  50. //VB:          IString licenseAsString() const,
  51. //VB:          CarDataId& setLicense(const IString& aString),
  52. //VB:          licenseId
  53. //VBAttribute: licenseIsNull, "is license null", 'Boolean',
  54. //VB:          Boolean isLicenseNull() const,
  55. //VB:          CarDataId& setLicenseToNull(Boolean aLicense),
  56. //VB:          licenseNullId
  57. //VBAttribute: licenseIsNullable, "is license nullable", 'Boolean',
  58. //VB:          Boolean isLicenseNullable() const
  59. //VBAttribute: make, "make", 'char',
  60. //VB:          IString& make() const,
  61. //VB:          CarDataId& setMake(const IString& aMake),
  62. //VB:          makeId
  63. //VBAttribute: makeAsString, "make as a string", 'IString',
  64. //VB:          IString makeAsString() const,
  65. //VB:          CarDataId& setMake(const IString& aString),
  66. //VB:          makeId
  67. //VBAttribute: makeIsNull, "is make null", 'Boolean',
  68. //VB:          Boolean isMakeNull() const,
  69. //VB:          CarDataId& setMakeToNull(Boolean aMake),
  70. //VB:          makeNullId
  71. //VBAttribute: makeIsNullable, "is make nullable", 'Boolean',
  72. //VB:          Boolean isMakeNullable() const
  73. //VBAttribute: model, "model", 'char',
  74. //VB:          IString& model() const,
  75. //VB:          CarDataId& setModel(const IString& aModel),
  76. //VB:          modelId
  77. //VBAttribute: modelAsString, "model as a string", 'IString',
  78. //VB:          IString modelAsString() const,
  79. //VB:          CarDataId& setModel(const IString& aString),
  80. //VB:          modelId
  81. //VBAttribute: modelIsNull, "is model null", 'Boolean',
  82. //VB:          Boolean isModelNull() const,
  83. //VB:          CarDataId& setModelToNull(Boolean aModel),
  84. //VB:          modelNullId
  85. //VBAttribute: modelIsNullable, "is model nullable", 'Boolean',
  86. //VB:          Boolean isModelNullable() const
  87. //VBAttribute: category, "category", 'char',
  88. //VB:          IString& category() const,
  89. //VB:          CarDataId& setCategory(const IString& aCategory),
  90. //VB:          categoryId
  91. //VBAttribute: categoryAsString, "category as a string", 'IString',
  92. //VB:          IString categoryAsString() const,
  93. //VB:          CarDataId& setCategory(const IString& aString),
  94. //VB:          categoryId
  95. //VBAttribute: categoryIsNull, "is category null", 'Boolean',
  96. //VB:          Boolean isCategoryNull() const,
  97. //VB:          CarDataId& setCategoryToNull(Boolean aCategory),
  98. //VB:          categoryNullId
  99. //VBAttribute: categoryIsNullable, "is category nullable", 'Boolean',
  100. //VB:          Boolean isCategoryNullable() const
  101. //VBAttribute: colour, "colour", 'char',
  102. //VB:          IString& colour() const,
  103. //VB:          CarDataId& setColour(const IString& aColour),
  104. //VB:          colourId
  105. //VBAttribute: colourAsString, "colour as a string", 'IString',
  106. //VB:          IString colourAsString() const,
  107. //VB:          CarDataId& setColour(const IString& aString),
  108. //VB:          colourId
  109. //VBAttribute: colourIsNull, "is colour null", 'Boolean',
  110. //VB:          Boolean isColourNull() const,
  111. //VB:          CarDataId& setColourToNull(Boolean aColour),
  112. //VB:          colourNullId
  113. //VBAttribute: colourIsNullable, "is colour nullable", 'Boolean',
  114. //VB:          Boolean isColourNullable() const
  115. //VBAttribute: startingResourceId,,unsigned long,,,, noconnect
  116. //VBAttribute: asString, "All attributes delimited by separator", 'IString',
  117. //VB:          IString asString(const char* separator = ".") const
  118. //VBAttribute: forDisplay, "Selected attributes delimited by separator", 'IString',
  119. //VB:          virtual IString forDisplay(const char* separator = " ") const
  120. //VBEvent: ready, "ready", readyId
  121. //VBAction: add,"add to datastore", Car&,
  122. //VB:       virtual Car& add()
  123. //VBAction: del,"delete from datastore", Car&,
  124. //VB:       virtual Car& del()
  125. //VBAction: update,"update in datastore", Car&,
  126. //VB:       virtual Car& update()
  127. //VBAction: updateDataId,"update with new data id in datastore", Car&,
  128. //VB:       virtual Car& update(const CarDataId* aDataId)
  129. //VBAction: retrieve,"retrieve from datastore", Car&,
  130. //VB:       virtual Car& retrieve()
  131. //VBAttribute: readOnly, "object is read only", 'Boolean',
  132. //VB:          Boolean isReadOnly() const,
  133. //VB:          Car& setReadOnly(Boolean flag = true),
  134. //VB:          readOnlyId
  135. //VBAttribute: defaultReadOnly, "object is read only by default", 'Boolean',
  136. //VB:          Boolean isDefaultReadOnly() const
  137. //VBAttribute: retrievable, "object as retrievable", 'Boolean',
  138. //VB:          Boolean isRetrievable() const,
  139. //VB:          Car& setRetrievable(Boolean flag = true),
  140. //VB:          retrievableId
  141. //VBAttribute: dataId, "data identifier for the object", 'CarDataId',
  142. //VB:          const CarDataId& dataId() const,
  143. //VB:          Car& setDataId(const CarDataId* aDataId),
  144. //VB:          dataIdId
  145. //VBPreferredFeatures:
  146. //VB:          license,
  147. //VB:          make,
  148. //VB:          model,
  149. //VB:          category,
  150. //VB:          colour,
  151. //VB:          retrieve,
  152. //VB:          add, del, update, updateDataId
  153. //VB:          dataId, asString, forDisplay
  154. //VBEndPartInfo: Car
  155.  
  156. //VBBeginPartInfo: CarManagerBase, "CarManagerBase - abstract base manager part - mapped from CAR"
  157. //VBIncludes: "Car.HPP" _Car_HPP_
  158. //VBPartDataFile: 'Car.vbb'
  159. //VBParent: IStandardNotifier
  160. //VBComposerInfo: nonvisual,6003,cppwas3u
  161. //VBEvent: ready, "ready", readyId
  162. //VBAction: refresh,"retrieve all Car objects in datastore",
  163. //VB:       CarManagerBase&, virtual CarManagerBase& refresh()
  164. //VBAction: select,"select Car objects from datastore",
  165. //VB:       CarManagerBase&, virtual CarManagerBase& select(const char* clause)
  166. //VBAttribute: objectsDatastore, "this object's Datastore", 'IDatastoreODBC*',
  167. //VB:          IDatastoreODBC* objectsDatastore() const,
  168. //VB:          CarManagerBase& setObjectsDatastore(const IDatastoreODBC* aDatastore),
  169. //VB:          objectsDatastoreId
  170. //VBAttribute: currentDatastore, "this object's current Datastore", 'IDatastoreODBC*',
  171. //VB:          IDatastoreODBC* currentDatastore() const,,
  172. //VBAttribute: startingResourceId,,unsigned long,,,, noconnect
  173. //VBPreferredFeatures: refresh, select, this
  174. //VBEndPartInfo: CarManagerBase
  175.  
  176.  
  177. //VBBeginPartInfo: CarManagerTemplate<class itemType>,"CarManagerTemplate - for derived classes of Car."
  178. //VBParent: CarManagerBase
  179. //VBIncludes: "Car.HPP" _Car_HPP_
  180. //VBPartDataFile: 'Car.vbb'
  181. //VBComposerInfo: nonvisual,6003,cppwas3u
  182. //VBGeneratorClass: AvlTemplateCodeGenerator
  183. //VBEvent: ready, "ready", readyId
  184. //VBAction: refresh,"retrieve all Car objects in datastore",
  185. //VB:       CarManager<class itemType>&,
  186. //VB:       virtual CarManager<class itemType>& refresh()
  187. //VBAction: select,"select Car objects from datastore",
  188. //VB:       CarManager<class itemType>&,
  189. //VB:       virtual CarManager<class itemType>& select(const char* clause)
  190. //VBAttribute: items, "pointer to collection of class derived from Car*",
  191. //VB:          'CarManager<class itemType>::sequenceType*',
  192. //VB:          CarManager<class itemType>::sequencetype* items(),
  193. //VB:          ,itemsId
  194. //VBAttribute: startingResourceId,,unsigned long,,,, noconnect
  195. //VBAttribute: itemType,"define the derived class type",
  196. //VB:          IString,,,, noconnect
  197. //VBPreferredFeatures: items, refresh, select, this
  198. //VBEndPartInfo: CarManagerTemplate<class itemType>
  199.  
  200. //VBBeginPartInfo: CarManager, "CarManager - mapped from CAR"
  201. //VBIncludes: "Car.HPP" _Car_HPP_
  202. //VBPartDataFile: 'Car.vbb'
  203. //VBParent: CarManagerBase
  204. //VBComposerInfo: nonvisual,6003,cppwas3u
  205. //VBEvent: ready, "ready", readyId
  206. //VBAction: refresh,"retrieve all Car objects in datastore",
  207. //VB:       CarManager&, virtual CarManager& refresh()
  208. //VBAction: select,"select Car objects from datastore",
  209. //VB:       CarManager&, virtual CarManager& select(const char* clause)
  210. //VBAttribute: items, "pointer to collection of Car*",
  211. //VB:          'CarManagerSequence*', CarManagerSequence* items(), , itemsId
  212. //VBAttribute: startingResourceId,,unsigned long,,,, noconnect
  213. //VBPreferredFeatures: items, refresh, select, this
  214. //VBEndPartInfo: CarManager
  215.  
  216. //VBBeginPartInfo: CarDatastore, "CarDatastore - to access the Car datastore"
  217. //VBIncludes: "Car.HPP" _Car_HPP_
  218. //VBPartDataFile: 'Car.vbb'
  219. //VBParent: IDatastoreODBC
  220. //VBComposerInfo: nonvisual,6001,cppwas3u
  221. //VBAction: setAsDefaultDatastore,"set this datastore as the default datastore for Car",
  222. //VB:       CarDatastore&, CarDatastore& setAsDefaultDatastore()
  223. //VBEvent: ready, "ready", readyId
  224. //VBPreferredFeatures: setAsDefaultDatastore, this
  225. //VBEndPartInfo: CarDatastore
  226.  
  227.  
  228.