Check post : Activate conditions and formulas for pricing.
Use program RV80HGEN.
Sometimes the standard automatically add this report in transport request (TR).
If not done automatically, you can add it manually in your workbench TR :
Display the object list of your transport request or task. Switch to Change mode, insert row :
R3TR | XPRA | RV80HGEN
Calculate runtime in microseconds :
DATA: lw_t1 TYPE i,
lw_t2 TYPE i,
lw_elapsed TYPE i.
* Get the time and put in lw_t1.
GET RUN TIME FIELD lw_t1.
* Wait 3 seconds.
CALL FUNCTION 'ENQUE_SLEEP'
EXPORTING
SECONDS = 3.
* Get the time and put in lw_t2.
GET RUN TIME FIELD lw_t2.
* Calculate the different between lw_t2 and lw_t1.
lw_elapsed = lw_t2 - lw_t1. " In microseconds.
lw_elapsed = ELAPSED / 1000000. " In seconds.
* Display the runtime.
WRITE:/ ' Runtime =', lw_elapsed, 'seconds'.
If your measure may overload 36 min, do not store the run time in a type i (integer) variable.
You should use a type numeric, like :
DATA: lw_t1(200) TYPE n,
Below, my personal code snippets :
Read MoreIf you want to add the mandant in your where clause (to force use of an index for instance), you have to add statement CLIENT SPECIFIED.
SELECT * FROM table_name CLIENT SPECIFIED INTO TABLE gi_table_name
FOR ALL ENTRIES IN li_table
WHERE mandt = sy-mandt " To force Index 001
AND field1 = li_table-field1
AND field1 = li_table-field2.
CALL FUNCTION 'C14ALD_BAPIRET2_SHOW'
TABLES
I_BAPIRET2_TAB = T_RETURN_MESSAGE. " T_RETURN with type BAPIRET2_TAB
FORM add_message USING pw_type TYPE sy-msgty
pw_id TYPE sy-msgid
pw_num TYPE sy-msgno
pw_v1 "TYPE sy-msgv1
pw_v2 "TYPE sy-msgv2
pw_v3 "TYPE sy-msgv3
pw_v4. "TYPE sy-msgv4.
DATA ls_bapiret2 TYPE bapiret2.
ls_bapiret2-type = pw_type .
ls_bapiret2-id = pw_id .
ls_bapiret2-number = pw_num .
ls_bapiret2-message_v1 = pw_v1 .
ls_bapiret2-message_v2 = pw_v2 .
ls_bapiret2-message_v3 = pw_v3 .
ls_bapiret2-message_v4 = pw_v4 .
IF ls_bapiret2-type IS INITIAL.
ls_bapiret2-type = 'S'.
ENDIF.
IF ls_bapiret2-id IS INITIAL.
ls_bapiret2-id = '0H'.
ENDIF.
IF ls_bapiret2-number IS INITIAL.
ls_bapiret2-number = '000'.
ENDIF.
MESSAGE ID ls_bapiret2-id
TYPE ls_bapiret2-type
NUMBER ls_bapiret2-number
WITH ls_bapiret2-message_v1
ls_bapiret2-message_v2
ls_bapiret2-message_v3
ls_bapiret2-message_v4
INTO ls_bapiret2-message.
APPEND ls_bapiret2 TO gi_user_message.
ENDFORM.
Use FMs :
Search tag: TO, Transport order, ordre de transport, OT
Here are only displayed the transaction I most use.
IL03 : Display Functional Location (Afficher poste technique)
IQ03 : Display Material Serial Number (Afficher le numéro de série d’un article)
IE03 : Display Equipment (Afficher Equipement)