现在的位置: 首页 > 综合 > 正文

POPUP_TO_CONFIRM_WITH_VALUE

2013年04月22日 ⁄ 综合 ⁄ 共 1087字 ⁄ 字号 评论关闭

通过 弹出窗口向提示关于某个值的确认信息
所属 Function Group : SPO1
所属 Package : SZP

DATA:answer TYPE c LENGTH 1.

CALL FUNCTION ‘POPUP_TO_CONFIRM_WITH_VALUE’
  EXPORTING
    defaultoption  = ‘Y’
    objectvalue    = ‘objectvalue’
    text_after     = ‘!!!!!!!! text after objectvalue’
    text_before    = ‘text before objectvalue !!!!!’
    titel          = ‘title’
    start_column   = 25
    start_row      = 6
    cancel_display = ‘X’
  IMPORTING
    answer         = answer
  EXCEPTIONS
    text_too_long  = 1
    OTHERS         = 2.
IF sy-subrc <> 0.
  MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.

CASE answer.
  WHEN ‘A’.
  WHEN ‘J’.
  WHEN ‘N’.
ENDCASE.
*The end-user’s decision is returned in ANSWER. ANSWER can contain the
*following values:
"A" = User chose Cancel
"J" = User confirmed the processing step
"N" = User withdrew from the processing step

结果:
点击可看大图
————
注意:
1、本函数已过期。
2、OBJECTVALUE 、TEXT_BEFORE 、TEXT_AFTER 三者总长度不能超过256个字符,相关源代码:
*—START
    TEXT       = SPACE.
    TEXT+1     = OBJECTVALUE.

    CONCATENATE TEXT_BEFORE TEXT INTO TEXT.

    IF SY-SUBRC = 4.
      RAISE TEXT_TOO_LONG.
    ENDIF.

    CONCATENATE TEXT TEXT_AFTER INTO TEXT.

    IF SY-SUBRC = 4.
      RAISE TEXT_TOO_LONG.
    ENDIF.
*—END

抱歉!评论已关闭.