年月F4帮助

最新推荐文章于 2024-04-23 13:17:47 发布

踩沙滩

最新推荐文章于 2024-04-23 13:17:47 发布

阅读量512

点赞数

分类专栏： ABAP 文章标签： ABAP F4help

本文链接：https://blog.csdn.net/yang362046076/article/details/50680993

版权

ABAP 专栏收录该内容

71 篇文章 21 订阅

订阅专栏

PARAMETERS: p_yymm   TYPE SPMON DEFAULT sy-DATUM+0(6).
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_yymm.
CALL FUNCTION 'POPUP_TO_SELECT_MONTH'
  EXPORTING
    ACTUAL_MONTH                     = sy-DATUM+0(6)
*   FACTORY_CALENDAR                 = ' '
*   HOLIDAY_CALENDAR                 = ' '
   LANGUAGE                         = SY-LANGU
*   START_COLUMN                     = 8
*   START_ROW                        = 5
 IMPORTING
   SELECTED_MONTH                   =  p_yymm
*   RETURN_CODE                      =
 EXCEPTIONS
   FACTORY_CALENDAR_NOT_FOUND       = 1
   HOLIDAY_CALENDAR_NOT_FOUND       = 2
   MONTH_NOT_FOUND                  = 3
   OTHERS                           = 4
          .
IF SY-SUBRC <> 0.
* Implement suitable error handling here
ENDIF.

170307更：

如果是年月区间，则low，high分别加上：

SELECT-OPTIONS: S_YYMM FOR S031-SPMON DEFAULT SY-DATUM+0(6) TO SY-DATUM+0(6) OBLIGATORY.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR S_YYMM-LOW.
PERFORM FRM_F4_S_YYMM USING S_YYMM-LOW.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR S_YYMM-HIGH.
PERFORM FRM_F4_S_YYMM USING S_YYMM-HIGH.

FORM FRM_F4_S_YYMM  USING S_YYMM_LOW_OR_HIGH.
  CALL FUNCTION 'POPUP_TO_SELECT_MONTH'
    EXPORTING
      ACTUAL_MONTH               = SY-DATUM+0(6)
*     FACTORY_CALENDAR           = ' '
*     HOLIDAY_CALENDAR           = ' '
      LANGUAGE                   = SY-LANGU
*     START_COLUMN               = 8
*     START_ROW                  = 5
    IMPORTING
      SELECTED_MONTH             = S_YYMM_LOW_OR_HIGH
*     RETURN_CODE                =
    EXCEPTIONS
      FACTORY_CALENDAR_NOT_FOUND = 1
      HOLIDAY_CALENDAR_NOT_FOUND = 2
      MONTH_NOT_FOUND            = 3
      OTHERS                     = 4.
ENDFORM.                    " FRM_F4_S_YYMM