excel导入内表的长度限制的solution

1、  'TEXT_CONVERT_XLS_TO_SAP'单元格文本不能超过256个字符 
   CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP' 
    EXPORTING 
      i_line_header              = 'X' 
      i_tab_raw_data             = lt_raw 
      i_filename                 = p_file 
    TABLES 
      i_tab_converted_data       = it_data 
    EXCEPTIONS 
      conversion_failed          = 1 
      OTHERS                     = 2 
  . 
TEXT_CONVERT_CSV_TO_SAP                     "CVS 
TEXT_CONVERT_TEX_TO_SAP                     "tex 
TEXT_CONVERT_TXT_TO_SAP                     "txt 
TEXT_CONVERT_XLS_TO_SAP                     "xls 
TEXT_CONVERT_XML_TO_SAP                     "xml 


2、'ALSM_EXCEL_TO_INTERNAL_TABLE'单元格文本不能超过50个字符 
data: gt_upload type alsmex_tabline occurs 0 with header line. 
      call function 'ALSM_EXCEL_TO_INTERNAL_TABLE' 
        exporting 
          filename    = p_file 
          i_begin_col = '1' 
          i_begin_row = '1' 
          i_end_col   = '9' 
          i_end_row   = '50000' 
        tables 
          intern      = gt_upload. 

3修改ALSM_EXCEL_TO_INTERNAL_TABLE的限制(http://blogold.chinaunix.net/u1/40527/showart_1970184.html) 
M:ALSM_EXCEL_TO_INTERNAL_TABLE 是上载Excel文件的一个函数,但是这个函数有两个限制。 
一是每个CELL只能导入前50个字符,二是如果超过9999行,行号会初始化为从零开始 
其实解决起来很简单,只要改一下结构 ALSMEX_TABLINE 的字段就行了,然后COPY  ALSM_EXCEL_TO_INTERNAL_TABLE 为 ZALSM_EXCEL_TO_INTERNAL_TABLE ,并做少许改动即可。 

另外,如果要上载有打开密码保护的Excel,只要修改一下OLE的 OPEN 语句即可。 
以及导入指定的Sheet等。。 

注意COPY出来的函数的 Global Data 里面应该有下列语句: 

TYPE-POOLS: ole2. 
TYPES: ty_d_itabvalue             TYPE zalsmex_tabline-value, 
       ty_t_itab                  TYPE zalsmex_tabline   OCCURS 0, 
       BEGIN OF ty_s_senderline, 
         line(4096)               TYPE c, 
       END OF ty_s_senderline, 
       ty_t_sender                TYPE ty_s_senderline  OCCURS 0. 
CONSTANTS:  gc_esc              VALUE '"'. 

excel导入内表的长度限制的solution_第1张图片  

excel导入内表的长度限制的solution_第2张图片 


另外可以尝试


 call function 'TEXT_CONVERT_XLS_TO_SAP'
    exporting
*     I_FIELD_SEPERATOR    =
      I_LINE_HEADER        = 'X'
      I_TAB_RAW_DATA       = IT_RAW
      I_FILENAME           = P_FILE
    tables
      I_TAB_CONVERTED_DATA = IT_DATATAB[]
    exceptions
      CONVERSION_FAILED    = 1
      others               = 2. 
这个函数

你可能感兴趣的:(excel导入内表的长度限制的solution)