Logiczna baza danych. Wykorzystanie wielu w jednym programie

Jeśli programujesz, administrujesz, integrujesz i masz wątpliwość lub obawę, to właśnie najlepsze miejsce dla Ciebie. Pisz śmiało...
ODPOWIEDZ
se38
Posty: 32
Rejestracja: pt maja 04, 2007 4:17 pm

Logiczna baza danych. Wykorzystanie wielu w jednym programie

Post autor: se38 »

Witam

Czy ktoś z was miał podobny problem z wykorzystaniem
więcej niż jednej logicznej bazy danych w programie

We właściwościach jest tylko jedno miejsce na wpisanie bazy .

A dałoby się więcej wpisać ??
abaper
Posty: 99
Rejestracja: sob kwie 28, 2007 8:34 am
Been thanked: 1 time

Post autor: abaper »

Witaj

Użyj modułu funkcyjnego "LDB_PROCESS"

Pozdrawiam
se38
Posty: 32
Rejestracja: pt maja 04, 2007 4:17 pm

Post autor: se38 »

Dzięki :)


mam tylko jeden problem

jak przekazać wartości parametrów selekcji ??


Pozdrawiam
abaper
Posty: 99
Rejestracja: sob kwie 28, 2007 8:34 am
Been thanked: 1 time

Post autor: abaper »

To i masz przykład :)

Kod: Zaznacz cały

REPORT zldbprocess.

DATA cbtab TYPE TABLE OF ldbcb.
DATA wa_cbtab LIKE LINE OF cbtab.

DATA sstab TYPE TABLE OF rsparams.
DATA wa_sstab LIKE LINE OF sstab.


wa_cbtab-ldbnode  = 'SPFLI'.
wa_cbtab-get      = 'X'.
wa_cbtab-get_late = ' '.
wa_cbtab-cb_prog  = sy-cprog.
wa_cbtab-cb_form  = 'CB_SPFLI'.
APPEND wa_cbtab TO cbtab.

wa_cbtab-ldbnode  = 'SFLIGHT'.
wa_cbtab-get      = 'X'.
wa_cbtab-get_late = ' '.
wa_cbtab-cb_prog  = sy-cprog.
wa_cbtab-cb_form  = 'CB_SFLIGHT'.
APPEND wa_cbtab TO cbtab.


wa_sstab-selname  = 'AIRP_FR'.
wa_sstab-kind     = 'S'.
wa_sstab-sign     = 'I'.
wa_sstab-option   = 'EQ'.
wa_sstab-low      = 'FRA'.
APPEND wa_sstab TO sstab.


CALL FUNCTION 'LDB_PROCESS'
  EXPORTING
    ldbname     = 'F1S'
  TABLES
    callback    = cbtab
    selections  = sstab .


*///////////////////////////////////////////////////////////////////*


FORM cb_spfli  USING  nodename  TYPE ldbn-ldbnode
                      wa_spfli  TYPE spfli
                      mode      TYPE c
                      selected  TYPE c.

   WRITE: / wa_spfli-carrid,
            wa_spfli-connid,
            wa_spfli-airpfrom,
            wa_spfli-airpto.

ENDFORM.



FORM cb_sflight  USING  nodename   TYPE ldbn-ldbnode
                        wa_sflight TYPE sflight
                        mode       TYPE c
                        selected   TYPE c.

   WRITE: /3 wa_sflight-fldate,
             wa_sflight-seatsmax,
             wa_sflight-seatsocc.

ENDFORM.
ODPOWIEDZ