Help reagrding the selection query

Question

Hi All...
I have     VBELN
     LFART
     VKORG
     KUNNR
     ERDAT
     LFDAT
     VSTEL
     ROUTE in my selection-screen. All the fields are from LIKP.
Now I need to add one more field LAND1 from the table VBPA in the selection screen.
This is my logic to filter the previous requirement. Now how to validate the LAND1?
-> LIKP
  select vbeln
          into table i_likp
          from likp
          where vbeln in s_vbeln
            and lfart in s_lfart
            and vkorg in s_vkorg
            and kunnr in s_kunnr
            and erdat in s_erdat
            and lfdat in s_lfdat
            and vstel = p_vstel
            and route in s_route.
  if sy-subrc = 0.
-> LIPS
    select vbeln posnr bwtar volum
            into table i_lips
            from lips
            for all entries in i_likp
            where vbeln = i_likp-vbeln.
Please help me in that. I will reward u with good points.
Reagrds
Arjun Jain

Answer 1

For LAND1 validation do as below.
AT SELECTION-SCREEN ON s_land1.
SELECT land1 FROM t005
                       into t005-land1
                       where land1 IN s_land1.
if sy-subrc NE 0.
message e000 WITH 'Enter valid Land value'.
endif.
For the query u can use join
select a~vbeln  b~posnr b~bwtar b~volum
         from likp as a inner join  lips as b
         on a~vbeln =b~vbeln
         into table i_tab
         where a~vbeln in s_vbeln
          and a~lfart in s_lfart
          and a~vkorg in s_vkorg
          and a~kunnr in s_kunnr
          and a~erdat in s_erdat
         and a~lfdat in s_lfdat
        and a~vstel = p_vstel
        and a~route in s_route.
This will solve ur problem.
U can reward for the helpful answers.