Selection-screen LSMW

* TYPES / DATA / SEL
types : tr_contflag   type range of contflag.
types : tt_protocole  type standard table of string.
types : tt_dd03l    type standard table of dd03l.
types : tt_tentries   type standard table of string. "TODO changer avec

types : tt_table      like standard table of ztable,
        tt_domnamekey like standard table of zkey,
        tt_fieldname  like standard table of zfld.

data : gt_table      type tt_table,
       gt_domnamekey type tt_domnamekey,
       gt_fieldname  type tt_fieldname.


selection-screen begin of block b1 with frame title b1t_titl.

  selection-SCREEN : BEGIN OF LINE.
    selection-SCREEN :
    COMMENT 1(18) p1t_tabl
    FOR FIELD p1_tabl.
    PARAMETERS p1_tabl
    TYPE wdy_boolean
    DEFAULT abap_true.
  selection-SCREEN : END OF LINE.

  selection-SCREEN : BEGIN OF LINE.
    selection-SCREEN :
    COMMENT 1(18) p1t_test
    FOR FIELD p1_test.
    PARAMETERS p1_test
    TYPE wdy_boolean
    DEFAULT abap_true.
  selection-SCREEN : END OF LINE.

  selection-SCREEN : BEGIN OF LINE.
    selection-SCREEN :
    COMMENT 1(18) p1t_dbug
    FOR FIELD p1_dbug.
    PARAMETERS p1_dbug
    TYPE wdy_boolean
    DEFAULT abap_false.
  selection-SCREEN : END OF LINE.

selection-screen end of block b1.

INITIALIZATION.
  b1t_titl = 'Paramètres supplémentaires'.
  p1t_tabl = 'Calculer tables ?'.
  p1t_test = 'Mode test ?'.
  p1t_dbug = 'Mode debug ?'.