home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / viscobv6.zip / vac22os2 / ibmcobol / samples / elookup1 / dbclass.vce < prev    next >
Text File  |  1997-08-22  |  1KB  |  35 lines
  1. //* ---------------------------------------
  2. //*     DBCLASS.VCE
  3. //*   This is an import file for the Employee
  4. //*   Lookup sample.  It contains the definition
  5. //*   for a data type, DTArea, and a dynamic
  6. //*   link library used as class part.
  7. //* ---------------------------------------
  8.  
  9. //* --- Definition for DTArea data type
  10. //* ----- This defines a large data area
  11. //* ----- used to pass information from the
  12. //* ----- DBClass object to the nonvisual part.
  13. //VBBeginTypeInfo: DTArea, "Data area ",
  14. //VBCopy: dataarea.cpy
  15. //VBPartDataFile: dataarea.vcb
  16. //VBEndTypeInfo: DTArea
  17.  
  18.  
  19. //* --- Definition for DBClass
  20. //* ----- This is the definition for an OO COBOL
  21. //* ----- class that is compiled into a DLL and
  22. //* ----- invoked from the visual parts of the sample.
  23. //* ----- This class will access a DB2 database.
  24. //VBBeginPartInfo: DBClass,"Access a DB2 database"
  25. //VBParent: SOMObject
  26. //VBPartDataFile: dbclass.vcb
  27. //VBLibFile: dbclass.lib
  28. //VBComposerInfo: class
  29. //* ----- Methods in the class
  30. //VBAction: setSrchName,"set method for search name",01 SRCHNAME VarLengthString.,
  31. //VBAction: doSearch, "data area",, 01 DataArea DTArea.
  32.  
  33. //VBEndPartInfo: DBClass
  34.  
  35.