常识（7）- DW的DBError事件

最新推荐文章于 2022-12-05 14:25:21 发布

rambo_china

最新推荐文章于 2022-12-05 14:25:21 发布

阅读量1.7k

点赞数

分类专栏： PowerBuilder 文章标签：数据库服务器数据库 buffer 网络 oracle string

本文链接：https://blog.csdn.net/rambo_china/article/details/2294612

版权

PowerBuilder 专栏收录该内容

21 篇文章 3 订阅

订阅专栏

string   error_text
CHOOSE CASE sqlDBCode
          case 1                 error_text = '违反唯一索引!'
          case 1400          error_text = '字段不能为空!'
          case 1407          error_text = '字段不能为空!'
          case 1401          error_text = '字段太长!'
          case 1438          error_text = '数值大于列允许的最大精度!'
          case 2291          error_text = '出现非法字段!'
          case 1031          error_text = '权限不足!'
          case 911           error_text = '注册名无效!'                  //权限专用
          case 922            error_text = '特殊字符无效!'          //权限专用
          CASE 1017        error_text = '非法的用户名或口令,拒绝登录!'
          CASE 12154      error_text = '不能分解服务名称!'
          CASE 01005      error_text = '未给出口令或口令错误,拒绝登录!'
          CASE 01935      error_text = '注册名项输入的名称为系统关键字,禁止作为注册名使用!'
          CASE 540          error_text = '数据表或视图不存在!'
          CASE 942          error_text = '数据表或视图不存在!'
          CASE 903          error_text = '非法列名!'
          CASE 1403        error_text = '未查找到符合条件的数据!'
          CASE -3              error_text = '在您读入数据和存盘操作过程中,服务器中的数据已被别的用户或窗口改变,请重新读取数据后再试!'
          CASE 6               error_text = '网络同数据库服务器的连接已经中断,请关闭应用程序然后重新打开.'
          CASE 50             error_text = '网络同数据库服务器的连接已经中断,请关闭应用程序然后重新打开.'
          case 1920          error_text = '用户名称与另外的用户或角色名称冲突'
          case 988            error_text = '缺少口令或其非法!'
          case 1918          error_text = '该ORACLE用户不存在!'
          case 1940          error_text = '不能放弃一个当前被连接的操作员,即当前删除的操作员正在使用!'
          CASE ELSE
                  if isnull(sqlca.sqlErrText) or sqlca.sqlErrText = '' then
                          error_text = '数据操作失败!'
                  else
                          error_text = sqlca.sqlErrText
                  end if
END CHOOSE
return MessageBox('错误',error_text,RetrYCancel!,1)