Praise n

/ˈpreɪz/

Traducendo Wok'Up non ho imparato alcun nuovo vocabolo. Ho scelto allora questa parola.

English		Italiano
praise [sb]/[sth] vtr	(speak highly of [sb]/[sth])	elogiare, lodare vtr
	She was praised for her volunteer work.
	Era stata elogiata per il suo lavoro come volontaria.
praise n	(commendation)	encomio, elogio nm, lode nf
	He found the praise gratifying, after so many years of work.
	Ha trovato l'encomio gratificante dopo tutti quegli anni di lavoro.

Once a player wins their 5th card, the game ends and the winner becomes Grand Master of the Wok, receiving the eternal praise of their fellow chefs.

Quando un giocatore vince la sua 5ª carta, la partita finisce e il vincitore diventa Gran Maestro del Wok, ricevendo l’eterna lode dei suoi colleghi chef.

Il gregge alza la testa, John Brunner

Il gregge alza la testa
di John Brunner
Editore: Nord


Lingua: Italiano | Numero di pagine: 415 | ISBN-13: 9788842907527 | Data di pubblicazione: 1994-02-xx | Traduzione di Renato Prinzhofer | Genere: Narrativa & Letteratura - Scienza & Natura - Fantascienza

Keep the Heroes Out!

Tendril n

/ˈtɛndrəl/

Traducendo In Too Deep ho imparato questo vocabolo.

English		Italiano
tendril n	(stem of a vine)	viticcio nm
	The tendril had only one leaf.
	Il viticcio aveva solo una foglia.
tendril n	(fine lock or curl of hair)	riccio nm
	The little girl's face was framed by two tendrils of hair.
	Il viso della bambina era incorniciato da due riccioli di capelli.

The Broken Halo has tendrils into deep pockets and we want in.

Broken Halo ha tentacoli in tasche profonde e noi vogliamo entrarci.

Write the Future

SALV table editabile

*---------------------------------------------------------------------*
*       CLASS lcl_handle_events DEFINITION                            *
*---------------------------------------------------------------------*
CLASS lcl_handle_events DEFINITION.

  PUBLIC SECTION.

    METHODS:

      on_after_refresh FOR EVENT after_refresh OF cl_gui_alv_grid
        IMPORTING sender,

      on_user_command FOR EVENT added_function OF cl_salv_events_table
        IMPORTING e_salv_function.

ENDCLASS.

*---------------------------------------------------------------------*
*       CLASS lcl_handle_events IMPLEMENTATION                        *
*---------------------------------------------------------------------*
CLASS lcl_handle_events IMPLEMENTATION.

  METHOD on_after_refresh.
    DATA: ls_layout TYPE lvc_s_layo,
          lt_fcat   TYPE lvc_t_fcat.
    FIELD-SYMBOLS:  LIKE LINE OF lt_fcat.
    TRY.
        SET HANDLER on_after_refresh FOR ALL INSTANCES ACTIVATION space.
        sender->get_frontend_fieldcatalog( IMPORTING et_fieldcatalog = lt_fcat ).
        sender->register_edit_event( i_event_id = cl_gui_alv_grid=>mc_evt_modified ).
        LOOP AT lt_fcat ASSIGNING .
          IF -fieldname EQ 'ZINCSTOCKPREC'
          OR -fieldname EQ 'ZINCSTOCKSUCC'.
            -edit = abap_true.
          ENDIF.
        ENDLOOP.
        sender->set_frontend_fieldcatalog( lt_fcat ).
*        ls_layout-edit = abap_true. "Edit ALL
*        sender->set_frontend_layout( ls_layout ).
        sender->set_ready_for_input( 1 ).
      CATCH cx_salv_error.
    ENDTRY.
  ENDMETHOD.

ENDCLASS.

*----------------------------------------------------------------------*
* FORM OUTPUT_ALV                                                      *
*----------------------------------------------------------------------*
FORM output_alv.

  DATA: lo_content TYPE REF TO cl_salv_form_element.

  TRY.
      CASE 'X'.
        WHEN rb_issr.
          cl_salv_table=>factory(
            IMPORTING
              r_salv_table = go_alv
            CHANGING
              t_table      = gt_terri[] ).
      ENDCASE.
    CATCH cx_salv_msg.
  ENDTRY.
  IF go_alv IS BOUND.
    CREATE OBJECT go_events.
    CASE 'X'.
      WHEN rb_cdc OR rb_issr.
        go_alv->set_screen_status(
          pfstatus = 'STANDARD_STOCK'
          report = sy-cprog
          set_functions = go_alv->c_functions_all ).
        IF rb_cdc = 'X'.
          PERFORM set_settings.
        ELSE.
          PERFORM build_header CHANGING lo_content.
          go_alv->set_top_of_list( lo_content ).
          SET HANDLER go_events->on_after_refresh FOR ALL INSTANCES ACTIVATION 'X'.
        ENDIF.
    ENDCASE.
    SET HANDLER go_events->on_user_command FOR go_alv->get_event( ).
    go_alv->get_columns( )->set_optimize( 'X' ).
    go_alv->display( ).
  ENDIF.

ENDFORM.

Ragazze elettriche, Naomi Alderman

Ragazze elettriche
di Naomi Alderman
Editore: Nottetempo


Lingua: Italiano | Numero di pagine: 338 | ISBN-13: 9788874526796 | Data di pubblicazione: 2017-01-01 | Genere: Narrativa & Letteratura - Storia – Fantascienza

Sostituzione del testo in linea

    IF ( gs_manual_xls-bsart IN gr_jomtr OR
         gs_manual_xls-bsart IN gr_jomtt OR
         gs_manual_xls-bsart IN gr_jomtp ) AND
       gs_manual_xls-zprodunit IS NOT INITIAL AND
       strlen( gs_manual_xls-zprodunit ) < 8.
      gv_status = gs_outputadv-zstatus = gc_ko.
      gv_message =
      gs_outputadv-zmessage = replace( val  = TEXT-e42
                                       sub  = '&'
                                       with = |{ gs_outputadv-zgenericarticle }_{ gs_outputadv-zzcolor }_{ gs_outputadv-zzsize }|
                                       occ  = 1 ).
    ELSE.
      gs_outputadv-zprodunit = gs_manual_xls-zprodunit.
      gs_outputadv-zmessage = gv_message.
    ENDIF.

