qidao123.com技术社区-IT企服评测·应用市场

标题: PowerDesigner反向导入表+PowerDesigner的ER图设计+PowerDesigner连接外键 [打印本页]

作者: 天津储鑫盛钢材现货供应商    时间: 2023-7-5 13:36
标题: PowerDesigner反向导入表+PowerDesigner的ER图设计+PowerDesigner连接外键
使用PowerDesigner导入表+PowerDesigner画ER图+PowerDesigner设置外键

ps:
①ER图:就是PD中的 Physical Diagram
一、导入表,并设置备注为PD中的显示名称

1、新建数据库模型



2、导入表——见参考

  1. -- 建表语句1_未修改前的
  2. CREATE TABLE "TABLE_1"
  3. (
  4. "COLUMN_11" CHAR(10),
  5. "ID" CHAR(32) NOT NULL,
  6. "AGE" NUMBER(22,6),
  7. "C_2222" CHAR(10),
  8. UNIQUE("AGE"),
  9. NOT CLUSTER PRIMARY KEY("ID")
  10. ) STORAGE(ON "MAIN", CLUSTERBTR) ;
  11. COMMENT ON COLUMN "TABLE_1"."AGE" IS 'CS_AA';
  12. COMMENT ON COLUMN "TABLE_1"."COLUMN_11" IS 'CS_11';
  13. COMMENT ON COLUMN "TABLE_1"."C_2222" IS 'CS_';
  14. COMMENT ON COLUMN "TABLE_1"."ID" IS 'CS_DD';
  15. -- 建表语句2_修改之后的
  16. -- 主键的名字规则:PK_表名
  17. CREATE TABLE "TABLE_1"
  18. (
  19. "COLUMN_11" CHAR(10),
  20. "ID" CHAR(32) NOT NULL,
  21. "AGE" NUMBER(22,6),
  22. "C_2222" CHAR(10),
  23. UNIQUE("AGE"),
  24. constraint PK_CS1 PRIMARY KEY("ID")
  25. ) STORAGE(ON "MAIN", CLUSTERBTR) ;
  26. COMMENT ON COLUMN "TABLE_1"."AGE" IS 'CS_AA';
  27. COMMENT ON COLUMN "TABLE_1"."COLUMN_11" IS 'CS_11';
  28. COMMENT ON COLUMN "TABLE_1"."C_2222" IS 'CS_';
  29. COMMENT ON COLUMN "TABLE_1"."ID" IS 'CS_DD';
复制代码
修改详情:

  1. Option Explicit
  2. ValidationMode = True
  3. InteractiveMode = im_Batch
  4. Dim mdl ' the current model
  5. ' get the current active model
  6. Set mdl = ActiveModel
  7. If (mdl Is Nothing) Then
  8. MsgBox "There is no current Model "
  9. ElseIf Not mdl.IsKindOf(PdPDM.cls_Model) Then
  10. MsgBox "The current model is not an Physical Data model. "
  11. Else
  12. ProcessFolder mdl
  13. End If
  14. Private sub ProcessFolder(folder)
  15. On Error Resume Next
  16. Dim Tab 'running table
  17. for each Tab in folder.tables
  18. if not tab.isShortcut then
  19. tab.name = tab.comment
  20. Dim col ' running column
  21. for each col in tab.columns
  22. if col.comment="" then
  23. else
  24. col.name= col.comment
  25. end if
  26. next
  27. end if
  28. next
  29. Dim view 'running view
  30. for each view in folder.Views
  31. if not view.isShortcut then
  32. view.name = view.comment
  33. end if
  34. next
  35. ' go into the sub-packages
  36. Dim f ' running folder
  37. For Each f In folder.Packages
  38. if not f.IsShortcut then
  39. ProcessFolder f
  40. end if
  41. Next
  42. end sub
复制代码
二、画图

1、参考——规范:

设计规范——有需要的私我。或者评论
2、新建ER图



3、连接有外键关系的两张表(同一张表出现在不同的ER图中的情况)

①工具栏中的这个图标,可以把拖入ER图的有外键关联的表连接起来。
——这个功能适用于,同一张表出现在不同的ER图中。

呼出界面:

②其他工具栏:

4、绘制外键的线

参考:https://www.somode.com/jiaocheng/36995.html
4.1、打开面板



4.2、外键设置

①、如Table_2(从表) 中的 TABLE_ID 是 TABLE_1(主表) 的 ID 的外键。

②、双击连线,设置如下:




见①。子表的外键字段出现  就是对的
4.3、显示外键线上的名字

参考:https://www.cnblogs.com/EasonJim/p/4715282.html
①结果

②操作


5、格式设置

5.1、把table1的格式弄到table2上。


5.2、给外键的线赋予格式


5.3、获取格式、应用格式

①结果:

②操作步奏:
1)表:


2)线:



免责声明:如果侵犯了您的权益,请联系站长,我们会及时删除侵权内容,谢谢合作!




欢迎光临 qidao123.com技术社区-IT企服评测·应用市场 (https://dis.qidao123.com/) Powered by Discuz! X3.4