英语翻译long istring ls_dh,ls_flagdw_1.accepttext( )for i = 1 to
来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/11/17 16:05:17
英语翻译
long i
string ls_dh,ls_flag
dw_1.accepttext( )
for i = 1 to dw_1.rowcount( )
ls_flag = dw_1.object.flag[i]
if ls_flag = '1' then
ls_dh = dw_1.object.dh.dh[i]
update gdzc_info
set shzt = '1'
where dh = :ls_dh ;
if sqlca.sqlcode = 0 then
else
rollback;
messagebox('','审核错误!')
return
end if
end if
next
commit ;
messagebox('','审核完毕!')
long i
string ls_dh,ls_flag
dw_1.accepttext( )
for i = 1 to dw_1.rowcount( )
ls_flag = dw_1.object.flag[i]
if ls_flag = '1' then
ls_dh = dw_1.object.dh.dh[i]
update gdzc_info
set shzt = '1'
where dh = :ls_dh ;
if sqlca.sqlcode = 0 then
else
rollback;
messagebox('','审核错误!')
return
end if
end if
next
commit ;
messagebox('','审核完毕!')
//定义变量
long i
string ls_dh,ls_flag
//dw_1数据窗口接受修改的数据
dw_1.accepttext( )
//对dw_1从第一行开始做逐行的循环
for i = 1 to dw_1.rowcount( )
ls_flag = dw_1.object.flag[i] //取dw_1中flag字段的值
if ls_flag = '1' then //如果flag字段值为'1'
ls_dh = dw_1.object.dh.dh[i] //取这一行dh字段的值(此处是不是代码拷贝错了?不可能出现dh.dh)
//更新表gdzc_info,把表中字段dh等于本行dh值的数据,设置shzt列 = '1'
update gdzc_info
set shzt = '1'
where dh = :ls_dh ;
if sqlca.sqlcode = 0 then//如果更新成功,不处理,sqlcode = 0表示执行成功
else //如果更新失败
rollback; //取消更新rollback表示回滚事务,取消先前的数据库操作
messagebox('','审核错误!') //弹出提示框,提示审核错误
return //停止程序的执行,return后,程序不会再继续执行.
end if
end if
next
commit ; //确认所有的更新,以上update语句循环执行,知道所有的执行成功,才会提交修改.
messagebox('','审核完毕!') //弹出对话框,提示审核完毕
long i
string ls_dh,ls_flag
//dw_1数据窗口接受修改的数据
dw_1.accepttext( )
//对dw_1从第一行开始做逐行的循环
for i = 1 to dw_1.rowcount( )
ls_flag = dw_1.object.flag[i] //取dw_1中flag字段的值
if ls_flag = '1' then //如果flag字段值为'1'
ls_dh = dw_1.object.dh.dh[i] //取这一行dh字段的值(此处是不是代码拷贝错了?不可能出现dh.dh)
//更新表gdzc_info,把表中字段dh等于本行dh值的数据,设置shzt列 = '1'
update gdzc_info
set shzt = '1'
where dh = :ls_dh ;
if sqlca.sqlcode = 0 then//如果更新成功,不处理,sqlcode = 0表示执行成功
else //如果更新失败
rollback; //取消更新rollback表示回滚事务,取消先前的数据库操作
messagebox('','审核错误!') //弹出提示框,提示审核错误
return //停止程序的执行,return后,程序不会再继续执行.
end if
end if
next
commit ; //确认所有的更新,以上update语句循环执行,知道所有的执行成功,才会提交修改.
messagebox('','审核完毕!') //弹出对话框,提示审核完毕
英语翻译long istring ls_dh,ls_flagdw_1.accepttext( )for i = 1 to
英语翻译.I about to lose my mine youve been gone for so long I w
英语翻译i do hope you like to look lauge for me after long.是一个朋友
英语翻译For so long I'd been unable to reach out in the real wor
英语翻译Often tangled recently,I want to sleep for a long time t
i'm sorry that i didn't (1) to you for long because i was bu
I wanted to come here for so long.这里的for so long
I have waited for a long time to park_________ car.
believe that I can hold to me for long time.
I want to be with you for a long time
i want to find Long-term partner for improving english .
:I preferhaving youraccompanying for life-long time to the s