Popup per ottenere valori

  METHOD on_user_command.
    DATA: lv_retc      TYPE c,
          lt_fields    TYPE TABLE OF sval,
          ls_rows      TYPE lvc_s_row,
          lt_rows      TYPE lvc_t_row,
          lv_answer    TYPE char1,
          lt_royriutil TYPE TABLE OF ztsdo_royriutil,
          ls_royriutil TYPE ztsdo_royriutil,
          ls_h         TYPE ztsdo_condcontrh,
          ls_d         TYPE ztsdo_condcontrd.
    CASE e_salv_function.
      WHEN 'NEW'.
        IF rb_cdc = 'X'.
          CLEAR gs_condiz.
          CALL SCREEN 100 STARTING AT 5 5 ENDING AT 80 20.
        ELSE.
          APPEND VALUE #( tabname = 'TVKBT'
                          fieldname = 'VKBUR'
                          fieldtext = 'Territory'
                        ) TO lt_fields.
          APPEND VALUE #( tabname = 'ZTSDO_ROYRIUTIL'
                          fieldname = 'ZINCSTOCKPREC'
                        ) TO lt_fields.
          APPEND VALUE #( tabname = 'ZTSDO_ROYRIUTIL'
                          fieldname = 'ZINCSTOCKSUCC'
                        ) TO lt_fields.
          CALL FUNCTION 'POPUP_GET_VALUES'
            EXPORTING
              popup_title     = 'Nuova riga'
            IMPORTING
              returncode      = lv_retc
            TABLES
              fields          = lt_fields
            EXCEPTIONS
              error_in_fields = 1
              OTHERS          = 2.
          IF sy-subrc <> 0.
            MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno.
          ENDIF.
          CHECK lv_retc <> 'A'.
          gs_terri-zvkbur = lt_fields[ 1 ]-value.
          SELECT SINGLE bezei
            FROM tvkbt
            INTO gs_terri-bezei
           WHERE spras = sy-langu
             AND vkbur = gs_terri-zvkbur.
          IF sy-subrc <> 0.
            MESSAGE |Non valido: Territory { gs_terri-zvkbur }| TYPE 'I'.
            EXIT.
          ELSE.
            gs_terri-zincstockprec = lt_fields[ 2 ]-value.
            gs_terri-zincstocksucc = lt_fields[ 3 ]-value.
            APPEND gs_terri TO gt_terri.
            go_alv->refresh( ).
          ENDIF.
        ENDIF.
      WHEN 'ANNU'.
        [...]
      WHEN 'SAVE'.
        [...]
      WHEN 'CONF'.
        [...]
    ENDCASE.
  ENDMETHOD.

Esempio di UNION DISTINCT

  DATA: lr_zauth TYPE RANGE OF zesd_auth.
  SELECT DISTINCT 'I', 'EQ', z_auth
    FROM ztsdo_ret_cancel
  UNION DISTINCT
  SELECT 'I', 'EQ', z_auth
    FROM ztsdo_ret_rej
    INTO TABLE @lr_zauth.
  IF lr_zauth[] IS NOT INITIAL.
    DELETE gi_gr_items WHERE zsd_auth IN lr_zauth.
  ENDIF.

Tutti a Zanzibar, John Brunner

Tutti a Zanzibar
di John Brunner
Editore: Nord


Lingua: Italiano | Numero di pagine: 584 | ISBN-13: 9788842903949 | Data di pubblicazione: 1988-12-01 | Traduzione di Renato Prinzhofer | Genere: Narrativa & Letteratura - Fantascienza

Turing

A kindly world

Help F4 su tabella ALV

*----------------------------------------------------------------------*
* DECLARATIONS                                                         *
*----------------------------------------------------------------------*
TABLES: fsh_seasons, kna1, vbak, ztsdo_pr_ven_web.

TYPES: BEGIN OF ty_out,
         chkbx       TYPE c,
         kunnr       TYPE ztsdo_pr_ven_web-kunnr,
         name1       TYPE kna1-name1,
         zreserve_no TYPE ztsdo_pr_ven_web-zreserve_no,
         vbeln       TYPE ztsdo_res_sch-vbeln,
         posnr       TYPE ztsdo_res_sch-posnr,
         etenr       TYPE ztsdo_res_sch-etenr,
         text        TYPE ztsdo_res_sch-text,
         zzseason    TYPE ztsdo_res_sch-zzseason,
         fsh_season  TYPE vbap-fsh_season,
         land1       TYPE kna1-land1,
         zzsubbrand  TYPE vbak-zzsubbrand,
         qty         TYPE kwmeng,
         zvaltot     TYPE bp_wgt,
         zkschl      TYPE ztsdo_res_sch-zkschl,
         zprcsc      TYPE ztsdo_res_sch-zprcsc,
         zschl_02    TYPE kscha,
         zprcsc_02   TYPE kbetr,
         zvalnet     TYPE vbak-netwr,
         zwaerk      TYPE waerk,
         zaugru      TYPE ztsdo_res_sch-zaugru,
         zdtaord     TYPE ztsdo_pr_ven_web-zdtaord,
         zstato      TYPE ztsdo_pr_ven_web-zstato,
         zdescr      TYPE ztsdo_statven_pt-zdescr,
         zupddat     TYPE ztsdo_pr_ven_web-zupddat,
         style       TYPE lvc_t_styl,
       END OF ty_out,
       ty_outtab TYPE STANDARD TABLE OF ty_out.

DATA: gt_out TYPE ty_outtab.

CLASS lcl_event_receiver DEFINITION DEFERRED.

DATA: go_custom_c       TYPE REF TO cl_gui_custom_container,
      go_grid           TYPE REF TO cl_gui_alv_grid,
      go_event_receiver TYPE REF TO lcl_event_receiver,
      gs_stable         TYPE lvc_s_stbl,
      gt_excl_func      TYPE ui_functions,
      gv_ts             TYPE timestamp,
      gv_ora            TYPE syst_uzeit.

*----------------------------------------------------------------------*
* CLASS LCL_EVENT_RECEIVER DEFINITION                                  *
*----------------------------------------------------------------------*
CLASS lcl_event_receiver DEFINITION.

  PUBLIC SECTION.
    METHODS:

      handle_onf4 FOR EVENT onf4 OF cl_gui_alv_grid
        IMPORTING
            e_fieldname
            e_fieldvalue
            es_row_no
            er_event_data
            et_bad_cells
            e_display.

ENDCLASS.                    "lcl_event_receiver DEFINITION

*----------------------------------------------------------------------*
* CLASS LCL_EVENT_RECEIVER IMPLEMENTATION                              *
*----------------------------------------------------------------------*
CLASS lcl_event_receiver IMPLEMENTATION.

  METHOD handle_onf4.
    FIELD-SYMBOLS:  TYPE STANDARD TABLE,
                     TYPE lvc_t_modi.
    DATA: lv_retfield TYPE dfies-fieldname,
          lt_return   TYPE TABLE OF ddshretval.
    CASE e_fieldname.
      WHEN 'ZAUGRU'.
        SELECT augru, bezei
          FROM tvaut
          INTO TABLE @DATA(lt_tvaut)
         WHERE spras = @sy-langu.
        lv_retfield = 'AUGRU'.
        ASSIGN lt_tvaut TO .
      WHEN 'ZKSCHL' OR 'ZSCHL_02'.
        SELECT kschl, vtext
          FROM t685t
          INTO TABLE @DATA(lt_t685t)
         WHERE kvewe = 'A'
           AND kappl = 'V'
           AND spras = @sy-langu.
        lv_retfield = 'KSCHL'.
        ASSIGN lt_t685t TO .
    ENDCASE.
    CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
      EXPORTING
        retfield        = lv_retfield
        value_org       = 'S'
      TABLES
        value_tab       = 
        return_tab      = lt_return
      EXCEPTIONS
        parameter_error = 1
        no_values_found = 2
        OTHERS          = 3.
    IF sy-subrc = 0 AND lt_return[] IS NOT INITIAL.
      ASSIGN er_event_data->m_data->* TO .
      APPEND VALUE #( row_id    = es_row_no-row_id
                      fieldname = e_fieldname
                      value     = lt_return[ 1 ]-fieldval ) TO .
    ENDIF.
    er_event_data->m_event_handled = 'X'.
  ENDMETHOD.                    "handle_onf4

ENDCLASS.                    "lcl_event_receiver IMPLEMENTATION

*----------------------------------------------------------------------*
* LAYOUT                                                               *
*----------------------------------------------------------------------*
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE TEXT-001.
SELECT-OPTIONS: so_kunnr FOR kna1-kunnr,
                so_seasn FOR fsh_seasons-fsh_season,
                so_land1 FOR kna1-land1,
                so_subbr FOR vbak-zzsubbrand,
                so_stato FOR ztsdo_pr_ven_web-zstato DEFAULT '01'.
