메뉴 건너뛰기

SAP 한국 커뮤니티

cl_abap_zip 한글깨짐현상.

홍당무 2019.04.08 17:29 조회 수 : 1240

 

ZIP화일 안의 파일은 잘 열리지만

파일명이 : EC%97%91%EC%85%80%EC%97%85%EB%A1%9C%EB%93%9C.XLS

와같이 깨짐니다. ("원본 : 엑셀다운로드.XLS)

 

 

아래 소스 부분( EV_FILENAME)에서

강제로 (엑셀다운로드.XLS)로 바꾼후

---------------------------------------------

  CALL METHOD ZIP_TOOL->ADD
  EXPORTING
  NAME    =  EV_FILENAME
  CONTENT = BUFFER_X.

----------------------------------------------

메쏘드 안의

CONV = CL_ABAP_CONVE_OUT_CE=>CREATE( ENCODEING  =  UTF8

                                       IGNORE_CERR   =  'X'

                                      REPLACEMENT    =  '#').

부분을 타고 나오면 정상적으로 한글이 보입니다.

 

아래 소스 한번 봐주시면 감사합니다.

_________________________________________________________

REPORT ZTEST

DATA: ZIP_TOOL TYPE REF TO CL_ABAP_ZIP,
                     L_ADDR TYPE REF TO CL_ABAP_CONV_IN_CE      ,

 FILENAME_ZIP TYPE STRING VALUE 'C:\test.zip'.

DATA: T_DATA_TAB TYPE TABLE OF SDOKCNTBIN.
DATA: LT_INFO LIKE SCMS_ACINF OCCURS 0 WITH HEADER LINE.

DATA : BUFFER_X TYPE XSTRING.

DATA: LT_DOCU     LIKE BAPI_DOC_FILES2 OCCURS 0 WITH HEADER LINE.
DATA: LS_DOC  TYPE BAPI_DOC_DRAW2.

DATA: LV_XSTRING  TYPE XSTRING,
         BIN_SIZE TYPE I,
         EV_FILESIZE TYPE I.
DATA : EV_FILENAME TYPE STRING.
DATA : EV_MIMETYPE TYPE  W3CONTTYPE.

DATA:   BUFFER_ZIP TYPE XSTRING.

************************************************************************
START-OF-SELECTION.
************************************************************************

  CLEAR: LT_DOCU.
  CALL FUNCTION 'BAPI_DOCUMENT_GETDETAIL2'
    EXPORTING
      DOCUMENTTYPE    = 'ABC'
      DOCUMENTNUMBER  = '0000000010000000007549324'
      DOCUMENTPART    = '000'
      DOCUMENTVERSION = '00'
    IMPORTING
      DOCUMENTDATA    = LS_DOC
    TABLES
      DOCUMENTFILES   = LT_DOCU.

  REFRESH: T_DATA_TAB, LT_INFO.
  CALL FUNCTION 'SCMS_DOC_READ'
    EXPORTING
      STOR_CAT              = LT_DOCU-STORAGECATEGORY
      DOC_ID                = LT_DOCU-FILE_ID
    TABLES
      ACCESS_INFO           = LT_INFO
*     content_txt           = lt_sdokcntasc
      CONTENT_BIN           = T_DATA_TAB
    EXCEPTIONS
      BAD_STORAGE_TYPE      = 1
      BAD_REQUEST           = 2
      UNAUTHORIZED          = 3
      COMP_NOT_FOUND        = 4
      NOT_FOUND             = 5
      FORBIDDEN             = 6
      CONFLICT              = 7
      INTERNAL_SERVER_ERROR = 8
      ERROR_HTTP            = 9
      ERROR_SIGNATURE       = 10
      ERROR_CONFIG          = 11
      ERROR_FORMAT          = 12
      ERROR_PARAMETER       = 13
      ERROR                 = 14
      OTHERS                = 15.

 


  READ TABLE LT_INFO INDEX 1.
  CHECK SY-SUBRC = 0.
  BIN_SIZE = LT_INFO-COMP_SIZE.
  EV_FILESIZE = LT_INFO-COMP_SIZE.

 


  EV_FILENAME = LT_INFO-COMP_ID.
  EV_MIMETYPE = LT_INFO-MIMETYPE.

 

***%EC%97%91%EC%85%80%EC%97%85%EB%A1%9C%EB%93%9C.XLS

 

  CALL FUNCTION 'SCMS_BINARY_TO_XSTRING'
    EXPORTING
      INPUT_LENGTH = BIN_SIZE
*     FIRST_LINE   = 0
*     LAST_LINE    = 0
    IMPORTING
      BUFFER       = BUFFER_X
    TABLES
      BINARY_TAB   = T_DATA_TAB
    EXCEPTIONS
      FAILED       = 1
      OTHERS       = 2.
*

 

**create zip tool
  CREATE OBJECT ZIP_TOOL.

 

 

***add binary file
  CALL METHOD ZIP_TOOL->ADD
  EXPORTING
  NAME    =  EV_FILENAME
  CONTENT = BUFFER_X.

 

 

**get binary ZIP file
  CALL METHOD ZIP_TOOL->SAVE
  RECEIVING
  ZIP = BUFFER_ZIP.

 

 

  CLEAR: T_DATA_TAB[],BIN_SIZE.
  CALL FUNCTION 'SCMS_XSTRING_TO_BINARY'
  EXPORTING
  BUFFER        = BUFFER_ZIP
  IMPORTING
  OUTPUT_LENGTH = BIN_SIZE
  TABLES
  BINARY_TAB    = T_DATA_TAB.

 

 

**download ZIP file
  CALL FUNCTION 'GUI_DOWNLOAD'
  EXPORTING
  BIN_FILESIZE = BIN_SIZE
  FILENAME     = FILENAME_ZIP
  FILETYPE     = 'BIN'
  TABLES
  DATA_TAB     = T_DATA_TAB.

_________________________________________________________

 

번호 제목 글쓴이 날짜 조회 수
6327 [요청]delete 하는법 알려주세요...조건에 맞는필드를 삭제하려고요... [5] 아밥! 2008.11.06 4682
6326 온라인프로그램에 두개의 컨테이너를 지정후 alv 적용 아시는 분? [1] 노력&성장 2007.08.19 4675
6325 [요청]loop 안에 if문에서 걸렸을때 loop까지 한번에 빠져나오려면?? [5] bizarre 2008.11.10 4673
6324 <b>[완료]</b>[질문]4개이상의 TABLE INNER JOIN 방법 [5] 아싸ㅎ 2008.04.03 4672
6323 [요청]VL31N 화면을 통한 인바운드납품 처리하는 BAPI로 GN_DELIVERY_CREATE 사용하려합니다. [2] 넷가이 2008.10.07 4646
6322 <img src=2.gif>Smartform 을 이용한 PDF 파일 변환시, 한국어/중국어 글씨가 깨져서 나옵니다. ㅠㅠ [4] 쿨쿨 2010.12.21 4634
6321 <img src=2.gif>SET UPDATE TASK LOCAL <- 관해 문의드립니다. [2] 맹꽁이 2009.12.01 4617
6320 <b>[완료]</b>팝업창에서 메시지를 두줄로 쓰는게 가능한가요. [5] 대략나 2008.02.18 4615
6319 <img src=3.gif>매크로 연동 엑셀에서 PDF 전환 후 메일 첨부... [4] 블랙아이즈 2010.06.19 4596
6318 [요청]import, export 구문의 대한 궁금정 [5] copine 2009.03.20 4580
6317 <b>[완료]</b>[re][re] 개인pc에 SAP NetWeaver 2004s 설치방법에 질문입니다. [4] sapjoy 2006.12.27 4578
6316 [요청]EU_SCRP_WN32 : timeout during allocate / CPIC-CALL: 'ThSAPCMRCV' 노름마치 2007.12.14 4569
6315 <img src=2.gif>엑셀 업로드시 [17] sapjoy 2007.03.19 4561
6314 [요청]Batch Job Cancel시 기록이 되는 테이블이 있나요? [5] SAP폐인 2009.02.23 4552
6313 <b>[완료]</b><b>[완료]</b>ALV GRID 초기화 하는 메소드? [1] SARA 2007.03.29 4547
6312 <img src=3.gif>문자열 자릿수 계산 질문입니다!! [5] ASDF 2010.11.09 4540
6311 <b>[완료]</b>LOCK OBJECT 에서 잠긴(ENQUEUE) 데이터를 프로그램에서 알 수 있는지 궁금합니다. [8] 하이원 2008.02.20 4523
6310 <b>[완료]</b>자동채번에 관해 문의드립니다. [7] 풍뎅이 2008.06.03 4518
6309 <img src=3.gif>RFC를 사용하여 델파이와 연동시 한글깨짐 현상이요 [4] 지니 2010.09.09 4516
6308 <img src=2.gif border=0>F4IF_INT_TABLE_VALUE_REQUEST 질문입니다. [2] 뫄* 2009.07.15 4508