Caché 数据库父子表建立

最新推荐文章于 2023-09-18 04:53:13 发布

别叫慢慢学

最新推荐文章于 2023-09-18 04:53:13 发布

阅读量628

点赞数

分类专栏： Caché 文章标签：数据库

本文链接：https://blog.csdn.net/sweetNN/article/details/126544438

版权

Caché 数据库建立父子表小记

文章目录

Caché 数据库建立父子表小记

1、学生表：

/// 创建学生类
/// create:
Class User.DHCStudent Extends (%Persistent, User.Abstract) [ SqlRowIdName = "", SqlTableName = DHC_Student, StorageStrategy = NewStorage1 ]
{

/// 定义父子表关系
Relationship ScChildSub As DHCStudentCourse [ Cardinality = children, Inverse = ParRef ];

/// 学号
Property StCode As %String [ SqlColumnNumber = 2, SqlFieldName = St_Code ];

/// 姓名
Property StName As %String [ SqlColumnNumber = 3, SqlFieldName = St_Name ];

/// 性别
Property StSexDR As User.CTSex [ SqlColumnNumber = 4, SqlFieldName = St_Sex_DR ];

/// 出生日期
Property StDob As %Date [ SqlColumnNumber = 5, SqlFieldName = St_Dob ];

Index CodeIdx On StCode [ Unique ];
}

2、课程表：

/// Function:课程信息表
Class User.DHCCourse Extends %Persistent [ SqlTableName = DHC_Course, StorageStrategy = NewStorage1 ]
{

/// 代码
Property CrsCode As %String [ SqlColumnNumber = 2, SqlFieldName = Crs_Code ];

/// 名称
Property CrsDesc As %String [ SqlColumnNumber = 3, SqlFieldName = Crs_Desc ];

/// 是否有效
Property CrsActiveFlag As %String(DISPLAYLIST = ",Yes,No", VALUELIST = ",Y,N") [ SqlColum