PARAMETERS: cb_bkg AS CHECKBOX.
SELECTION-SCREEN END OF BLOCK b1.

*----------------------------------------------------------------------*
* INIT                                                                 *
*----------------------------------------------------------------------*
INITIALIZATION.
  gs_stable-row = 'X'.
  gs_stable-col = 'X'.
  gv_ora = sy-uzeit.
  gv_ts = sy-datum && sy-uzeit.

*----------------------------------------------------------------------*
* PROGRAM BODY                                                         *
*----------------------------------------------------------------------*
START-OF-SELECTION.
  PERFORM get_data.
  IF cb_bkg IS INITIAL.
    CALL SCREEN 100.
  ELSE.
    PERFORM sale_approval USING gt_out.
  ENDIF.

END-OF-SELECTION.
  EXIT.

*----------------------------------------------------------------------*
*                                                                      *
*                      ██████╗  ██████╗   ██████╗                      *
*                      ██╔══██╗ ██╔══██╗ ██╔═══██╗                     *
*                      ██████╔╝ ██████╔╝ ██║   ██║                     *
*                      ██╔═══╝  ██╔══██╗ ██║   ██║                     *
*                      ██║      ██████╔╝ ╚██████╔╝                     *
*                      ╚═╝      ╚═════╝   ╚═════╝                      *
*                                                                      *
*----------------------------------------------------------------------*

*----------------------------------------------------------------------*
* MODULE STATUS_0100 OUTPUT                                            *
*----------------------------------------------------------------------*
MODULE status_0100 OUTPUT.

  DATA: ls_layout   TYPE lvc_s_layo,
        lt_fieldcat TYPE lvc_t_fcat,
        lt_f4       TYPE lvc_t_f4.

  SET PF-STATUS 'ZPF01'.
  SET TITLEBAR 'ZTITLE01'.

  IF go_custom_c IS INITIAL.

*   Creo il container
    CREATE OBJECT go_custom_c
      EXPORTING
        container_name = 'CONTAINER'.

    PERFORM exclude_tb_func.
    PERFORM build_fielcat CHANGING lt_fieldcat.

    CREATE OBJECT go_grid
      EXPORTING
        i_parent = go_custom_c.

    APPEND VALUE lvc_s_f4( fieldname  = 'ZAUGRU'
                           register   = 'X' ) TO lt_f4.
    APPEND VALUE lvc_s_f4( fieldname  = 'ZKSCHL'
                           register   = 'X' ) TO lt_f4.
    APPEND VALUE lvc_s_f4( fieldname  = 'ZSCHL_02'
                           register   = 'X' ) TO lt_f4.
    CALL METHOD go_grid->register_f4_for_fields
      EXPORTING
        it_f4 = lt_f4.

    ls_layout-stylefname = 'STYLE'.

    CALL METHOD go_grid->set_table_for_first_display
      EXPORTING
        is_layout            = ls_layout
        it_toolbar_excluding = gt_excl_func
      CHANGING
        it_fieldcatalog      = lt_fieldcat
        it_outtab            = gt_out.

    CREATE OBJECT go_event_receiver.
    SET HANDLER go_event_receiver->handle_onf4
            FOR go_grid.

  ENDIF.

ENDMODULE.

*----------------------------------------------------------------------*
*                                                                      *
*                        ██████╗   █████╗  ██╗                         *
*                        ██╔══██╗ ██╔══██╗ ██║                         *
*                        ██████╔╝ ███████║ ██║                         *
*                        ██╔═══╝  ██╔══██║ ██║                         *
*                        ██║      ██║  ██║ ██║                         *
*                        ╚═╝      ╚═╝  ╚═╝ ╚═╝                         *
*                                                                      *
*----------------------------------------------------------------------*

*----------------------------------------------------------------------*
* MODULE USER_COMMAND_0100 INPUT                                       *
*----------------------------------------------------------------------*
MODULE user_command_0100 INPUT.

  CASE sy-ucomm.
    WHEN 'BACK' OR 'UP'.
      FREE: go_custom_c,
            go_grid,
            go_event_receiver.
      LEAVE TO SCREEN 0.
    WHEN 'EXIT'.
      FREE: go_custom_c,
            go_grid,
            go_event_receiver.
      LEAVE PROGRAM.
  ENDCASE.

ENDMODULE.

*----------------------------------------------------------------------*
*                                                                      *
*           ███████╗  ██████╗  ██████╗  ███╗   ███╗ ███████╗           *
*           ██╔════╝ ██╔═══██╗ ██╔══██╗ ████╗ ████║ ██╔════╝           *
*           █████╗   ██║   ██║ ██████╔╝ ██╔████╔██║ ███████╗           *
*           ██╔══╝   ██║   ██║ ██╔══██╗ ██║╚██╔╝██║ ╚════██║           *
*           ██║      ╚██████╔╝ ██║  ██║ ██║ ╚═╝ ██║ ███████║           *
*           ╚═╝       ╚═════╝  ╚═╝  ╚═╝ ╚═╝     ╚═╝ ╚══════╝           *
*                                                                      *
*----------------------------------------------------------------------*

*----------------------------------------------------------------------*
* FORM GET_DATA                                                        *
*----------------------------------------------------------------------*
FORM get_data.

[...]

ENDFORM.

*----------------------------------------------------------------------*
* FORM EXCLUDE_TB_FUNC                                                 *
*----------------------------------------------------------------------*
FORM exclude_tb_func.

[...]

ENDFORM.

*----------------------------------------------------------------------*
* FORM BUILD_FIELCAT                                                   *
*----------------------------------------------------------------------*
FORM build_fielcat CHANGING pt_fieldcat TYPE lvc_t_fcat.

  DATA ls_fieldcat TYPE lvc_s_fcat.

  DEFINE fill_fieldcat.
    ADD 1 TO ls_fieldcat-col_pos.
    ls_fieldcat-fieldname = &1.
    ls_fieldcat-reptext = &2.
    ls_fieldcat-f4availabl = &3.
    ls_fieldcat-outputlen = &4.
    APPEND ls_fieldcat TO pt_fieldcat.
  END-OF-DEFINITION.

  ls_fieldcat-key = space.
  ls_fieldcat-tabname = 'GT_OUT'.
  ls_fieldcat-edit = ls_fieldcat-no_out = 'X'.
  fill_fieldcat 'CHKBX'       'X'                    ''  '2'.
  ls_fieldcat-edit = ls_fieldcat-no_out = ''.
  fill_fieldcat 'KUNNR'       'Negozio'              ''  '10'.
  fill_fieldcat 'NAME1'       'Descrizione'          ''  '35'.
  fill_fieldcat 'ZRESERVE_NO' 'Numero prenotazione'  ''  '10'.
  fill_fieldcat 'TEXT'        'Descr. prenotazione'  ''  '40'.
  fill_fieldcat 'ZZSEASON'    'Stag.Vendita'         ''  '4'.
  fill_fieldcat 'FSH_SEASON'  'Stag.Giacenza'        ''  '4'.
  fill_fieldcat 'LAND1'       'Paese'                ''  '2'.
  fill_fieldcat 'ZZSUBBRAND'  'Marchio'              ''  '2'.
  fill_fieldcat 'QTY'         'Capi'                 ''  '19'.
  fill_fieldcat 'ZVALTOT'     'Valore totale'        ''  '21'.
  fill_fieldcat 'ZKSCHL'      'Cond.Sconto'          'X' '4'.
  fill_fieldcat 'ZPRCSC'      'Percent.Sconto'       ''  '16'.
  fill_fieldcat 'ZSCHL_02'    '2ª Cond.Sconto'       'X' '4'.
  fill_fieldcat 'ZPRCSC_02'   '2ª Percent.Sconto'    ''  '16'.
  fill_fieldcat 'ZVALNET'     'Valore netto'         ''  '21'.
  fill_fieldcat 'ZWAERK'      'Divisa'               ''  '5'.
  fill_fieldcat 'ZAUGRU'      'Mot.Ordine'           'X' '3'.
  fill_fieldcat 'ZDTAORD'     'Data ordine'          ''  '10'.
  fill_fieldcat 'ZSTATO'      'Stato'                ''  '2'.
  fill_fieldcat 'ZDESCR'      'Descr.stato'          ''  '30'.
  fill_fieldcat 'ZUPDDAT'     'Data evasione'        ''  '10'.

