Read text on binary mode

TYPES: BEGIN OF ty_stxl,
          tdname TYPE stxl-tdname,
          clustr TYPE stxl-clustr,
          clustd TYPE stxl-clustd,
  srtf2  TYPE stxl-srtf2,
END OF ty_stxl.
DATA:  t_stxl TYPE STANDARD TABLE OF ty_stxl.
FIELD-SYMBOLS: <stxl> TYPE ty_stxl.
* compressed text data without text name
TYPES: BEGIN OF ty_stxl_raw,
          clustr TYPE stxl-clustr,
          clustd TYPE stxl-clustd,
END OF ty_stxl_raw.
DATA:  t_stxl_raw TYPE STANDARD TABLE OF ty_stxl_raw.
DATA:  w_stxl_raw TYPE ty_stxl_raw.
* decompressed text
DATA:  t_tline TYPE STANDARD TABLE OF tline.
FIELD-SYMBOLS: <tline> TYPE tline.
DATA: t_stxh TYPE STANDARD TABLE OF stxh,
       w_stxh TYPE stxh.
DATA rtname TYPE RANGE OF  stxl-tdname WITH HEADER LINE.

rtname-sign = 'I'. rtname-option = 'EQ'.
rtname-low = '210N501678550000000500000005'.
APPEND rtname.
rtname-low = '210N501785510000000200000002'.
APPEND rtname.
SELECT tdname clustr clustd  srtf2
INTO TABLE t_stxl
FROM stxl
" PACKAGE SIZE 3000
WHERE tdname in rtname AND tdspras = 'E'.
SORT t_stxl  BY srtf2.
CLEAR: t_stxl_raw[], t_tline[].
LOOP AT rtname.
write /  rtname-low.
LOOP AT t_stxl ASSIGNING <stxl> WHERE tdname  =  rtname-low.
*   decompress text
    w_stxl_raw-clustr = <stxl>-clustr.
    w_stxl_raw-clustd = <stxl>-clustd.
APPEND w_stxl_raw TO t_stxl_raw.
ENDLOOP.
IMPORT tline = t_tline FROM INTERNAL TABLE t_stxl_raw.
*  access text lines for further processing
LOOP AT t_tline ASSIGNING <tline>.
WRITE: / <tline>-tdline.
ENDLOOP.
uline.
ENDLOOP.
FREE t_stxl.

User ZLOGON2

 

Table : ZBCPROGPWD

1. Click View Maintenance.

2. Click Edit 

3. Delete Report key and Click gen on Users.

4. Click Hash for encoding and Click Save.

 

Create transport request

How to add column on popup message log

DATA: gs_log          TYPE bal_s_log,
      gt_log          TYPE bal_t_logh,
      gs_log_handle   TYPE balloghndl,
      gs_msg          TYPE bal_s_msg,
      gt_msg          TYPE bal_t_msgh,
      gs_disp_profile TYPE bal_s_prof,
      gs_fcat TYPE bal_s_fcat,
      gs_context type ZPP_ORD_OPER.
________________________________________________________________________
FORM create_log .
CALL FUNCTION 'BAL_LOG_CREATE'
EXPORTING
      i_s_log      = gs_log
IMPORTING
      e_log_handle = gs_log_handle.
ENDFORM.                    " CREATE_LOG
________________________________________________________________________
FORM log_msg_add  USING    value(p_msgty)
value(p_msgid)
value(p_msgno)
value(p_msgv1)
value(p_msgv2)
value(p_msgv3)
value(p_msgv4).
CLEAR: gs_msg.
  gs_msg-msgty = p_msgty.
  gs_msg-msgid = p_msgid.
  gs_msg-msgno = p_msgno.
  gs_msg-msgv1 = p_msgv1.
  gs_msg-msgv2 = p_msgv2.
  gs_msg-msgv3 = p_msgv3.
  gs_msg-msgv4 = p_msgv4.
  gs_context-order = v_order.
  gs_context-operation = v_oper.
  gs_msg-context-value = gs_context.
  gs_msg-context-tabname = 'ZPP_ORD_OPER'.
CALL FUNCTION 'BAL_LOG_MSG_ADD'
EXPORTING
      i_s_msg = gs_msg.
ENDFORM.                    " LOG_MSG_ADD
________________________________________________________________________
FORM show_log .
*------Set Popup Screen------
CALL FUNCTION 'BAL_DSP_PROFILE_POPUP_GET'
EXPORTING
      start_col           = 5
      start_row           = 5
      end_col             = 120
      end_row             = 25
IMPORTING
      e_s_display_profile = gs_disp_profile.
  gs_disp_profile-use_grid ='X'.
CLEAR gs_fcat.
  gs_fcat-ref_table = 'ZPP_ORD_OPER'.
  gs_fcat-ref_field = 'ORDER'.
  gs_fcat-col_pos = 0.
APPEND gs_fcat TO gs_disp_profile-mess_fcat.
  gs_fcat-ref_table = 'ZPP_ORD_OPER'.
  gs_fcat-ref_field = 'OPERATION'.
  gs_fcat-col_pos = 1.
APPEND gs_fcat TO gs_disp_profile-mess_fcat.
*------Display Log-----------
CALL FUNCTION 'BAL_DSP_LOG_DISPLAY'
EXPORTING
      i_s_display_profile = gs_disp_profile
      i_t_log_handle      = gt_log
      i_t_msg_handle      = gt_msg.
ENDFORM.                    " SHOW_LOG
________________________________________________________________________
FORM clear_log .
CALL FUNCTION 'BAL_LOG_MSG_DELETE_ALL'
EXPORTING
      i_log_handle = gs_log_handle.
ENDFORM.                    " CLEAR_LOG
________________________________________________________________________