Question

PB代码老报错syntax error，哪里出问题了！！！

string wtitle = " "
if not cb_xiaoqu.enabled then
wtitle = "校区信息"
if not cb_jiaoxuelou.enabled then
wtitle = "教学楼信息"
if not cb_classroom.enabled then
wtitle = "教室信息"
if not cb_college.enabled then
wtitle = "学院信息"
if not cb_profession.enabled then
wtitle = "专业信息"
if not cb_class.enabled then
wtitle = "班级信息"
if not cb_Teacher.enabled then
wtitle = "教师信息"
if not cb_course.enabled then
wtitle = "课程信息"
if not cb_task.enabled then
wtitle = "教学任务信息"
if not cb_paike.enabled then
wtitle = "排课"
end if
if wtitle <> " " then
messagebox("系统提示","请先关闭【" +wtitle+ "】窗口!",Exclamation!)
return -1
end if

Answer 1

PB的IF判断是IF ... THEN

ELSEIF ... THEN

ELSEIF ... THEN

ELSE ...

END IF
所以你看你的语法，如果每个IF是单独的，一种就是在每一个IF后边都有END IF，看你的这个意思，除了第一个IF，后边的IF，都应该改成ELSEIF，这样就可以了。
如果每个IF都是单独的，这么写if not cb_xiaoqu.enabled then wtitle = "校区信息" 也是允许的。

追问

this.y = w_main.y
this.tag = this.title
dw_1.settransobject(SQLCA)
dw_1.retrieve()
dw_1.object.datawindow.readonly = ture
dw_1.setrowfocusindicator(hand!)
总是报错undefined variable：ture 是咋回事啊？呵呵

追答

TRUE，呵呵，写错了。
dw_1.object.datawindow.readonly = ture-----------true
这么写也可以dw_1.object.datawindow.readonly = 'yes'

Answer 2

从第一个if到第九个都没有end if来关闭判断，或者你要写的是elseif

Answer 3

prepare SQLSA from :sql
改为
prepare SQLSA from :sql;