ENDFORM.

*----------------------------------------------------------------------*
* FORM SALE_APPROVAL                                                   *
*----------------------------------------------------------------------*
FORM sale_approval USING pt_out TYPE ty_outtab.

[...]

ENDFORM.

*----------------------------------------------------------------------*

Leggere campi dynpro non aggiornati

  IF rb_pick = gc_x AND
     p_zppsl IS NOT INITIAL AND
     gv_scr300_werks-werks IS NOT INITIAL.
    APPEND VALUE #( fieldname = 'P_ZPPSL' ) TO lt_dynpread.
    CALL FUNCTION 'DYNP_VALUES_READ'
      EXPORTING
        dyname     = sy-cprog
        dynumb     = '0301'
      TABLES
        dynpfields = lt_dynpread.
    IF sy-subrc = 0.
      READ TABLE lt_dynpread INTO DATA(ls_dynpread) WITH KEY fieldname = 'P_ZPPSL'.
      SELECT @abap_true
       UP TO 1 ROWS
        FROM t001l
        INTO @DATA(lv_exists)
       WHERE werks = @gv_scr300_werks-werks
         AND lgort = @ls_dynpread-fieldvalue.
      ENDSELECT.
      IF lv_exists IS INITIAL.
        MESSAGE TEXT-e19 TYPE gc_s DISPLAY LIKE gc_e.
        EXIT.
      ELSE.
        CLEAR lv_exists.
      ENDIF.
    ENDIF.
  ENDIF.

The Outsider, Stephen King

The Outsider
di Stephen King
Editore: Sperling & Kupfer (Pandora)


Lingua: Italiano | Numero di pagine: 529 | ISBN-13: 9788820066239 | Data di pubblicazione: 2018-10-xx | Traduzione di Luca Briasco | Genere: Narrativa & Letteratura - Mistero & Gialli – Horror

Chiamati a risorgere, Aldo Bertelle

Chiamati a risorgere
di Aldo Bertelle
Editore: DBS


Lingua: Italiano | Numero di pagine: 65 | Data di pubblicazione: 2021-03-11 | Illustrazioni di Vico Calabrò | Genere: Saggio - Religione & Spiritualità

Bottoni dentro tabella ALV

*----------------------------------------------------------------------*
REPORT zfbc_monitor_fabio.

*----------------------------------------------------------------------*
* DECLARATIONS                                                         *
*----------------------------------------------------------------------*
DATA: BEGIN OF gs_out,
        name  TYPE eps2filnam,
        datum TYPE crdate,
        uzeit LIKE sy-uzeit,
        pdf   TYPE icon_d,
      END OF gs_out.
DATA: gt_out LIKE STANDARD TABLE OF gs_out.

DATA: gv_dirnam   TYPE eps2filnam,
      gv_url(255) TYPE c,
      gv_content  TYPE xstring,
      gv_fatt     TYPE zflag_fatt,
      gv_lett     TYPE zflag_lett,
      gv_canc     TYPE zflag_canc,
      gv_ap       TYPE zfbc_area.

DATA: go_container_r     TYPE REF TO cl_gui_container,
      go_container_l     TYPE REF TO cl_gui_container,
      go_docking         TYPE REF TO cl_gui_docking_container,
      go_splitter        TYPE REF TO cl_gui_splitter_container,
      go_gui_html_viewer TYPE REF TO cl_gui_html_viewer,
      go_alv             TYPE REF TO cl_salv_table.

CLASS lcl_handle_events DEFINITION DEFERRED.

DATA: go_events TYPE REF TO lcl_handle_events.

DATA: ok_code TYPE syucomm.

*---------------------------------------------------------------------*
*       CLASS lcl_handle_events DEFINITION                            *
*---------------------------------------------------------------------*
CLASS lcl_handle_events DEFINITION.

  PUBLIC SECTION.

    METHODS:

      on_user_command FOR EVENT added_function OF cl_salv_events_table
        IMPORTING e_salv_function,

      on_single_click FOR EVENT link_click OF cl_salv_events_table
        IMPORTING row column.

ENDCLASS.

*---------------------------------------------------------------------*
*       CLASS lcl_handle_events IMPLEMENTATION                        *
*---------------------------------------------------------------------*
CLASS lcl_handle_events IMPLEMENTATION.

  METHOD on_user_command.

    DATA: lv_answer     TYPE c,
          lv_url(255)   TYPE c,
          lo_selections TYPE REF TO cl_salv_selections,
          lt_rows       TYPE salv_t_row,
          ls_row        TYPE i,
          ls_cell       TYPE salv_s_cell.

    CHECK e_salv_function = '&DEL'.
    lo_selections = go_alv->get_selections( ).
    lt_rows = lo_selections->get_selected_rows( ).
    CHECK lt_rows[] IS NOT INITIAL.
    CALL FUNCTION 'POPUP_TO_CONFIRM'
      EXPORTING
        text_question = 'Sicuro di voler eliminare i file?'
      IMPORTING
        answer        = lv_answer.
    CHECK lv_answer = '1'.
    LOOP AT lt_rows INTO ls_row.
      READ TABLE gt_out INTO gs_out INDEX ls_row.
      CONCATENATE gv_dirnam gs_out-name INTO lv_url.
      DELETE DATASET lv_url.
      CLEAR gs_out-name.
      MODIFY gt_out FROM gs_out
                    INDEX ls_row
                    TRANSPORTING name.
      CHECK lv_url = gv_url.
      lv_answer = 'D'.
    ENDLOOP.
    DELETE gt_out WHERE name IS INITIAL.
    CLEAR lt_rows[].
    lo_selections->set_selected_rows( lt_rows[] ).
    ls_cell-row = 1.
    ls_cell-columnname = 'NAME'.
    lo_selections->set_current_cell( ls_cell ).
    go_alv->refresh( ).
    CHECK lv_answer = 'D'.
    IF gt_out[] IS NOT INITIAL.
      PERFORM preview_pdf USING 1.
    ELSE.
      CALL METHOD go_container_r->free
        EXCEPTIONS
          cntl_error        = 1
          cntl_system_error = 2
          OTHERS            = 3.
      CLEAR go_container_r.
    ENDIF.

  ENDMETHOD.

  METHOD on_single_click.

    CASE column.
      WHEN 'NAME'.
        PERFORM preview_pdf USING row.
      WHEN 'PDF'.
        PERFORM view_pdf USING row.
    ENDCASE.

  ENDMETHOD.

ENDCLASS.

