ITPub博客

首页 > Linux操作系统 > Linux操作系统 > 只有 年月 的F4帮助

只有 年月 的F4帮助

原创 Linux操作系统 作者:hzq2010 时间:2011-05-15 12:13:29 0 删除 编辑

AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_YRMN1.
  PERFORM. YRMN_HELP_F4 CHANGING P_YRMN1.

FORM. YRMN_HELP_F4 CHANGING PA_YRMN.
  DATA L_DATE TYPE ISELLIST-MONTH.
  L_DATE = SY-DATUM+0(6).
  CALL FUNCTION ‘POPUP_TO_SELECT_MONTH’
    EXPORTING
      ACTUAL_MONTH                     = L_DATE
    IMPORTINGa
      SELECTED_MONTH                   = PA_YRMN
    EXCEPTIONS
      FACTORY_CALENDAR_NOT_FOUND       = 1
      HOLIDAY_CALENDAR_NOT_FOUND       = 2
      MONTH_NOT_FOUND                  = 3
      OTHERS                           = 4.
  IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.

ENDFORM.                    ” YRMN_HELP_F4

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/23495244/viewspace-695408/,如需转载,请注明出处,否则将追究法律责任。

上一篇: SAP Tables
请登录后发表评论 登录
全部评论

注册时间:2010-03-11

  • 博文量
    196
  • 访问量
    168672