文件名称：预算付款耗用情况代码
文件大小：58KB
文件格式：TXT
更新时间：2017-10-09 08:41:56
数据源开发
IF lw_yxfs EQ '2'. OPEN CURSOR WITH HOLD s_cursor FOR SELECT pspid "项目定义 FROM zyyjc_t001 WHERE cszt = '01' AND posid IN r_posid. ELSE. OPEN CURSOR WITH HOLD s_cursor FOR SELECT * "工作分解结构元素 (WBS 元素) FROM zyyjc_t024 WHERE posid IN r_posid AND zyxsj IN r_zyxsj. ENDIF. ENDIF. "First data package ?