*----------------------------------------------------------------------*
* LAYOUT                                                               *
*----------------------------------------------------------------------*
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE TEXT-001.
SELECTION-SCREEN SKIP.
SELECT-OPTIONS: so_datum FOR sy-datum DEFAULT sy-datum.
PARAMETERS:     pa_uname LIKE sy-uname DEFAULT sy-uname.
SELECTION-SCREEN SKIP.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE TEXT-004.

SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT   (30) TEXT-002 MODIF ID id3.
SELECTION-SCREEN COMMENT 31(30) TEXT-003 MODIF ID id3.
SELECTION-SCREEN COMMENT 61(30) TEXT-011 MODIF ID id3.
SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: rb_fad RADIOBUTTON GROUP rbg1 MODIF ID id1.
SELECTION-SCREEN COMMENT 3(27) TEXT-005   MODIF ID id1.
PARAMETERS: rb_fai RADIOBUTTON GROUP rbg1 MODIF ID id1.
SELECTION-SCREEN COMMENT 33(27) TEXT-005  MODIF ID id1.
SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: rb_lnd RADIOBUTTON GROUP rbg1 MODIF ID id2 DEFAULT 'X'.
SELECTION-SCREEN COMMENT 3(27) TEXT-006   MODIF ID id2.
PARAMETERS: rb_lni RADIOBUTTON GROUP rbg1 MODIF ID id2.
SELECTION-SCREEN COMMENT 33(27) TEXT-006  MODIF ID id2.
SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: rb_lsd RADIOBUTTON GROUP rbg1 MODIF ID id4.
SELECTION-SCREEN COMMENT 3(27) TEXT-007   MODIF ID id4.
PARAMETERS: rb_lsi RADIOBUTTON GROUP rbg1 MODIF ID id4.
SELECTION-SCREEN COMMENT 33(27) TEXT-007  MODIF ID id4.
SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: rb_lcd RADIOBUTTON GROUP rbg1 MODIF ID id4.
SELECTION-SCREEN COMMENT 3(27) TEXT-009   MODIF ID id4.
PARAMETERS: rb_lci RADIOBUTTON GROUP rbg1 MODIF ID id4.
SELECTION-SCREEN COMMENT 33(27) TEXT-009  MODIF ID id4.
SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: rb_lgd RADIOBUTTON GROUP rbg1 MODIF ID id5.
SELECTION-SCREEN COMMENT 3(27) TEXT-010   MODIF ID id5.
PARAMETERS: rb_lgi RADIOBUTTON GROUP rbg1 MODIF ID id5.
SELECTION-SCREEN COMMENT 33(27) TEXT-010  MODIF ID id5.
PARAMETERS: rb_lgn RADIOBUTTON GROUP rbg1 MODIF ID id5.
SELECTION-SCREEN COMMENT 63(27) TEXT-010  MODIF ID id5.
SELECTION-SCREEN END OF LINE.

SELECTION-SCREEN END OF BLOCK b2.
SELECTION-SCREEN END OF BLOCK b1.

*----------------------------------------------------------------------*
* EVENTS                                                               *
*----------------------------------------------------------------------*
AT SELECTION-SCREEN OUTPUT.
  LOOP AT SCREEN.
    IF screen-group1 = 'ID1' AND
       gv_fatt IS INITIAL.
      screen-output = 0.
      screen-input = 0.
      screen-active = 0.
      MODIFY SCREEN.
    ENDIF.
    IF screen-group1 = 'ID2' AND
       gv_lett IS INITIAL.
      screen-output = 0.
      screen-input = 0.
      screen-active = 0.
      MODIFY SCREEN.
    ENDIF.
    IF screen-group1 = 'ID3'.
      screen-intensified = 1.
      MODIFY SCREEN.
    ENDIF.
    IF screen-group1 = 'ID4' AND
       gv_lett IS INITIAL.
      screen-output = 0.
      screen-input = 0.
      screen-active = 0.
      MODIFY SCREEN.
    ENDIF.
    IF screen-group1 = 'ID5' AND
       gv_lett IS INITIAL.
      screen-output = 0.
      screen-input = 0.
      screen-active = 0.
      MODIFY SCREEN.
    ENDIF.
  ENDLOOP.

*----------------------------------------------------------------------*
* INIT                                                                 *
*----------------------------------------------------------------------*
INITIALIZATION.

  SELECT SINGLE flag_fatt flag_lett flag_canc
    FROM zfbc_mon_fabio_a
    INTO (gv_fatt, gv_lett, gv_canc)
   WHERE uname = sy-uname.

  REFRESH so_datum[].
  so_datum-low    = sy-datum - 7.
  so_datum-high   = sy-datum.
  so_datum-option = 'BT'.
  so_datum-sign   = 'I'.
  APPEND so_datum.
  CLEAR so_datum.

*----------------------------------------------------------------------*
* PROGRAM BODY                                                         *
*----------------------------------------------------------------------*
START-OF-SELECTION.

  PERFORM dir_list.

END-OF-SELECTION.

  CHECK gt_out[] IS NOT INITIAL.
  CALL SCREEN 100.

*----------------------------------------------------------------------*
*                                                                      *
*                      #######  #######   #######                      *
*                      ###  ### ###  ### #### ####                     *
*                      ###  ### ###  ### ###   ###                     *
*                      #######  #######  ###   ###                     *
*                      ###      ###  ### ###   ###                     *
*                      ###      ###  ### #### ####                     *
*                      ###      #######   #######                      *
*                                                                      *
*----------------------------------------------------------------------*

*&---------------------------------------------------------------------*
*&      Module  STATUS_0100  OUTPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
MODULE status_0100 OUTPUT.

  SET PF-STATUS 'D0100'.
  SET TITLEBAR 'D0100'.

  PERFORM output_alv.

ENDMODULE.

*----------------------------------------------------------------------*
*                                                                      *
*                        #######   ######  ###                         *
*                        ###  ### ###  ### ###                         *
*                        ###  ### ###  ### ###                         *
*                        #######  ######## ###                         *
*                        ###      ###  ### ###                         *
*                        ###      ###  ### ###                         *
*                        ###      ###  ### ###                         *
*                                                                      *
*----------------------------------------------------------------------*

*&---------------------------------------------------------------------*
*&      Module  USER_COMMAND_0100  INPUT
*&---------------------------------------------------------------------*
*       text
*----------------------------------------------------------------------*
MODULE user_command_0100 INPUT.

  PERFORM user_command.

ENDMODULE.

*----------------------------------------------------------------------*
*                                                                      *
*           ########  #######  #######  ####   #### ########           *
*           ######## #### #### ###  ### ##### ##### ########           *
*           ######   ###   ### ###  ### ########### #####              *
*           ######   ###   ### #######  ########### ########           *
*           ###      ###   ### ###  ### ### ### ###    #####           *
*           ###      #### #### ###  ### ###     ### ########           *
*           ###       #######  ###  ### ###     ### ########           *
*                                                                      *
*----------------------------------------------------------------------*

