Create a class in ECLIPSE ( AMDP Class )
Note -You need to have HAND DB to use AMDP 

CLASS zamdp5 DEFINITION
PUBLIC
FINAL
CREATE PUBLIC .
PUBLIC SECTION.
INTERFACES: if_amdp_marker_hdb.
TYPES:BEGIN OF lty_vbak,
vbeln TYPE vbeln,
auart TYPE auart,
netwr TYPE netwr_ap,
END OF lty_vbak,
BEGIN OF lty_vbak1,
vbeln TYPE vbeln,
auart TYPE auart,
netwr TYPE netwr_ap,
posnr TYPE posnr_va,
matnr TYPE matnr,
END OF lty_vbak1.
TYPES:lty_t_vbak TYPE TABLE OF lty_vbak,
lty_t_vbak1 TYPE TABLE OF lty_vbak1.
METHODS : get_vbak IMPORTING VALUE(iv_mandt) TYPE mandt
VALUE(im_vtweg) TYPE vtweg
VALUE(im_spart) TYPE spart
EXPORTING VALUE(et_vbak) TYPE lty_t_vbak,
get_vbak_vbap IMPORTING VALUE(iv_mandt) TYPE mandt
VALUE(im_vtweg) TYPE vtweg
VALUE(im_spart) TYPE spart
EXPORTING VALUE(et_vbak1) TYPE lty_t_vbak1.
PROTECTED SECTION.
PRIVATE SECTION.
ENDCLASS.
CLASS zamdp5 IMPLEMENTATION.
METHOD get_vbak
BY DATABASE PROCEDURE FOR HDB LANGUAGE SQLSCRIPT OPTIONS READ-ONLY USING vbak .
et_vbak = select vbeln, auart, netwr from vbak
where mandt = iv_mandt and
vtweg = im_vtweg and
spart = im_spart ;
ENDMETHOD.
METHOD get_vbak_vbap
BY DATABASE PROCEDURE FOR HDB LANGUAGE SQLSCRIPT OPTIONS READ-ONLY USING vbak vbap .
et_vbak1 = select vbak.vbeln, vbak.auart, vbak.netwr ,
vbap.posnr, vbap.matnr
from vbak as vbak
inner join vbap as vbap
on vbak.vbeln = vbap.vbeln
where vbak.mandt = iv_mandt and
vbak.vtweg = im_vtweg and
vbak.spart = im_spart and
auart = 'ZSER';
ENDMETHOD.
ENDCLASS.
Program
CLASS lcl_amdp_sql DEFINITION.

PUBLIC SECTION.
CLASS-METHODS: run.
ENDCLASS.
*
CLASS lcl_amdp_sql IMPLEMENTATION.
METHOD run.
TRY.
IF cl_abap_dbfeatures=>use_features(
requested_features = VALUE #( ( cl_abap_dbfeatures=>call_amdp_method ) ) ) = abap_true.
NEW zamdp5( )->get_vbak( EXPORTING iv_mandt = sy-mandt im_vtweg = '01' im_spart = '01'
IMPORTING
et_vbak = DATA(it_vbak)
).
NEW zamdp5( )->get_vbak_vbap( EXPORTING iv_mandt = sy-mandt
IMPORTING
et_vbak1 = DATA(it_vbak1)
).
ENDIF.
ENDTRY.
ENDMETHOD.
ENDCLASS.
START-OF-SELECTION.
lcl_amdp_sql=>run( ).