WBS、项目内码转换例程
来源:互联网 发布:啥软件机票便宜 编辑:程序博客网 时间:2024/06/05 03:30
FUNCTION ZFI_GET_WBS_INFO.
*"----------------------------------------------------------------------
*"*"Local interface:
*" IMPORTING
*" VALUE(PSPID) TYPE PROJ-PSPID OPTIONAL
*" TABLES
*" OUTPUT STRUCTURE ZFI_WBS_INFO OPTIONAL
*"----------------------------------------------------------------------
TYPES:BEGIN OF TY_ITAB,
PSPNR TYPE PRPS-PSPNR,
POST1 TYPE PRPS-POST1,
END OF TY_ITAB.
DATA:ITAB TYPE TABLE OF TY_ITAB WITH HEADER LINE,
m_PSPNR TYPE PROJ-PSPNR.
*删除前面的0
SHIFT PSPID LEFT DELETING LEADING '0'.
*转换成内码
CALL FUNCTION 'CONVERSION_EXIT_ABPRJ_INPUT'
EXPORTING
INPUT = PSPID
IMPORTING
OUTPUT = m_PSPNR.
*从PRPS中取值
SELECT PSPNR
POST1
INTO CORRESPONDING FIELDS OF TABLE ITAB
FROM PRPS
WHERE PSPHI = m_PSPNR.
LOOP AT ITAB.
CALL FUNCTION 'CONVERSION_EXIT_KONPR_OUTPUT'
EXPORTING
INPUT = ITAB-PSPNR
IMPORTING
OUTPUT = OUTPUT-POSID.
OUTPUT-POST1 = ITAB-POST1.
APPEND OUTPUT.
CLEAR OUTPUT.
ENDLOOP.
ENDFUNCTION.
*"----------------------------------------------------------------------
*"*"Local interface:
*" IMPORTING
*" VALUE(PSPID) TYPE PROJ-PSPID OPTIONAL
*" TABLES
*" OUTPUT STRUCTURE ZFI_WBS_INFO OPTIONAL
*"----------------------------------------------------------------------
TYPES:BEGIN OF TY_ITAB,
PSPNR TYPE PRPS-PSPNR,
POST1 TYPE PRPS-POST1,
END OF TY_ITAB.
DATA:ITAB TYPE TABLE OF TY_ITAB WITH HEADER LINE,
m_PSPNR TYPE PROJ-PSPNR.
*删除前面的0
SHIFT PSPID LEFT DELETING LEADING '0'.
*转换成内码
CALL FUNCTION 'CONVERSION_EXIT_ABPRJ_INPUT'
EXPORTING
INPUT = PSPID
IMPORTING
OUTPUT = m_PSPNR.
*从PRPS中取值
SELECT PSPNR
POST1
INTO CORRESPONDING FIELDS OF TABLE ITAB
FROM PRPS
WHERE PSPHI = m_PSPNR.
LOOP AT ITAB.
CALL FUNCTION 'CONVERSION_EXIT_KONPR_OUTPUT'
EXPORTING
INPUT = ITAB-PSPNR
IMPORTING
OUTPUT = OUTPUT-POSID.
OUTPUT-POST1 = ITAB-POST1.
APPEND OUTPUT.
CLEAR OUTPUT.
ENDLOOP.
ENDFUNCTION.
0 0
- WBS、项目内码转换例程
- CONVERSION_EXIT_ABPRJ_INPUT(WBS内码转换)
- 内码转换
- wbs项目案例 wps到甘特图
- WBS
- WBS
- WBS
- WBS
- 现代项目管理的基石-WBS
- 备用:软件项目的WBS模版
- 转,转,转,软件项目的WBS
- WBS分解在软件项目中的应用
- 项目估算之任务分解法-WBS
- 项目管理之工作分解结构(WBS)
- WBS在项目控制中的应用
- 没有WBS,就没有项目管理
- 一个项目管理工具-WBS CHART PRO
- 项目工作分解工具:WBS ChartPro
- const放在函数后面
- undefined reference to
- Server Tomcat v7.0 Server at localhost was unable to start within 45 seconds
- REST和RESTFUL的相关概念理解
- day01_Java开发环境_20150730
- WBS、项目内码转换例程
- qt
- 二分图的最大匹配、完美匹配和匈牙利算法
- html5/css3响应式布局
- Hibernate各种主键生成策略与配置详解
- poj-1789 Truck History
- hdu1551Cable master(二分*)
- hdoj 2199 Can you solve this equation?【二分法】
- Android进程内通信