*----------------------------------------------------------------------*
* FORM DIR_LIST                                                        *
*----------------------------------------------------------------------*
FORM dir_list.

  CONSTANTS: lc_days1980 TYPE i VALUE 3652,
             lc_hours    TYPE uzeit VALUE '020000'.

  DATA: lt_dir TYPE STANDARD TABLE OF eps2fili,
        ls_dir LIKE LINE OF lt_dir.

  DATA: lv_pit       TYPE i,
        lv_mtime(12) TYPE c.

  DATA: ls_path     TYPE zfbc_path_postel.
  DATA: path_ln TYPE string,
        path_ls TYPE string,
        path_lc TYPE string,
        path_lg TYPE string,
        path_ft TYPE string.

  SELECT DISTINCT * FROM zfbc_path_postel
   INTO ls_path WHERE area_app = 'LT'.
  ENDSELECT.

  IF sy-subrc = 0.
    path_ln =  ls_path-path_ln.
    path_ls =  ls_path-path_ls.
    path_lc =  ls_path-path_lc.
    path_lg =  ls_path-path_lg.
    REPLACE ALL OCCURRENCES OF 'SYSID' IN path_ln WITH sy-sysid.
    REPLACE ALL OCCURRENCES OF 'SYSID' IN path_ls WITH sy-sysid.
    REPLACE ALL OCCURRENCES OF 'SYSID' IN path_lc WITH sy-sysid.
    REPLACE ALL OCCURRENCES OF 'SYSID' IN path_lg WITH sy-sysid.
  ENDIF.

  SELECT DISTINCT * FROM zfbc_path_postel
     INTO ls_path WHERE area_app = 'FT'.
  ENDSELECT.

  IF sy-subrc = 0.
    path_ft =  ls_path-path_ln.
    REPLACE ALL OCCURRENCES OF 'SYSID' IN path_ft WITH sy-sysid.
  ENDIF.

  CASE 'X'.
    WHEN rb_fad.
      gv_dirnam = path_ft.
    WHEN rb_lnd.
      gv_dirnam = path_ln.
    WHEN rb_lsd.
      gv_dirnam = path_ls.
    WHEN rb_lcd.
      gv_dirnam = path_lc.
    WHEN rb_lgd.
      gv_dirnam = path_lg.
    WHEN rb_fai.
      REPLACE ALL OCCURRENCES OF '/FABIO/' IN path_ft WITH '/FABIO/SENT/'.
      gv_dirnam = path_ft.
    WHEN rb_lni.
      REPLACE ALL OCCURRENCES OF '/FABIO/' IN path_ln WITH '/FABIO/SENT/'.
      gv_dirnam = path_ln.
    WHEN rb_lsi.
      REPLACE ALL OCCURRENCES OF '/FABIO/' IN path_ls WITH '/FABIO/SENT/'.
      gv_dirnam = path_ls.
    WHEN rb_lci.
      REPLACE ALL OCCURRENCES OF '/FABIO/' IN path_lc WITH '/FABIO/SENT/'.
      gv_dirnam = path_lc.
    WHEN rb_lgi.
      REPLACE ALL OCCURRENCES OF '/FABIO/' IN path_lg WITH '/FABIO/SENT/'.
      gv_dirnam = path_lg.
    WHEN rb_lgn.
      CONCATENATE path_lg '/NO_FABIO/' INTO path_lg.
      gv_dirnam = path_lg.
  ENDCASE.

  CALL FUNCTION 'EPS2_GET_DIRECTORY_LISTING'
    EXPORTING
      iv_dir_name            = gv_dirnam
    TABLES
      dir_list               = lt_dir
    EXCEPTIONS
      invalid_eps_subdir     = 1
      sapgparam_failed       = 2
      build_directory_failed = 3
      no_authorization       = 4
      read_directory_failed  = 5
      too_many_read_errors   = 6
      empty_directory_list   = 7.

  IF sy-subrc <> 0
  OR lt_dir[] IS INITIAL.
    MESSAGE i208(00) WITH TEXT-008.
    EXIT.
  ENDIF.

  gs_out-pdf = '@IT@'.
  LOOP AT lt_dir INTO ls_dir WHERE name CP '*.PDF'.
    gs_out-name = ls_dir-name.
    CONCATENATE ls_dir-mtim+6(4) ls_dir-mtim+3(2) ls_dir-mtim(2)
  INTO gs_out-datum.
    CONCATENATE ls_dir-mtim+11(2) ls_dir-mtim+14(2) ls_dir-mtim+17(2)
    INTO gs_out-uzeit.
    CHECK gs_out-datum IN so_datum.
    CHECK gs_out-datum IN so_datum.
    IF pa_uname IS NOT INITIAL.
      IF gs_out-name CS pa_uname.
        APPEND gs_out TO gt_out.
      ENDIF.
    ELSE.
      APPEND gs_out TO gt_out.
    ENDIF.
  ENDLOOP.

  IF gt_out[] IS INITIAL.
    MESSAGE i208(00) WITH TEXT-008.
    EXIT.
  ELSE.
    SORT gt_out.
  ENDIF.

ENDFORM.

*----------------------------------------------------------------------*
* FORM OUTPUT_ALV                                                      *
*----------------------------------------------------------------------*
FORM output_alv.

  CLEAR: go_docking, go_splitter, go_container_l, go_container_r.

  CREATE OBJECT go_docking
    EXPORTING
      repid = sy-repid
      dynnr = '0100'
      ratio = '95'. "--max container length

* Create a splitter with 1 row and 2 column
  CREATE OBJECT go_splitter
    EXPORTING
      parent  = go_docking
      rows    = 1
      columns = 2.

** Right Container
  go_splitter->get_container(
    EXPORTING
      row       = 1
      column    = 2
    RECEIVING
      container = go_container_r ).

** Left Container
  go_splitter->get_container(
    EXPORTING
      row       = 1
      column    = 1
    RECEIVING
      container = go_container_l ).

  CREATE OBJECT go_gui_html_viewer
    EXPORTING
      parent = go_container_r.
  PERFORM preview_pdf USING 1.

  TRY.
      cl_salv_table=>factory(
        EXPORTING
          r_container = go_container_l
        IMPORTING
          r_salv_table = go_alv
        CHANGING
          t_table      = gt_out ).
      PERFORM set_settings.
      go_alv->display( ).
    CATCH cx_salv_msg.
      " error handling
      RETURN.
  ENDTRY.

ENDFORM.

*----------------------------------------------------------------------*
* FORM SET_SETTINGS                                                    *
*----------------------------------------------------------------------*
FORM set_settings.

  DATA: ls_key        TYPE salv_s_layout_key,
        lo_cols       TYPE REF TO cl_salv_columns_table,
        lo_col        TYPE REF TO cl_salv_column_table,
        lo_funcs      TYPE REF TO cl_salv_functions_list,
        lo_layout     TYPE REF TO cl_salv_layout,
        lo_display    TYPE REF TO cl_salv_display_settings,
        lo_selections TYPE REF TO cl_salv_selections,
        lo_events     TYPE REF TO cl_salv_events_table.

*Events
  lo_events = go_alv->get_event( ).
  CREATE OBJECT go_events.
  SET HANDLER go_events->on_user_command FOR lo_events.
  SET HANDLER go_events->on_single_click FOR lo_events.

*Columns
  lo_cols = go_alv->get_columns( ).
  TRY.
      lo_col ?= lo_cols->get_column( 'NAME' ).
      lo_col->set_cell_type( if_salv_c_cell_type=>hotspot ).
      lo_col ?= lo_cols->get_column( 'PDF' ).
      lo_col->set_cell_type( if_salv_c_cell_type=>button ).
      lo_col->set_short_text( 'View Pdf' ).
    CATCH cx_salv_error.
      " error handling
      RETURN.
  ENDTRY.

  lo_cols->set_optimize( 'X' ).

*Layouts
  ls_key-report = sy-repid.
  lo_layout = go_alv->get_layout( ).
  lo_layout->set_key( ls_key ).
  lo_layout->set_default( 'X' ).
  lo_layout->set_save_restriction( ).

