修改后的数据库截图

对象是User.Person
代码：

Class web.PersonObj Extends %RegisteredObject
{
ClassMethod insertbyobj(name, age, sex)
{
    ///先生成一个person对象
    set person=##class(User.Person).%New()
    ///对象属性赋值
    set person.age=age
    set person.name=name
    set person.sex=sex
    ///保存
    set sc=person.%Save()
    ///判断是否正确
    if $$$ISERR(sc){
		Quit "fail"
		}
		Quit "success"
}
ClassMethod updateobj(rowid, name)
{
	set course = ##class(User.Person).%OpenId(rowid)
	set course.name=name
	set sc=course.%Save()
	if $$$ISERR(sc){
		quit "fail"
		}
		quit "success"
}
ClassMethod deleteobj(rowid)
{
	set sc=##class(User.Person).%DeleteId(rowid)
		if $$$ISERR(sc){
        Quit "fail"
        }
        Quit "success"
}
}