evento GET
 

Para que sirve este evento:

GET <tabla> [ FIELDS <lista> ]
GET <tabla> LATE.

Por lo que he leido se que sirve para base de datos lógicas. Les agradecería mucha si pueden poner algún ejemplo.
Una base de datos logica tambien llamadas bases de datos deductivas, en las cuales se almacenan hecho y reglas y por medio de un mecanismo de inferencia llamado solucion se puede inferir informacion de la base de datos.

espero por respuestas..., gracias.

Básicamente y solo en la teoría ya que no los he utilizado nunca el GET lo que hace es como un select a la BBDD lógica según los datos de la pantalla de selección. El GET LATE es como el at last (O at end of no estoy seguro) de los loops.

Saludos

NODES: spfli, sflight, sbook.

DATA free_seats LIKE sflight-seatsocc.

CONSTANTS line_size LIKE sy-linsz VALUE 83.

GET spfli FIELDS carrid connid cityfrom airpfrom cityto airpto.
FORMAT COLOR COL_HEADING INTENSIFIED OFF.
WRITE: / sy-vline, spfli-carrid, spfli-connid, spfli-cityfrom,
spfli-airpfrom, spfli-cityto,spfli-airpto,
AT line_size sy-vline.

GET sflight FIELDS fldate price currency planetype seatsmax seatsocc.
free_seats = sflight-seatsmax - sflight-seatsocc.
FORMAT COLOR COL_NORMAL INTENSIFIED ON.
WRITE: / sy-vline, sflight-fldate,
sflight-price CURRENCY sflight-currency, sflight-currency, sflight-planetype,
free_seats, sflight-seatsocc, sflight-seatsmax,
AT line_size sy-vline.


GET sbook FIELDS bookid customid smoker luggweight wunit.
FORMAT COLOR COL_NORMAL INTENSIFIED OFF.
WRITE : / sy-vline, sbook-bookid, sbook-customid, sbook-smoker,
sbook-luggweight UNIT sbook-wunit, sbook-wunit,
AT line_size sy-vline.

GET spfli LATE.
ULINE.




el get recorre los adatos de informacion concentrada pero el get late cuado termina de ejecutar el recorrido normal lo que esta en este get late se ejecuta posteriormente por ejemplo el ULINE despues de que termine de recorrer el nodo spfli

*encontre este que es mas ilustrativo con dos get late.

NODES: spfli, sflight, sbook.

DATA free_seats LIKE sflight-seatsocc.

CONSTANTS line_size LIKE sy-linsz VALUE 83.

SELECTION-SCREEN BEGIN OF BLOCK NAME
WITH FRAME TITLE TEXT-001.
SELECT-OPTIONS so_date for sbook-order_date.
SELECTION-SCREEN END OF BLOCK NAME.

GET spfli FIELDS carrid connid cityfrom airpfrom cityto airpto.
FORMAT COLOR COL_HEADING INTENSIFIED OFF.
WRITE: / sy-vline, spfli-carrid, spfli-connid, spfli-cityfrom,
spfli-airpfrom, spfli-cityto,spfli-airpto,
AT line_size sy-vline.


GET sflight FIELDS fldate price currency planetype seatsmax seatsocc.
free_seats = sflight-seatsmax - sflight-seatsocc.
FORMAT COLOR COL_NORMAL INTENSIFIED ON.
WRITE: / sy-vline, sflight-fldate,
sflight-price CURRENCY sflight-currency, sflight-currency, sflight-planetype,
free_seats, sflight-seatsocc, sflight-seatsmax,
AT line_size sy-vline.


GET sbook FIELDS bookid customid smoker luggweight wunit order_date.
CHECK so_date.
FORMAT COLOR COL_NORMAL INTENSIFIED OFF.
WRITE : / sy-vline, sbook-bookid, sbook-customid, sbook-smoker,
sbook-luggweight UNIT sbook-wunit, sbook-wunit, sbook-order_date,
AT line_size sy-vline.

GET spfli LATE.
ULINE.
write '##################################'.
new-PAGE.

GET sflight LATE.
write '***********************************'.
ULINE.