*Functions
  lo_funcs = go_alv->get_functions( ).
  lo_funcs->set_all( ).
  IF ( rb_fad = 'X' OR rb_lnd = 'X' OR rb_lsd = 'X' OR rb_lcd = 'X' )
    AND gv_canc = 'X'.
    TRY.
        lo_funcs->add_function(
          name     = '&DEL'
          icon     = '@11@'
          text     = ''
          tooltip  = 'Eliminare'
          position =
            if_salv_c_function_position=>right_of_salv_functions ).
      CATCH cx_salv_wrong_call.
        " error handling
        RETURN.
    ENDTRY.
  ENDIF.

*Display Settings
  lo_display = go_alv->get_display_settings( ).
  lo_display->set_striped_pattern( 'X' ).

*Selections
  lo_selections = go_alv->get_selections( ).
  lo_selections->set_selection_mode(
    if_salv_c_selection_mode=>row_column ).

ENDFORM.

*----------------------------------------------------------------------*
* FORM USER_COMMAND                                                    *
*----------------------------------------------------------------------*
FORM user_command.

  CASE ok_code.
    WHEN 'BACK' OR 'EXIT' OR 'CANC'.
      SET SCREEN 0.
      LEAVE SCREEN.
  ENDCASE.

ENDFORM.

*----------------------------------------------------------------------*
* FORM PREVIEW_PDF                                                     *
*----------------------------------------------------------------------*
FORM preview_pdf USING pf_row TYPE i.

  DATA: lv_url(255) TYPE c,
        lt_data     TYPE STANDARD TABLE OF x255.

  READ TABLE gt_out INTO gs_out INDEX pf_row.
  CONCATENATE gv_dirnam gs_out-name INTO gv_url.
  OPEN DATASET gv_url FOR INPUT IN BINARY MODE.
  CHECK sy-subrc = 0.
  READ DATASET gv_url INTO gv_content.
  CLOSE DATASET gv_url.

  CALL FUNCTION 'SCMS_XSTRING_TO_BINARY'
    EXPORTING
      buffer     = gv_content
    TABLES
      binary_tab = lt_data.

  go_gui_html_viewer->load_data(
    EXPORTING
      type                 = 'application'
      subtype              = 'pdf'
    IMPORTING
      assigned_url         = lv_url
    CHANGING
      data_table           = lt_data
    EXCEPTIONS
      dp_invalid_parameter = 1
      dp_error_general     = 2
      cntl_error           = 3
      OTHERS               = 4 ).
  go_gui_html_viewer->show_url(
    url = lv_url
    in_place = 'X' ).

ENDFORM.

*----------------------------------------------------------------------*
* FORM VIEW_PDF                                                        *
*----------------------------------------------------------------------*
FORM view_pdf USING pf_row TYPE i.

  DATA: lv_url(255) TYPE c,
        lv_content  TYPE xstring.

  READ TABLE gt_out INTO gs_out INDEX pf_row.
  CONCATENATE gv_dirnam gs_out-name INTO lv_url.
  IF lv_url <> gv_url.
    OPEN DATASET lv_url FOR INPUT IN BINARY MODE.
    CHECK sy-subrc = 0.
    READ DATASET lv_url INTO lv_content.
    CLOSE DATASET lv_url.
  ELSE.
    lv_content = gv_content.
  ENDIF.

  CALL FUNCTION 'ISH_DALE_PDF_DISPLAY'
    EXPORTING
      i_pdf = lv_content.

ENDFORM.

*----------------------------------------------------------------------*

Secretive adj

/ˈsiːkrɪtɪv/

Traducendo GEMJI ho imparato questo vocabolo.

English		Italiano
secretive adj	(person: keeping secrets)	riservato agg
	He's so secretive he won't tell you anything unless you plead with him.
	È così riservato che non racconta niente a meno che non lo si implori.

The legend says that in the year 2349 an adventurous young man hacked into the head of a Gemji prince - the most secretive and thriving high-class caste, unveiling a very well-kept secret.

La leggenda dice che nell’anno 2349 un giovane avventuroso ha hackerato la testa di un principe Gemji – l’alta casta più riservata e prospera – svelando un segreto molto ben custodito.

Da range a clausola where

  TYPES: BEGIN OF ty_range,
           tablename LIKE rsdstabs-prim_tab,
           frange_t TYPE ty_frange_t,
         END OF ty_range.
  TYPES: ty_range_t TYPE STANDARD TABLE OF ty_range.
  TYPES: ty_fields TYPE STANDARD TABLE OF rsdsfields.
  
  DATA: it_fields TYPE ty_fields.
  DATA: it_ranges TYPE ty_range_t.
  DATA: lv_selid TYPE rsdynsel-selid.
  DATA: lt_tables TYPE STANDARD TABLE OF rsdstabs.
  DATA: lt_where TYPE rsds_twhere.

  CALL FUNCTION 'FREE_SELECTIONS_INIT'
    EXPORTING
      kind         = 'T'
    IMPORTING
      selection_id = lv_selid
    TABLES
      tables_tab   = lt_tables.

  CALL FUNCTION 'FREE_SELECTIONS_DIALOG'
    EXPORTING
      selection_id    = lv_selid
      title           = 'Select WHERE criteria'
      as_window       = 'X'
      start_row       = 7
      start_col       = 10
    IMPORTING
      field_ranges    = it_ranges
    TABLES
      fields_tab      = it_fields
    EXCEPTIONS
      internal_error  = 1
      no_action       = 2
      selid_not_found = 3
      illegal_status  = 4
      OTHERS          = 5.

  CALL FUNCTION 'FREE_SELECTIONS_RANGE_2_WHERE'
    EXPORTING
      field_ranges  = it_ranges
    IMPORTING
      where_clauses = lt_where.

L'anello di Salomone, Jonathan Stroud

L'anello di Salomone
di Jonathan Stroud
Editore: Salani


Lingua: Italiano | Numero di pagine: 407 | ISBN-13: 9788862564724 | Data di pubblicazione: 2011-04-07 | Traduzione di Riccardo Cravero | Genere: Narrativa & Letteratura - Umorismo - Fantasy

SAPscript: testo legato alla valorizzazione della variabile

/E	DATI_BANCA_P
*	&t_banca-banka&
*	&t_banca-stras&
*	&t_banca-ort01&
/:	IF &T_BANCA-BANKS& EQ 'IT '.
*	&'Cod. ABI: 't_banca-abi& &'Cod. CAB: 't_banca-cab&
/:	ELSE.
*	&t_banca-str&&t_banca-bnklz&
/:	ENDIF.

La matrice spezzata, Bruce Sterling

La matrice spezzata
di Bruce Sterling
Editore: Mondadori


Lingua: Italiano | Numero di pagine: 396 | ISBN: A000065883 | Data di pubblicazione: 1986-01-01 | Genere: Narrativa & Letteratura - Filosofia - Fantascienza

Neutral adj

/ˈnjuːtrəl/

Traducendo Avenue non ho imparato alcun nuovo vocabolo. Ho scelto allora questa parola.

English		Italiano
neutral adj	(physics: having no charge)	neutro agg
	The molecules are electrically neutral and stable.
	Le molecole sono elettricamente neutre e stabili.
neutral adj	(impartial, not taking a side)	neutrale, imparziale agg
	A neutral party was called in to arbitrate between the two.
	Nell'arbitrato tra i due è stata chiamata una parte neutrale.
neutral adj	(vehicle gears: disengaged)	in folle loc agg
	Danielle couldn't move the car while it was in neutral gear.
	Danielle non riusciva a spuntare quando la macchina era in folle.

By doing this, the player can make a disc of their color leave the game area and move into the neutral area.

Così facendo, il giocatore può far sì che un disco del suo colore lasci l'area di gioco e si sposti nell'area neutrale.

