zoukankan      html  css  js  c++  java
  • A Sample Program Calling Smartforms 沧海

    You should use 'SSF_FUNCTION_MODULE_NAME' & call function fm_name in your program & not others. 

    *&---------------------------------------------------------------------*
    *& Report  ZTACA_DRIVER_SMARTFORM                                      *
    *&                                                                     *
    *&---------------------------------------------------------------------*
    *&                                                                     *
    *&                                                                     *
    *&---------------------------------------------------------------------*
    REPORT  ZTACA_DRIVER_SMARTFORM                  .
    Tables : sflight.
    Data : fm_name TYPE rs38l_fnam.
    *data : Begin of it_flttab occurs 0,
    *        carrid type sflight-carrid,
    *        connid type sflight-connid,
    *        fldate type sflight-fldate,
    *        seatsmax type sflight-seatsmax,
    *        seatsocc type sflight-seatsocc,
    *        End of it_flttab.
    data : it_flttab like table  of sflight.
    Data : g_salary type i .
    *       it_flttab type standard table of ty_flt.
    g_salary = 1000.
    select carrid connid fldate seatsmax seatsocc from sflight into
    corresponding fields of table it_flttab.
    CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
      EXPORTING
        formname                 = 'ZTACA_SMFORM2'
    *   VARIANT                  = ' '
    *   DIRECT_CALL              = ' '
     IMPORTING
       FM_NAME                  = fm_name
     EXCEPTIONS
       NO_FORM                  = 1
       NO_FUNCTION_MODULE       = 2
       OTHERS                   = 3
              .
    IF sy-subrc <> 0.
     MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
             WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
    call function fm_name
      Exporting
         salary = g_salary
      TABLES
         it_flttab = it_flttab
      EXCEPTIONS
        FORMATTING_ERROR           = 1
        INTERNAL_ERROR             = 2
        SEND_ERROR                 = 3
        USER_CANCELED              = 4
        OTHERS                     = 5           .
     IF SY-SUBRC <> 0.
     MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
             WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
     ENDIF.
  • 相关阅读:
    angular typescript 引入js文件
    (转)WEB页面导出为Word文档后分页&横向打印的方法
    aspx页面,后端通过Attributes.Add给textbox添加事件时,传参失效问题。
    aspx.designer.cs没有自动生成代码(没有自动注册)
    .net core 在CentOS环境下将微信公众号语音文件amr转化成mp3
    Sign in with Apple 后端验证(C#)
    C# 调用腾讯即时通信 IM
    LINQ入门笔记----LINQ To Object<Take(),TakeWhile(),Skip(),SkipWhile()>
    LINQ入门笔记----LINQ To Object<SelectMany()>
    初识LINQ
  • 原文地址:https://www.cnblogs.com/omygod/p/1055280.html
Copyright © 2011-2022 走看看