ITPub博客

首页 > Linux操作系统 > Linux操作系统 > SubMit 传区间段的值

SubMit 传区间段的值

原创 Linux操作系统 作者:heart_smile 时间:2009-07-15 16:30:05 0 删除 编辑

如果带区间的字段这样传:

 

ZSD040_CCSTO_SCR:

SELECTION-SCREEN:BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.

PARAMETERS:P_VKORG LIKE VBAK-VKORG OBLIGATORY,"Sales Organization
           P_AUART 
LIKE VBAK-AUART OBLIGATORY,"Order Type
           P_VSTEL 
LIKE TVST-VSTEL NO-DISPLAY, "Shipping Point
           P_MATNR 
LIKE MSKA-MATNR."Material


SELECT-OPTIONS:S_VBELN FOR VBAK-VBELN."Sales doc.

SELECTION-
SCREEN:END OF BLOCK B1 .

 

传值:

      DATA: SELTAB TYPE TABLE OF RSPARAMS,
            SELTAB_WA LIKE LINE OF SELTAB.
*
      SELTAB_WA-SELNAME = 'S_VBELNN'.

      LOOP AT S_VBELN.
        SELTAB_WA-LOW = S_VBELN-LOW.
        SELTAB_WA-HIGH = S_VBELN-HIGH.
        SELTAB_WA-SIGN = S_VBELN-SIGN.
        SELTAB_WA-OPTION = S_VBELN-OPTION.

        APPEND SELTAB_WA TO SELTAB.
      ENDLOOP.

      
"按鈕1
      
SUBMIT ZSD040_CCSTO_SHOW WITH P_VKORG = P_VKORG
                               
WITH P_AUART = P_AUART
                               
WITH P_MATNR = P_MATNR
                               
WITH selection-table SELTAB
                               AND RETURN.

 

ZSD040_CCSTO_SHOW  接收页面不用填写值了,自动取得从ZSD040_CCSTO传过来的值

 

 

ZSD040_CCSTO_SHOW :

 

SELECTION-SCREEN:BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.

PARAMETERS:P_VKORG LIKE VBAK-VKORG OBLIGATORY,"Sales Organization
           P_AUART 
LIKE VBAK-AUART OBLIGATORY,"Order Type
           P_VSTEL 
LIKE TVST-VSTEL NO-DISPLAY, "Shipping Point
           P_MATNR 
LIKE MSKA-MATNR."Material


SELECT-OPTIONS:S_VBELNN FOR VBAK-VBELN."Sales doc.

SELECTION-
SCREEN:END OF BLOCK B1 .

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

请登录后发表评论 登录
全部评论

注册时间:2008-11-15

  • 博文量
    32
  • 访问量
    73121