Catch Don Falconi

Echi in tempesta, Christelle Dabos

Echi in tempesta
L'Attraversaspecchi - Libro 4
di Christelle Dabos
Editore: e/o (Dal mondo)


Lingua: Italiano | Numero di pagine: 576 | ISBN-13: 9788833572239 | Data di pubblicazione: 2020-07-xx | Genere: Narrativa & Letteratura - Rosa - Fantasy

Catchphrase n

/ˈkætʃfreɪz/

Traducendo Fox Matters ho imparato questo vocabolo.

English		Italiano
catchphrase, catch phrase, catch-phrase n	(advertising slogan)	slogan, motto nm, battuta nf
	Suddenly, everyone seemed to be repeating the company's memorable catchphrase.
	Improvvisamente tutti sembravano ripetere il memorabile slogan aziendale.

Lisie Sprawy gained popularity with their unique setting, uncommon humor and fluffiness, to the point that some catchphrases are used commonly in everyday language of many fans.

Lisie Sprawy ha guadagnato popolarità per la sua ambientazione unica, un umorismo non comune e la sua tenerezza, al punto che alcuni tormentoni sono utilizzati comunemente da molti fan nel linguaggio quotidiano.

Banner n

/ˈbænər/

Traducendo Archers of Nand non ho imparato alcun nuovo vocabolo. Ho scelto allora questa parola.

English		Italiano
banner n	(cloth sign fixed in place)	striscione nm
	The Italian restaurant on the corner put up a new banner.
	Il ristorante italiano dietro l'angolo ha piazzato un nuovo striscione.
banner n	(flag of nation, etc.)	bandiera nf
	The army could see explosions light up the night sky above their national banner.
	L'esercito riusciva a vedere il cielo illuminato dalle esplosioni sopra la loro bandiera nazionale.

The combination of colored banners will indicate the territory.

La combinazione di stendardi colorati indicherà il territorio.

Cristalli sognanti, Theodore Sturgeon

Cristalli sognanti
di Theodore Sturgeon
Editore: Mondadori (Urania extra - numeri bis)


Lingua: Italiano | Numero di pagine: 198 | ISBN: A000025676 | Data di pubblicazione: 1963-11-24 | Traduzione di Tom Arno | Genere: Narrativa & Letteratura - Fantascienza

Night Market

Triangle n

/ˈtraɪæŋgəl/

Traducendo Threepia non ho imparato alcun nuovo vocabolo. Ho scelto allora questa parola.

English		Italiano
triangle n	(three-sided shape)	triangolo nm
	There were cookies in the shape of hearts and triangles.
	C'erano biscotti a forma di cuori e di triangolo.

The same Triangle on the game grid can be used by different players to represent different shapes or colors during their respective turns.

Lo stesso Triangolo sulla griglia di gioco può essere usato da giocatori diversi per rappresentare forme o colori differenti durante i loro rispettivi turni.

La memoria di Babel, Christelle Dabos

La memoria di Babel
L'Attraversaspecchi - Libro 3
di Christelle Dabos
Editore: e/o (Dal mondo)


Lingua: Italiano | Numero di pagine: 560 | ISBN-13: 9788833571393 | Data di pubblicazione: 2019-10-09 | Genere: Narrativa & Letteratura - Rosa - Fantasy

Outfox [sb] vtr

/ˌaʊtˈfɒks/

Traducendo Gorinto ho imparato questo vocabolo.

English		Italiano
outfox [sb] vtr	informal (outwit)	vincere in astuzia, raggirare vtr
	Politics is often the art of outfoxing the opposition.
	Spesso la politica è l'arte di vincere in astuzia l'opposizione.

See if you can outfox this unpredictable rival!

Prova a sconfiggere questo imprevedibile rivale!

Moat n

/ˈməʊt/

Traducendo Wolfenstein: All-Stars ho imparato questo vocabolo.

English		Italiano
moat n	(trench around castle)	fossato nm
	Sentries found a body in the moat early the next morning.
	La mattina seguente le sentinelle trovarono un corpo nel fossato.

Your foot slipped off the stone and you fell... straight into the channel connected with the moat!

Il tuo piede è scivolato giù dalla pietra e sei caduto... dritto nel canale collegato al fossato!

Wiretapping n

/ˈwaɪəˌtæp/

Traducendo Wolfenstein: The Old Blood ho imparato questo vocabolo.

English		Italiano
wiretap [sth] vtr	(bug: a telephone line)	intercettare, mettere [qlcs/qlcn] sotto controllo vtr
	The FBI wiretapped the phone.
	L'FBI mise il telefono sotto controllo.
wiretap n	(bug: for listening in on phone calls)	microspia, cimice nf
	The wiretap helped the police to catch the criminal.
	La cimice consentì alla polizia di acciuffare il criminale.
wiretapping n	uncountable (use of electronic bugging device)	intercettazione telefonica nf
	The police used wiretapping in their investigations.
	Nelle indagini, la polizia usò le intercettazioni telefoniche.

Wiretapping equipment
Richard's model is not considered when determining noise generation.

Attrezzatura per le intercettazioni
La miniatura di Richard non viene considerata nel determinare la generazione del rumore.

Gli scomparsi di Chiardiluna, Christelle Dabos

Gli scomparsi di Chiardiluna
L'Attraversaspecchi - Libro 2
di Christelle Dabos
Editore: e/o (Dal mondo)


Lingua: Italiano | Numero di pagine: 576 | ISBN-13: 9788833570532 | Data di pubblicazione: 2019-01-xx | Traduttore: Alberto Bracci Testasecca | Genere: Narrativa & Letteratura - Rosa - Fantasy

Mildly adv

/ˈmaɪldli/

Traducendo Wolfenstein: The Board Game ho imparato questo vocabolo.

English		Italiano
mildly adv	(moderately)	lievemente, leggermente, moderatamente, vagamente avv
	Your comment was mildly offensive.
	Il tuo commento è stato leggermente offensivo.
mildly adv	figurative (benignly)	gentilmente, dolcemente avv
	The gentle man spoke mildly to us.
	Il galantuomo ci ha parlato gentilmente.

Your companions report that there are two officers on this level of the castle who, to put it mildly, do not like each other.

I tuoi compagni ti riferiscono che in questo livello del castello ci sono due ufficiali che, per usare un eufemismo, non si piacciono.

Jolt vtr

/ˈdʒəʊlt/

Traducendo Inicio ho imparato questo vocabolo.

English		Italiano
jolt [sb/sth] vtr	(by electricity)	dare la scossa vtr
	100 watts of electricity jolted Eric as he touched the wire.
	Quando Eric toccò il filo 100 watt di elettricità gli diedero la scossa.
jolt [sb/sth] vtr	figurative (move with jerk)	spingere, colpire, scuotere, sballottare vtr
	Another train passenger stumbled and jolted Paula's arm, causing her to spill the cup of tea she was holding.
	Un altro passeggero del treno inciampò colpendo il braccio di Paula e facendole rovesciare la tazza di tè che teneva in mano.

This will jolt you out of your usual game method!

Questo vi farà uscire dal vostro solito schema di gioco!

Fidanzati dell'inverno, Christelle Dabos

Fidanzati dell'inverno
L'Attraversaspecchi - Libro 1
di Christelle Dabos
Editore: E/O


Lingua: Italiano | Numero di pagine: 512 | ISBN-13: 9788866329459 | Data di pubblicazione: 18/04/2018 | Traduttore: Alberto Bracci Testasecca | Genere: Narrativa & Letteratura - Fantasy - Adolescenti

Threepia