Category Archive Blog

Byfjourneau

ABAP operator MIN & MAX

Use statements NMIN and NMAX.
⚠️ Maximum 9 values can be passed : val1, val2… val9.


    DATA : lv_nb1 VALUE 25,
           lv_nb2 VALUE 50,
           lv_nb3 VALUE 100.

    DATA(lv_nb_max) = nmax( val1 = lv_nb1
                            val2 = lv_nb2
                            val2 = lv_nb3 ).

    DATA(lv_nb_min) = nmin( val1 = lv_nb1
                            val2 = lv_nb2
                            val2 = lv_nb3 ).

    " ==> LV_MAX = 100
    " ==> LV_MIN = 25

Search tag: maximum minimum

Byfjourneau

Exit screen for PO/PReq (ME21n/ME22n)

Check the following post very well explained : https://sapcodes.com/2015/11/20/screen-exit-me21nme22nme23n-header/

Search tag: commande, achat, d’achat, PO, PReq, purchase, order, requisition, écran

Byfjourneau

Create tabs on selection screen

Check program DEMO_SEL_SCREEN_WITH_TABSTRIP.

Read More

Byfjourneau

Convert 2 digits ISO language to 1 digit SAP language key

Convert 2 digits ISO language (LAISO) to 1 digit SAP language key (SPRAS) and reverse:

CONVERSION_EXIT_ISOLA_INPUT    Convert 2 digits ISO Lang ==> 1 digit lang. key
CONVERSION_EXIT_ISOLA_OUTPUT   Convert 1 digit lang. Key ==> 2 digits ISO Lang.

Read More

Byfjourneau

Generated Adobe form as PDF (to send it by mail for instance)

✔ Change some parameteres in the form ouput parameters :


  lst_outparms-device   = 'MAIL'.   " Format for mail sending
  lst_outparms-nodialog = 'X'.      " Do not display PDF
  lst_outparms-getpdf   = 'X'.      " and get PDF source.

 
✔ Retrieve the PDF code in form ouput structure of your form function :


  /1bcdwb/formoutput = ls_formoutput

 
✔ Convert PDF code in xstring to binary :


" DATA lt_att_content_hex  TYPE solix_tab. " Table type for mail attachment.

  CALL FUNCTION 'SCMS_XSTRING_TO_BINARY'
    EXPORTING
      buffer     = ls_formoutput-pdf
*     APPEND_TO_TABLE = ' '
*   IMPORTING
*     OUTPUT_LENGTH =
    TABLES
      binary_tab = lt_att_content_hex.

 
✔ Use the table lt_att_content_hex to send the PDF by mail, check post : Send mail using BCS class

Byfjourneau

Check if running in update task

Several possibilities.

Use FM TH_IN_UPDATE_TASK:


CALL FUNCTION 'TH_IN_UPDATE_TASK'
  IMPORTING
    in_update_task = lv_update_process.

  " lv_update_process = 1 if running in update task,
  " else, lv_update_process = 0.

 
Use class CL_SYSTEM_TRANSACTION_STATE:


  IF CL_SYSTEM_TRANSACTION_STATE=>GET_IN_UPDATE_TASK( )  EQ 0 .
    " Code when not running in update task...
  ENDIF.

Search tag: update process