SAP函数大荟萃

1 . 函数WS_UPLOAD      功能﹕将TXT文件转换成SAP中的内表定义的数据表格文件     注意﹕1 函数将按参数 data_tab 的实际参数(假设为 table1) table1 定                                                                              义的各个字段的长度来依次将TXT文件间隔开﹐并依次将对应的值付给table1的             字段,table中的各个字段必须为C 型           2 TXT文件中﹐各个字段值之间不能有空格    事例: ZBC400_JOHN_26 2 . 函数TH_POPUP      功能: 向函数入口参数 client , user决定的用户发送信息(信息为入口参数 message 决            定的信息)      事例﹕ZBC_LSL_017 3. 函数   HELP_VALUES_GET_WITH_TABLE      功能﹕弹出用户所需要的信息﹐让用户选择﹐并把选种的信息付给输入框﹐相当与建立起            SEARCH HELP      注意: 1 tables 的参数 fields , valuetab 需要固定的内表结构            2 importing 的参数 select_value 有高﹐低两个值﹐即用户选种的值付给相应的              输入框的最小值﹐最大值            3 tables 的参数 fields , valuetab 的实际参数(假设为 tab_field, field_value)               tab_field, field_value 的付值,其tab_field 内表中﹐有且仅有一个字段的               selectflag = ‘X’        事例﹕ ZPP000293 4 . 函数 Z_UDARBID           功能﹕根据工单号﹐当前工作中心代号﹐读出上一工作中心代号﹐上一工作中心名称﹐                下一工作中心代号﹐下一工作中心名称          事例﹕ZPP000224_EDIT          说明﹕取得上下组别的函数更正确的函数 z_udarbid_change(可以解决组别                                                             循环问题)           示例﹕ZBAK_ZPP000222_LSL 5 . 函数 Z_COLORANDSIZE           功能﹕根据该物料的组态﹐得出该物料的颜色尺码.          注意﹕入口参数 IP_SPRAS = ‘E’ 表示本厂款号﹐’M’表示客户款号 6 . 函数 Z_PRINTTITLE          功能 ﹕打印标准报表头          事例﹕ ZBC_LSL_777 7 . 函数 Z_PAGECHANGE          功能﹕许多记录时﹐进行翻叶操作 8 . 函数READ_TEXT         功能﹕读取内文         假设﹕FORM get_pitext USING pn LIKE thead-tdname .                    REFRESH tabline.   CALL FUNCTION 'READ_TEXT'        EXPORTING             client         = sy-mandt             id             = '0006'             language       = 'M'             object         = 'VBBK'             name           = pn             archive_handle = 0        IMPORTING             headers        = thead        TABLES             lines          = tabline        EXCEPTIONS             not_found      = 2. 注意﹕ 1  tabline 必须为固定格式, headers 的实际参数必须为 thead           name 的实际参数必须为thead-tdname 形式,靠它来确定取谁的内                 文 2 client , language , archive_handle 的入口值基本固定如上 3 id 为 va03à转到à表头à内文à(双击要读取的内文项)àgotoàheader text id 既是参数 id 的值 text object 既是参数 object 的值 事例﹕ZPP000220              9 . 函数 Z_CURR_TO_CHAR .         功能﹕把 curr 型的数据转化成 char 型的数据﹐转化后的数据仍然                按 curr 型数据显示 (“###,###,###.##”)并可以在char型数                 前后添加固定个特殊字符                   (“**12,111,456.23”, ”**********12.45”)      假设 p_curr 为 CURR 型﹐ p_char = ‘*’ CALL FUNCTION 'Z_CURR_TO_CHAR'      EXPORTING           p_curr_i        = p_curr       *   p_char_i        = p_char       *   p_num_i         = 2       *   p_bore_i        =        *   p_nums_i        = 20     IMPORTING           p_char_o        = t_chr      EXCEPTION           no_p_curr_i     = 1           curr_type_wrong = 2           not_bore_i      = 3           OTHERS          = 4.   说明﹕       p_curr  : 必须输入参数﹐不能超过15个长度,被转化的参数       p_char  : 可线参数﹐须添加的特殊字符       p_num_I : 可线参数﹐当参数p_nums_I为空时有效﹐要添加的特殊字符                                 的个数                       p_bore_I: 可线参数﹐决定是在前/后添加特殊字符,bà前﹐eà后﹐默                 认为 b,只能输入b/e 否则函数不转化       p_nums_I: 可线参数﹐决定转化成固定个字符长度的﹐若参数p_char_I                  有值﹐则不足位时补特殊字符﹐若参数p_char_I为空时﹐                  该参数无效﹐若该参数输入值﹐则参数p_num_I 无效。       p_char_o: 转化后的数据  若执行该函数 sy-subrc 之值如下﹕           1à没用输入参数p_curr_I .           2à参数p_curr_I过长﹐或p_nums_I为空﹐p_num_I为负数           3à参数p_bore_I 不是输入’e’/’b’(大小写不区分)  事例﹕ZBC_Z_CURR_TO_CHAR 8.函数  Z_COLORANDSIZE_MATNR    功能 ﹕根据物料的款号得出该物料的特性值 (如C10019-EYEDE 的对应的A,C,D 的颜色说          明﹐39.5﹐41.5 的尺码大小﹐见 TC : CT03 ) 放与一个内表中)   CALL FUNCTION 'Z_COLORANDSIZE_MATNR'      EXPORTING           p_matnr  = p_matnr           p_spras  = 'Z1'    TABLES           t_tab    = it      EXCEPTIONS           no_matnr = 1           no_data  = 2           OTHERS   = 3.  说明﹕        p_matnr : 必要入口参数﹐需要取得特性的物料的款号        p_spras : 语言码﹐默认为 ‘M’          it      : 为内表﹐P_matnr 的各特性值便放与次表中﹐该表结构固定﹐                     字段如下﹕                   name   字符型 (= ‘COLOR’ 表示颜色特性﹐= ‘SIZE’ 表示                                    尺码特性)                   atwrt  特性码 (如 D,E,F,39.4,41.5)                   atwtb  特性值说明﹐即通常所说的颜色﹐尺码        执行后 sy-subrc = 1 表示 参数 p_matnr 为空                        = 2 表示 该 物料没用特性值                        = 3 表示其它错误      获得结果比函数Z_COLORANDSIZE 更广   9.函数WS_DOWNLOAD      功能﹕将内表中的数据转化成特定的文件            见范例 zbc400_lsl_file_change   10. 函数WS_UPLOAD       功能﹕将指定文件中的数据转化成内表中的数据            见范例 zbc400_lsl_file_change

         有其它客户在更新该数据表
 CALL FUNCTION 'ENQUEUE_ECMERKM'           
          EXPORTING
*         MODE_RCTMV     = 'E'
          mandt              = sy-mandt
          atnam              = p_lock_atnam
*         X_ATNAM          = ' '
*         _SCOPE           = '2'
*         _WAIT            = ' '
*         _COLLECT         = ' '
     EXCEPTIONS
          foreign_lock  = 1
          system_failure = 2
          OTHERS     = 3.
 说明﹕ mandt ﹕ 使用的数据端口
        atnam ﹕ 被锁定的记录(可以确定唯一一条记录)

12 函数EQUEUE_ECMERKM
   功能﹕对自己锁定的记录进行解锁,常用于对数据表中数据进行更新操作之 
          前﹐通常与 加锁函数联合起来用
           CALL FUNCTION 'DEQUEUE_ECMERKM'
                 EXPORTING
*                    mode_rctmv = 'E'
                     mandt      = sy-mandt
                     atnam      =  p_ulock_atnam
*                    X_ATNAM    = ' '
*                    _SCOPE     = '3'
*                   _SYNCHRON   = ' '
*                   _COLLECT    = ' '
                 EXCEPTIONS
                     OTHERS     = 1.
说明﹕ mandt ﹕ 使用的数据端口
       atnam ﹕ 需要解锁的记录(可以确定唯一一条记录)

13 .函数  TH_POPUT
   说明﹕该函数是向 SAP 用户发送信息
  CALL FUNCTION 'TH_POPUP'           "向用户发送信息
         EXPORTING
              CLIENT         = BIT-MANDT
              USER           = BIT-BNAME
              MESSAGE        = MES
              MESSAGE_LEN    = LEN     "要发送的信息的长度可截断部分信息
              CUT_BLANKS     = ' '
         EXCEPTIONS
              USER_NOT_FOUND = 1.
  参数﹕client ------客户端口
        user--------用户名(接收者)
        message—需要发送的信息(通常用变量储存)
        message_len: 发送的信息截取的长度(若长度<mes的长度﹐则多余信
                    息被截掉)
  其中客户端口﹐用户名常常放与一内表中﹐内表结构必须为结构uinfo 
  见示例 zbc400_lsl_send_message

14 .图形显示函数﹕GRAPH_2D(二维平面图), GRAPH_3D(三维立体图)
CALL FUNCTION 'GRAPH_2D'
     EXPORTING
          mail_allow = 'X'
          titl       = l_title
     TABLES
          data      = t_graph.
    
  参数﹕ title : 图形的标题
         data:  存放数据的内表
  GRAPH_3D 函数用法同 GRAPH_2D .
  示例﹕ZBAK_ZPP000222_LSL

15 .函数CS_WHERE_USED_MAT(逆查BOM)
   说明﹕取的物料的上层物料
                CALL FUNCTION 'CS_WHERE_USED_MAT'  
             EXPORTING
               datub                      = sy-datum
               datuv                      = sy-datum
               matnr                      = t_afru-matnr
*             POSTP                       = ' '
*             RETCODE_ONLY                = ' '
*             STLAN                       = ' '
               werks                      = '1000'
*        IMPORTING
*             TOPMAT                      =
             TABLES
                  wultb                   = ltb
                  equicat                 = equicat
                  kndcat                  = kndcat
                  matcat                  = matcat
                  stdcat                  = stdcat
                  tplcat                  = tplcat
             EXCEPTIONS
                  call_invalid                = 1
                  material_not_found          = 2
                  no_where_used_rec_found     = 3
                  no_where_used_rec_selected  = 4
                  no_where_used_rec_valid     = 5
                  OTHERS                      = 6.
         参数﹕datub:  当前日期
               datuv:  当前日期
               matnr:  要找回上层BOM物料的物料
               werks:  工厂通常取’1000’ 
               wultb:  所有的上层BOM物料存放在该表中(该表结构固定)
               equicat:  固定结构﹐一定要
               kndcat :  固定结构﹐一定要
               matcat:  固定结构﹐一定要 
               stdcat : 固定结构﹐一定要
               tplcat : 固定结构﹐一定要
  示例:   ZBAK_ZPP000222_LSL

BOM 展开函数(顺查BOM)
16 .只展开 BOM 的函数
  CALL FUNCTION 'CS_BOM_EXPL_MAT_V2'
   EXPORTING
      capid = pm_capid   “应用程序 一般为 PP01 
      datuv = pm_datuv   “通常为系统的当前日期 
      mtnrv = pm_mtnrv   “要展开BOM 的物料
      mehrs = 'X'        “ x 表示多层展开﹐space 表示只展开第一层
      werks = pm_werks   “ 通常为 1000
   IMPORTING
      topmat = selpool
      dstst  = dstst_flg
   TABLES
      stb = stb          “展开的 BOM 存放在该内表
      matcat = matcat    “下面含有组件的物料存放在该内表


17 .展开与特性相关的特定款号的 BOM 
   CALL FUNCTION 'CS_BOM_EXPL_ KND_V1'
   EXPORTING
      capid = pm_capid   “应用程序 一般为 PP01 
      datuv = pm_datuv   “通常为系统的当前日期 
      mtnrv = pm_mtnrv   “要展开BOM 的物料
      cuobj = vbap_wa-cuobj “与特性相关的组态
      mehrs = 'X'        “ x 表示多层展开﹐space 表示只展开第一层
      werks = pm_werks   “ 通常为 1000
   IMPORTING
      topmat = selpool
      dstst  = dstst_flg
   TABLES
      stb = stb          “展开的 BOM 存放在该内表
      matcat = matcat    “下面含有组件的物料存放在该内表

范例见系统报表程序 RCS12001

1 说明﹕内表 stb, matcat 结构固定, 输出参数 selpool , dstst_flg 固定,
      其固定结构如下:
 内表:
   DATA: BEGIN OF stb OCCURS 1000.
         INCLUDE STRUCTURE stpox.
   DATA: END OF stb.
   DATA: BEGIN OF matcat OCCURS 50.
         INCLUDE STRUCTURE cscmat.
   DATA: END OF matcat.
  输出参数:
     DATA: BEGIN OF selpool.
           INCLUDE STRUCTURE cstmat.
      DATA: END OF selpool.
      DATA: dstst_flg LIKE csdata-xfeld.

  2 说明﹕内表 stb 中的数据按第一层顺序号排序﹐如第一层组件下还有BOM, 
          则其BOM显示在其下面﹐并依次分层(下面BOM 也按顺序号排列) 
         stb 下的重要字段说明如下﹕
           stufe : 在整个 BOM 中的层次 
             tdidx : 对应 matcat-index ﹐标志直属哪个物料下的 BOM
             ojtxb : 上层物料的物料说明
             ojtxp : 本身物料说明
             idnrk : 组件名(即物料)
             stlkn : 在各自 BOM 中的顺序号
             matkl : 该物料群组
             mtart : 物料类型 (成品﹐半成品﹐原料)
           matcat 下的重要字段 (表matcat 存放下面还有BOM 的物料)
           matnr : 物料号
             index : 顺序号


函数 : SO_NEW_DOCUMENT_SEND_API1
 功能﹕向SAP 用户的收信箱中发送Email(内容存与内表中)
CALL FUNCTION 'SO_NEW_DOCUMENT_SEND_API1'
      EXPORTING
           document_data = email_send
           document_type = 'RAW'
            put_in_outbox = 'X'
           put_in_outbox = ''
      TABLES
           object_content = it_data
           receivers     = email_rece.
说明﹕document_data  : 发送Email 之属性
      object_content : 发送之内容
      receivers      : 收件者