ITPub博客

FIMA_DATE_CREATEHR_ECM_GET_DATETYP_FROM_IT0041[@more@]FIMA_DATE_CREATEIN 4.6CI_YEARS LIKE VTBBEWE-ATAGE 0I_MONTHS LIKE VTBBEWE-ATAGE 0I_DAYS LIKE VTBBEWE-ATAGE 0I_CALENDAR_DAYS LIKE VTBBEWE-ATAGE 0without sign.in ECC 5.0with sign.HR_ECM_GET_DATETYP_FROM_IT0041this function is not in ECC 5.0create one :FUNCTION ZHRF_GET_DATETYP_FROM_IT0041.*"----------------------------------------------------------------------*"*"Local interface:*" IMPORTING*" VALUE(PERNR) TYPE PER

PA: PBO/PAI[@more@]*----------------------------------------------------------------------** INCLUDE ZXPADU01 **----------------------------------------------------------------------** data declaration in ZXPADTOP "Global Data DATA: I2005 LIKE P2005, I2006 LIKE P2006.* default values in ZXPADU01 WHEN '2006'. MOVE INNNN TO I2006. IF I2006-SUBTY = '15' OR I2006-SUBTY = '20'. MOVE '99991231' TO I2006-DEEND.

通过在屏幕的逻辑流里面调用FUNCTION F4IF_INT_TABLE_VALUE_REQUEST 可以实现使用动态生成的内表作为search help的内容[@more@]在内表中，也可以对内表数据进行组合以后作为新的关键字等使用definitionTABLES: P0021.TABLES: PA0021.TABLES: PA9501.DATA: PERNR LIKE P9501-PERNR, ENAME LIKE Q0021-ENAME.DATA: BEGIN OF ZTABLE_MEMBER OCCURS 0, ENAME LIKE Q0021-ENAME, FGBDT LIKE P0021-FGBDT, FANAM LIKE P0021-FANAM, FAVOR LIKE P0021-FAVOR,END OF ZTABLE_MEMBER.DATA: progname TYPE sy-repid, dynnum TYPE s