[求助] 程序报错

小弟不才，刚刚学习pb现有问题请教高手。
以下5行代码有什么作用，是什么意思呢？
if dwo.name="ljk_mc" then
ljkbh=dw_1.getitemstring(row,"ljk_bh")
select ljk_mc,ljk_gg,ljk_xz,ljk_position,ljk_dtjs,ljk_dw
into :ljkmc, :ljkgg, :ljkxz, :position, :ljkdtjs, :ljkdw
from cc_cpk where ljk_bh=:ljkbh;



string ljkbh,ljkmc,ljkgg,ljkxz,ljkdw,position,ljkdtjs
if dwo.name="ljk_mc" then
ljkbh=dw_1.getitemstring(row,"ljk_bh")
select ljk_mc,ljk_gg,ljk_xz,ljk_position,ljk_dtjs,ljk_dw
into :ljkmc, :ljkgg, :ljkxz, :position, :ljkdtjs, :ljkdw
from cc_cpk where ljk_bh=:ljkbh;
//显示相关内容
dw_1.setitem(row,"ljk_mc",ljkmc)
dw_1.setitem(row,"ljk_gg",ljkgg)
dw_1.setitem(row,"ljk_dw",ljkdw)
dw_1.setitem(row,"ljk_postion",position)
dw_1.setitem(row,"ljk_dtjs",ljkdtjs)
dw_1.setitem(row,"ljk_xz",ljkxz)
end if