Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- METHOD juegoset_create_entity.
- DATA:
- wa_nuevo_juego TYPE ztca_juegos_pa.
- io_data_provider->read_entry_data(
- IMPORTING
- es_data = er_entity
- ).
- MOVE-CORRESPONDING er_entity TO wa_nuevo_juego.
- SELECT MAX( id_juego )
- FROM ztca_juegos_pa
- INTO wa_nuevo_juego-id_juego.
- IF sy-subrc EQ 0.
- wa_nuevo_juego-id_juego = wa_nuevo_juego-id_juego + 1.
- ELSE.
- wa_nuevo_juego-id_juego = 1.
- ENDIF.
- INSERT ztca_juegos_pa FROM wa_nuevo_juego.
- ENDMETHOD.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement