home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / datatl25.zip / DCTDSGN.Z / EWSQDSAU.QRY < prev    next >
Text File  |  1997-09-11  |  2KB  |  56 lines

  1. #NAME#
  2. DA_DataStructureAliasUsage
  3. #DESCRIPTION#
  4. The Data Structure Alias Usage impact analysis query returns the names of all the objects which directly use a Shareable Data Structure Alias.  The data structure alias contains the name by which a data structure is used and the names of IMS segments
  5.  
  6. View type:  DataAtlasDataStructureAliasImpact
  7.  
  8. Modifications:
  9. Change the search criteria of the Data Structure Alias using the = (equals), IN or LIKE elements in the SQL WHERE clauses.  When the data structure alias represents the name of a shareable data structure, the format of the alias name is <structure>alias<revision:variation>.  When the data structure alias represents an IMS segment name, the format of the alias name is <DBD>segment<revision:variation>.
  10.  
  11. #MODIFIED#
  12.  
  13. #VERSION#
  14.  
  15. #SQL STATEMENT#
  16. SELECT
  17.   a.structureAlias,
  18.   a.dataStructure,
  19.   'COBOL data structure' as relatedType,
  20.   a.usedByCobolDataStructure as relatedObject
  21. FROM OUTER
  22.   DataAtlasDataStructureAliasImpact a,
  23.   PartView p
  24. WHERE
  25.   a.structureAlias LIKE '<%>%'  AND
  26.   (a.usedByCobolDataStructure=p.baseName AND
  27.    p.partType='DSDataStructure')
  28. UNION
  29. SELECT
  30.   a.structureAlias,
  31.   a.dataStructure,
  32.   'Data structure' as relatedType,
  33.   a.usedByDataStructure as relatedObject
  34. FROM OUTER
  35.   DataAtlasDataStructureAliasImpact a,
  36.   PartView p
  37. WHERE
  38.   a.structureAlias LIKE '<%>%'  AND
  39.   (a.usedByDataStructure=p.baseName AND
  40.    p.partType='DSDataStructure')
  41. UNION
  42. SELECT
  43.   a.structureAlias,
  44.   a.dataStructure,
  45.   'IMS Segment in DBD' as relatedType,
  46.   a.DBD as relatedObject
  47. FROM OUTER
  48.   DataAtlasDataStructureAliasImpact a,
  49.   PartView p
  50. WHERE
  51.   a.structureAlias LIKE '<%>%'  AND
  52.   (a.DBD=p.baseName AND
  53.    p.partType='DSDBD')
  54. ORDER BY
  55.   1,3;
  56.