Displaying the list of numbers in the box on the screen

Question

Hi folks,
This is what i am looking to achieve, I have an agency number (regulierer -field from jhaga) table Each agency has several advertisers listed to it, in the same table separate field inserent contains the advertiser numbers
when I type in the agency number i need to have a listbox appearing in the same screen that contains the list of the advertiser numbers in them.
how to write the code for that?
I know I have to write the select query to grab the list of advertiser numbers and then how tostore in the list box and display on the screen the second part i do not know.
thanks in advance.
Santhosh

Answer 1

Hi,
Here are the sample codes.
<b>SAMPLE CODE 1:</b>
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.
  WRITE: / 'Parameter:', ps_parm.
SAMPLE CODE2:
type-pools: vrm.
data: it_val type vrm_values,
      w_line like line of it_val.
parameters p_bukrs like t001-bukrs as listbox
           visible length 25 obligatory.
initialization.
  select bukrs butxt from t001 into (w_line-key, w_line-text).
    append w_line to it_val.
    check p_bukrs is initial.
    p_bukrs = w_line-key.
  endselect.
at selection-screen output.
  call function 'VRM_SET_VALUES'
       exporting
            id     = 'P_BUKRS'
            values = it_val.
end-of-selection.
Hope it helps.