Inserire F4 help per campo data in screen module-pool.

Mi è capitato varie volte di dover gestire un campo in input di tipo DATA su uno screen di un programma module-pool e, ogni volta, ho dovuto cercare in giro per Internet l'how-to su come fare per attivare l'help.

La cosa è piuttosto semplice ma, come ogni cosa che si usa raramente, non facile da ricordarsi.

Qui una rapida guida sui passi da seguire.


Definire nello screen un campo di tipo DATS, nel mio esempio I_DATA:

Nella logica di controllo definire il "PROCESS ON VALUE-REQUEST" per il campo dichiarato.

PROCESS ON VALUE-REQUEST.
FIELD i_data MODULE F4_date.

Nel codice ABAP inserire il module:

*&---------------------------------------------------------------------*
*&      Module  F4_DATE  INPUT
*&---------------------------------------------------------------------*
module F4_DATE input.

CALL FUNCTION 'F4_DATE'
  EXPORTING
    DATE_FOR_FIRST_MONTH               = i_data
    DISPLAY                            = ' '
  IMPORTING
    SELECT_DATE                        = i_data
  EXCEPTIONS
    OTHERS                             = 8
          .
IF sy-subrc <> 0.
* Implement suitable error handling here
ENDIF.

endmodule.                 " F4_DATE  INPUT

Attivare il tutto e nel campo adesso risulterà attivo il match-code per poter aprire la finestra con il calendario: