지니 loves 소은

https://www.daniel-berlin.de/devel/sap-dev/decompress-abap-source-code/
Decompress ABAP source code from table REPOSRC

Howdy!
If you ever wondered, where SAP stores your report source code, you probably came across table REPOSRC – but the source code is stored in a compressed format, so there's no way to get hold of it directly.
I've been trying to figure out, how this compression works for some time now… fortunately, several people dealt with the SAP DIAG protocol recently – which got me off the ground.

Algorithm

The DIAG protocol uses a form of the Lempel-Ziv (LZ) compression algorithm and a bold attempt confirmed that this is also true for the source code compression.

The code stored in REPOSRC-DATA is actually compressed using the LZH algorithm (Lempel-Ziv plus Huffman coding), which is used by the SAP DB MaxDB database too (thanks to Dennis Yurichev for the idea).

Knowing this, I wrote a decompression tool around a small portion of the MaxDB code, which also takes care of some SAP specialties:

• The 1st byte of the compressed data seems to be junk (or might have a special meaning !?)
• The first 2 bytes of the decompressed source are junk, too ?!
• Lines are terminated with character code 0xFF, which has to be adjusted
• The 1st, 3rd, 5th … decompressed byte contains NUL (not sure, why !)

The decompressed source code has a fixed line length of 255 characters (blank-padded).

Usage

1. Download this archive (it contains the decompressor tool compiled for Win32 and an ABAP report to dump the binary source code). The source code is available here; you can easily compile it on Linux/BSD/Unix/Windows using the enclosed build script.
2. To extract the compressed source code from SAP, use the report "ZS_REPOSRC_DOWNLOAD". It reads the DATA field from table REPOSRC for a given report and stores it in a binary file on your workstation.
3. Decompress the file on the command line.

PS: Works for Kernel 7.x, no guarantee for older releases.
PS 2: The functionality on non-Unicode systems is unknown… I'll check this later.

테이블에 SINGLE 이라는 컬럼이 있을 경우, NW7.4 이젼 버젼에서는 문제 없이 동작했는데

NW7.4에서는 시스템 명령어로 등록되어 에러가 발생함

SELECT burks single from ~~

! 기호를 추가하여 다음과 같이 수정하면 에러가 발생하지 않음

SELECT burks !single from ~~

흔히 LFA1/KNA1 -ADRNR 필드로 ADRC값을 읽은것 같은데,,

데이터가 잘 안들어가 있어서 보니 BUT020-PARTNER   ADDRNUMBER의 ADRC 주소를 읽어야

데이터가 잘 불러와 지는것 같습니다..

물론 더 정확하게 하려면 BAPI_BUPA_ADDRESS_GETDETAIL 바피 펑션으로..

혹시 업무 참고하셔요.. 

https://starcraft.com/ko-kr/articles/20674424

GVA2000_Student_2355.exe

 data g_PRINT TYPE  SLIS_PRINT_ALV.

   g_print-no_coverpage  = 'X'. 

   g_print-no_print_listinfos =  'X'.  

   ...  

   CALL FUNCTION  'REUSE_ALV_LIST_DISPLAY'  

   EXPORTING  

   ....  

   is_print = g_print

   ....  

   이렇게 해주면 됩니다.