Spilt stream text

 

Use Class

CL_ABAP_CHAR_UTILITIES

Ex.

SPLIT v_remark at CL_ABAP_CHAR_UTILITIES=>CR_LF
into TABLE it_tmp.

Get Resolution Screen

DATA: lref_consumer type ref to cl_gui_props_consumer,

ls_metric_factors type cntl_metric_factors.

lref_consumer = cl_gui_props_consumer=>create_consumer( ).

ls_metric_factors = lref_consumer->get_metric_factors( ).

WRITE: ls_metric_factors-screen-x,

  ls_metric_factors-screen-y.

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
________________________________________________________________________

How to create Purchase requisition (PR)

Call Transaction : ME51N. (Create Purchase Requisition)
Input Data :

Acct Assignment Cat. : U (Unknown)
Material : Select material but if have not material you space.
Short Text : Input Brand, Model, Description and spec anything.
Quantity : Input quantity.
Order Unit : Select unit of measure for order.
Delivery Date : Select date on which the goods are to be delivered.
Material Group : Select ZASSET or ZSERVICE.
Plant : Select plant (3000).
Purchasing Group : Select 30 Namfon S.
Requested By : Youe name.
Purch. Organization : Select plant (3000).
Val. Price : Key price of the requested material per price unit.

Tab Texts > Item text : Key your cost center.

and save requisition and copy PR number.

Call Transaction : ZMM01 (Print or Display Purchase Requisition)

1. Input PR number in Purchase Requisition.
2. Checkbox Print Now..
3. Execute.

Unlock & Reset SAP* Password in Oracle

Link : http://wiki.scn.sap.com/wiki/pages/viewpage.action?pageId=326533785