Monday, 27 October 2014

Find domain and value type

 

Table : DD07V

Ex. Find data element days.

image

image

go to SE11.

image

image

Click Where used list  image

and choose data elements.

Wednesday, 22 October 2014

Change value float to quantity


Question 2.4356510000000000E+06 to 243,651.00
Answer set field catalog
edit_mask = '==FLTQU'.
convexit = 'FLTQU'.

Dynamic User Setting

 

----Set current screen for user.----

 

REPORT  y_test.


tables esdus.


DATA: x TYPE i,
      y TYPE i.
data tab type LVC_s_COL.
data tab2 like table of tab.
data gs_comp      TYPE ref to CL_ABAP_TYPEDESCR.
data po type ebeln VALUE '4052001347'.
data item type ebelp VALUE '00110'.
DATA: l_display_only type c value 'X'.
data a(10) type c.
export i_display_only = l_display_only to MEMORY ID
'ME_DISPLAY_ONLY'.


START-OF-SELECTION.


set PARAMETER ID 'BES' FIELD po.
set PARAMETER ID 'BSP' FIELD item.
set PARAMETER ID 'BEP' FIELD item.
SET PARAMETER ID 'EFB' field '08'.
esdus-uname = sy-uname.
esdus-Action =  'PurchaseOrder'.
esdus-Element = 'item_view           SUBVIEW_INDEX'.
esdus-ACTIVE = '13'.
update esdus.


call TRANSACTION 'ME22N'  .
write / a .

Ex. Call Transaction using BDC


DATA: bdcdata TYPE TABLE OF bdcdata,
          wa_bdcdata TYPE bdcdata,

 
REFRESH bdcdata.
  wa_bdcdata-program  = 'CHRG'.
  wa_bdcdata-dynpro   = '1501'.
  wa_bdcdata-dynbegin = 'X'.
APPEND wa_bdcdata TO bdcdata.
PERFORM bdc_field       USING 'BDC_OKCODE' '=ENTR'.

SET PARAMETER ID 'MAT' FIELD 'RM-AL7075-RB-AS002'.
SET PARAMETER ID 'CHA' FIELD 'MA0120058%'.
CALL TRANSACTION 'MSC3N' USING bdcdata[]  MODE 'E' .

 
FORM bdc_field USING fnam fval.
IF fval <> space.
CLEAR wa_bdcdata.
    wa_bdcdata-fnam = fnam.
    wa_bdcdata-fval = fval.
APPEND wa_bdcdata TO bdcdata.
ENDIF.




Ex. Submit call screen

 

DATA rspar TYPE TABLE OF rsparams WITH HEADER LINE.

"Get all value on screen
CALL FUNCTION 'RS_REFRESH_FROM_SELECTOPTIONS'
EXPORTING
      curr_report           = sy-repid
*  IMPORTING
*    SP                    =
TABLES
      selection_table       = rspar .

IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.


“additional value

rspar-selname = 'JOBCOUNT'.
  rspar-kind    = 'P'.  “P = parameter , S = Select option
  rspar-sign    = 'I'.
  rspar-option  = 'EQ'.
  rspar-low     = ‘1’.
APPEND rspar.

 

"Submit Program
SUBMIT (program_name) 
AND RETURN
WITH SELECTION-TABLE rspar

 

Transaction Recorder

 

Tcode : SHDB

image

MIGO: Call Transaction

 

CALL FUNCTION 'MIGO_DIALOG'
EXPORTING
            i_action            = 'A04'
            i_refdoc            = 'R02'
            i_notree            = 'X'
            i_no_auth_check     = ' '
            i_deadend           = 'X'
            i_skip_first_screen = 'X'
            i_okcode            = 'OK_GO'
            i_mblnr             = w_output-mblnr
            i_mjahr             = w_output-mjahr
            i_zeile             = w_output-zeile.

Monday, 20 October 2014

ESDUS : Dynamic User Settings

 

Table ESDUS

ใช้เก็บค่าตำแหน่งการเลือกต่างๆของ Screen ของแต่ละ User

เช่น ตำแหน่งการเลือกของ Tree, ตำแหน่งการเลือกของ Tabstrip เป็นต้น

Sunday, 19 October 2014

Ex. Create data type handle

 

INPUT_TAB    Importing    Type    ANY TABLE
OUTPUT_TAB    Changing    Type    INDEX TABLE

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

DATA: output_field TYPE REF TO cl_abap_tabledescr,
        output_line TYPE REF TO data,
        out_linetype TYPE REF TO cl_abap_datadescr.
FIELD-SYMBOLS: <flinein> TYPE ANY, <flineout> TYPE ANY.

  output_field ?= cl_abap_tabledescr=>describe_by_data( output_tab ).
  out_linetype = output_field->get_table_line_type( ).
CREATE DATA output_line TYPE HANDLE out_linetype.
ASSIGN output_line->* TO <flineout>.


LOOP AT input_tab ASSIGNING <flinein>.
CLEAR <flineout>.
MOVE-CORRESPONDING <flinein> TO <flineout>.
APPEND <flineout> TO output_tab.
ENDLOOP.

Wednesday, 15 October 2014

Error Transport in QAS; cannot connect


Symptom:

sap error XT200 Return code: 0232

Clause:

Oracle User is locked

SQL> connect sapqas/ccsqasadm
ERROR:
ORA-28000: the account is locked

Warning: You are no longer connected to ORACLE.
SQL> connect /
Connected.
SQL> ALTER USER sapqas ACCOUNT UNLOCK;
ALTER USER sapqas ACCOUNT UNLOCK
*
ERROR at line 1:
ORA-01031: insufficient privileges

Solution:

1)  Unlock Oracle  user
SQL> connect /as sysdba
Connected.
SQL> ALTER USER sapqas ACCOUNT UNLOCK;
User altered.
SQL>
2) Change Oracle User Password
brconnect -u / -f chpass -o sapsr3 -p <password>