Własna podpowiedz pod F4 / ABAP

Jeśli programujesz, administrujesz, integrujesz i masz wątpliwość lub obawę, to właśnie najlepsze miejsce dla Ciebie. Pisz śmiało...
ODPOWIEDZ
catch_all
Posty: 14
Rejestracja: sob maja 12, 2007 5:23 pm

Własna podpowiedz pod F4 / ABAP

Post autor: catch_all »

Witojcie

Może jest taka możliwość abapie
żeby po naduszeniu F4 dostać
zawartość tabelki wewn.

np dla select-options

Pozd
lwojcik
Posty: 11
Rejestracja: pn kwie 30, 2007 1:45 pm

Post autor: lwojcik »

cześć,
czegoś takiego potrzebujesz?
report zlukasz.

tables: t001.

data: begin of it001 occurs 0,
bukrs type t001-bukrs,
butxt type t001-butxt,
ort01 type t001-ort01,
land1 type t001-land1,
end of it001.

select-options s_bukrs for t001-bukrs.

initialization.
select bukrs butxt ort01 land1 into table it001 from t001.

at selection-screen on value-request for s_bukrs-low.
call function 'F4IF_INT_TABLE_VALUE_REQUEST'
exporting
retfield = 'BUKRS'
dynprofield = 'S_BUKRS'
dynpprog = sy-cprog
dynpnr = sy-dynnr
value_org = 'S'
tables
value_tab = it001.

start-of-selection.
pozdrawiam - Lukasz Wojcik - www.icg.pl
lwojcik
Posty: 11
Rejestracja: pn kwie 30, 2007 1:45 pm

Post autor: lwojcik »

pozdrawiam - Lukasz Wojcik - www.icg.pl
catch_all
Posty: 14
Rejestracja: sob maja 12, 2007 5:23 pm

Post autor: catch_all »

Dzięki zadziałało :)

Ale mam dalej pytania
Czy możliwe jest wyświetlenie na ekranie selekcji
coś na wzór "List Boxes" ?

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

Post autor: se38 »

Kiedyś widziałem takie rozwiązanie działające oczywiście

TYPE-POOLS: vrm.
DATA: name TYPE vrm_id, list TYPE vrm_values, value LIKE LINE OF list.
PARAMETERS: ps_parm(10) AS LISTBOX VISIBLE LENGTH 10.
AT SELECTION-SCREEN OUTPUT.
name = 'PS_PARM'.
value-key = '1'. value-text = 'Line 1'. APPEND value TO list.
value-key = '2'. value-text = 'Line 2'. APPEND value TO list.
CALL FUNCTION 'VRM_SET_VALUES' EXPORTING id = name values = list.
START-OF-SELECTION.

BREAK-POINT.
ODPOWIEDZ